Making a main menu - GameCreators Forum

Author

Message

Dark Basic Pro Enthusiast

12

Years of Service

User Offline

Joined: 8th Nov 2013

Location:

Posted: 20th Feb 2014 17:12

Link

okay so this is the code I am working with:

REM *** START SYSTEM SETUP SECTION

autocam on
sync off
REM *** STOP SYSTEM SETUP SECTION
REM *****************************************
rem main menu
sync on
sync rate 30
do
cls
ink rgb(255,255,255),0
text 0,100,"NEW GAME"
text 0,130,"LOAD"
text 0,160,"OPTIONS"
text 0,190,"QUIT"

`NEW GAME
if mousex() > 0 and mousex() < 100 and mousey() > 100 and mousey() < 120 then ink rgb(0,0,100),0 : text 0,100,"NEW GAME"
if mousex() > 0 and mousex() < 100 and mousey() > 100 and mousey() < 120 and mouseclick()=1 then gosub loadall

`LOAD
if mousex() > 0 and mousex() < 100 and mousey() > 130 and mousey() < 150 then ink rgb(0,0,100),0 : text 0,130,"LOAD"
if mousex() > 0 and mousex() < 100 and mousey() > 130 and mousey() < 150 and mouseclick()=1 then text 100,120,"YOU CLICKED LOAD"

