I have been playing around with data statements For loops and commands.
I got this to work and streamlined my code and cut out a lot of lines of code. This sets up a screen layout
function Screen()
FOR c = 1 TO 48
READ x1,y1,x2,y2
ink rgb(255,0,0)
line x1,y1,x2,y2
NEXT c
ENDFUNCTION
data 0,397,410,397,0,400,410,400,410,0,410,596,414,0,414,600,0,599,413,599,0,596,410,596
data 90,400,90,596,0,420,410,420,180,400,180,596,270,400,270,596,330,400,330,596,370,400,370,596
I have been trying this with the text command and can't get it to work. I am pretty sure the read command isn't right, that is just one of the ways I have tried it. It compiles and the screen comes up for a second then it crashes and I have to click on a choice to close it.
Do I need to nest another for loop in this one to get it to work or is it that text commands will not work in this way?
FOR c = 1 to 6
read x,y," "
text x,y," "
NEXT c
data 100,100,"*",200,200,"***"
wait key
