Olá..
Well.. people actually don't like to hear "gimme the codes"..
your question could be:
"How do I create object in real time?"
even it being so easy, remember you're on the newcomers' board..
Anyway.. there is a simple stuff for you below
sync on : sync rate 0
set global collision off
backdrop on : color backdrop 0
`make a matrix
make matrix 1, 1000,1000,10,10
`make a green texture
ink RGB(0,255,0),0
box 0,0,1,1
get image 1, 0,0,1,1
cls
`the green object you see
make object cube 1, 50
texture object 1, 1
ghost object on 1
position object 1, 0,25,0
`back to white (ro print white thing in the screen)
ink RGB(255,255,255),0
`actual object is 2 (because 1 is the main object)..
atual=2
DO
if (upKey()=1) THEN position object 1, object position x(1),object position y(1),object position z(1)+1
if (downKey()=1) THEN position object 1, object position x(1),object position y(1),object position z(1)-1
if (rightKey()=1) THEN position object 1, object position x(1)+1,object position y(1),object position z(1)
if (leftKey()=1) THEN position object 1, object position x(1)-1,object position y(1),object position z(1)
x#=object position x(1) : y#=object position y(1) : z#=object position z(1)
if ((inKey$()="C") or (inKey$()="c"))
make object cube atual, 50
position object atual, x#,y#,z#
atual=atual+1
wait 100
endif
if ((inKey$()="S") or (inKey$()="s"))
make object sphere atual, 50
position object atual, x#,y#,z#
atual=atual+1
wait 100
endif
if (spaceKey()=1)
for objeto=2 to atual
if object exist(objeto)=1
if sqrt((x#-object position x(objeto))^2 + (y#-object position y(objeto))^2 + (z#-object position z(objeto))^2) < 25
delete object objeto
endif
endif
next objeto
endif
position camera x#,y#+200,z#-200 : point camera x#,y#+50,z#
set cursor 0,0
print screen FPS()
print statistic(1)
sync
LOOP
.edit.
Move the green box around using the arroyKeys.. press "c" to make a cube or "s", to make a sphere..
You are also able to delete objects (just position the green box over the object and press spaceBar)..
.edit.
I hope that helps..
The worst foe lies within the self..
