TOUCHSCREEN RANDOMIZE TIMER MONEY=50 DO CLS PRINT "MONEY = "+STR$(MONEY) PRINT D1=RND(5)+1 D2=RND(5)+1 DSUM=D1+D2 PRINT STR$(D1)+" "+STR$(D2)+" = "+STR$(DSUM) PRINT IF DSUM=7 THEN MONEY=MONEY+10 PRINT "WIN 10" ELSE IF D1=D2 THEN MONEY=MONEY+25 PRINT "WIN 25" ELSE MONEY=MONEY-1 PRINT "LOSE 1" END IF PLAY 0,50,1 WAIT 60 PRINT PRINT "TAP TO ROLL" PRINT WHILE NOT TOUCH WAIT VBL WEND WAIT 5 LOOP