A short game by tommyvercetti9@hotmail.com it Doesent realy have any aim and you can go though the walls but it is good for a first try at programming

A short game by tommyvercetti9@hotmail.com it Doesent realy have any aim and you can go though the walls but it is good for a first try at programming

                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    cls
print         "Welcome to the /w i p/ demo of maze"
print         "This was made by tommyvercetti9@hotmail.com"
sleep 1000
print "----------------------------"
print ""
print " /////   \   //////  ///// "
print " / / /         //   /     "
print " / / / \\\   //    ////  "
print " / / /       /////  /     "
print " /   /                ///// " 
print ""
print "----------------------------"
print "loading"
sleep 5000
set global collision on
load bitmap "floor1.bmp",1
get image 1,0,0,128,128
hide mouse
ink rgb(244,214,210),1
cls
make matrix 1,10000.100,10000.0,30,25
load music "Course.mid",1
play music 1

load bitmap "mnbrik.bmp",2
get image 2,0,0,256,256

rem Load your object
load object "car54.x",1

scale object 1,5000,4000,8000

set object collision on 1

position matrix 1,-2000,1,0
rem Position camera
enable static occlusion
position camera 5000,200,5000

rem Activate manual sync
sync on

color backdrop 999



prepare matrix texture 1,1,2,2


rem --------------------------------------
make object cube 5,75
position object 5,2100,50,2000
set object collision on 5
scale object 5,600,600,800
texture object 5,2
rem ---------------------------
make object cube 6,75
position object 6,2500,50,2000
scale object 6,600,600,800
texture object 6,2
rem ---------------------------
make object cube 7,75
position object 7,2500,50,2500
scale object 7,600,600,800
texture object 7,2
rem ---------------------------
make object cube 8,75
position object 8,3500,50,2000
scale object 8,600,600,800
texture object 8,2
rem ---------------------------
make object cube 9,75
position object 9,3500,50,2500
scale object 9,600,600,800
texture object 9,2
rem ---------------------------
make object cube 10,75
position object 10,3500,50,3000
scale object 10,600,600,800
texture object 10,2
rem ---------------------------
make object cube 11,75
position object 11,2500,50,3000
scale object 11,600,600,800
texture object 11,2
rem ---------------------------
make object cube 12,75
position object 12,3500,50,3000
scale object 12,600,600,800
texture object 12,2
rem ---------------------------
make object cube 13,75
position object 13,3500,50,1500
scale object 13,600,600,800
texture object 13,2
rem ---------------------------
make object cube 14,75
position object 14,2800,50,1500
scale object 14,600,600,800
texture object 14,2
rem ---------------------------
make object cube 15,75
position object 15,3800,50,1500
scale object 15,600,600,800
texture object 15,2
rem ---------------------------
make object cube 16,75
position object 16,4800,50,1500
scale object 16,600,600,800
texture object 16,2
sync on
rem ---------------------------
make object cube 17,75
position object 17,4800,50,2000
scale object 17,600,600,800
texture object 17,2

rem ---------------------------
make object cube 18,75
position object 18,4800,50,2500
scale object 18,600,600,800
texture object 18,2

rem ---------------------------
make object cube 19,75
position object 19,4800,50,3000
scale object 19,600,600,800
texture object 19,2
rem ---------------------------
make object cube 20,75
position object 20,4500,50,3500
scale object 20,600,600,800
texture object 20,2
rem ---------------------------
make object cube 21,75
position object 21,4500,50,3500
scale object 21,600,600,800
texture object 21,2
rem ---------------------------
make object cube 22,75
position object 22,4500,50,4000
scale object 22,600,600,800
texture object 22,2
rem ---------------------------
make object cube 23,75
position object 23,4500,50,3700
scale object 23,600,600,800
texture object 23,2
rem ---------------------------
make object cube 24,75
position object 24,4200,50,4500
scale object 24,600,600,800
texture object 24,2
rem ---------------------------
make object cube 25,75
position object 25,4200,50,3700
scale object 25,600,600,800
texture object 25,2
rem ---------------------------
make object cube 26,75
position object 26,4200,50,2000
scale object 26,600,600,800
texture object 26,2
rem ---------------------------
make object cube 27,75
position object 27,1700,50,1500
scale object 27,600,600,800
texture object 27,2
rem ---------------------------
make object cube 28,75
position object 28,1700,50,1700
scale object 28,600,600,800
texture object 28,2
rem ---------------------------
make object cube 29,75
position object 29,1700,50,1900
scale object 29,600,600,800
texture object 29,2
rem ---------------------------
make object cube 30,75
position object 30,1700,50,2100
scale object 30,600,600,800
texture object 30,2
rem ---------------------------
make object cube 31,75
position object 31,1700,50,2400
scale object 31,600,600,800
texture object 31,2
rem ---------------------------
make object cube 32,75
position object 32,1500,50,1500
scale object 32,600,600,800
texture object 32,2
rem ---------------------------
make object cube 33,75
position object 33,600,50,1500
scale object 33,600,600,800
texture object 33,2
rem ---------------------------
make object cube 34,75
position object 34,300,50,1500
scale object 34,600,600,800
texture object 34,2

rem ---------------------------
make object cube 35,75
position object 35,0,50,1500
scale object 35,600,600,800
texture object 35,2

rem ---------------------------
make object cube 36,75
position object 36,-300,50,1500
scale object 36,600,600,800
texture object 36,2

rem ---------------------------
make object cube 37,75
position object 37,-600,50,1500
scale object 37,600,600,800
texture object 37,2

rem ---------------------------
make object cube 38,75
position object 38,-900,50,1500
scale object 38,600,600,800
texture object 38,2

rem ---------------------------
make object cube 39,75
position object 39,-1200,50,1500
scale object 39,600,600,800
texture object 39,2

rem ---------------------------
make object cube 40,75
position object 40,-1500,50,1500
scale object 40,600,600,800
texture object 40,2

rem ---------------------------
make object cube 41,75
position object 41,-1800,50,1500
scale object 41,600,600,800
texture object 41,2

sync on
rem Begin loop
do

rem Control camera with arrow keys
if upkey()=1 then x#=newxvalue(x#,a#,-20) : z#=newzvalue(z#,a#,-20)
if downkey()=1 then x#=newxvalue(x#,a#,-40) : z#=newzvalue(z#,a#,-40)
if leftkey()=1 then a#=wrapvalue(a#-5.0)
if rightkey()=1 then a#=wrapvalue(a#+5.0)

rem Update character
y#=get ground height(1,x#,z#)+50.7
position object 1,x#,y#,z#
yrotate object 1,a#

rem Position camera to the back of the character
cx#=newxvalue(x#,wrapvalue(a#+1080),300)
cz#=newzvalue(z#,wrapvalue(a#+1080),300)
cy#=get ground height(1,cx#,cz#)+100.0
position camera cx#,cy#,cz#

rem Point camera at object
point camera x#,y#,z#

  



rem Syncronise
sync

rem End loop
loop