Flight simulater help - GameCreators Forum

Author

Message

Kequor

21

Years of Service

User Offline

Joined: 6th Feb 2004

Location: United States

Posted: 27th Apr 2004 06:50 Edited at: 27th Apr 2004 06:51

Link

I'm trying to make a flight simulater game.

+ Code Snippet

disable escapekey
make matrix 1,1000,1000,50,50
make object cylinder 1,5
sync on
sync rate 30
x=90
xrotate object 1,x
do
if upkey()=1 then x=x+100:xrotate object 1,x
loop

If you run this you can see my what dosn't work. Can anyone help?

Dont worry and keep a cool head.

Back to top

Profile PM Email Website

hyrichter

21

Years of Service

User Offline

Joined: 15th Feb 2004

Location: Arizona

Posted: 27th Apr 2004 07:46

Link

Well, for one thing, you forgot the SYNC command at the end of your loop.

Also, you need to use the wrapvalue command or you will get an error when your angle goes over 360. Change your code to this.

+ Code Snippet

disable escapekey
make matrix 1,1000,1000,50,50
make object cylinder 1,5
sync on
sync rate 30
x=90
xrotate object 1,x
do
   if upkey()=1
      x=x+10
      xrotate object 1,wrapvalue(x)
   endif
   sync
loop

That should work for you.

Back to top

Profile PM Email

Kequor

21

Years of Service

User Offline

Joined: 6th Feb 2004

Location: United States

Posted: 27th Apr 2004 18:18

Link

Thanks!

Dont worry and keep a cool head.

Back to top

Profile PM Email Website

Kequor

21

Years of Service

User Offline

Joined: 6th Feb 2004

Location: United States

Posted: 27th Apr 2004 18:56 Edited at: 27th Apr 2004 20:38

Link

Okay I'm haveing more trouble. Run this and you will see what dosn't work.

+ Code Snippet

sync on
sync rate 30
disable escapekey
make matrix 1,1000,1000,50,50
make object cylinder 1,10
x1=90
y1=180
cy=0
cx=0
xrotate object 1,x1
yrotate object 1,y1
do
move object 1,5
move camera 5
   if upkey()=1
      x1=x1+10
      cx=cx+10
      xrotate object 1,wrapvalue(x1)
      xrotate camera wrapvalue(cx)
   endif

   if downkey()=1
      x1=x1-10
      cx=cx-10
      xrotate object 1,wrapvalue(x1)
      xrotate camera wrapvalue(cx)
   endif

   if leftkey()=1
     y1=y1+10
     cy=cy-10
     yrotate object 1,wrapvalue(y1)
     yrotate camera wrapvalue(cy)
   endif

   if rightkey()=1
     y1=y1-10
     cy=cy+10
     yrotate object 1,wrapvalue(y1)
     yrotate camera wrapvalue(cy)
   endif
   sync
loop

Can anyone help?

Dont worry and keep a cool head.

Back to top

Profile PM Email Website

Sorry your browser is not supported!

DarkBASIC Discussion / Flight simulater help