`OPTIONS
if mousex() > 0 and mousex() < 100 and mousey() > 160 and mousey() < 180 then ink rgb(0,0,100),0 : text 0,160,"OPTIONS"
if mousex() > 0 and mousex() < 100 and mousey() > 160 and mousey() < 180 and mouseclick()=1 then text 100,120,"YOU CLICKED OPTIONS"

`QUIT
if mousex() > 0 and mousex() < 100 and mousey() > 190 and mousey() < 210 then ink rgb(0,0,100),0 : text 0,190,"QUIT"
if mousex() > 0 and mousex() < 100 and mousey() > 190 and mousey() < 210 and mouseclick()=1 then end
sync
loop
load image "E:\new edutainment project\images\arrow key.bmp",2
load image "E:\new edutainment project\images\NUMBERS\1.bmp",1
load image "E:\new edutainment project\images\NUMBERS\2.bmp",200
load image "E:\new edutainment project\images\NUMBERS\3.bmp",3
load image "E:\new edutainment project\images\NUMBERS\4.bmp",4
load image "E:\new edutainment project\images\NUMBERS\5.bmp",5
load image "E:\new edutainment project\images\NUMBERS\6.bmp",6
load image "E:\new edutainment project\images\NUMBERS\7.bmp",7
load image "E:\new edutainment project\images\NUMBERS\8.bmp",8
load image "E:\new edutainment project\images\NUMBERS\9.bmp",9
load image "E:\new edutainment project\images\NUMBERS\10.bmp",10
load image "E:\new edutainment project\images\NUMBERS\11.bmp",11
load image "E:\new edutainment project\images\NUMBERS\12.bmp",12
load image "E:\new edutainment project\images\NUMBERS\13.bmp",13
load image "E:\new edutainment project\images\NUMBERS\14.bmp",14
load image "E:\new edutainment project\images\NUMBERS\15.bmp",15
load image "E:\new edutainment project\images\NUMBERS\16.bmp",16
load image "E:\new edutainment project\images\NUMBERS\17.bmp",17
load image "E:\new edutainment project\images\NUMBERS\18.bmp",18
load image "E:\new edutainment project\images\NUMBERS\19.bmp",19
load image "E:\new edutainment project\images\NUMBERS\20.bmp",20
load image "E:\new edutainment project\images\NUMBERS\20.bmp",20
load image "E:\new edutainment project\images\NUMBERS\21.bmp",21
load image "E:\new edutainment project\images\NUMBERS\22.bmp",22
load image "E:\new edutainment project\images\NUMBERS\23.bmp",23
load image "E:\new edutainment project\images\FP Brighter.bmp",100
loadall:
rem 1st rotate cube
make object cube 65,10
texture object 65,2
position object 65,-210,100,300
make mesh from object 1,65
add limb 65,1,1
scale limb 65,1,100,1000,0
show limb 65,1
offset limb 65,1,0,20,0
make object from limb 1000,65,1,1
position object 1000,-210,100,300
remove limb 65,1
hide object 1000
rem 2nd rotate cube
make object cube 66,10
texture object 66,2
position object 66,-110,100,300
make mesh from object 1,66
add limb 66,1,1
scale limb 66,1,100,1000,0
show limb 66,1
offset limb 66,1,0,20,0
make object from limb 1001,66,1,1
position object 1001,-110,100,300
remove limb 66,1
hide object 1001
rem 3rd rotate cube
make object cube 67,10
texture object 67,2
position object 67,-10,100,300
make mesh from object 1,67
add limb 67,1,1
scale limb 67,1,100,1000,0
show limb 67,1
offset limb 67,1,0,20,0
make object from limb 1002,67,1,1
position object 1002,-10,100,300
remove limb 67,1
hide object 1002
rem 4th rotate cube
make object cube 68,10
texture object 68,2
position object 68,90,100,300
make mesh from object 1,68
add limb 68,1,1
scale limb 68,1,100,1000,0
show limb 68,1
offset limb 68,1,0,20,0
make object from limb 1003,68,1,1
position object 1003,90,100,300
remove limb 68,1
hide object 1003
rem 5th rotate cube
make object cube 69,10
texture object 69,2
position object 69,-260,50,300
make mesh from object 1,69
add limb 69,1,1
scale limb 69,1,100,1000,0
show limb 69,1
offset limb 69,1,0,20,0
make object from limb 1004,69,1,1
position object 1004,-260,50,300
remove limb 69,1
hide object 1004
rem 6th rotate cube
make object cube 70,10
texture object 70,2
position object 70,-160,50,300
make mesh from object 1,70
add limb 70,1,1
scale limb 70,1,100,1000,0
show limb 70,1
offset limb 70,1,0,20,0
make object from limb 1005,70,1,1
position object 1005,-160,50,300
remove limb 70,1
hide object 1005
rem 7th rotate cube
make object cube 71,10
texture object 71,2
position object 71,-60,50,300
make mesh from object 1,71
add limb 71,1,1
scale limb 71,1,100,1000,0
show limb 71,1
offset limb 71,1,0,20,0
make object from limb 1006,71,1,1
position object 1006,-60,50,300
remove limb 71,1
hide object 1006
rem 8th rotate cube
make object cube 72,10
texture object 72,2
position object 72,40,50,300
make mesh from object 1,72
add limb 72,1,1
scale limb 72,1,100,1000,0
show limb 72,1
offset limb 72,1,0,20,0
make object from limb 1007,72,1,1
position object 1007,40,50,300
remove limb 72,1
hide object 1007
rem 9th rotate cube
make object cube 73,10
texture object 73,2
position object 73,140,50,300
make mesh from object 1,73
add limb 73,1,1
scale limb 73,1,100,1000,0
show limb 73,1
offset limb 73,1,0,20,0
make object from limb 1008,73,1,1
position object 1008,140,50,300
remove limb 73,1
hide object 1008
rem 10th rotate cube
make object cube 74,10
texture object 74,2
position object 74,-210,0,300
make mesh from object 1,74
add limb 74,1,1
scale limb 74,1,100,1000,0
show limb 74,1
offset limb 74,1,0,20,0
make object from limb 1009,74,1,1
position object 1009,-210,0,300
remove limb 74,1
hide object 1009
rem 11th rotate cube
make object cube 75,10
texture object 75,2
position object 75,-110,0,300
make mesh from object 1,75
add limb 75,1,1
scale limb 75,1,100,1000,0
show limb 75,1
offset limb 75,1,0,20,0
make object from limb 1010,75,1,1
position object 1010,-110,0,300
remove limb 75,1
hide object 1010
rem 12th rotate cube
make object cube 76,10
texture object 76,2
position object 76,-10,0,300
make mesh from object 1,76
add limb 76,1,1
scale limb 76,1,100,1000,0
show limb 76,1
offset limb 76,1,0,20,0
make object from limb 1011,76,1,1
position object 1011,-10,0,300
remove limb 76,1
hide object 1011
rem 13th rotate cube
make object cube 77,10
texture object 77,2
position object 77,90,0,300
make mesh from object 1,77
add limb 77,1,1
scale limb 77,1,100,1000,0
show limb 77,1
offset limb 77,1,0,20,0
make object from limb 1012,77,1,1
position object 1012,90,0,300
remove limb 77,1
hide object 1012
rem 14th rotate cube
make object cube 78,10
texture object 78,2
position object 78,-260,-50,300
make mesh from object 1,78
add limb 78,1,1
scale limb 78,1,100,1000,0
show limb 78,1
offset limb 78,1,0,20,0
make object from limb 1013,78,1,1
position object 1013,-260,-50,300
remove limb 78,1
hide object 1013
rem 15th rotate cube
make object cube 79,10
texture object 79,2
position object 79,-160,-50,300
make mesh from object 1,79
add limb 79,1,1
scale limb 79,1,100,1000,0
show limb 79,1
offset limb 79,1,0,20,0
make object from limb 1014,79,1,1
position object 1014,-160,-50,300
remove limb 79,1
hide object 1014
rem 16th rotate cube
make object cube 80,10
texture object 80,2
position object 80,-60,-50,300
make mesh from object 1,80
add limb 80,1,1
scale limb 80,1,100,1000,0
show limb 80,1
offset limb 80,1,0,20,0
make object from limb 1015,80,1,1
position object 1015,-60,-50,300
remove limb 80,1
hide object 1015
rem 17th rotate cube
make object cube 81,10
texture object 81,2
position object 81,40,-50,300
make mesh from object 1,81
add limb 81,1,1
scale limb 81,1,100,1000,0
show limb 81,1
offset limb 81,1,0,20,0
make object from limb 1016,81,1,1
position object 1016,40,-50,300
remove limb 81,1
hide object 1016
rem 18th rotate cube
make object cube 82,10
texture object 82,2
position object 82,140,-50,300
make mesh from object 1,82
add limb 82,1,1
scale limb 82,1,100,1000,0
show limb 82,1
offset limb 82,1,0,20,0
make object from limb 1017,82,1,1
position object 1017,140,-50,300
remove limb 82,1
hide object 1017
rem 19th rotate cube
make object cube 83,10
texture object 83,2
position object 83,-210,-100,300
make mesh from object 1,83
add limb 83,1,1
scale limb 83,1,100,1000,0
show limb 83,1
offset limb 83,1,0,20,0
make object from limb 1018,83,1,1
position object 1018,-210,-100,300
remove limb 83,1
hide object 1018
rem 20th rotate cube
make object cube 84,10
texture object 84,2
position object 84,-110,-100,300
make mesh from object 1,84
add limb 84,1,1
scale limb 84,1,100,1000,0
show limb 84,1
offset limb 84,1,0,20,0
make object from limb 1019,84,1,1
position object 1019,-110,-100,300
remove limb 84,1
hide object 1019
rem 21st rotate cube
make object cube 85,10
texture object 85,2
position object 85,-10,-100,300
make mesh from object 1,85
add limb 85,1,1
scale limb 85,1,100,1000,0
show limb 85,1
offset limb 85,1,0,20,0
make object from limb 1020,85,1,1
position object 1020,-10,-100,300
remove limb 85,1
hide object 1020
rem 22nd rotate cube
make object cube 86,10
texture object 86,2
position object 86,90,-100,300
make mesh from object 1,86
add limb 86,1,1
scale limb 86,1,100,1000,0
show limb 86,1
offset limb 86,1,0,20,0
make object from limb 1021,86,1,1
position object 1021,90,-100,300
remove limb 86,1
hide object 1021
rem first row
for t=2 to 6
make object cube t,20
position object t,-360+(t-1)*100,100,300
make mesh from object 1,t
add limb t,1,1
scale limb t,1,100,100,100
next t
rem second row
for t=7 to 10
make object cube t,20
position object t,-310+(t-6)*100,50,300
make mesh from object 1,t
add limb t,1,1
scale limb t,1,100,100,100
next t
rem third row
for t=11 to 15
make object cube t,20
position object t,-360+(t-10)*100,0,300
make mesh from object 1,t
add limb t,1,1
scale limb t,1,100,100,100
next t
rem fourth row
for t=16 to 19
make object cube t,20
position object t,-310+(t-15)*100,-50,300
make mesh from object 1,t
add limb t,1,1
scale limb t,1,100,100,100
next t
rem fifth row
for t=20 to 24
make object cube t,20
position object t,-360+(t-19)*100,-100,300
make mesh from object 1,t
add limb t,1,1
scale limb t,1,100,100,100
next t
rem texture cubes
texture object 2,1
texture object 3,200
for t=4 to 23
texture object t,t-1
next t
rem walls
make object box 45,445,220,0
position object 45,-60,0,311
color object 45,rgb(0,255,0)
texture object 45,100
make object box 46,624,220,0
position object 46,162,0,0
color object 46,rgb(0,255,0)
yrotate object 46,90
texture object 46,100
make object box 47,445,617,0
position object 47,-60,110,8
rotate object 47,90,0,0
color object 47,rgb(0,200,0)
texture object 47,100
make object box 50,445,617,0
position object 50,-60,-110,8
rotate object 50,90,0,0
color object 50,rgb(0,200,0)
texture object 50,100
make object box 48,445,220,0
position object 48,-60,0,-300
color object 48,rgb(0,255,0)
texture object 48,100
make object box 49,624,220,0
position object 49,-280,0,0
color object 49,rgb(0,255,0)
yrotate object 49,90
texture object 49,100
gosub MainSection
MainSection:
`there is more code It's just  I am currently only working with this

+ Code Snippet

REM *** START SYSTEM SETUP SECTION

autocam on
sync off
REM *** STOP SYSTEM SETUP SECTION
REM *****************************************
rem main menu
sync on
sync rate 30
do
cls
ink rgb(255,255,255),0
text 0,100,"NEW GAME"
text 0,130,"LOAD"
text 0,160,"OPTIONS"
text 0,190,"QUIT"

`NEW GAME
if mousex() > 0 and mousex() < 100 and mousey() > 100 and mousey() < 120 then ink rgb(0,0,100),0 : text 0,100,"NEW GAME"
if mousex() > 0 and mousex() < 100 and mousey() > 100 and mousey() < 120 and mouseclick()=1 then gosub loadall

