TGC Codebase Backup



Texturing backdrop by Anonymous Coder

23rd Dec 2004 11:45
Summary

This demo textures the backdrop without using the TEXTURE BACKDROP command.



Description



Code
                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    draw sprites first : backdrop off
load image "C:Program Files\Dark Basic Software\Dark Basic Professiona\lMedia\Bitmaps\sky.bmp",1,1
make object box 1,10,10,10
direction=0
make matrix 1,5000,5000,21,21
randomize matrix 1,300
update matrix 1
do
if direction<0 then direction=direction+359
if direction>359 then direction=direction-359
yrotate camera -direction
xrotate camera 0
sprite 1,direction/0.33,0,1
set sprite 1,0,0
sprite 2,-1080+direction/0.33,0,1
set sprite 2,0,0
position camera camera position x(),50+get ground height(1,camera position x(),camera position z()),camera position z()
if upkey()=1 then position camera camera position x()+sin(-direction)*2,camera position y(),camera position z()+cos(-direction)*2
if downkey()=1 then position camera camera position x()-sin(-direction)*2,camera position y(),camera position z()-cos(-direction)*2
if rightkey()=1 then direction=direction-2
if leftkey()=1 then direction=direction+2
loop