Also, for my map creator i have this code although i have one small hitch.
For z = 1 to 10
For y = 1 to 10
Data "X","X","X","X","X ","X","X","X","X","X"
Data "X","X","X","X","X ","X","X","X","X","X"
Data "X","X","X","X","X ","X","X","X","X","X"
Data "X","X","X","X","Fd","X","X","X","X","X"
Data "X","X","X","X","H ","X","X","X","X","X"
Data "X","X","X","X","Su","X","X","X","X","X"
Data "X","X","X","X","X ","X","X","X","X","X"
Data "X","X","X","X","X ","X","X","X","X","X"
Data "X","X","X","X","X ","X","X","X","X","X"
Data "X","X","X","X","X ","X","X","X","X","X"
Read a$
x = (y * 10) - 10 + z
If A$ = "Fd" and Fd = 0 then Load Object "Fd.x",x : Fd = x
If A$ = "Fd" and Fd > 0 then Instance Object x,Fd
If A$ = "H" and H = 0 then Load Object "I.x",x : H = x
If A$ = "H" and H > 0 then Instance Object x,H
......
Position Object x,z*128,0,y*128
Next y
Next z
I would like to be able to compress this into a lot fewer lines, i would want to do this by doing something along the lines of this
If A$ = 0 then Load Object A$+;".x",x : A$ = x
But, i need to remove the quote marks from the A$ as currently A$ = "fd" and i want it to = fd. Is there anyway to do this?
Sorry if i havent explained this well