- M=1000:T=0
- Lbl 1
- T=T+1
- Lbl 0
- {B}
- M:"YOU HAVE":Pause 2
- B:"BET"
- B=Int B
- B>M
Goto 0:
B<1
Goto 0![[eoi]](../funcMark_eoi.gif)
![[eoi]](../funcMark_eoi.gif)
- Lbl 2
- {Y}
- Y"WHICH(1-6)"
- Y=Int Y
- Y<1
Goto ":
Y>6
Goto 2![[eoi]](../funcMark_eoi.gif)
![[eoi]](../funcMark_eoi.gif)
- S=Int(Ran#×6+1)
- Y
S
M=M-B:S:"LOSE・・・":Pause 3:
M=M+B×5:S:"WIN!":Pause 3![[eoi]](../funcMark_eoi.gif)
- M>0
Goto 1![[eoi]](../funcMark_eoi.gif)
- Lbl 2
- T:"GAME OVER"