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.

Beispiel: Zustand = 1

 

                 const HeizungAn = 1

                 Zustand = HeizungAn

 

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 HeizungAn 2 sein soll.

 

 

Siehe auch

ALIAS

 

 

Beispiel

'-----------------------------------------------------------------------------------------
'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 ' 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
 
'Einige Variablen DIMensionieren
Dim Z As String * 10
Dim B As Byte
 
'Einige Konstanten definieren
'Konstanten benötigen keinen Programmspeicher
Const S = "test"
Const A = 5 'A als Konstante mit dem Wert 5 deklarieren
Const B1 = &B1001
 
'Ausdrücke an Konstante zuweisen
Const X =(b1 * 3) + 2
Const Ssingle = Sin(1)
 
 
Print X
Print Ssingle
 
 
B = A
'Das Gleiche wie B = 5
 
Z = S
'Das Gleiche wie Z = "test"
 
Print A
Print B1
Print S
 
 
'Man kann Konstante bei bedingter Kompilation verwenden
#if A = 5 ' Beachte: Es gibt kein THEN
Print "constant a is 5"
#if S = "test"
 Print "verschachteltes Beispiel"
#else ' ELSE ist optional
#endif
#else
#endif
End

Languages	English • Deutsch