TheGameCreators - CodeBase - first person camera control

Return to the CodeBase listing

Category: 3D

Version: 1.0

Information

Uploaded: 2nd Oct 2009 12:09

Modified: 2nd Oct 2009 12:46

Author: Anonymous Coder

Summary

camera control used in first person games.

Full Description

controles camera, bobs camera(like walking), sets camera to matrix height, uses wasd keys to move camera.

DarkBASIC Professional Source Code

` This code was downloaded from The Game Creators

` It is reproduced here with full permission

` http://www.thegamecreators.com

rem camera control

sync on

sync rate 60

maximize window

autocam off

hide mouse

rem Best display

if check display mode(1024,768,32)=1

set display mode 1024,768,32

endif

rem objects

rem collision object

make object cylinder 1,10

Rem make matrix

Make matrix 1,1000,1000,50,50

randomize matrix 1,10

update matrix 1

rem input

center text 100,100,str$(x#)+","+str$(y#)+","+str$(z#)+","+str$(cya#)

// stop bobing

stage=0

rem if w

if keystate(17)=1

//resume bobing

stage=1

//change x,z values to move

x#=newxvalue(x#,cya#,1)

z#=newzvalue(z#,cya#,1)

endif

rem if s

if keystate(31)=1

stage=1

x#=newxvalue(x#,cya#,-1)

z#=newzvalue(z#,cya#,-1)

endif

rem if a

if keystate(30)=1

stage=1

x#=newxvalue(x#,wrapvalue(cya#-90.0),1)

z#=newzvalue(z#,wrapvalue(cya#-90.0),1)

endif

rem if d

if keystate(32)=1

stage=1

x#=newxvalue(x#,wrapvalue(cya#+90.0),1)

z#=newzvalue(z#,wrapvalue(cya#+90.0),1)

endif

rem Walk bounce

if stage=1

walkha#=wrapvalue(walkha#+16)

else

walkha#=curveangle(0.0,walkha#,6)

endif

walkh#=(cos(walkha#)/3)

rem Control Camera

cya#=wrapvalue(cya#+(mousemovex()/3.0))

cxa#=cxa#+(mousemovey()/3.0)

//limit camera movement

if cxa#<-60.0 then cxa#=-60.0

if cxa#>60.0 then cxa#=60.0

//get values

cx#=newxvalue(x#,cya#,sin(cxa#)*10)

cz#=newzvalue(z#,cya#,sin(cxa#)*10)

//give values to camera

position camera cx#,y#+30+walkh#+get ground height(1,x#,z#),cz#

rotate camera cxa#,cya#,0

//fast loop

sync

//return loop

loop

Download

Please login to download

Comments

No comments yet.

Author Name:	Anonymous Coder
CodeBase Entries:	1

CodeBase - first person camera control

Information

Summary

Full Description

DarkBASIC Professional Source Code

Download

Screen Shot

Author

Comments