Moving object up or down - GameCreators Forum

Author

Message

xavier jefferson

15

Years of Service

User Offline

Joined: 11th Apr 2011

Location:

Posted: 13th Apr 2011 18:04

Link

Im trying to make my ship move up and down as well as forwards back ards etc

if mvoes forward back side to side just fine but it wont move up or down. ive tried a few different variations of the move ovject up and down from the dark basic command help folder but have nto found any that work

this is my current set up that gives me the error object number is illegal

if Upkey()=1 then move object 1,MySpeed
if Downkey()=1 then move object 1,0-MySpeed
if Leftkey()=1 then A1Y = wrapvalue(A1Y-(MySpeed/3))
if Rightkey()=1 then A1Y = wrapvalue(A1Y+(MySpeed/3))
if keystate(29)=1then move object down,1
if keystate(48)=1then move object up,1

ive tried making the object number on the keystates 87 which is my actual ship but i still get the same error

Back to top

Profile PM

baxslash

Valued Member

Bronze Codemaster

19

Years of Service

User Offline

Joined: 26th Dec 2006

Location: Duffield

Posted: 13th Apr 2011 19:35

Link

You need to put a space after "if keystate(29)=1" and "if keystate(48)=1" before the word "then" otherwise the compiler sees "1then" as not a number

Back to top

Profile PM Email

Jimmy

22

Years of Service

User Offline

Joined: 20th Aug 2003

Location: Back in the USA

Posted: 13th Apr 2011 20:50

Link

Also your move object up and down commands need to have the object number and the amount to move:

Move object up 1, 1

NaGaFailMo.

Back to top

Profile PM Website

basjak

16

Years of Service

User Offline

Joined: 16th Apr 2010

Location: feel like signing up for mars

Posted: 13th Apr 2011 21:05

Link

keystates may be confusing sometimes.

I always use:
EXP: if lower$(inkey$()="w") then move object up objno

Back to top

Profile PM Email Website

Neuro Fuzzy

19

Years of Service

User Offline

Joined: 11th Jun 2007

Location:

Posted: 13th Apr 2011 21:11 Edited at: 13th Apr 2011 21:33

Link

correckshun!

+ Code Snippet

if lower$(inkey$())="w" then move object up num, amount

[edit]
WAIT. There isn't even a command called "move object up"!!!!!

Errm...

>.>

[edit2]
just kidding yes there is.

Tell me if there's a broken link to images in a thread I post, and I'll fix 'em.

Back to top

Profile PM Email

Indicium

18

Years of Service

User Offline

Joined: 26th May 2008

Location:

Posted: 13th Apr 2011 21:23

Link

Quote: "move object up"

One of IanM's I think.

Back to top

Profile PM

paul5147

20

Years of Service

User Offline

Joined: 11th Jan 2006

Location: Hot & Sunny

Posted: 13th Apr 2011 21:26 Edited at: 13th Apr 2011 21:27

Link

Straight from the DBPro help files

POSITION OBJECT : POSITION OBJECT Object Number, X, Y, Z
SCALE OBJECT : SCALE OBJECT Object Number, XSize, YSize, ZSize
ROTATE OBJECT : ROTATE OBJECT Object Number, XAngle, YAngle, ZAngle
MOVE OBJECT : MOVE OBJECT Object Number, Speed
POINT OBJECT : POINT OBJECT Object Number, X, Y, Z
MOVE OBJECT DOWN : MOVE OBJECT DOWN Object Number, Value
MOVE OBJECT LEFT : MOVE OBJECT LEFT Object Number, Value
MOVE OBJECT RIGHT : MOVE OBJECT RIGHT Object Number, Value
MOVE OBJECT UP : MOVE OBJECT UP Object Number, Value
XROTATE OBJECT : XROTATE OBJECT Object Number, XAngle
YROTATE OBJECT : YROTATE OBJECT Object Number, YAngle
ZROTATE OBJECT : ZROTATE OBJECT Object Number, ZAngle
TURN OBJECT LEFT : TURN OBJECT LEFT Object Number, Value
TURN OBJECT RIGHT : TURN OBJECT RIGHT Object Number, Value
PITCH OBJECT UP : PITCH OBJECT UP Object Number, Value
PITCH OBJECT DOWN : PITCH OBJECT DOWN Object Number, Value
ROLL OBJECT LEFT : ROLL OBJECT LEFT Object Number, Value
ROLL OBJECT RIGHT : ROLL OBJECT RIGHT Object Number, Value
SHOW OBJECT : SHOW OBJECT Object Number
HIDE OBJECT : HIDE OBJECT Object Number

