sure ill post the control part of the code, here it is:
a#=.075
playerframe#=total object frames(1)
camx#=camera position x()
camy#=camera position y()
camz#=camera position z()
camangy#=camera angle y()
ppx#=object position x(1)
ppy#=object position y(1)
ppz#=object position z(1)
if ppz#>-15 and ppx#>2.7 and ppx#<5.1 and ppz#<0
position object 1,ppx#,0,ppz#
endif
if ppz#>-15 and ppz#<0 and ppx#<2.7 and ppx#>8.5
position object 1,ppx#,-.5,ppz#
endif
if ppz#>-15 and ppz#<0 and ppx#<1.7 and ppx#>3.5
position object 1,ppx#,-1,ppz#
endif
if ppz#>-15 and ppz#<0 and ppx#<.7 and ppx#>-1
position object 1,ppx#,-1.5,ppz#
endif
if ppz#>-15 and ppz#<0 and ppx#<-.4 and ppx#>-300
position object 1,ppx#,-2,ppz#
endif
`position sky at players position
position object 114,ppx#,ppy#,ppz#
`control player
if upkey()=1
loop sound 2
move camera a#
loop object 1,0,25
move object 1,a#
` CameraFollow(1,1,20,100,15)
endif
if keystate(20)=1
camy#=camy#+.5
endif
if keystate(21)=1
pitch camera up .5
endif
if keystate(34)=1
camy#=camy#-.5
endif
if keystate(35)=1
pitch camera down .5
endif
if keystate(19)=1
rotate camera 0,0,0
endif
if upkey()=0
stop sound 2
loop object 1,0,0
endif
if keystate(17)=1
move camera 5
endif
if downkey()=1
move camera -a#
loop object 1,0,25
move object 1,-a#
` CameraFollow(1,1,20,100,15)
endif
if keystate(31)=1
move camera -2
endif
if leftkey()=1
turn camera left 1
turn object left 1,1
` CameraFollow(1,1,20,100,15)
endif
if keystate(30)=1
turn camera left 1
endif
if keystate(32)=1
turn camera right 1
endif
if rightkey()=1
turn camera right 1
turn object right 1,1
` CameraFollow(1,1,20,100,15)
endif
camx#=camera position x()
camz#=camera position z()
position camera camx#,camy#,camz#
Video games…they can take you places unreachable, impossible, unfeasible. They put you in the book...they put you in the movie...they put you in a world, a world that before could only be imagined.
