This post has been edited since it's original post
I know a lot of people are talking about this at the moment and I was hoping to get some help as well since I'm using DBC. I'm going to try to do this on my own, but others should feel free to use this post to help with thier own questions about scrolling, collision, and tile maps in DBC. Thankyou to everyone who helped me
CLS : Hide Mouse
Sync On : Sync Rate 30 : Randomize Timer()
set display mode 800, 600, 32
tilenumber = 1
load bitmap "tileset.bmp",1
for y = 0 to 64 - 31 step 32
for x = 0 to 288 - 31 step 32
get image tilenumber, x, y, x + 32, y + 32, 1
inc tilenumber
next x
next y
delete bitmap 1
dim ground_tiles(24,18)
for y = 0 to 18
for x = 0 to 24
read ground_tiles(x,y)
next x
next y
data 12,12,12,12,12,12,12,12,12,12,01,01,01,12,12,12,12,12,12,12,12,12,12,12,12
data 12,12,01,01,01,01,01,01,01,12,01,01,01,12,01,01,01,01,01,01,01,01,01,12,12
data 12,01,01,01,01,01,01,01,01,12,01,01,01,12,01,01,01,01,01,01,01,01,01,01,12
data 12,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,12
data 12,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,12
data 12,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,12
data 12,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,17,18,01,01,01,01,01,01,12
data 12,01,01,01,05,02,06,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,12
data 12,01,01,01,02,02,02,02,06,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,12
data 12,01,01,05,02,02,02,02,02,02,06,01,01,01,01,01,01,01,01,01,01,01,01,01,12
data 12,01,01,02,02,02,02,02,02,02,02,02,02,02,02,02,02,02,06,01,01,01,01,01,12
data 12,01,01,02,02,02,02,02,17,18,02,02,02,02,02,02,02,02,02,01,01,01,01,01,12
data 12,01,01,04,02,02,02,02,02,02,02,02,02,02,02,02,02,02,02,01,01,01,01,01,12
data 12,01,01,01,02,02,02,02,02,02,02,02,02,02,02,02,02,02,02,01,01,01,01,01,12
data 12,01,01,01,04,02,02,02,02,02,02,02,02,02,02,02,02,02,02,01,01,01,01,01,12
data 12,01,01,01,01,01,01,04,02,02,02,02,02,02,17,18,02,02,02,01,01,01,01,01,12
data 12,01,01,01,17,18,01,01,01,01,04,02,02,02,02,02,02,02,03,01,01,01,01,01,12
data 12,12,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,01,12,12
data 12,12,12,12,12,12,12,12,12,12,12,12,12,12,12,12,12,12,12,12,12,12,12,12,12
for y = 0 to 18
for x = 0 to 24
paste image ground_tiles(x,y), x * 31, y * 31
next x
next y
Do
sync
Loop
This is the code I started with.
I've got DBClassic and Photoshop Skillz and I'm not afraid to use um!