+ Code Snippet

POSITION OBJECT : POSITION OBJECT Object Number, X, Y, Z
SCALE OBJECT : SCALE OBJECT Object Number, XSize, YSize, ZSize
ROTATE OBJECT : ROTATE OBJECT Object Number, XAngle, YAngle, ZAngle
MOVE OBJECT : MOVE OBJECT Object Number, Speed
POINT OBJECT : POINT OBJECT Object Number, X, Y, Z
MOVE OBJECT DOWN : MOVE OBJECT DOWN Object Number, Value
MOVE OBJECT LEFT : MOVE OBJECT LEFT Object Number, Value
MOVE OBJECT RIGHT : MOVE OBJECT RIGHT Object Number, Value
MOVE OBJECT UP : MOVE OBJECT UP Object Number, Value
XROTATE OBJECT : XROTATE OBJECT Object Number, XAngle
YROTATE OBJECT : YROTATE OBJECT Object Number, YAngle
ZROTATE OBJECT : ZROTATE OBJECT Object Number, ZAngle
TURN OBJECT LEFT : TURN OBJECT LEFT Object Number, Value
TURN OBJECT RIGHT : TURN OBJECT RIGHT Object Number, Value
PITCH OBJECT UP : PITCH OBJECT UP Object Number, Value
PITCH OBJECT DOWN : PITCH OBJECT DOWN Object Number, Value
ROLL OBJECT LEFT : ROLL OBJECT LEFT Object Number, Value
ROLL OBJECT RIGHT : ROLL OBJECT RIGHT Object Number, Value
SHOW OBJECT : SHOW OBJECT Object Number
HIDE OBJECT : HIDE OBJECT Object Number

Back to top

Profile PM

Neuro Fuzzy

19

Years of Service

User Offline

Joined: 11th Jun 2007

Location:

Posted: 13th Apr 2011 21:32

Link

Oh...

okay then...

I guess I shouldn't try to give DBPro help from a linux box xD

Tell me if there's a broken link to images in a thread I post, and I'll fix 'em.

Back to top

Profile PM Email

WLGfx

18

Years of Service

User Offline

Joined: 1st Nov 2007

Location: NW United Kingdom

Posted: 14th Apr 2011 02:09

Link

