just found a problem with the code, it didn't read it like you'd expect it to, a simple fix but here it is again:
`make some images, replace with load image to have proper tiles
`red image
Ink Rgb(255,0,0),0
Box 0,0,50,50
Get Image 1,0,0,30,30
Cls
`green image
Ink Rgb(0,255,0),0
Box 0,0,50,50
Get Image 2,0,0,30,30
Cls
`blue image
Ink Rgb(0,0,255),0
Box 0,0,50,50
Get Image 3,0,0,30,30
Cls
`Read the data statements and put them in the right place
`"t" is the variable we use for the sprite number, we make it 1
`before we start so that the first sprite doesn't produce an error
t=1
`we need 2 for-next loops to run through all the data statements
`there are 10 lines of data statements and 10 values in each line
`so we go from 0 to 9(0,1,2,3,4,5,6,7,8,9)
For Y = 0 to 9
For X = 0 to 9
`"Read" looks at the first piece of data and assigns it to a
`variable called "A"
Read A
`we then use the number contained in "A" to decide which image
`to use for the sprite. Its timesed(*) by 30 because thats how
`tall and wide the images we are using are.
Sprite t,X*30,Y*30,A
`we then increase the "t" variable by 1 so that we don't reuse the
`same sprite over and over again.
Inc t
Next X
Next Y
Do
Loop
`1 is red
`2 is green
`3 is blue
Data 1,1,1,1,1,1,1,1,1,1
Data 1,2,2,2,3,3,2,2,2,1
Data 1,2,3,2,3,3,2,3,2,1
Data 1,2,2,2,3,3,2,2,2,1
Data 1,3,2,3,1,1,3,2,3,1
Data 1,3,2,3,1,1,3,2,3,1
Data 1,2,2,2,3,3,2,2,2,1
Data 1,2,3,2,3,3,2,3,2,1
Data 1,2,2,2,3,3,2,2,2,1
Data 1,1,1,1,1,1,1,1,1,1
i'm gonna add in a little controllable character some collision now, so if you need more help just say.
In the beginning, the universe was created...
This made alot of people very angry and it has been widely regarded as a bad idea...
Visit
http://redeye.dbspot.com