私服版本里骰子大赛奖励装备脚本

[@main]
#if
#Act
openBigDialogBox
#SAY
<〓〓〓〓〓〓〓〓〓〓◆欢迎光临散人骰子大赛系统◆〓〓〓〓〓〓〓〓〓〓/AUTOCOLOR=94>\
<欢迎你来到参加骰子大赛抽奖，100%中奖。每次仅需3000元宝，并且每次/AUTOCOLOR=254>\
<玩家所消耗3000元宝的20%都将存入奖金池~如果你的运气足够好，投掷/AUTOCOLOR=254>\
<出超级骰子①②③就可以获得奖金池所有奖金/AUTOCOLOR=254>\
<-------------------------------------------------------------------/AUTOCOLOR=255>\
　　　　　　<当前奖金池奖金>：{<$STR(G99)>元宝/SCOLOR=250}　　　　　　　　　　<刷新奖金池/@main>\
<-------------------------------------------------------------------/AUTOCOLOR=255>\
<超级奖 三个色子依次/AUTOCOLOR=253>  <①②③/AUTOCOLOR=239>  <奖励:/AUTOCOLOR=213> {<$STR(G99)> 元宝/SCOLOR=213}\
<一等奖 三个色子依次/AUTOCOLOR=253>  <①①①/AUTOCOLOR=239>  <奖励:/AUTOCOLOR=213> <紫水晶①号/AUTOCOLOR=213>\
<二等奖 三个色子依次/AUTOCOLOR=253>  <②②②/AUTOCOLOR=239>  <奖励:/AUTOCOLOR=213> <轩辕复活戒/AUTOCOLOR=213>\
<三等奖 三个色子依次/AUTOCOLOR=253>  <③③③/AUTOCOLOR=239>  <奖励:/AUTOCOLOR=213> <轩辕麻痹戒/AUTOCOLOR=213>\
<四等奖 三个色子依次/AUTOCOLOR=253>  <④④④/AUTOCOLOR=239>  <奖励:/AUTOCOLOR=213> <风云套装/AUTOCOLOR=213>\
<五等奖 三个色子依次/AUTOCOLOR=253>  <⑤⑤⑤/AUTOCOLOR=239>  <奖励:/AUTOCOLOR=213> <风云复活戒/AUTOCOLOR=213>\
<六等奖 三个色子依次/AUTOCOLOR=253>  <⑥⑥⑥/AUTOCOLOR=239>  <奖励:/AUTOCOLOR=213> <黑水晶⑤号/AUTOCOLOR=213>\
<七等奖 三个色子依次/AUTOCOLOR=253>  <②③④/AUTOCOLOR=239>  <奖励:/AUTOCOLOR=213> <轩辕面巾/AUTOCOLOR=213>\
<八等奖 三个色子依次/AUTOCOLOR=253>  <④⑤⑥/AUTOCOLOR=239>  <奖励:/AUTOCOLOR=213> <轩辕盾牌/AUTOCOLOR=213>\
<九等奖 三个色子依次/AUTOCOLOR=253>  <随机点/AUTOCOLOR=239>  <奖励:/AUTOCOLOR=213> <随机100万-3000万经验/AUTOCOLOR=213>\
<-------------------------------------------------------------------/AUTOCOLOR=255>\
<每次消耗3000元宝即可摇奖→/AUTOCOLOR=253> 【<开始摇骰子/@摇骰子>】


[@摇骰子]
#IF
CHECKGAMEGOLD > 2999
#act
GAMEGOLD - 3000
inc G98 3000
GOTO @检测
break
#ElseAct
MESSAGEBOX 你的元宝没有3000个，无法扔骰子！
break


[@检测]
#IF
#act
MOVR N27 1 7
MOVR N28 1 7
MOVR N29 1 7
MOV D0 <$STR(N27)>
MOV D1 <$STR(N28)>
MOV D2 <$STR(N29)>
playdice 3 @cube
break


[@cube]
#IF
equal D0 1
equal D1 2
equal D2 3
#ACT
GAMEGOLD + <$STR(G99)>
MOV D0 0
mov D1 0
mov D2 0
SENDMSG 0 恭喜[%s].在骰子大赛中获得【超级奖】元宝<$STR(G99)>         123！！！
SENDMSG 0 恭喜[%s].在骰子大赛中获得【超级奖】元宝<$STR(G99)>！！！
GOTO @main
break


#IF
equal D0 1
equal D1 1
equal D2 1
#ACT
give 紫水晶①号 1
MOV D0 0
mov D1 0
mov D2 0
SENDMSG 0 恭喜[%s].获得一等奖紫水晶①号！！！
GOTO @main
break

#IF
equal D0 2
equal D1 2
equal D2 2
#ACT
give 轩辕复活戒 1
MOV D0 0
mov D1 0
mov D2 0
SENDMSG 0 恭喜[%s].获得二等奖轩辕复活戒！！！
GOTO @main
break

#IF
equal D0 3
equal D1 3
equal D2 3
#ACT
give 轩辕麻痹戒 1
MOV D0 0
mov D1 0
mov D2 0
SENDMSG 0 恭喜[%s].获得三等奖轩辕复活戒！！！
GOTO @main
break

#IF
equal D0 4
equal D1 4
equal D2 4
#ACT
give 风云神剑 1
give 风云神甲 1
give 风云神袍 1
give 风云头盔 1
give 风云勋章 1
give 风云项链 1
give 风云手镯 2
give 风云戒指 2
give 风云腰带 1
give 风云靴子 1
give 风云宝石 1
MOV D0 0
mov D1 0
mov D2 0
SENDMSG 0 恭喜[%s].获得四等奖风云套装！！！
GOTO @main
break

#IF
equal D0 5
equal D1 5
equal D2 5
#ACT
give 风云复活戒 1
MOV D0 0
mov D1 0
mov D2 0
SENDMSG 0 恭喜[%s].获得五等奖风云复活戒！！！！
GOTO @main
break

#IF
equal D0 6
equal D1 6
equal D2 6
#ACT
give 黑水晶⑤号 1
MOV D0 0
mov D1 0
mov D2 0
SENDMSG 0 恭喜[%s].获得六等奖黑水晶⑤号！！！！
GOTO @main
break

#IF
equal D0 2
equal D1 3
equal D2 4
#ACT
give 轩辕面巾 1
MOV D0 0
mov D1 0
mov D2 0
SENDMSG 0 恭喜[%s].获得七等奖轩辕面巾！！！！
GOTO @main
break

#IF
equal D0 4
equal D1 5
equal D2 6
#ACT
give 轩辕盾牌 1
MOV D0 0
mov D1 0
mov D2 0
SENDMSG 0 恭喜[%s].获得八等奖轩辕盾牌！！！！
GOTO @main
break


#elseact
MOV D0 0
mov D1 0
mov D2 0
movr d7 1000000 30000000
CHANGEEXP + <$STR(d7)>
SENDMSG 0 恭喜[%s].在随即猜点中获得<$STR(d7)>经验！！！
GOTO @main
break