MENU: INPUT "TIME:";TIME TIMESRT: DO CLS PRINT TIME TIME = TIME - 1 IF TIME<0 THEN GOTO DONE WAIT 60 LOOP DONE: CLS DO PLAY 0,50,20 WAIT 35 PLAY 0,50,20 WAIT 35 LOOP