`LOAD
if mousex() > 0 and mousex() < 100 and mousey() > 130 and mousey() < 150 then ink rgb(0,0,100),0 : text 0,130,"LOAD"
if mousex() > 0 and mousex() < 100 and mousey() > 130 and mousey() < 150 and mouseclick()=1 then text 100,120,"YOU CLICKED LOAD"

`OPTIONS
if mousex() > 0 and mousex() < 100 and mousey() > 160 and mousey() < 180 then ink rgb(0,0,100),0 : text 0,160,"OPTIONS"
if mousex() > 0 and mousex() < 100 and mousey() > 160 and mousey() < 180 and mouseclick()=1 then text 100,120,"YOU CLICKED OPTIONS"

`QUIT
if mousex() > 0 and mousex() < 100 and mousey() > 190 and mousey() < 210 then ink rgb(0,0,100),0 : text 0,190,"QUIT"
if mousex() > 0 and mousex() < 100 and mousey() > 190 and mousey() < 210 and mouseclick()=1 then end
sync
loop
load image "E:\new edutainment project\images\arrow key.bmp",2
load image "E:\new edutainment project\images\NUMBERS\1.bmp",1
load image "E:\new edutainment project\images\NUMBERS\2.bmp",200
load image "E:\new edutainment project\images\NUMBERS\3.bmp",3
load image "E:\new edutainment project\images\NUMBERS\4.bmp",4
load image "E:\new edutainment project\images\NUMBERS\5.bmp",5
load image "E:\new edutainment project\images\NUMBERS\6.bmp",6
load image "E:\new edutainment project\images\NUMBERS\7.bmp",7
load image "E:\new edutainment project\images\NUMBERS\8.bmp",8
load image "E:\new edutainment project\images\NUMBERS\9.bmp",9
load image "E:\new edutainment project\images\NUMBERS\10.bmp",10
load image "E:\new edutainment project\images\NUMBERS\11.bmp",11
load image "E:\new edutainment project\images\NUMBERS\12.bmp",12
load image "E:\new edutainment project\images\NUMBERS\13.bmp",13
load image "E:\new edutainment project\images\NUMBERS\14.bmp",14
load image "E:\new edutainment project\images\NUMBERS\15.bmp",15
load image "E:\new edutainment project\images\NUMBERS\16.bmp",16
load image "E:\new edutainment project\images\NUMBERS\17.bmp",17
load image "E:\new edutainment project\images\NUMBERS\18.bmp",18
load image "E:\new edutainment project\images\NUMBERS\19.bmp",19
load image "E:\new edutainment project\images\NUMBERS\20.bmp",20
load image "E:\new edutainment project\images\NUMBERS\20.bmp",20
load image "E:\new edutainment project\images\NUMBERS\21.bmp",21
load image "E:\new edutainment project\images\NUMBERS\22.bmp",22
load image "E:\new edutainment project\images\NUMBERS\23.bmp",23
load image "E:\new edutainment project\images\FP Brighter.bmp",100
loadall:
rem 1st rotate cube
make object cube 65,10
texture object 65,2
position object 65,-210,100,300
make mesh from object 1,65
add limb 65,1,1
scale limb 65,1,100,1000,0
show limb 65,1
offset limb 65,1,0,20,0
make object from limb 1000,65,1,1
position object 1000,-210,100,300
remove limb 65,1
hide object 1000
rem 2nd rotate cube
make object cube 66,10
texture object 66,2
position object 66,-110,100,300
make mesh from object 1,66
add limb 66,1,1
scale limb 66,1,100,1000,0
show limb 66,1
offset limb 66,1,0,20,0
make object from limb 1001,66,1,1
position object 1001,-110,100,300
remove limb 66,1
hide object 1001
rem 3rd rotate cube
make object cube 67,10
texture object 67,2
position object 67,-10,100,300
make mesh from object 1,67
add limb 67,1,1
scale limb 67,1,100,1000,0
show limb 67,1
offset limb 67,1,0,20,0
make object from limb 1002,67,1,1
position object 1002,-10,100,300
remove limb 67,1
hide object 1002
rem 4th rotate cube
make object cube 68,10
texture object 68,2
position object 68,90,100,300
make mesh from object 1,68
add limb 68,1,1
scale limb 68,1,100,1000,0
show limb 68,1
offset limb 68,1,0,20,0
make object from limb 1003,68,1,1
position object 1003,90,100,300
remove limb 68,1
hide object 1003
rem 5th rotate cube
make object cube 69,10
texture object 69,2
position object 69,-260,50,300
make mesh from object 1,69
add limb 69,1,1
scale limb 69,1,100,1000,0
show limb 69,1
offset limb 69,1,0,20,0
make object from limb 1004,69,1,1
position object 1004,-260,50,300
remove limb 69,1
hide object 1004
rem 6th rotate cube
make object cube 70,10
texture object 70,2
position object 70,-160,50,300
make mesh from object 1,70
add limb 70,1,1
scale limb 70,1,100,1000,0
show limb 70,1
offset limb 70,1,0,20,0
make object from limb 1005,70,1,1
position object 1005,-160,50,300
remove limb 70,1
hide object 1005
rem 7th rotate cube
make object cube 71,10
texture object 71,2
position object 71,-60,50,300
make mesh from object 1,71
add limb 71,1,1
scale limb 71,1,100,1000,0
show limb 71,1
offset limb 71,1,0,20,0
make object from limb 1006,71,1,1
position object 1006,-60,50,300
remove limb 71,1
hide object 1006
rem 8th rotate cube
make object cube 72,10
texture object 72,2
position object 72,40,50,300
make mesh from object 1,72
add limb 72,1,1
scale limb 72,1,100,1000,0
show limb 72,1
offset limb 72,1,0,20,0
make object from limb 1007,72,1,1
position object 1007,40,50,300
remove limb 72,1
hide object 1007
rem 9th rotate cube
make object cube 73,10
texture object 73,2
position object 73,140,50,300
make mesh from object 1,73
add limb 73,1,1
scale limb 73,1,100,1000,0
show limb 73,1
offset limb 73,1,0,20,0
make object from limb 1008,73,1,1
position object 1008,140,50,300
remove limb 73,1
hide object 1008
rem 10th rotate cube
make object cube 74,10
texture object 74,2
position object 74,-210,0,300
make mesh from object 1,74
add limb 74,1,1
scale limb 74,1,100,1000,0
show limb 74,1
offset limb 74,1,0,20,0
make object from limb 1009,74,1,1
position object 1009,-210,0,300
remove limb 74,1
hide object 1009
rem 11th rotate cube
make object cube 75,10
texture object 75,2
position object 75,-110,0,300
make mesh from object 1,75
add limb 75,1,1
scale limb 75,1,100,1000,0
show limb 75,1
offset limb 75,1,0,20,0
make object from limb 1010,75,1,1
position object 1010,-110,0,300
remove limb 75,1
hide object 1010
rem 12th rotate cube
make object cube 76,10
texture object 76,2
position object 76,-10,0,300
make mesh from object 1,76
add limb 76,1,1
scale limb 76,1,100,1000,0
show limb 76,1
offset limb 76,1,0,20,0
make object from limb 1011,76,1,1
position object 1011,-10,0,300
remove limb 76,1
hide object 1011
rem 13th rotate cube
make object cube 77,10
texture object 77,2
position object 77,90,0,300
make mesh from object 1,77
add limb 77,1,1
scale limb 77,1,100,1000,0
show limb 77,1
offset limb 77,1,0,20,0
make object from limb 1012,77,1,1
position object 1012,90,0,300
remove limb 77,1
hide object 1012
rem 14th rotate cube
make object cube 78,10
texture object 78,2
position object 78,-260,-50,300
make mesh from object 1,78
add limb 78,1,1
scale limb 78,1,100,1000,0
show limb 78,1
offset limb 78,1,0,20,0
make object from limb 1013,78,1,1
position object 1013,-260,-50,300
remove limb 78,1
hide object 1013
rem 15th rotate cube
make object cube 79,10
texture object 79,2
position object 79,-160,-50,300
make mesh from object 1,79
add limb 79,1,1
scale limb 79,1,100,1000,0
show limb 79,1
offset limb 79,1,0,20,0
make object from limb 1014,79,1,1
position object 1014,-160,-50,300
remove limb 79,1
hide object 1014
rem 16th rotate cube
make object cube 80,10
texture object 80,2
position object 80,-60,-50,300
make mesh from object 1,80
add limb 80,1,1
scale limb 80,1,100,1000,0
show limb 80,1
offset limb 80,1,0,20,0
make object from limb 1015,80,1,1
position object 1015,-60,-50,300
remove limb 80,1
hide object 1015
rem 17th rotate cube
make object cube 81,10
texture object 81,2
position object 81,40,-50,300
make mesh from object 1,81
add limb 81,1,1
scale limb 81,1,100,1000,0
show limb 81,1
offset limb 81,1,0,20,0
make object from limb 1016,81,1,1
position object 1016,40,-50,300
remove limb 81,1
hide object 1016
rem 18th rotate cube
make object cube 82,10
texture object 82,2
position object 82,140,-50,300
make mesh from object 1,82
add limb 82,1,1
scale limb 82,1,100,1000,0
show limb 82,1
offset limb 82,1,0,20,0
make object from limb 1017,82,1,1
position object 1017,140,-50,300
remove limb 82,1
hide object 1017
rem 19th rotate cube
make object cube 83,10
texture object 83,2
position object 83,-210,-100,300
make mesh from object 1,83
add limb 83,1,1
scale limb 83,1,100,1000,0
show limb 83,1
offset limb 83,1,0,20,0
make object from limb 1018,83,1,1
position object 1018,-210,-100,300
remove limb 83,1
hide object 1018
rem 20th rotate cube
make object cube 84,10
texture object 84,2
position object 84,-110,-100,300
make mesh from object 1,84
add limb 84,1,1
scale limb 84,1,100,1000,0
show limb 84,1
offset limb 84,1,0,20,0
make object from limb 1019,84,1,1
position object 1019,-110,-100,300
remove limb 84,1
hide object 1019
rem 21st rotate cube
make object cube 85,10
texture object 85,2
position object 85,-10,-100,300
make mesh from object 1,85
add limb 85,1,1
scale limb 85,1,100,1000,0
show limb 85,1
offset limb 85,1,0,20,0
make object from limb 1020,85,1,1
position object 1020,-10,-100,300
remove limb 85,1
hide object 1020
rem 22nd rotate cube
make object cube 86,10
texture object 86,2
position object 86,90,-100,300
make mesh from object 1,86
add limb 86,1,1
scale limb 86,1,100,1000,0
show limb 86,1
offset limb 86,1,0,20,0
make object from limb 1021,86,1,1
position object 1021,90,-100,300
remove limb 86,1
hide object 1021
rem first row
for t=2 to 6
make object cube t,20
position object t,-360+(t-1)*100,100,300
make mesh from object 1,t
add limb t,1,1
scale limb t,1,100,100,100
next t
rem second row
for t=7 to 10
make object cube t,20
position object t,-310+(t-6)*100,50,300
make mesh from object 1,t
add limb t,1,1
scale limb t,1,100,100,100
next t
rem third row
for t=11 to 15
make object cube t,20
position object t,-360+(t-10)*100,0,300
make mesh from object 1,t
add limb t,1,1
scale limb t,1,100,100,100
next t
rem fourth row
for t=16 to 19
make object cube t,20
position object t,-310+(t-15)*100,-50,300
make mesh from object 1,t
add limb t,1,1
scale limb t,1,100,100,100
next t
rem fifth row
for t=20 to 24
make object cube t,20
position object t,-360+(t-19)*100,-100,300
make mesh from object 1,t
add limb t,1,1
scale limb t,1,100,100,100
next t
rem texture cubes
texture object 2,1
texture object 3,200
for t=4 to 23
texture object t,t-1
next t
rem walls
make object box 45,445,220,0
position object 45,-60,0,311
color object 45,rgb(0,255,0)
texture object 45,100
make object box 46,624,220,0
position object 46,162,0,0
color object 46,rgb(0,255,0)
yrotate object 46,90
texture object 46,100
make object box 47,445,617,0
position object 47,-60,110,8
rotate object 47,90,0,0
color object 47,rgb(0,200,0)
texture object 47,100
make object box 50,445,617,0
position object 50,-60,-110,8
rotate object 50,90,0,0
color object 50,rgb(0,200,0)
texture object 50,100
make object box 48,445,220,0
position object 48,-60,0,-300
color object 48,rgb(0,255,0)
texture object 48,100
make object box 49,624,220,0
position object 49,-280,0,0
color object 49,rgb(0,255,0)
yrotate object 49,90
texture object 49,100
gosub MainSection
MainSection:
`there is more code It's just  I am currently only working with this

