stupid forums ,
sync on : sync rate 60
hide mouse
autocam off
make object box 1,500,50,50
make object box 2,500,50,50
make object box 3,50,350,50
make object sphere 10,50
position object 1,0,0,0
position object 2,0,-300,0
position object 3,-225,-150,0
position object 10,-170,-245,0
color object 1,RGB(255,0,0)
color object 2,RGB(255,0,0)
color object 3,RGB(255,0,0)
make object collision box 10,-25,-25,-25,25,25,25,0
make object collision box 1,-250,-25,-25,250,25,25,0
make object collision box 2,-250,-25,-25,250,25,25,0
make object collision box 3,-25,-175,-25,25,175,25,0
do
print get object collision x()
print get object collision y()
s# = s# / 1.3
x# = x# + s#
if leftkey() then s# = s# - 0.8
if rightkey() then s# = s# + 0.8
if object collision(10,0)>0
dec x#,get object collision x()
dec y#,get object collision y()/10
if get object collision y()<>0 then grav#=0
endif
if upkey() and grav#=0 and get object collision y() <= 0
grav#=5
endif
grav# = grav# - 0.2
position object 10,x#,y#+5,0
y# = y# + grav#
hiho# = get object collision y()
set cursor 0,0
print screen fps()
print hiho#
print grav#
`Position the camera
position camera curvevalue(x#,camera position x(),10),curvevalue(y#,camera position y(),10),-400
sync
loop
just change the collision flag in the make object collision box for object 10
Quote from my brother:
Quote: " Patience is a virtue... I know that but how does that help me? "
http://www.stellarblue.vze.com/
