(@@InPutString @@InPutInteger)
[@main]
#IF
#ACT
CloseBigDialogBox
#SAY
<装备太多没中央存，高级装备不想出售，不如来赌一把！/SCOLOR=250>

<规则阐明/SCOLOR=249>：<包裹内必须有你想赌的装备/SCOLOR=254>
　　　　　点击末尾赌博后输入物品称号
　　　　　根底赌博几率<50%/SCOLOR=254>，获得<两/SCOLOR=253>件同等的装备(收费<1000/SCOLOR=243>元宝)
　　　　　高级赌博几率<30%/SCOLOR=254>，获得<三/SCOLOR=253>件同等的装备(收费<3000/SCOLOR=243>元宝)

◆<◇/SCOLOR=242>◆<根底赌博/@@InPutString51>◆<◇/SCOLOR=242>◆          ◆<◇/SCOLOR=242>◆<高级赌博/@@InPutString52>◆<◇/SCOLOR=242>◆

[@CallInPutString51]
#IF
CheckTextList .QuestDiary数据文件不容许赌博.txt <$STR(S51)>
#Act
MESSAGEBOX 该物品不容许用来赌博，换其余的物品吧！
BREAK
#IF
RANDOM 4
CHECKGAMEGOLD > 999
checkitem <$STR(S51)> 1
#act
GAMEGOLD - 1000
take <$STR(S51)> 1
give <$STR(S51)> 2
sendmsg 7 运气太好了，祝贺你获得了一件：[<$STR(S51)>]
GuildNoticeMsg 249 251 玩家(%s)在“热情赌装备”那里加入物品搏一搏流动，获得了一件：[<$STR(S51)>]
goto @main
BREAK
#IF
CHECKGAMEGOLD > 999
checkitem <$STR(S51)> 1
#act
GAMEGOLD - 1000
take <$STR(S51)> 1
sendmsg 5 你的运气不太好，就当你为国贡献了！
goto @main
BREAK
#ELSEACT
sendmsg 5 操作失败：能够你输入的字符不符合物品称号，或许你的元宝无余1000个！

[@CallInPutString52]
#IF
CheckTextList .QuestDiary数据文件不容许赌博.txt <$STR(S52)>
#Act
MESSAGEBOX 该物品不容许用来赌博，换其余的物品吧！
BREAK
#IF
RANDOM 6
CHECKGAMEGOLD > 2999
checkitem <$STR(S52)> 1
#act
GAMEGOLD - 3000
take <$STR(S52)> 1
give <$STR(S52)> 3
sendmsg 7 运气太好了，祝贺你获得了两件：[<$STR(S52)>]
GuildNoticeMsg 249 251 玩家(%s)在“热情赌装备”那里加入物品搏一搏流动，获得了两件：[<$STR(S52)>]
goto @main
BREAK
#IF
CHECKGAMEGOLD > 2999
checkitem <$STR(S52)> 1
#act
GAMEGOLD - 3000
take <$STR(S52)> 1
sendmsg 5 你的运气不太好，就当你为国贡献了！
goto @main
BREAK
#ELSEACT
sendmsg 5 操作失败：能够你输入的字符不符合物品称号，或许你的元宝无余3000个！