Page 1 of 1
More "RESTORE" functionality
Posted: Sat Sep 10, 2005 11:25 pm
by DoubleDutch
The ability to set the "restore" point using a variable would be great, also the ability to read the current data read position would be good too.
Re: More "RESTORE" functionality
Posted: Sun Sep 11, 2005 1:42 am
by PB
> The ability to set the "restore" point using a variable would be great
Agreed. I tried using pointers to do this, but was unsuccessful.
Also, it would be good if the Read command could have more than one
parameter per line... for example, the following code gives an error:
Code: Select all
Read a$,b$,c$ ; Won't work, need 3 x Read lines instead. :(
Debug a$+" "+b$+" "+c$
DataSection
Data.s "Hello","There","Mate"
EndDataSection
Posted: Sun Sep 11, 2005 2:01 am
by jack
you could set a var to the address of the label in the datasection and then
Code: Select all
Procedure LabelTest(LabelAdress.l)
! MOV eax,[esp]
! MOV dword [PB_DataPointer],eax
EndProcedure
lb.l=?label2
LabelTest(lb)
Read text.s
Debug text.s
End
DataSection
label1:
Data.s "Text from Label 1"
label2:
Data.s "Text from Label 2"
label3:
Data.s "Text from Label 3"
EndDataSection
for long type data you can even do this
Code: Select all
Procedure LabelTest(LabelAdress.l,offset.l)
! MOV eax,[esp]
! add eax,[esp+4]
! MOV dword [PB_DataPointer],eax
EndProcedure
lb.l=?label2
LabelTest(lb,16)
Read l
Debug l
End
DataSection
label1:
Data.s "Text from Label 1"
label2:
Data.l 1,2,3,4,5
label3:
Data.s "Text from Label 3"
EndDataSection
Posted: Sun Sep 11, 2005 11:06 am
by DoubleDutch
That should work perfectly - thanks
I will just add another function to read the current address of PB_DataPointer into a variable.
Fred: Will you add this kind of functionality into purebasic, they would be good as native commands.
-Anthony