couple problems. - GameCreators Forum

Author

Message

DB newbie

19

Years of Service

User Offline

Joined: 13th Nov 2005

Location: um..... i dont remember.

Posted: 5th Apr 2006 03:32

Link

ok i have a few problems with my RPG that i am making.

ok first off when i use the YROTATE command it wont rotate an di want it to becasue the character is facing the wrong way.

the second is how do i change the camera angle so that it is angled a little higher slightly. here is my code and i put up the exe. so that you know what im talking about.

thanksy guys.

+ Code Snippet

rem ---------------------
rem RPG
rem 4/4/06
rem ---------------------
load object "H-Knight-Idle.3DS",1
load bitmap "grass.bmp",1
get image 1,0,0,256,256
make matrix 1,10000.0,10000.0,25,25
prepare matrix texture 1,1,2,2
randomize matrix 1,50.0
hide mouse
scale object 1,5000,5000,4500
x#=500
z#=500

sync on
sync rate 40
rem Begin loop
do
rem Control camera with arrow keys
if upkey()=1 then x#=newxvalue(x#,a#,10) : z#=newzvalue(z#,a#,10)
if downkey()=1 then x#=newxvalue(x#,a#,-10) : z#=newzvalue(z#,a#,-10)
if leftkey()=1 then a#=wrapvalue(a#-10.0)
if rightkey()=1 then a#=wrapvalue(a#+10.0)

rem Update character
y#=get ground height(1,x#,z#)+50.0
position object 1,x#,y#,z#
yrotate object 1,a#

rem Position camera to the back of the character
cx#=newxvalue(x#,wrapvalue(a#+180),300)
cz#=newzvalue(z#,wrapvalue(a#+180),300)
cy#=get ground height(1,cx#,cz#)+100.0
position camera cx#,cy#,cz#

rem Point camera at object
point camera x#,y#,z#

rem sync
sync

rem End loop
loop

visit my site (unfinished)
www.freewebs.com/dbnewbie

Attachments

Login to view attachments

Back to top

Profile PM Email

Duke Blue Devils

19

Years of Service

User Offline

Joined: 11th Mar 2006

Location:

Posted: 5th Apr 2006 03:36 Edited at: 5th Apr 2006 03:43

Link

If it's facing the wrong way at the start then do yrotate object x,180 then use fix object pivot x
Use set camera to follow to move the camera however you want.

Visit the official Chicago Rush website
http://chicagorush.servegame.com/index.php

Back to top

Profile PM

BENOJ

19

Years of Service

User Offline

Joined: 17th Mar 2006

Location: UK

Posted: 5th Apr 2006 04:11

Link

this should work, havent tested it yet but im pretty sure it will work

rem ---------------------
rem RPG
rem 4/4/06
rem ---------------------
load object "H-Knight-Idle.3DS",1
yrotate object 180
load bitmap "grass.bmp",1
get image 1,0,0,256,256
make matrix 1,10000.0,10000.0,25,25
prepare matrix texture 1,1,2,2
randomize matrix 1,50.0
hide mouse
scale object 1,5000,5000,4500
x#=500
z#=500

sync on
sync rate 40
rem Begin loop
do
rem Control camera with arrow keys
if upkey()=1 then x#=newxvalue(x#,a#,10) : z#=newzvalue(z#,a#,10)
if downkey()=1 then x#=newxvalue(x#,a#,-10) : z#=newzvalue(z#,a#,-10)
if leftkey()=1 then a#=wrapvalue(a#-10.0)
if rightkey()=1 then a#=wrapvalue(a#+10.0)
rem Update character
y#=get ground height(1,x#,z#)+50.0
position object 1,x#,y#,z#
yrotate object 1,a#
rem third person view camera, will always look at the character
rem the cam dist is how far away from the object you are and the
rem cam height is how high up the camera is. cam fade is by how much 
rem the angle changes as the object turns. 
camdist#=40 : camheight#=y#+40 : camfade#=3.5
set camera to follow x#,y#,z#,camdist#,camheight#,camfade#,a#,1
angle the camera down to look at the object 
xrotate camera 15
rem sync
sync