. I am trying to make a main menu for my game and I think I have it pretty figured out. Although, whenever I click on the "new game" option the button just turns blue and stays like that. It doesn't do what I need it to do and I am asking for some help. (Also, if anyone says something like "well, without your image files, we cannot do anything with it" that is not the point. I just need it to go from the main menu then load all of the objects, and then go to the mainsection) thanks for all the help!

Back to top

Profile PM

Derek Darkly

14

Years of Service

User Offline

Joined: 22nd Sep 2011

Location: Whats Our Vector, Victor?

Posted: 21st Feb 2014 18:47 Edited at: 21st Feb 2014 18:51

Link

Quote: ""well, without your image files, we cannot do anything with it" that is not the point."

But there is a point to it:
It's much easier to help you if we can run the code, rather than just read it.

You, yourself, could submit a medialess version with a small bit of effort, or supply a zip/rar file with images.
Not much to ask for getting free help in return.

Back to top

Profile PM

Phaelax

DBPro Master

23

Years of Service

User Offline

Joined: 16th Apr 2003

Location: Metropia

Posted: 21st Feb 2014 20:03

Link

I'm currently answering your question in your other thread.

http://zimnox.com

Back to top

Profile PM Email Website

Dark Basic Pro Enthusiast

12

Years of Service

User Offline

Joined: 8th Nov 2013

Location:

Posted: 24th Feb 2014 16:57

Link

I made a new post awhile ago, sorry about the confusion

Back to top

Profile PM

tiffer

20

Years of Service

User Offline

Joined: 6th Apr 2006

Location: Scotland

Posted: 6th Mar 2014 20:52 Edited at: 6th Mar 2014 20:57

Link

To be honest I can see a number of problems here. this needs alot of work.

I'll get back to you when I have more time.

FYI don't gosub in the middle of a subroutine. If you start jumping from subroutine to subroutine you're basically doing what's known as spaghetti code.

Cwatson

Back to top

Profile PM

Sorry your browser is not supported!

DarkBASIC Professional Discussion / Making a main menu