;;Ҫɾ

;----------------------------

[@main]
;#IF
;!IsAdmin
;#SAY
;Go Away!
;#ELSE
#ACT

SaveValue "QuestDiary\Gamble.txt" [GambleRoom] %USERNAME 0
GoTo @GambleRoom

;----------------------------

[@GambleRoom]
#ACT
Loadvalue A0 "QuestDiary\Gamble.txt" [GambleRoom] %USERNAME
#SAY
Current Room: <$OUTPUT(A0)>\\
<Roll/@RollDice>

;----------------------------

[@RollDice]
#ACT
Mov P9 1
Movr D0 6
Inc D0 1
PlayDice 1 @RollDice1
#SAY
{FCOLOR/10}Please Wait...{FCOLOR/12}\

;----------------------------

[@RollDice1]
#SAY
You rolled a: {FCOLOR/10}<$OUTPUT(D0)>{FCOLOR/12}\\
Do you wish to continue to the next room?\\
<Move To Next Room/@RollDice2>\
<Leave/@Exit>

;----------------------------

[@RollDice2]
#ACT
Mov D2 %A0
Mov D3 %D0
INC D2 %D3
SaveValue "QuestDiary\Gamble.txt" [GambleRoom] %USERNAME %D2
GoTo @GambleRoom

;----------------------------

;;Ҫɾ