rem End loop
loop

+ Code Snippet

rem ---------------------
rem RPG
rem 4/4/06
rem ---------------------
load object "H-Knight-Idle.3DS",1
yrotate object 180
load bitmap "grass.bmp",1
get image 1,0,0,256,256
make matrix 1,10000.0,10000.0,25,25
prepare matrix texture 1,1,2,2
randomize matrix 1,50.0
hide mouse
scale object 1,5000,5000,4500
x#=500
z#=500

sync on
sync rate 40
rem Begin loop
do
rem Control camera with arrow keys
if upkey()=1 then x#=newxvalue(x#,a#,10) : z#=newzvalue(z#,a#,10)
if downkey()=1 then x#=newxvalue(x#,a#,-10) : z#=newzvalue(z#,a#,-10)
if leftkey()=1 then a#=wrapvalue(a#-10.0)
if rightkey()=1 then a#=wrapvalue(a#+10.0)
rem Update character
y#=get ground height(1,x#,z#)+50.0
position object 1,x#,y#,z#
yrotate object 1,a#
rem third person view camera, will always look at the character
rem the cam dist is how far away from the object you are and the
rem cam height is how high up the camera is. cam fade is by how much 
rem the angle changes as the object turns. 
camdist#=40 : camheight#=y#+40 : camfade#=3.5
set camera to follow x#,y#,z#,camdist#,camheight#,camfade#,a#,1
angle the camera down to look at the object 
xrotate camera 15
rem sync
sync

rem End loop
loop

you man also want to append the walking character to this, so when the upkey() is pressed it plays the walking guy so it looks more realistic

abit fatal1ty an8 sli mobo, ati radeon 1800 XT, 1.5GB RAM
250GB SATA HDD, AMD Athlon 64 x2 4200 (overclocked further)

Back to top

Profile PM Email

Duke Blue Devils

19

Years of Service

User Offline

Joined: 11th Mar 2006

Location:

Posted: 5th Apr 2006 04:14

Link

You can just use point camera instead of xrotate camera to always point the camera @the player. This will automatically rotate the camera to face the player.

Visit the official Chicago Rush website
http://chicagorush.servegame.com/index.php

Back to top

Profile PM

DB newbie

19

Years of Service

User Offline

Joined: 13th Nov 2005

Location: um..... i dont remember.

Posted: 5th Apr 2006 04:18

Link

ok thank you i will try it.

visit my site (unfinished)
www.freewebs.com/dbnewbie

Back to top

Profile PM Email

BENOJ

19

Years of Service

User Offline

Joined: 17th Mar 2006

Location: UK

Posted: 5th Apr 2006 04:19 Edited at: 5th Apr 2006 04:19

Link

yea but the camera i used follows the position and angles etc...anyway, so if i used the point camera thign it would be kinda like doing th esame thing twice

abit fatal1ty an8 sli mobo, ati radeon 1800 XT, 1.5GB RAM
250GB SATA HDD, AMD Athlon 64 x2 4200 (overclocked further)

Back to top

Profile PM Email

DB newbie

19

Years of Service

User Offline

Joined: 13th Nov 2005

Location: um..... i dont remember.

Posted: 5th Apr 2006 06:03

Link

i used your code benjo an dall i got was a blue screen so im gona try what duke said.

visit my site (unfinished)
www.freewebs.com/dbnewbie

Back to top

Profile PM Email

DB newbie

19

Years of Service

User Offline

Joined: 13th Nov 2005

Location: um..... i dont remember.

Posted: 5th Apr 2006 17:27

Link

BENOJ for the walking thing woul i just use this code.

+ Code Snippet

if upkey()=1
play object 1
endif

visit my site (unfinished)
www.freewebs.com/dbnewbie

Back to top

Profile PM Email

BENOJ

19

Years of Service

User Offline

Joined: 17th Mar 2006

