DECR/de

From MCS Wiki AVR
< DECR(Difference between revisions)
Jump to: navigation, search
(See also)
(Example)
 
Line 37: Line 37:
 
<span style="font-family: Arial;">&nbsp;</span>
 
<span style="font-family: Arial;">&nbsp;</span>
  
= <span class="f_Header">Example</span> =
+
= <span class="f_Header">Beispiel</span> =
  
 
<br/><source lang="bascomavr">
 
<br/><source lang="bascomavr">
Line 49: Line 49:
 
'-----------------------------------------------------------------------------------------
 
'-----------------------------------------------------------------------------------------
 
   
 
   
$regfile = "m48def.dat" ' specify the used micro
+
$regfile = "m48def.dat" ' Benutzter Mikrocontroller
$crystal = 4000000 ' used crystal frequency
+
$crystal = 4000000 ' Benutzte Taktfrequenz
$baud = 19200 ' use baud rate
+
$baud = 19200 ' Baudrate
 
$hwstack = 32 ' default use 32 for the hardware stack
 
$hwstack = 32 ' default use 32 for the hardware stack
 
$swstack = 10 ' default use 10 for the SW stack
 
$swstack = 10 ' default use 10 for the SW stack
Line 58: Line 58:
 
Dim A As Byte , I As Integer
 
Dim A As Byte , I As Integer
 
   
 
   
A = 5 'assign value to a
+
A = 5 'Wertzuweisung zu A
Decr A 'decrease (by one)
+
Decr A 'Wert von A um eins vermindern.  A = A - 1
Print A 'print it
+
Print A 'Ausgabe.  Ergebnis: 4
 
   
 
   
 
   
 
   

Latest revision as of 00:50, 20 February 2013

Contents

Funktion

Vermindert den Wert einer Variablen um eins.

 

 

Syntax

DECR var

 

 

Anmerkungen

Es gibt häufig Situationen in denen der Wert einer Variablen um eins vermindert werden soll. Es ist einfacher zu schreiben:

DECR var

statt:

var = var - 1

 

 

Siehe auch

INCR

 

 

Beispiel


'-----------------------------------------------------------------------------------------
'name : decr.bas
'copyright : (c) 1995-2005, MCS Electronics
'purpose : demostrate decr
'micro : Mega48
'suited for demo : yes
'commercial addon needed : no
'-----------------------------------------------------------------------------------------
 
$regfile = "m48def.dat" ' Benutzter Mikrocontroller
$crystal = 4000000 ' Benutzte Taktfrequenz
$baud = 19200 ' Baudrate
$hwstack = 32 ' default use 32 for the hardware stack
$swstack = 10 ' default use 10 for the SW stack
$framesize = 40 ' default use 40 for the frame space
 
Dim A As Byte , I As Integer
 
A = 5 'Wertzuweisung zu A
Decr A 'Wert von A um eins vermindern.   A = A - 1
Print A 'Ausgabe.  Ergebnis: 4
 
 
I = 1000
Decr I
Print I
End

Languages   English Deutsch  
Personal tools
Namespaces
Variants
Actions
Navigation
In other languages
Language