[@末尾转转21]
#if
equal M20 0
#act
mov s90 <〇/FCOLOR=254>
mov s91 <
inc s91 ●
inc s91 /FCOLOR=253
inc s91 >
goto @转转
goto @转转终了21
#ELSEACT
mov s90 <〇/FCOLOR=254>
mov s91 <
inc s91 ●
inc s91 /FCOLOR=253
inc s91 >
DEC M20 1
DelayCall 1 @末尾转转22
goto @转转

[@末尾转转22]
#if
equal M20 0
#act
mov s91 <〇/FCOLOR=254>
mov s92 <
inc s92 ●
inc s92 /FCOLOR=253
inc s92 >
goto @转转
goto @转转终了22
#ELSEACT
mov s91 <〇/FCOLOR=254>
mov s92 <
inc s92 ●
inc s92 /FCOLOR=253
inc s92 >
DEC M20 1
DelayCall 1 @末尾转转23
goto @转转

[@末尾转转23]
#if
equal M20 0
#act
mov s92 <〇/FCOLOR=254>
mov s93 <
inc s93 ●
inc s93 /FCOLOR=253
inc s93 >
goto @转转
goto @转转终了23
#ELSEACT
mov s92 <〇/FCOLOR=254>
mov s93 <
inc s93 ●
inc s93 /FCOLOR=253
inc s93 >
DEC M20 1
DelayCall 1 @末尾转转24
goto @转转

[@末尾转转24]
#if
equal M20 0
#act
mov s93 <〇/FCOLOR=254>
mov s94 <
inc s94 ●
inc s94 /FCOLOR=253
inc s94 >
goto @转转
goto @转转终了24
#ELSEACT
mov s93 <〇/FCOLOR=254>
mov s94 <
inc s94 ●
inc s94 /FCOLOR=253
inc s94 >
DEC M20 1
DelayCall 1 @末尾转转1
goto @转转

[@CallInPutInteger1]
#IF
EQUAL N1 0
#ACT
messagebox 请输入准确的数字！
break
#IF
large N50 999
#ACT
messagebox 最多只能下注1000元宝!!!!
break

#IF
CHECKGAMEGOLD > <$STR(N1)>
#ACT
  GAMEGOLD - <$STR(N1)>
  INC N50 <$STR(N1)>
  inc G21 <$STR(N1)>
CALCVAR HUMAN SGJ + <$STR(N1)>
SAVEVAR HUMAN SGJ ..QuestDiary数据文件SGJSave.txt
GOTO @转转下注
#ELSEACT
messagebox 你没有那么多元宝!!!!

[@CallInPutInteger2]
#IF
EQUAL N2 0
#ACT
messagebox 请输入准确的数字！
break
#IF
large N51 999
#ACT
messagebox 最多只能下注1000元宝!!!!
break

#IF
CHECKGAMEGOLD > <$STR(N2)>
#ACT
  GAMEGOLD - <$STR(N2)>
  INC N51 <$STR(N2)>
  inc G21 <$STR(N2)>
CALCVAR HUMAN SGJ + <$STR(N2)>
SAVEVAR HUMAN SGJ ..QuestDiary数据文件SGJSave.txt
GOTO @转转下注
#ELSEACT
messagebox 你没有那么多元宝!!!!

[@CallInPutInteger3]
#IF
EQUAL N3 0
#ACT
messagebox 请输入准确的数字！
break
#IF
large N52 999
#ACT
messagebox 最多只能下注1000元宝!!!!
break

#IF
CHECKGAMEGOLD > <$STR(N3)>
#ACT
  GAMEGOLD - <$STR(N3)>
  INC N52 <$STR(N3)>
  inc G21 <$STR(N3)>
CALCVAR HUMAN SGJ + <$STR(N3)>
SAVEVAR HUMAN SGJ ..QuestDiary数据文件SGJSave.txt
GOTO @转转下注
#ELSEACT
messagebox 你没有那么多元宝!!!!

[@CallInPutInteger4]
#IF
EQUAL N4 0
#ACT
messagebox 请输入准确的数字！
break
#IF
large N53 999
#ACT
messagebox 最多只能下注1000元宝!!!!
break

#IF
CHECKGAMEGOLD > <$STR(N4)>
#ACT
  GAMEGOLD - <$STR(N4)>
  INC N53 <$STR(N4)>
  inc G21 <$STR(N4)>
CALCVAR HUMAN SGJ + <$STR(N4)>
SAVEVAR HUMAN SGJ ..QuestDiary数据文件SGJSave.txt
GOTO @转转下注
#ELSEACT
messagebox 你没有那么多元宝!!!!

[@CallInPutInteger5]
#IF
EQUAL N5 0
#ACT
messagebox 请输入准确的数字！
break
#IF
large N54 999
#ACT
messagebox 最多只能下注1000元宝!!!!
break

#IF
CHECKGAMEGOLD > <$STR(N5)>
#ACT
  GAMEGOLD - <$STR(N5)>
  INC N54 <$STR(N5)>
  inc G21 <$STR(N5)>
CALCVAR HUMAN SGJ + <$STR(N5)>
SAVEVAR HUMAN SGJ ..QuestDiary数据文件SGJSave.txt
GOTO @转转下注
#ELSEACT
messagebox 你没有那么多元宝!!!!

[@CallInPutInteger6]
#IF
EQUAL N6 0
#ACT
messagebox 请输入准确的数字！
break
#IF
large N55 999
#ACT
messagebox 最多只能下注1000元宝!!!!
break