So I wanted to make a 3D tetris game, but I realized I have never made a game that operates anything like tetris. I am really clueless on where to even start. So far I have a basic board layed out and 3 of the pieces created. I have not action at all in it though. Not sure where to begin.
Here is an attached picture, nothing moves, nothing turns, etc.. its exactly as it look. If someone could help me out and at least give me some direction as where to start, I would be greatly appreciative. Thanks.
Also, here is the code I have thus far:
autocam off
gosub setup
set camera range 1,1000
position camera (13*47)/2,((14*47)/2)+50,800
point camera (13*47)/2,((14*47)/2)+50,0
make light 1
show light 1
color light 1,rgb(200,200,255)
SET AMBIENT LIGHT 60
position light 1,(13*47)/2,((14*47)/2)+50,800
point light 1,(13*47)/2,((14*47)/2)+50,0
load image "bdrop1.png",2
make object cube 1,1000
scale object 1,130,100,2
texture object 1,2
position object 1,(13*47)/2,((14*47)/2)+50,0
`DECLARE TETRIS PIECES
`----
load image "box2.png",3
make object cube 5,47
texture object 5,3
position object 5,0,0,0
make object cube 6,47
texture object 6,3
position object 6,47,0,0
glue object to limb 6,5,0
make object cube 7,47
texture object 7,3
position object 7,47,0,0
glue object to limb 7,6,0
make object cube 8,47
texture object 8,3
position object 8,47,0,0
glue object to limb 8,7,0
position object 5,(13*47)/2,((14*47)/2)+100,0
` |__
` |
load image "box3.png",4
make object cube 9,47
texture object 9,4
position object 9,0,0,0
make object cube 10,47
texture object 10,4
position object 10,0,-47,0
glue object to limb 10,9,0
make object cube 11,47
texture object 11,4
position object 11,47,-47,0
glue object to limb 11,9,0
make object cube 12,47
texture object 12,4
position object 12,94,-47,0
glue object to limb 12,9,0
make object cube 13,47
texture object 13,4
position object 13,94,-94,0
glue object to limb 13,9,0
position object 9,(13*47)/2,((14*47)/2)+300,0
`||
`||
load image "box4.png",5
make object cube 14,47
texture object 14,5
position object 14,0,0,0
make object cube 15,47
texture object 15,5
position object 15,0,47,0
glue object to limb 15,14,0
make object cube 16,47
texture object 16,5
position object 16,-47,47,0
glue object to limb 16,14,0
make object cube 17,47
texture object 17,5
position object 17,-47,0,0
glue object to limb 17,14,0
position object 14,(13*47)/2,((14*47)/2)+400,0
sync on : sync rate 0
do
sync
loop
setup:
load image "box1.png",1
sp=500
for x=1 to 14
for y=1 to 13
read mnum
inc sp
if mnum = 1
make object cube sp,47
position object sp,y*47,50+(x*47),0
texture object sp,1
endif
next y
next x
return
data 1,1,1,1,1,1,1,1,1,1,1,1,1
data 1,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,1
data 1,0,0,0,0,0,0,0,0,0,0,0,1
