git @ Cat's Eye Technologies hatoucan / master eg / dice.bas
master

Tree @master (Download .tar.gz)

dice.bas @masterraw · history · blame

1
2
3
4
5
100 r=int(rnd(1)*6)+1:w=int(rnd(1)*6)+1
110 print "red die:";R
120 print "white die:";W
130 print
140 get a$:goto 100