10    RANDOMIZE TIMER
15    CLS
20    x% = INT(RND * 6) + 1
30    y% = INT(RND * 6) + 1
40    PRINT "Roll of two dice: die 1 ="; x%; "and die 2 ="; y%
45    PRINT "Again?"
50    INPUT r$
60    IF r$ = "N" THEN GOTO 70
70    IF r$ = "y" THEN GOTO 10
80    END