it's doin' it again... exept now when i hit one of my objects in level 3... here is the code:
hide mouse
autocam off
sync on
sync rate 90
gosub player
gosub level1
score=0
level=1
world=1
ink rgb(255,0,0),1
set text font "[ank]*"
set text size 26
`main loop
do
if upkey()=1 then move object 1,0.8
if leftkey()=1 then yrotate object 1,wrapvalue(object angle y(1)-2.5)
if rightkey()=1 then yrotate object 1,wrapvalue(object angle y(1)+2.5)
if spacekey()=1 and playergrav#=0.0 then playergrav#=2.0
angle#=object angle y(1)
camdist#=25.0 : camhigh#=posy#+8.0 : camfade#=3.5
set camera to follow posx#,posy#,posz#,angle#,camdist#,camhigh#,camfade#,1
posx#=object position x(1)
posy#=object position y(1)
posz#=object position z(1)
cposx#=camera position x()
cposy#=camera position y()
cposz#=camera position z()
position object 2,cposx#,cposy#,cposz#
playergrav#=playergrav#-0.1
posy#=posy#+playergrav#
position object 1,posx#,posy#,posz#
if object collision(1,0)>0
dec posx#,get object collision x()
dec posy#,get object collision y()
dec posz#,get object collision z()
if get object collision y()<0 then playergrav#=0.0
endif
if object collision(2,0)>0
dec cposx#,get object collision x()
dec cposy#,get object collision y()
dec cposz#,get object collision z()
endif
position object 2,cposx#,cposy#,cposz#
position camera cposx#,cposy#,cposz#
`POINTS
if object collision(1,8)>0 then delete object 8 : score=score+100
if object collision(1,18)>0 then delete object 18 : score=score+100
if object collision(1,19)>0 then delete object 19 : score=score+100
if object collision(1,20)>0 then delete object 20 : score=score+100
for y = 27 to 30
if object collision(1,y)>0 then delete object y : score=score+100
next y
for y = 48 to 55
if object collision(1,y)>0 then delete object y : score=score+100
next y
`END POINTS
`LEVEL 1 ENDING
if score=400 and object exist(21)=0 then make object sphere 21,10 : position object 21,0,60,0 : color object 21,rgb(255,0,0) : make object collision box 21,-2.5,-2.5,-2.5,2.5,2.5,2.5,0
if object collision(1,21)>0
score=score*2
for u = 9 to 17
delete object u
next u
delete object 21
gosub level2 : level=level+1
endif
`END LEVEL 1 ENDING
`LEVEL 2 ENDING
if score=1200 and object exist(32)=0 then make object sphere 32,10 : position object 32,0,60,0 : color object 32,rgb(255,0,0) : make object collision box 32,-2.5,-2.5,-2.5,2.5,2.5,2.5,0
if object collision(1,32)>0
score=score*2
for o = 22 to 31
if object exist(o) then delete object o
next o
delete object 32
gosub level3 : level=level+1
endif
`END LEVEL 2 ENDING
`LEVEL 3 ENDING
if score=3200 and object exist(56)=0 then make object sphere 56,10 : position object 56,0,60,0 : color object 56,rgb(255,0,0) : make object collision box 56,-2.5,-2.5,-2.5,2.5,2.5,2.5,0
if object collision(1,56)>0
score=score*2
for k = 31 to 55
if object exist(k) then delete object k
next k
delete object 56
gosub level4 : level=level+1
endif
`END LEVEL 3 ENDING
position object 1,posx#,posy#,posz#
xrotate camera 15
xrotate camera 15
if object exist(3)
set cursor 50,10
Print "World: ",world
set cursor 200,10
print "Level: ",level
endif
set cursor 350,10
print "Score: ",score
sync
loop
player:
load object "guy.x",1
position object 1,0,100,0
make object collision box 1,-2.5,-3,-2.5,2.5,3,2.5,0
make object cube 2,1
make object collision box 2,-0.5,-0.5,-0.5,0.5,0.5,0.5,0
hide object 2
return
level1:
load image "platform2.bmp",1
load image "platform1.bmp",2
load image "platform5.bmp",3
load image "platform4.bmp",4
make object box 3,500,10,500
position object 3,0,-20,0
texture object 3,2
make object collision box 3,-500,-5,-500,500,5,500,0
for b=0 to 1
make object box b+4,10,40,500
position object b+4,-250+b*500,5,0
texture object b+4,3
make object collision box b+4,-5,-20,-250,5,20,250,0
make object box b+6,500,40,10
position object b+6,0,5,-250+b*500
texture object b+6,3
make object collision box b+6,-250,-20,-5,250,20,5,0
next b
make object sphere 8,5
position object 8,0,55,60
color object 8,rgb(255,255,0)
make object collision box 8,-2,-2,-2,2,2,2,0
make object box 9,30,5,30
position object 9,0,50,0
texture object 9,4
make object collision box 9,-15,-2.5,-15,15,2.5,15,0
make object box 10,15,5,30
position object 10,0,50,30
texture object 10,4
make object collision box 10,-7.5,-2.5,-15,7.5,2.5,15,0
make object box 11,15,5,30
position object 11,0,50,-30
texture object 11,4
make object collision box 11,-7.5,-2.5,-15,7.5,2.5,15,0
make object box 12,30,5,15
position object 12,30,50,0
texture object 12,4
make object collision box 12,-15,-2.5,-7.5,15,2.5,7.5,0
make object box 13,30,5,15
position object 13,-30,50,0
texture object 13,4
make object collision box 13,-15,-2.5,-7.5,15,2.5,7.5,0
make object box 14,30,5,30
position object 14,-60,50,0
texture object 14,4
make object collision box 14,-15,-2.5,-15,15,2.5,15,0
make object box 15,30,5,30
position object 15,60,50,0
texture object 15,4
make object collision box 15,-15,-2.5,-15,15,2.5,15,0
make object box 16,30,5,30
position object 16,0,50,60
texture object 16,4
make object collision box 16,-15,-2.5,-15,15,2.5,15,0
make object box 17,30,5,30
position object 17,0,50,-60
texture object 17,4
make object collision box 17,-15,-2.5,-15,15,2.5,15,0
make object sphere 18,5
position object 18,0,55,-60
color object 18,rgb(255,255,0)
make object collision box 18,-2,-2,-2,2,2,2,0
make object sphere 19,5
position object 19,-60,55,0
color object 19,rgb(255,255,0)
make object collision box 19,-2,-2,-2,2,2,2,0
make object sphere 20,5
position object 20,60,55,0
color object 20,rgb(255,255,0)
make object collision box 20,-2,-2,-2,2,2,2,0
return
level2:
make object box 22,30,5,30
position object 22,0,50,0
texture object 22,4
make object collision box 22,-15,-2.5,-15,15,2.5,15,0
make object box 23,30,5,30
position object 23,45,35,0
texture object 23,4
make object collision box 23,-15,-2.5,-15,15,2.5,15,0
make object box 24,30,5,30
position object 24,-45,35,0
texture object 24,4
make object collision box 24,-15,-2.5,-15,15,2.5,15,0
make object box 25,30,5,30
position object 25,0,35,45
texture object 25,4
make object collision box 25,-15,-2.5,-15,15,2.5,15,0
make object box 26,30,5,30
position object 26,0,35,-45
texture object 26,4
make object collision box 26,-15,-2.5,-15,15,2.5,15,0
make object sphere 27,5
position object 27,45,40,0
color object 27,rgb(255,255,0)
make object collision box 27,-2,-2,-2,2,2,2,0
make object sphere 28,5
position object 28,-45,40,0
color object 28,rgb(255,255,0)
make object collision box 28,-2,-2,-2,2,2,2,0
make object sphere 29,5
position object 29,0,40,45
color object 29,rgb(255,255,0)
make object collision box 29,-2,-2,-2,2,2,2,0
make object sphere 30,5
position object 30,0,40,-45
color object 30,rgb(255,255,0)
make object collision box 30,-2,-2,-2,2,2,2,0
return
level3:
make object box 31,30,5,30
position object 31,0,50,0
texture object 31,4
make object collision box 31,-15,-2.5,-15,15,2.5,15,0
make object box 32,60,5,15
position object 32,45,50,0
texture object 32,4
make object collision box 32,-30,-2.5,-7.5,30,2.5,7.5,0
make object box 33,60,5,15
position object 33,-45,50,0
texture object 33,4
make object collision box 33,-30,-2.5,-7.5,30,2.5,7.5,0
make object box 34,15,5,60
position object 34,0,50,45
texture object 34,4
make object collision box 34,-7.5,-2.5,-30,7.5,2.5,30,0
make object box 35,15,5,60
position object 35,0,50,-45
texture object 35,4
make object collision box 35,-7.5,-2.5,-30,7.5,2.5,30,0
make object box 36,30,5,30
position object 36,0,50,-110
texture object 36,4
make object collision box 36,-15,-2.5,-15,15,2.5,15,0
make object box 37,30,5,30
position object 37,0,50,110
texture object 37,4
make object collision box 37,-15,-2.5,-15,15,2.5,15,0
make object box 38,30,5,30
position object 38,-110,50,0
texture object 38,4
make object collision box 38,-15,-2.5,-15,15,2.5,15,0
make object box 39,30,5,30
position object 39,110,50,0
texture object 39,4
make object collision box 39,-15,-2.5,-15,15,2.5,15,0
make object box 40,30,5,30
position object 40,-45,60,-110
texture object 40,4
make object collision box 40,-15,-2.5,-15,15,2.5,15,0
make object box 41,30,5,30
position object 41,45,60,110
texture object 41,4
make object collision box 41,-15,-2.5,-15,15,2.5,15,0
make object box 42,30,5,30
position object 42,-110,60,-45
texture object 42,4
make object collision box 42,-15,-2.5,-15,15,2.5,15,0
make object box 43,30,5,30
position object 43,110,60,45
texture object 43,4
make object collision box 43,-15,-2.5,-15,15,2.5,15,0
make object box 44,30,5,30
position object 44,45,60,-110
texture object 44,4
make object collision box 44,-15,-2.5,-15,15,2.5,15,0
make object box 45,30,5,30
position object 45,-45,60,110
texture object 45,4
make object collision box 45,-15,-2.5,-15,15,2.5,15,0
make object box 46,30,5,30
position object 46,-110,60,45
texture object 46,4
make object collision box 46,-15,-2.5,-15,15,2.5,15,0
make object box 47,30,5,30
position object 47,110,60,-45
texture object 47,4
make object collision box 47,-15,-2.5,-15,15,2.5,15,0
make object sphere 48,5
position object 48,110,70,-45
color object 48,rgb(255,255,0)
make object collision box 48,-2,-2,-2,2,2,2,0
make object sphere 49,5
position object 49,110,70,45
color object 49,rgb(255,255,0)
make object collision box 49,-2,-2,-2,2,2,2,0
make object sphere 50,5
position object 50,-110,70,-45
color object 50,rgb(255,255,0)
make object collision box 50,-2,-2,-2,2,2,2,0
make object sphere 51,5
position object 51,-110,70,45
color object 51,rgb(255,255,0)
make object collision box 51,-2,-2,-2,2,2,2,0
make object sphere 52,5
position object 52,-45,70,110
color object 52,rgb(255,255,0)
make object collision box 52,-2,-2,-2,2,2,2,0
make object sphere 53,5
position object 53,45,70,110
color object 53,rgb(255,255,0)
make object collision box 53,-2,-2,-2,2,2,2,0
make object sphere 54,5
position object 54,45,70,-110
color object 54,rgb(255,255,0)
make object collision box 54,-2,-2,-2,2,2,2,0
make object sphere 55,5
position object 55,-45,70,-110
color object 55,rgb(255,255,0)
make object collision box 55,-2,-2,-2,2,2,2,0
return
level4:
make object box 57,30,5,30
position object 57,0,50,0
texture object 57,4
make object collision box 57,-15,-2.5,-15,15,2.5,15,0
return
the same media is used for this one...
Why do they turn against me? Especially when i need them the most?
