TheGameCreators - CodeBase - walk on matrix #1

Return to the CodeBase listing

Category: Complete Applications

Version: 1.0

Information

Uploaded: 4th Jan 2005 19:15

Modified: 1st Jan 1970 01:00

Author: Acolyte Entertainment

Summary

How to walk on matrix i think is it ......

Full Description

DarkBASIC Professional Source Code

` This code was downloaded from The Game Creators

` It is reproduced here with full permission

` http://www.thegamecreators.com

rem Activate manual sync

sync on

`------------make some texture

for a=1 to 4

for b=1 to 4

ink rgb(rnd(255),rnd(255),rnd(255)),1

box -64+a*64,-64+b*64,a*64,b*64

next a

next b

get image 1,0,0,256,256

`wait key

`----------make a matrix

make matrix 1,1000.0,1000.0,25,25

prepare matrix texture 1,1,1,1

`----------Randomize the matrix

randomize matrix 1,10

rem Make player

make object cube 1,10

rem How fast player move

speed#=3.0

rem position player

posx#=500.0

posz#=500.0

rem Begin main loop

rem Control Player with the cursor keys

if upkey()=1

posx#=newxvalue(posx#, angle#, speed#)

posz#=newzvalue(posz#, angle#, speed#)

endif

if downkey()=1

posx#=newxvalue(posx#, angle#, 0-speed#)

posz#=newzvalue(posz#, angle#, 0-speed#)

endif

if leftkey()=1 then angle#=wrapvalue(angle#-speed#)

if rightkey()=1 then angle#=wrapvalue(angle#+speed#)

rem get then matrix ground height for player to walk on

ground#=get ground height(1,posx#,posz#)+10

rem Update the object with these new values

position object 1,posx#,ground#,posz#

rem   rotate player

yrotate object 1,angle#

rem Camera follow player

camdist#=35.0 : camhigh#=ground#+10.0 : camfade#=3.5

set camera to follow posx#,posy#,posz#,angle#,camdist#,camhigh#,camfade#,1

rem Update Screen

sync

loop

Download

Please login to download

Comments

No comments yet.

Author Name:	Acolyte Entertainment
CodeBase Entries:	2

CodeBase - walk on matrix #1