RESTORE/de
(Difference between revisions)
m (1 revision) |
(→Example) |
||
| Line 39: | Line 39: | ||
<span style="font-family: Arial;"> </span> | <span style="font-family: Arial;"> </span> | ||
| − | = <span class="f_Header"> | + | = <span class="f_Header">Beispiel</span> = |
<br/><source lang="bascomavr"> | <br/><source lang="bascomavr"> | ||
| Line 51: | Line 51: | ||
'----------------------------------------------------------------------------------------- | '----------------------------------------------------------------------------------------- | ||
| − | $regfile = "m48def.dat" ' | + | $regfile = "m48def.dat" ' Mikrocontroller |
| − | $crystal = 4000000 ' | + | $crystal = 4000000 ' Taktfrequenz |
| − | $baud = 19200 ' | + | $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 61: | Line 61: | ||
Dim S As String * 15 | Dim S As String * 15 | ||
Dim L As Long | Dim L As Long | ||
| − | Restore Dta1 ' | + | Restore Dta1 'Zeiger auf gespeicherte Daten setzen |
| − | For Count = 1 To 3 ' | + | For Count = 1 To 3 'Für jedes Datenelement |
Read B1 : Print Count ; " " ; B1 | Read B1 : Print Count ; " " ; B1 | ||
Next | Next | ||
| − | Restore Dta2 ' | + | Restore Dta2 'Zeiger aud Datentabelle setzen |
| − | For Count = 1 To 2 ' | + | For Count = 1 To 2 'Für jedes Datenelement |
Read A : Print Count ; " " ; A | Read A : Print Count ; " " ; A | ||
Next | Next | ||
| Line 96: | Line 96: | ||
Dta3: | Dta3: | ||
Data "Hello" , "World" | 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: | Dta4: | ||
Data 123456789& | 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. |
| − | + | ||
</source><br/>{{Languages}} | </source><br/>{{Languages}} | ||
[[Category:BASCOM Language Reference/de]] | [[Category:BASCOM Language Reference/de]] | ||
Revision as of 23:42, 5 March 2013
Contents |
= (**COPIED FROM ENGLISH PAGE**) === Action
Allows READ to reread values in specified DATA statements by setting data pointer to beginning of data statement.
Syntax
RESTORE label
Remarks
|
label |
The label of a DATA statement. |
See also
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 |
|---|