Location: UK

Posted: 5th Apr 2006 19:15

Link

this is just a tutorial from the dark basic program itself, ive put the code in here, it shows u how to do it

rem Position camera off center
POSITION CAMERA 0.0,0.0,-1000.0

rem Load 3D object and append walking data to it
LOAD OBJECT "idle.x",1 : APPEND OBJECT "walk.x",1,100
YROTATE OBJECT 1,180 : FIX OBJECT PIVOT 1

rem Loop 3D object animation from 0 to 20 (idle)
LOOP OBJECT 1,0,20 : SET OBJECT SPEED 1,10

rem Activate manual syncronization
SYNC ON

rem Begin loop
DO

rem Modify character angle based on left/right keys
stage=0
IF LEFTKEY()=1 THEN a#=a#-8.0
IF RIGHTKEY()=1 THEN a#=a#+8.0
a#=wrapvalue(a#)

rem Modify character position based on up/down keys
IF UPKEY()=1 THEN x#=NEWXVALUE(x#,a#,3) : z#=NEWZVALUE(z#,a#,3) : stage=1
IF DOWNKEY()=1 THEN x#=NEWXVALUE(x#,a#,-3) : z#=NEWZVALUE(z#,a#,-3) : stage=1

rem If character action changes
IF stage<>oldstage
	IF stage=0
		SET OBJECT FRAME 1,0.0
		LOOP OBJECT 1,0,20
		SET OBJECT SPEED 1,10
	ENDIF
	IF stage=1
		SET OBJECT FRAME 1,105.0
		LOOP OBJECT 1,105,125
		SET OBJECT SPEED 1,40
	ENDIF
	oldstage=stage
ENDIF

rem Update character position and angle
POSITION OBJECT 1,x#,0.0,z#
YROTATE OBJECT 1,a#

rem Refresh screen
SYNC

rem End loop
LOOP

+ Code Snippet

rem Position camera off center
POSITION CAMERA 0.0,0.0,-1000.0

rem Load 3D object and append walking data to it
LOAD OBJECT "idle.x",1 : APPEND OBJECT "walk.x",1,100
YROTATE OBJECT 1,180 : FIX OBJECT PIVOT 1

rem Loop 3D object animation from 0 to 20 (idle)
LOOP OBJECT 1,0,20 : SET OBJECT SPEED 1,10

rem Activate manual syncronization
SYNC ON

rem Begin loop
DO

rem Modify character angle based on left/right keys
stage=0
IF LEFTKEY()=1 THEN a#=a#-8.0
IF RIGHTKEY()=1 THEN a#=a#+8.0
a#=wrapvalue(a#)

rem Modify character position based on up/down keys
IF UPKEY()=1 THEN x#=NEWXVALUE(x#,a#,3) : z#=NEWZVALUE(z#,a#,3) : stage=1
IF DOWNKEY()=1 THEN x#=NEWXVALUE(x#,a#,-3) : z#=NEWZVALUE(z#,a#,-3) : stage=1

rem If character action changes
IF stage<>oldstage
	IF stage=0
		SET OBJECT FRAME 1,0.0
		LOOP OBJECT 1,0,20
		SET OBJECT SPEED 1,10
	ENDIF
	IF stage=1
		SET OBJECT FRAME 1,105.0
		LOOP OBJECT 1,105,125
		SET OBJECT SPEED 1,40
	ENDIF
	oldstage=stage
ENDIF

rem Update character position and angle
POSITION OBJECT 1,x#,0.0,z#
YROTATE OBJECT 1,a#

rem Refresh screen
SYNC

rem End loop
LOOP

to see it go to the tutorials section and the select "3d that walks"

abit fatal1ty an8 sli mobo, ati radeon 1800 XT, 1.5GB RAM
250GB SATA HDD, AMD Athlon 64 x2 4200 (overclocked further)

Back to top

Profile PM Email

Sorry your browser is not supported!

DarkBASIC Discussion / couple problems.

Attachments