LB-I made another image to a jpg if you wanted to look at it.
On a side note, I am hating summer so much right now. It is really screwing with my motivation to learn any coding which right now is really essential, so in case you're wondering in a few days if you don't hear from me. Most likely, sprawled on the kitchen or bathroom floor *the coolest places in the house* until i'm at a regular temp. so ya, have a good one LB and thank you for very much for your help, i've seen that array and tile data before.
Well here is the code I have so far.
sync on:cls
sync rate 30
hide mouse
Dim Map(20,20)
load image "grass.bmp",1
load image "sky.bmp",1
map(1,1) = 1
map(2,1) = 2
for y = 0 to 20
for x = 0 to 20
If map(x,y) > 0
Paste image Map(x,y),x*32,y*32...
endif
next x
next y
data 5,5
data 2,2,2,2,2
data 2,2,2,2,2
data 2,2,2,1,1
data 2,2,2,2,2
data 1,1,1,2,2
It keeps telling me that the images don't exist, i have to resize them too. But its coming along okay