TheGameCreators - CodeBase

Return to the CodeBase listing

Category: Camera

Version: 1.0

Information

Uploaded: 25th Aug 2004 14:16

Modified: 1st Jan 1970 01:00

Author: Louiz ofRohr

Summary

Camera always points to object in interactive movement.

Full Description

A simple example of a basic code used in some animations or games with small ground. The camera keeps itself, in this example, on middle of ground, at 500 points to _y. You move a sphere around the ground and the camera points to this. Take a good benefit.

DarkBASIC Source Code

` This code was downloaded from The Game Creators

` It is reproduced here with full permission

` http://www.thegamecreators.com

`<<<<<<<<<<<<< CÃ‚MERA FiXA A UM PONTO >>>>>>>>>>>>>Â´

REM _ _ _ _UM CÃ“DiGO BASE DE LOUiZ_ _ _ MER

REM _ _ _ _A SOURCE CODE By LOUiZ_ _ _ MER

`<<<<<<<<<<<<<    POiNT CAMERA      >>>>>>>>>>>>>>>Â´

sync on

sync rate 60

hide mouse

`CORES PRÃ‰-DEFiNiDAS (Define Colours)

vermelho = rgb(200,0,0)

preto = rgb(0,0,0)

`XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

`EFEiTO FOG A 2000 DA CÃ‚MERA (Fog at 2000 from camera)

Fog on

fog distance 2000

fog color preto

`XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

`CENÃRiO (Ground)

make matrix 1, 5000, 5000, 30, 30

position matrix 1, 0, 0, 0

`XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

`PERSONAGEM (Character)

make object sphere 1, 50

color object 1, vermelho

position object 1, 2500, 30, 2500

`XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

`POSiÃ‡ÃƒO iNiCiAL DA CÃ‚MERA (Camera's initial position)

position camera 2500, 500, 2500

`XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

`AÃ‡Ã•ES CONSTANTES (Main Loop)

`CONTROLA O PERSONAGEM (Character controls)

if upkey()=1 THEN move object 1, 5

if downkey()=1 THEN move object 1, -5

if leftkey()=1 THEN turn object left 1, 5

if rightkey()=1 THEN turn object right 1, 5

`XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

`POSiÃ‡ÃƒO DO PERSONAGEM (Character position)

PX# = object position x(1)

PY# = object position y(1)

PZ# = object position z(1)

point camera PX#, PY#, PZ#

`XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

`ATUALiZA A TELA (Update screen)

sync

`XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

`REPETE AS AÃ‡Ã•ES EDSDE O "DO" (Back to "DO" and play)

LOOP

`XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

Download

Please login to download

Comments

No comments yet.

CodeBase - POiNT CAMERA

Information

Summary

Full Description

DarkBASIC Source Code

Download

Screen Shot

Author

Comments

Author Name:	Louiz ofRohr
CodeBase Entries:	8