Games

10 clr
20 d1=int(rnd(0)*6+1)
30 d2=int(rnd(0)*6+1)
40 print "die 1="d1;"die 2="d2
50 if d1+d2=7 or d1+d2=11 then goto 80
60 print "too bad!"
70 goto 90
80 print "you won!"
90 input "want to play agian (y/n)";i$
100 if left$(i$,1)<>"y"then end
110 goto 10