im trying to figure out how to make a level editor and i thought id start with just text and work my way up.
i have a txt doc. with the following text:
a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a, , , , , , , , , , , , , , , ,a,a,a,a,a,a,a,a,a
a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a, , , , , , , , , , , , , , , ,a,a,a,a,a,a,a,a,a
a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a, , , , , , , , , , , , , , , ,a,a,a,a,a,a,a,a,a
a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a, , , , , , , , , , , , , , , ,a,a,a,a,a,a,a,a,a
a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a, , , , , , , , , , , , , , , ,a,a,a,a,a,a,a,a,a
a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a, , , , , , , , , , , , , , , ,a,a,a,a,a,a,a,a,a
a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a, , , , , , , , , , , , , , , ,a,a,a,a,a,a,a,a,a
a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a, , , , , , , , , , , , , , , ,a,a,a,a,a,a,a,a,a
a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a, , , , , , , , , , , , , , , ,a,a,a,a,a,a,a,a,a
a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a,a, , , , , , , , , , , , , , , ,a,a,a,a,a,a,a,a,a
okay and i want it to appear in db the exact same way (but with no commas)
heres the code:
Rem Project: text land
Rem Created: 10/19/2003 3:31:57 PM
Rem ***** Main Source File *****
a=0
dim arry(50,10)
`open to read 1,"edit.txt"
load array "edit.txt",arry(1,1)
do
cls
`for y=1 to 100 step 10
`for x=1+a to 300+a step 10
for y=1 to 50
for x=1 to 10
`a$=arry(x,y)
text x*10,y*10,str$(arry(y,x))
`wait key
next x
next y
if leftkey()=1 then a=a-30
if rightkey()=1 then a=a+30
loop
i know its the wrong direction or something (have looked at it in a while ) but the main problem is that it only brings up numbers.
any help is appreciated!1!!!
check out my site www.dougsworld.tk
