传奇3K引擎最新激情赌装备脚本

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

<规则说明/SCOLOR=249>：<包裹内必须有你想赌的装备/SCOLOR=254>
　　　　　点击开始赌博后输入物品名称
　　　　　基础赌博几率<50%/SCOLOR=254>，获得<两/SCOLOR=253>件同等的装备(收费<100/SCOLOR=243>元宝)
　　　　　高级赌博几率<30%/SCOLOR=254>，获得<三/SCOLOR=253>件同等的装备(收费<200/SCOLOR=243>元宝)

◆<◇/SCOLOR=242>◆<基础赌博/@@InPutString51>◆<◇/SCOLOR=242>◆          ◆<◇/SCOLOR=242>◆<高级赌博/@@InPutString52>◆<◇/SCOLOR=242>◆


[@CallInPutString51]
#IF
CheckTextList .QuestDiary华夏数据不允许赌博.txt <$STR(S51)>
#Act
MESSAGEBOX 该物品不允许用来赌博，换其他的物品吧！
BREAK
#IF
RANDOM 3
CHECKGAMEGOLD > 99
checkitem <$STR(S51)> 1
#act
GAMEGOLD - 100
take <$STR(S51)> 1
give <$STR(S51)> 2
sendmsg 7 运气太好了，恭喜你获得了一件：[<$STR(S51)>]
GuildNoticeMsg 249 251 玩家(%s)在“激情赌装备”那里参加物品搏一搏活动，获得了一件：[<$STR(S51)>]
goto @main
BREAK
#IF
CHECKGAMEGOLD > 99
checkitem <$STR(S51)> 1
#act
GAMEGOLD - 100
take <$STR(S51)> 1
sendmsg 5 你的运气不太好，就当你为国贡献了！
goto @main
BREAK
#ELSEACT
sendmsg 5 操作失败：可能你输入的字符不符合物品名称，或者你的元宝不足100个！


[@CallInPutString52]
#IF
CheckTextList .QuestDiary华夏数据不允许赌博.txt <$STR(S52)>
#Act
MESSAGEBOX 该物品不允许用来赌博，换其他的物品吧！
BREAK
#IF
RANDOM 4
CHECKGAMEGOLD > 199
checkitem <$STR(S52)> 1
#act
GAMEGOLD - 200
take <$STR(S52)> 1
give <$STR(S52)> 3
sendmsg 7 运气太好了，恭喜你获得了两件：[<$STR(S52)>]
GuildNoticeMsg 249 251 玩家(%s)在“激情赌装备”那里参加物品搏一搏活动，获得了两件：[<$STR(S52)>]
goto @main
BREAK
#IF
CHECKGAMEGOLD > 199
checkitem <$STR(S52)> 1
#act
GAMEGOLD - 200
take <$STR(S52)> 1
sendmsg 5 你的运气不太好，就当你为国贡献了！
goto @main
BREAK
#ELSEACT
sendmsg 5 操作失败：可能你输入的字符不符合物品名称，或者你的元宝不足200个！