RESTORE/de
Aus MCS Wiki AVR
< RESTORE
Inhaltsverzeichnis |
Funktion
Ermöglicht dem READ-Befehl, Werte aus dem angegebenen DATA-Bereich zu lesen indem der Datenzeiger auf den Anfang des entsprechenden DATA-Bereichs gesetzt wird.
Syntax
RESTORE label
Anmerkungen
label |
Name (Label) des DATA-Bereichs. |
Siehe auch
Beispiel
'----------------------------------------------------------------------------------------- 'name : readdata.bas 'copyright : (c) 1995-2005, MCS Electronics 'purpose : demo : READ,RESTORE 'micro : Mega48 'suited for demo : yes 'commercial addon needed : no '----------------------------------------------------------------------------------------- $regfile = "m48def.dat" ' Mikrocontroller $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 Dim A As Integer , B1 As Byte , Count As Byte Dim S As String * 15 Dim L As Long Restore Dta1 'Zeiger auf gespeicherte Daten setzen For Count = 1 To 3 'Für jedes Datenelement Read B1 : Print Count ; " " ; B1 Next Restore Dta2 'Zeiger aud Datentabelle setzen For Count = 1 To 2 'Für jedes Datenelement Read A : Print Count ; " " ; A Next Restore Dta3 Read S : Print S Read S : Print S Restore Dta4 Read L : Print L 'long type 'demonstration of readlabel Dim W As Iram Word At 8 Overlay ' location is used by restore pointer 'note that W does not use any RAM it is an overlayed pointer to the data pointer W = Loadlabel(dta1) ' loadlabel expects the labelname Read B1 Print B1 End Dta1: Data &B10 , &HFF , 10 Dta2: Data 1000% , -1% Dta3: Data "Hello" , "World" 'Zu beachten: Integer-Werte (>255 or <0) müssen mit einem %-Zeichen enden. 'Auch zu beachten: Der Datentyp muss dem Datentyp der Variablen im READ-Befehl entsprechen. Dta4: Data 123456789& 'Zu beachten: LONG-Werte müssen mit einem &-Zeichen enden. 'Auch zu beachten: Der Datentyp muss dem Datentyp der Variablen im READ-Befehl entsprechen.
Languages | English • Deutsch |
---|