main menu by Slayer933rd Dec 2004 16:22
|
---|
Summary I made a main menu that is short i got the idea from the guy who made the call of duty style main menu Description I made a main menu that is short i got the idea from the guy who made the call of duty style main menu but shorter Code ` This code was downloaded from The Game Creators ` It is reproduced here with full permission ` http://www.thegamecreators.com 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 text 100,120,"YOU CLICKED NEW GAME" `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 |