sync on
sync rate 50
hide mouse
`-----------------
`creating a matrix
`-----------------
make matrix 1,100,150,10,15
`bottom corner in a slant
set matrix height 1,1,1,15
set matrix height 1,2,1,10
set matrix height 1,1,2,10
set matrix height 1,3,1,5
set matrix height 1,3,2,5
set matrix height 1,1,3,5
set matrix height 1,2,3,5
set matrix height 1,3,3,5
`Wall on the side
set matrix height 1,10,15,20
set matrix height 1,10,14,20
set matrix height 1,10,13,20
set matrix height 1,10,12,20
set matrix height 1,10,11,20
set matrix height 1,9,15,20
set matrix height 1,9,14,20
set matrix height 1,9,13,20
set matrix height 1,8,15,20
set matrix height 1,8,14,20
set matrix height 1,7,15,20
set matrix height 1,6,15,20
set matrix height 1,10,10,20
set matrix height 1,10,9,20
set matrix height 1,10,8,20
set matrix height 1,10,7,20
set matrix height 1,7,14,20
set matrix height 1,7,13,20
set matrix height 1,7,12,20
set matrix height 1,9,12,20
set matrix height 1,9,11,20
set matrix height 1,9,10,20
set matrix height 1,8,10,20
set matrix height 1,10,6,10
set matrix height 1,9,11,10
set matrix height 1,9,10,10
set matrix height 1,9,9,10
set matrix height 1,9,8,10
set matrix height 1,9,7,7
set matrix height 1,7,14,10
set matrix height 1,8,11,20
set matrix height 1,9,11,20
set matrix height 1,9,10,20
set matrix height 1,9,9,20
set matrix height 1,4,5,20
set matrix height 1,5,5,20
set matrix height 1,4,4,10
set matrix height 1,5,4,10
update matrix 1
`---------------
` TEXTURING MAP
`---------------
load image "floor1.bmp",1
load image "water.bmp",2
load image "dirt.bmp",3
prepare matrix texture 1,1,2,2
prepare matrix texture 2,2,1,1
prepare matrix texture 3,3,2,2
for x = 0 to 9
for z = 0 to 14
set matrix tile 1,x,z,1
next z
next x
update matrix 1
set matrix tile 1,6,11,2
set matrix tile 1,6,12,2
set matrix tile 1,7,11,1
set matrix tile 1,7,12,1
set matrix tile 1,6,13,2
set matrix tile 1,7,13,2
set matrix tile 1,6,14,2
set matrix tile 1,7,14,1
set matrix tile 1,5,14,2
set matrix tile 1,8,13,2
set matrix tile 1,8,12,2
set matrix tile 1,8,11,2
set matrix tile 1,9,14,1
set matrix tile 1,8,14,1
set matrix tile 1,9,13,1
set matrix tile 1,9,12,1
set matrix tile 1,9,11,1
set matrix tile 1,9,10,1
set matrix tile 1,8,10,1
set matrix tile 1,9,9,1
set matrix tile 1,7,10,2
set matrix tile 1,7,9,2
set matrix tile 1,8,9,2
set matrix tile 1,9,8,1
set matrix tile 1,8,8,2
set matrix tile 1,9,7,1
set matrix tile 1,8,7,2
set matrix tile 1,8,6,2
set matrix tile 1,9,6,2
set matrix tile 1,9,5,2
update matrix 1
set matrix tile 1,3,4,2
set matrix tile 1,4,3,2
set matrix tile 1,3,3,2
set matrix tile 1,5,4,2
set matrix tile 1,5,3,2
set matrix tile 1,4,5,2
set matrix tile 1,4,4,2
update matrix 1
`-------------------------
` GAME & CHARACTER CODING
`-------------------------
make object cube 6,10
make object sphere 2,20
color object 6 ,RGB(140,12,70)
color object 2, RGB(70,112,40)
h2= 150
h1= 300
position object 6,60,5,30
position object 2,40,7,100
position camera 0,65,10
point camera 50,25,50
update matrix 1
do
sync
loop
this is the source code .... i hope it works
A one that is not cold is scarcely a one at all