Amiga Basic Question

[rcman]

Hello,

Look at my old Amiga Basic Code. Looking through the manual I don't see what this command does. Can someone help me?

DEF SEG = VARSEG(m%(0))
FOR i% = 0 TO 32
READ d%
POKE VARPTR(m%(0)) + i%, d%
NEXT i%

Thanks
RC

[paraj]

While it's been literal decades since I did any BASIC programming, the "VARSEG" thing makes me think this isn't AmigaBASIC but a snippet from a DOS variant of Microsoft Basic. It doesn't seem to be recognized by the version included with WB1.3 and isn't in the manual (VARPTR is on 8-153).

The loop reads 33 integers from the "DATA" section and puts them into the raw storage provided by the "m%" array.

[a4k-oerx]

Looks similar to some example code of QBasic.

[rcman]

Originally Posted by paraj

While it's been literal decades since I did any BASIC programming, the "VARSEG" thing makes me think this isn't AmigaBASIC but a snippet from a DOS variant of Microsoft Basic. It doesn't seem to be recognized by the version included with WB1.3 and isn't in the manual (VARPTR is on 8-153).

The loop reads 33 integers from the "DATA" section and puts them into the raw storage provided by the "m%" array.

Thanks

[Retro1234]

There are two versions of Basic for Amiga ABasiC Amiga Basic. I remember stuff in a Amiga Basic book for kids not being right.