How do I move the 3D model of a car and camera together?
If JoyHit(13,1) Then gear=gear-1:If gear<-1 Then gear=-1
If JoyHit(14,1) Then gear=gear+1:If gear>1 Then gear=1
If gear=-1 Then gearstring="Reverse"
If gear=0 Then gearstring="Neutral"
If gear=1 Then gearstring="Drive"
If JoyY(1) < -0.05
If gear=1
speed=speed+0.005
If speed>2 Then speed=2
MoveEntity camera,0,0,speed
;MoveEntity car01,0,0,speed
End If
If gear=-1
speed=speed-0.005
If speed<-0.5 Then speed=-0.5
MoveEntity camera,0,0,speed
;MoveEntity car01,0,0,speed
EndIf
End If
If JoyY(1) > 0.05
speed=speed-0.01
If speed<0 Then speed=0
If speed>0 Then speed=speed*0.99
MoveEntity camera,0,0,speed
;MoveEntity car01,0,0,speed
End If
If JoyY(1) > -0.05 And JoyY(1) < 0.05
speed=speed*0.99
MoveEntity camera,0,0,speed
;MoveEntity car01,0,0,speed
End If
If JoyX(1) < -0.05 And speed>0
steer=-JoyX(1)/2
If steer>0.5 Then steer=0.5
TurnEntity camera,0,steer,0
;TurnEntity car01,0,steer,0
End If
If JoyX(1) > 0.05 And speed>0
steer=-JoyX(1)/2
If steer<-0.5 Then steer=-0.5
TurnEntity camera,0,steer,0
;TurnEntity car01,0,steer,0
End If
If JoyX(1) > -0.05 And JoyX(1) < 0.05 Then steer=0
|