6 lines
75 B
Text
6 lines
75 B
Text
|
Filename:S-DICE
|
||
|
|
Lbl 2
|
||
|
|
Int (Ran#*A)+1->U
|
||
|
|
If U<B
|
||
|
|
Then Goto 2
|
||
|
|
Else Return
|