TheGameCreators - CodeBase - 3D Friction Menu Base

Return to the CodeBase listing

Category: 3D Maths

Version: 1.0

Information

Uploaded: 26th Aug 2004 16:51

Modified: 1st Jan 1970 01:00

Author: Louiz ofRohr

Summary

A menu that you use 1, 2, 3, 4, 5, 6 buttons to change place for the camera goto with friction.

Full Description

This is a great, really great project... You use the 1, 2, 3, 4, 5 ou 6 button<br /> to change a box. To each box you may aplly a texture or put a button over that.<br /> When you press 6, the camera goes to the box (object position) stoping while<br /> it approximates to box. Practically unprofitable, but beautiful. Enjoy...

DarkBASIC Source Code

` This code was downloaded from The Game Creators

` It is reproduced here with full permission

` http://www.thegamecreators.com

REM OPÃ‡Ã•ES BÃSiCAS DA TELA

rem Sincronia da tela, Ã© importante como o fps no flash

sync on

sync rate 60

rem xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

rem Neblina a uma certa distÃ¢ncia, para limitar o tamanho do cenÃ¡ro (alcance de visÃ£o)

fog on

fog distance 100

fog color rgb(0,0,0)

backdrop on

color backdrop rgb(0,0,0)

rem xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

REM XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

REM CORES PRÃ‰-DEFiNiDAS (Define colors)

vermelhoescuro = rgb(150,0,0)

verdeclaro = rgb(0,250,0)

azulclaro = rgb(0,0,250)

amareloclaro = rgb(250,250,0)

rosa = rgb(200,0,200)

cinza = rgb(150,150,150)

REM XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

REM CAiXAS (BOXES)

make object box 1, 100, 20, 100

position object 1, 0, 0, 0

color object 1, verdeclaro

Y1# = 50

Z1# = -80

make object box 2, 100, 20, 100

position object 2, 0, 20, 100

color object 2, amareloclaro

Y2# = 70

Z2# = 20

make object box 3, 100, 20, 100

position object 3, 0, 40, 200

color object 3, rosa

Y3# = 90

Z3# = 120

make object box 4, 100, 20, 100

position object 4, 0, 60, 300

color object 4, cinza

Y4# = 110

Z4# = 220

make object box 5, 100, 20, 100

position object 5, 0, 80, 400

color object 5, vermelhoescuro

Y5# = 130

Z5# = 320

REM XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

REM POSiÃ‡ÃƒO iNiCiAL DA CÃ‚MERA (Initial camera position)

position camera 0, 50, Z1#

xrotate camera 30

REM XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

REM AÃ‡Ã•ES PRiNCiPAiS A SEREM REPETiDAS (Main loop)

`REM CONTROLES (Controls)

if scancode()=2 THEN vai# = 1

if scancode()=3 THEN vai# = 2

if scancode()=4 THEN vai# = 3

if scancode()=5 THEN vai# = 4

if scancode()=6 THEN vai# = 5

REM XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

REM MOVE A CÃ‚MERA ATÃ‰ O BLOCO COM FRiCÃ‡ÃƒO (Move camera to boxex with friction)

xx# = camera position x() : yy# = camera position y() : zz# = camera position z()

if vai#=1 THEN position camera xx# + 0, yy# + (Y1# - yy#)/20, zz# + (Z1# - zz#)/20

if vai#=2 THEN position camera xx# + 0, yy# + (Y2# - yy#)/20, zz# + (Z2# - zz#)/20

if vai#=3 THEN position camera xx# + 0, yy# + (Y3# - yy#)/20, zz# + (Z3# - zz#)/20

if vai#=4 THEN position camera xx# + 0, yy# + (Y4# - yy#)/20, zz# + (Z4# - zz#)/20

if vai#=5 THEN position camera xx# + 0, yy# + (Y5# - yy#)/20, zz# + (Z5# - zz#)/20

REM XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

REM ATUALiZA A TELA (Update screen)

sync

REM XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

REM REPETE TUDO DESDE O "DO" (Goto "DO" and play again)

LOOP

REM XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

Download

Please login to download

Comments

No comments yet.

Author Name:	Louiz ofRohr
CodeBase Entries:	8

CodeBase - 3D Friction Menu Base

Information

Summary

Full Description

DarkBASIC Source Code

Download

Screen Shot

Author

Comments