CONST/de

Funktion

Definiert eine symbolische Konstante.

 

 

Syntax

CONST symbol = numconst

CONST symbol = stringconst

CONST symbol = expression

 

 

Anmerkungen

Symbol	Der Name der Konstanten.
Numconst	Numerischer Wert für die Konstante.
Stringconst	Zeichenketten-Wert für die Konstante.
Expression	Ein Ausdruck (expression) der einen Wert für die Konstante ergibt.

 

Konstanten benötigen keinen Programmspeicher weil sie nur als Referenz beim Kompilieren dienen.

Der Compiler ersetzt jedes Auftreten der Konstanten durch den entsprechenden Wert.

 

Man kann eine Konstante verwenden um einem Wert einen sinnvollen Namen zu geben.

For example : variable = 1

 

                 const optHeaterOn = 1

                 variable = optHeaterOn

 

Der Programmcode ist besser zu lesen wenn Konstanten verwendet werden. Darüberhinaus muss nur eine Zeile Programmcode geändert werden wenn später zum Beispiel HeaterOn 2 sein soll.

 

 

See also

ALIAS

 

 

Example

'-----------------------------------------------------------------------------------------
'name : const.bas
'copyright : (c) 1995-2005, MCS Electronics
'purpose : demo for constants
'micro : Mega48
'suited for demo : yes
'commercial addon needed : no
'-----------------------------------------------------------------------------------------
 
$regfile = "m48def.dat" ' specify the used micro
$crystal = 4000000 ' used crystal frequency
$baud = 19200 ' use baud rate
$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
 
'dimension some variables
Dim Z As String * 10
Dim B As Byte
 
'assign some constants
'constants dont use program memory
Const S = "test"
Const A = 5 'declare a as a constant
Const B1 = &B1001
 
'or use an expression to assign a constant
Const X =(b1 * 3) + 2
Const Ssingle = Sin(1)
 
 
Print X
Print Ssingle
 
 
B = A
'the same as b = 5
 
Z = S
'the same as Z = "test"
 
Print A
Print B1
Print S
 
 
'you can use constants with conditional compilation
#if A = 5 ' note there is no then
Print "constant a is 5"
#if S = "test"
 Print "nested example"
#else ' else is optional
#endif
#else
#endif
End

Languages	English • Deutsch