'MOVE OBJECT UP'??? (I didn't know that existed either)

Does that affect Euler angles like the free flight commands?

Warning! May contain Nuts!

Back to top

Profile PM Email Website

Neuro Fuzzy

19

Years of Service

User Offline

Joined: 11th Jun 2007

Location:

Posted: 14th Apr 2011 02:11

Link

It's not rotation, so it shouldn't. Normally I'd say "definitely not" but... I can't test it, so I'll stick to "probably not".

Tell me if there's a broken link to images in a thread I post, and I'll fix 'em.

Back to top

Profile PM Email

baxslash

Valued Member

Bronze Codemaster

19

Years of Service

User Offline

Joined: 26th Dec 2006

Location: Duffield

Posted: 14th Apr 2011 11:02

Link

Definitely not.

It just adds to the position in Y of the object.

Back to top

Profile PM Email

paul5147

20

Years of Service

User Offline

Joined: 11th Jan 2006

Location: Hot & Sunny

Posted: 14th Apr 2011 22:05

Link

It doesnt change the rotation of the object,but it does take into account the angle of the object being moved,just like the move object command,so depending on the rotation of the object when you use this command you may get som unexpected results.

`*********************************
`enviroment set up

IF CHECK DISPLAY MODE(1024,768,32) 
	SET DISPLAY MODE 1024,768,32
	h=DESKTOP HEIGHT()
	w=DESKTOP WIDTH()
	posx=w/2-512
	posy=h/2-384
ELSE
	SET DISPLAY MODE 640,480,32
	h=DESKTOP HEIGHT()
	w=DESKTOP WIDTH()
	posx=w/2-320
	posy=h/2-240
ENDIF
SET WINDOW POSITION posx,posy

SYNC ON
SYNC RATE 60
AUTOCAM OFF
HIDE MOUSE
COLOR BACKDROP 0,0
SET TEXT FONT "Arial"
SET TEXT SIZE 12
SET TEXT TRANSPARENT

POSITION CAMERA 0,10,-50
POINT CAMERA 0,0,0
POSITION MOUSE SCREEN WIDTH()/2,SCREEN HEIGHT()/2
dummy=MOUSEMOVEX()
dummy=MOUSEMOVEY()

`*********************************	
`declarations and setup starts here

MAKE OBJECT CUBE 1,10
XROTATE OBJECT 1,20
YROTATE OBJECT 1,10
MAKE OBJECT CYLINDER 2,100
SCALE OBJECT 2,1,100,1

`*********************************
`main loop starts here
DO
	IF SPACEKEY()
		move object up 1,0.1
	ENDIF
	mouse_control(0.1)
	SYNC
LOOP

`*********************************
`functions start here
FUNCTION mouse_control(speed AS FLOAT)
	XROTATE CAMERA CAMERA ANGLE X()+MOUSEMOVEY()
	YROTATE CAMERA CAMERA ANGLE Y()+MOUSEMOVEX()
	IF MOUSECLICK()=1 THEN MOVE CAMERA speed
	IF MOUSECLICK()=2 THEN MOVE CAMERA (0-speed)
	dummy=MOUSEMOVEX()
	dummy=MOUSEMOVEY()
ENDFUNCTION

+ Code Snippet

`*********************************
`enviroment set up

IF CHECK DISPLAY MODE(1024,768,32) 
	SET DISPLAY MODE 1024,768,32
	h=DESKTOP HEIGHT()
	w=DESKTOP WIDTH()
	posx=w/2-512
	posy=h/2-384
ELSE
	SET DISPLAY MODE 640,480,32
	h=DESKTOP HEIGHT()
	w=DESKTOP WIDTH()
	posx=w/2-320
	posy=h/2-240
ENDIF
SET WINDOW POSITION posx,posy

SYNC ON
SYNC RATE 60
AUTOCAM OFF
HIDE MOUSE
COLOR BACKDROP 0,0
SET TEXT FONT "Arial"
SET TEXT SIZE 12
SET TEXT TRANSPARENT

POSITION CAMERA 0,10,-50
POINT CAMERA 0,0,0
POSITION MOUSE SCREEN WIDTH()/2,SCREEN HEIGHT()/2
dummy=MOUSEMOVEX()
dummy=MOUSEMOVEY()

`*********************************	
`declarations and setup starts here

MAKE OBJECT CUBE 1,10
XROTATE OBJECT 1,20
YROTATE OBJECT 1,10
MAKE OBJECT CYLINDER 2,100
SCALE OBJECT 2,1,100,1

`*********************************
`main loop starts here
DO
	IF SPACEKEY()
		move object up 1,0.1
	ENDIF
	mouse_control(0.1)
	SYNC
LOOP

`*********************************
`functions start here
FUNCTION mouse_control(speed AS FLOAT)
	XROTATE CAMERA CAMERA ANGLE X()+MOUSEMOVEY()
	YROTATE CAMERA CAMERA ANGLE Y()+MOUSEMOVEX()
	IF MOUSECLICK()=1 THEN MOVE CAMERA speed
	IF MOUSECLICK()=2 THEN MOVE CAMERA (0-speed)
	dummy=MOUSEMOVEX()
	dummy=MOUSEMOVEY()
ENDFUNCTION

Back to top

Profile PM

Sorry your browser is not supported!

DarkBASIC Professional Discussion / Moving object up or down