Data
- unix
- Beiträge: 361
- Registriert: 15.02.2005 19:25
- Wohnort: Zwischen Coburg und Bamberg :-)
- Kontaktdaten:
Data
Ok ich hab mal wieder ein Problem.
Wie kann ich innerhalb einer dataSektion eine bestimmte Data auslesen.
z.B.
DataSektion
Data.w 1
Data.w 6
Data.w 10
Data.w 19
Data.w 30
EndDataSektion
So wie kann ich jetzt zu 3. Data gehen und auslesen, wenn ich den Speicherort weiß.
Ohne Labels einzufügen
Wie kann ich innerhalb einer dataSektion eine bestimmte Data auslesen.
z.B.
DataSektion
Data.w 1
Data.w 6
Data.w 10
Data.w 19
Data.w 30
EndDataSektion
So wie kann ich jetzt zu 3. Data gehen und auslesen, wenn ich den Speicherort weiß.
Ohne Labels einzufügen
Hier steht normalerweise die Putzfrau drin,
die hat aber Urlaub.
MfG : Unix
die hat aber Urlaub.
MfG : Unix
Ich würde mal behaupten, da du ja keine Label benutzen willst: For - Next
in ein Array, oder nur mit For - Next und read zur gewünschten Stelle.

in ein Array, oder nur mit For - Next und read zur gewünschten Stelle.

__________________________________________
Weniger glauben - mehr wissen!
------------------------------------------------------
Proud beneficial owner of SpiderBasic, PureBasic 3.x, 4.x, 5.x and PureVisionXP
Weniger glauben - mehr wissen!
------------------------------------------------------
Proud beneficial owner of SpiderBasic, PureBasic 3.x, 4.x, 5.x and PureVisionXP
Gibt ne sehr schöne Lösung mit Dim:
Wo hab ich das gesehen? Das muss doch irgendwo hier gewesen sein. 
Code: Alles auswählen
DataSection
Label:
Data.w 1
Data.w 6
Data.w 10
Data.w 19
Data.w 30
EndDataSection
Dim Daten.w(0)
Adresse = ?Label
Daten() = Adresse
PokeL(@Daten()-8, 5)
For i=0 To 4
Debug Daten(i)
Next

Man könnts auch einfach so machen:
Code: Alles auswählen
DataSection
Label:
Data.w 1
Data.w 6
Data.w 10
Data.w 19
Data.w 30
EndDataSection
Procedure.w Daten(i)
ProcedureReturn PeekW(?Label+2*i)
EndProcedure
For i=0 To 4
Debug Daten(i)
Next

[url=irc://irc.freenode.org/##purebasic.de]irc://irc.freenode.org/##purebasic.de[/url]