RESTORE/de - Revision history

Stefanhamburg: /* See also */

2013-03-05T21:46:43Z

Stefanhamburg: /* Remarks */

2013-03-05T21:46:22Z

Remarks

Stefanhamburg: /* (COPIED FROM ENGLISH PAGE) = */

2013-03-05T21:45:05Z

(**COPIED FROM ENGLISH PAGE**) =

Stefanhamburg: /* Example */

2013-03-05T21:42:52Z

Example

Admin: 1 revision

2013-02-15T19:15:45Z

1 revision

Admin: Created page with "= Action = Allows READ to reread values in specified DATA statements by setting data pointer to beginning of data statement.
2013-02-11T22:20:39Z

Created page with "= Action = Allows READ to reread values in specified DATA statements by setting data pointer to beginning of data statement. Action =

Allows READ to reread values in specified DATA statements by setting data pointer to beginning of data statement.

 

 

= Syntax =

RESTORE label

 

 

= Remarks =
<div style="padding: 0px; margin: 0px 0px 0px 4px;">
{| width="488" cellspacing="0" cellpadding="1" border="1" style="border: 2px solid rgb(0, 0, 0); border-spacing: 0px; border-collapse: collapse;"
|- style="vertical-align: top;"
| valign="top" width="12%" style="width: 55px; border: 1px solid rgb(0, 0, 0);" |
label

| valign="top" width="100%" style="width: 424px; border: 1px solid rgb(0, 0, 0);" |
The label of a DATA statement.

|}
</div>
 

 

= See also =

[[DATA]] , [[READ]] , [[LOOKUP]]

 

 

= Example =

 <source lang="bascomavr">
'-----------------------------------------------------------------------------------------
'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" ' 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

Dim A As Integer , B1 As Byte , Count As Byte
Dim S As String * 15
Dim L As Long
Restore Dta1 'point to stored data
For Count = 1 To 3 'for number of data items
Read B1 : Print Count ; " " ; B1
Next

Restore Dta2 'point to stored data
For Count = 1 To 2 'for number of data items
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"
'Note that integer values (>255 or <0) must end with the %-sign
'also note that the data type must match the variable type that is
'used for the READ statement

Dta4:
Data 123456789&
'Note that LONG values must end with the &-sign
'Also note that the data type must match the variable type that is used
'for the READ statement
</source> {{Languages}}

[[Category:BASCOM Language Reference/de]]

@@ Line 31: / Line 31: @@
 <span style="font-family: Arial;">&nbsp;</span>
-= <span class="f_Header">See also</span> =
+= <span class="f_Header">Siehe auch</span> =
 [[DATA]]&nbsp;,&nbsp;[[READ]]&nbsp;,&nbsp;[[LOOKUP]]

@@ Line 15: / Line 15: @@
 <span style="font-family: Arial;">&nbsp;</span>
-= <span class="f_Header">Remarks</span> =
+= <span class="f_Header">Anmerkungen</span> =
 <div style="padding: 0px; margin: 0px 0px 0px 4px;">
 {| width="488" cellspacing="0" cellpadding="1" border="1" style="border: 2px solid rgb(0, 0, 0); border-spacing: 0px; border-collapse: collapse;"
@@ Line 23: / Line 23: @@
 | valign="top" width="100%" style="width: 424px; border: 1px solid rgb(0, 0, 0);" |
-The label of a DATA statement.
+Name (Label) des DATA-Bereichs.
 |}

@@ Line 1: / Line 1: @@
-== (**COPIED FROM ENGLISH PAGE**) === <span class="f_Header">Action</span> =
+= <span class="f_Header">Funktion</span> =
-Allows READ to reread values in specified DATA statements by setting data pointer to beginning of data statement.
+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.
 <span style="font-family: Arial;">&nbsp;</span>

@@ Line 39: / Line 39: @@
 <span style="font-family: Arial;">&nbsp;</span>
-= <span class="f_Header">Example</span> =
+= <span class="f_Header">Beispiel</span> =
 <br/><source lang="bascomavr">
@@ Line 51: / Line 51: @@
 '-----------------------------------------------------------------------------------------
-$regfile = "m48def.dat" ' specify the used micro
+$regfile = "m48def.dat" ' Mikrocontroller
-$crystal = 4000000 ' used crystal frequency
+$crystal = 4000000 ' Taktfrequenz
-$baud = 19200 ' use baud rate
+$baud = 19200 ' Baudrate
 $hwstack = 32 ' default use 32 for the hardware stack
 $swstack = 10 ' default use 10 for the SW stack
@@ Line 61: / Line 61: @@
 Dim S As String * 15
 Dim L As Long
-Restore Dta1 'point to stored data
+Restore Dta1 'Zeiger auf gespeicherte Daten setzen
-For Count = 1 To 3 'for number of data items
+For Count = 1 To 3 'Für jedes Datenelement
 Read B1 : Print Count ; " " ; B1
 Next
-Restore Dta2 'point to stored data
+Restore Dta2 'Zeiger aud Datentabelle setzen
-For Count = 1 To 2 'for number of data items
+For Count = 1 To 2 'Für jedes Datenelement
 Read A : Print Count ; " " ; A
 Next
@@ Line 96: / Line 96: @@
 Dta3:
 Data "Hello" , "World"
-'Note that integer values (>255 or <0) must end with the %-sign
+'Zu beachten: Integer-Werte (>255 or <0) müssen mit einem %-Zeichen enden.
-'also note that the data type must match the variable type that is
+'Auch zu beachten: Der Datentyp muss dem Datentyp der Variablen im READ-Befehl entsprechen.
-'used for the READ statement
 Dta4:
 Data 123456789&
-'Note that LONG values must end with the &-sign
+'Zu beachten: LONG-Werte müssen mit einem &-Zeichen enden.
-'Also note that the data type must match the variable type that is used
+'Auch zu beachten: Der Datentyp muss dem Datentyp der Variablen im READ-Befehl entsprechen.
-'for the READ statement
 </source><br/>{{Languages}}
 [[Category:BASCOM Language Reference/de]]

RESTORE/de - Revision history

Stefanhamburg: /* See also */

Stefanhamburg: /* Remarks */

Stefanhamburg: /* (**COPIED FROM ENGLISH PAGE**) = */

Stefanhamburg: /* Example */

Admin: 1 revision

Stefanhamburg: /* (COPIED FROM ENGLISH PAGE) = */