主站域名:[找服服]-www.zhaoff.com 公告:致力于打造传奇精确大数据,每分钟自动较对数据,确保数据精确度! 同步域名:9PK.la

  • 印象分:
    0
  • 印象帖:
    0
  • 个性签名:
  • 个人标签:
GOM引擎龙族宝藏幸运夺宝脚本
GOM引擎龙族宝藏幸运夺宝脚本
脚本类型: 转载脚本
脚本性质: 注册会员
相关说明: 暂无说明
脚本大小: 15.7MB
所需元宝: 0
脚本评分:
应用平台:win2003 WinXP Win7 无限制,win2003以上通用 
小喇叭:游戏架设可点击右侧QQ图标进群交流!
文件名: GOM引擎龙族宝藏幸运夺宝脚本 
下载权限: 注册会员    [购买VIP]  
已经通过360杀毒、腾讯管家安全检测无毒,请放心下载!
服务端

详情简介


[@main]
#IF
CHECK [0] 0
#ACT
;;;;;;;;;;;;;;;;;;;;↓物品总抽的次数
MOV N$物品总次数 3888

;;;;;;;;;;;;;;;;;;;;↓每次抽消耗的荣誉点
MOV N$夺宝消耗值 1

;;;;;;;;;;;;;;;;;;;;↓安慰奖给的元宝数量
MOV N$安慰奖值 10000

;;;;;;;;;;;;;;;;;;;;↓1-16个物品对应总数量
MOV N$物品1总数 20
MOV N$物品2总数 20
MOV N$物品3总数 5
MOV N$物品4总数 20
MOV N$物品5总数 20
MOV N$物品6总数 5
MOV N$物品7总数 15
MOV N$物品8总数 15
MOV N$物品9总数 10
MOV N$物品10总数 2
MOV N$物品11总数 2
MOV N$物品12总数 1
MOV N$物品13总数 3
MOV N$物品14总数 2
MOV N$物品15总数 1
MOV N$物品16总数 2

;;;;;;;;;;;;;;;;;;;;↓这里是机率计算机制,写100就是 百分机率 1000就是千分机率 自行根据实际情况修改
;;;;;;;;;;;;;;;;;;;;↓比如这里写1000 下面物品机率40 那么实际机率就是 40/1000*100 =4% 机率
;;;;;;;;;;;;;;;;;;;;↓比如这里写10000 下面物品机率40 那么实际机率就是 40/10000*100=0.4%机率
MOV N$机率机制 3088

;;;;;;;;;;;;;;;;;;;;↓1-16个物品对应机率
MOV N$物品1机率 100
MOV N$物品2机率 30
MOV N$物品3机率 20
MOV N$物品4机率 12
MOV N$物品5机率 12
MOV N$物品6机率 8
MOV N$物品7机率 8
MOV N$物品8机率 4
MOV N$物品9机率 7
MOV N$物品10机率 5
MOV N$物品11机率 5
MOV N$物品12机率 2
MOV N$物品13机率 3
MOV N$物品14机率 3
MOV N$物品15机率 1
MOV N$物品16机率 2

;;;;;;;;;;;;;;;;;;;;↓1-16个物品对应DB数据库的IDX编号
MOV N$物品DB编号1 687
MOV N$物品DB编号2 688
MOV N$物品DB编号3 689
MOV N$物品DB编号4 709
MOV N$物品DB编号5 710
MOV N$物品DB编号6 711
MOV N$物品DB编号7 723
MOV N$物品DB编号8 724
MOV N$物品DB编号9 940
MOV N$物品DB编号10 354
MOV N$物品DB编号11 355
MOV N$物品DB编号12 931
MOV N$物品DB编号13 932
MOV N$物品DB编号14 786
MOV N$物品DB编号15 1000
MOV N$物品DB编号16 1001

;;;;;;;;;;;;;;;;;;;;;;;;↓1-16个物品对应物品实际名称
MOV S$物品实际名称1 20000元宝
MOV S$物品实际名称2 50000元宝
MOV S$物品实际名称3 100000元宝
MOV S$物品实际名称4 1000幻辰币
MOV S$物品实际名称5 5000幻辰币
MOV S$物品实际名称6 10000幻辰币
MOV S$物品实际名称7 200金钻
MOV S$物品实际名称8 500金钻
MOV S$物品实际名称9 一坨狗粮
MOV S$物品实际名称10 誰主沉浮「無敵」剑1.4倍
MOV S$物品实际名称11 誰主沉浮「無敵」甲1.4倍
MOV S$物品实际名称12 幻辰神界
MOV S$物品实际名称13 幻辰魔界
MOV S$物品实际名称14 魔法盾
MOV S$物品实际名称15 5元充值点
MOV S$物品实际名称16 10元充值点

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;↓设置16个无占用的G变量(0-499)
#DEFINE $(记录总数变量) G400
#DEFINE $(记录余数变量1) G401
#DEFINE $(记录余数变量2) G402
#DEFINE $(记录余数变量3) G403
#DEFINE $(记录余数变量4) G404
#DEFINE $(记录余数变量5) G405
#DEFINE $(记录余数变量6) G406
#DEFINE $(记录余数变量7) G407
#DEFINE $(记录余数变量8) G408
#DEFINE $(记录余数变量9) G409
#DEFINE $(记录余数变量10) G410
#DEFINE $(记录余数变量11) G411
#DEFINE $(记录余数变量12) G412
#DEFINE $(记录余数变量13) G413
#DEFINE $(记录余数变量14) G414
#DEFINE $(记录余数变量15) G415
#DEFINE $(记录余数变量16) G416

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;↓设置1个无占用的U变量(0-49)
#DEFINE $(记录个人次数) U20

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;↓两个福地地图的地图代码
#DEFINE $(夺宝福地1代码) 龙族宝地
#DEFINE $(夺宝福地2代码) 神秘宝阁

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;↓设置两个福地地图的进入条件次数
#DEFINE $(夺宝福地1次数) 200
#DEFINE $(夺宝福地2次数) 600









#IF
CHECK [0] 0
#ACT
OPENMERCHANTBIGDLG 96 0 1 4 0 -100 20 780 15
GOTO @排版数据读取
#SAY
#SAY
\ \ \
<><PlayImg:96:3:8:150:10:90:0><PlayImg:96:3:8:150:21:90:0><PlayImg:96:3:8:150:36:90:0><PlayImg:96:3:8:150:48:90:0><PlayImg:96:3:8:150:58:90:0><PlayImg:96:3:8:150:69:90:0><PlayImg:96:3:8:150:81:90:0><PlayImg:96:3:8:150:99:90:0>\
<><PlayImg:96:3:8:150:10:190:0><PlayImg:96:3:8:150:21:190:0><PlayImg:96:3:8:150:36:190:0><PlayImg:96:3:8:150:48:190:0><PlayImg:96:3:8:150:58:190:0><PlayImg:96:3:8:150:69:190:0><PlayImg:96:3:8:150:81:190:0><PlayImg:96:3:8:150:99:190:0>\
<>  <幸运夺宝/SCOLOR=250>{<$STR(N$物品总次数)>/SCOLOR=243}<次以内必出以下全部物品 真实有效 拼运气一切看脸 每次夺宝都可以获得1W元宝 【寻宝地图说明】/SCOLOR=250>\ \

<> <总数│剩余 总数│剩余 总数│剩余 总数│剩余 总数│剩余 总数│剩余 总数│剩余 总数│剩余/SCOLOR=250>\
<> {<$STR(S$物品总显示1)>│<$STR(S$物品剩显示1)><$STR(S$物品总显示2)>│<$STR(S$物品剩显示2)><$STR(S$物品总显示3)>│<$STR(S$物品剩显示3)><$STR(S$物品总显示4)>│<$STR(S$物品剩显示4)><$STR(S$物品总显示5)>│<$STR(S$物品剩显示5)><$STR(S$物品总显示6)>│<$STR(S$物品剩显示6)><$STR(S$物品总显示7)>│<$STR(S$物品剩显示7)><$STR(S$物品总显示8)>│<$STR(S$物品剩显示8)>/SCOLOR=250} <《珍宝地》/SCOLOR=243>\
<ItemShow:<$STR(N$物品DB编号1)>:0:20:5>
<ItemShow:<$STR(N$物品DB编号2)>:0:48:5>
<ItemShow:<$STR(N$物品DB编号3)>:0:80:5>
<ItemShow:<$STR(N$物品DB编号4)>:0:110:5>
<ItemShow:<$STR(N$物品DB编号5)>:0:143:5>
<ItemShow:<$STR(N$物品DB编号6)>:0:174:5>
<ItemShow:<$STR(N$物品DB编号7)>:0:205:5>
<ItemShow:<$STR(N$物品DB编号8)>:0:243:5>\
<> <珍宝地:个人夺宝次数达到$(夺宝福地1次数)次/SCOLOR=243>\
<>
<>\ \
<> <进入珍宝地/@进入福地1>\
<> <总数│剩余 总数│剩余 总数│剩余 总数│剩余 总数│剩余 总数│剩余 总数│剩余 总数│剩余/SCOLOR=250>\
<> {<$STR(S$物品总显示9)>│<$STR(S$物品剩显示9)><$STR(S$物品总显示10)>│<$STR(S$物品剩显示10)><$STR(S$物品总显示11)>│<$STR(S$物品剩显示11)><$STR(S$物品总显示12)>│<$STR(S$物品剩显示12)><$STR(S$物品总显示13)>│<$STR(S$物品剩显示13)><$STR(S$物品总显示14)>│<$STR(S$物品剩显示14)><$STR(S$物品总显示15)>│<$STR(S$物品剩显示15)><$STR(S$物品总显示16)>│<$STR(S$物品剩显示16)>/SCOLOR=250} <《藏珍地》/SCOLOR=243>\
<ItemShow:<$STR(N$物品DB编号9)>:0:20:10>
<ItemShow:<$STR(N$物品DB编号10)>:0:50:6>
<ItemShow:<$STR(N$物品DB编号11)>:0:82:6>
<ItemShow:<$STR(N$物品DB编号12)>:0:115:6>
<ItemShow:<$STR(N$物品DB编号13)>:0:145:6>
<ItemShow:<$STR(N$物品DB编号14)>:0:172:10>
<ItemShow:<$STR(N$物品DB编号15)>:0:202:10>
<ItemShow:<$STR(N$物品DB编号16)>:0:238:10>\
<> <藏珍地:个人夺宝次数达到$(夺宝福地2次数)次/SCOLOR=243>\ \
<>
<> <进入藏珍地/@进入福地2>\
<>
<> {本区总共抽奖次数:【 <$STR($(记录总数变量))> 】次/SCOLOR=243}\
<> {你当前的抽奖次数:【 <$STR($(记录个人次数))> 】次/SCOLOR=242}\
<> {你当前有夺宝积分:【 <$STR(u30)> 】点/SCOLOR=147}\ \
<>  <Img:1:96:-10:-60|/@开始夺宝1次><【夺宝说明】:每次夺宝需要消耗夺宝积分><$STR(N$夺宝消耗值)><点><Img:2:96:5:-60|/@开始夺宝10次> <寻宝地图暴率为普通地图的数倍/SCOLOR=70>\
\ <抽奖达到200次 可以获得夺宝奇兵称号,称号附带额外1.0倍暴率/SCOLOR=151> <点我领取夺宝奇兵/@领取称号1>\
\ <抽奖达到600次 可以获得夺宝先锋称号,称号附带额外1.2倍暴率/SCOLOR=151> <点我领取夺宝先锋/@领取称号2>\
\ <抽奖达到1000次 可以获得夺宝统领称号,称号附带额外1.5倍暴率/SCOLOR=151> <点我领取夺宝统领/@领取称号3>\
\ <抽奖达到3888次 可以获得夺宝至尊称号,称号附带额外2.0倍暴率/SCOLOR=151> <点我领取夺宝至尊/@领取称号4>\
\ <消耗200RMB可获得全部奖励(包括:夺宝至尊称号)随意进入所以夺宝地图/SCOLOR=253> <点我领取全部奖励/@领取称号5>\

<> <若是本区抽奖超过3888次 依旧可以继续抽奖 但是只能获得元宝 无法获得其他道具 避免抽奖次数满后 无法获得暴率加成/SCOLOR=254>\

<><><ImgEx:96:11:12:11:622:-302/@进入福地①> <ImgEx:96:11:12:11:524:-205/@进入福地②>






[@进入福地1]
#IF
SMALL $(记录个人次数) $(夺宝福地1次数)
#ACT
messagebox 你的夺宝次数还未达到[$(夺宝福地1次数)]次,不能进入!
BREAK
#ELSEACT
mapmove 珍宝地
SENDMSG 0 ‘<$USERNAME>’进入到了夺宝专属地图→[珍宝地],里面爆率超高,终极不是梦!
SENDMSG 0 ‘<$USERNAME>’进入到了夺宝专属地图→[珍宝地],里面爆率超高,终极不是梦!



[@进入福地2]
#IF
SMALL $(记录个人次数) $(夺宝福地2次数)
#ACT
messagebox 你的夺宝次数还未达到[$(夺宝福地2次数)]次,不能进入!
BREAK
#ELSEACT
mapmove 藏珍地
SENDMSG 0 ‘<$USERNAME>’进入到了夺宝专属地图→[藏珍地],里面爆率超高,终极不是梦!
SENDMSG 0 ‘<$USERNAME>’进入到了夺宝专属地图→[藏珍地],里面爆率超高,终极不是梦!





[@进入福地①]
#IF
SMALL $(记录个人次数) $(夺宝福地1次数)
#ACT
messagebox 你的夺宝次数还未达到[$(夺宝福地1次数)]次,不能进入!
BREAK
#ELSEACT
MAP $(夺宝福地1代码)
SENDMSG 0 ‘<$USERNAME>’进入到了夺宝专属地图→[珍宝地],里面爆率超高,终极不是梦!
SENDMSG 0 ‘<$USERNAME>’进入到了夺宝专属地图→[珍宝地],里面爆率超高,终极不是梦!

[@进入福地②]
#IF
SMALL $(记录个人次数) $(夺宝福地2次数)
#ACT
messagebox 你的夺宝次数还未达到[$(夺宝福地2次数)]次,不能进入!
BREAK
#ELSEACT
MAP $(夺宝福地2代码)
SENDMSG 0 ‘<$USERNAME>’进入到了夺宝专属地图→[藏珍地],里面爆率超高,终极不是梦!
SENDMSG 0 ‘<$USERNAME>’进入到了夺宝专属地图→[藏珍地],里面爆率超高,终极不是梦!




[@领取称号1]
#IF
large U20 199
NOT CHECKTITLE 夺宝奇兵
NOT CHECKTITLE 夺宝先锋
NOT CHECKTITLE 夺宝统领
NOT CHECKTITLE 夺宝至尊
#ACT
CONFERTITLE 夺宝奇兵
SENDMSG 0 ‘<$USERNAME>’获得了≮夺宝奇兵≯称号!!!!
#CALL [\在线刷新属性\爆率属性.txt] @爆率
BREAK
#ELSEACT
messagebox 你的夺宝次数还未达到[$(夺宝福地1次数)]次,!或者你已经拥有更高级称号


[@领取称号2]
#IF
large U20 599
CHECKTITLE 夺宝奇兵
NOT CHECKTITLE 夺宝先锋
#ACT
DEPRIVETITLE 夺宝奇兵
CONFERTITLE 夺宝先锋
SENDMSG 0 ‘<$USERNAME>’获得了≮夺宝先锋≯称号!!!!
#CALL [\在线刷新属性\爆率属性.txt] @爆率
BREAK
#ELSEACT
messagebox 你的夺宝次数还未达到[$(夺宝福地2次数)]次,或者你已经拥有更高级称号


[@领取称号3]
#IF
large U20 999
CHECKTITLE 夺宝先锋
NOT CHECKTITLE 夺宝统领
#ACT
DEPRIVETITLE 夺宝先锋
CONFERTITLE 夺宝统领
SENDMSG 0 ‘<$USERNAME>’获得了≮夺宝统领≯称号!!!!
#CALL [\在线刷新属性\爆率属性.txt] @爆率
BREAK
#ELSEACT
messagebox 你的夺宝次数还未达到[$(夺宝福地3次数)]次,或者你已经拥有更高级称号


[@领取称号4]
#IF
large U20 3887
CHECKTITLE 夺宝统领
NOT CHECKTITLE 夺宝至尊
#ACT
DEPRIVETITLE 夺宝统领
CONFERTITLE 夺宝至尊
SENDMSG 0 ‘<$USERNAME>’获得了≮夺宝至尊≯称号!!!!
#CALL [\在线刷新属性\爆率属性.txt] @爆率
BREAK
#ELSEACT
messagebox 你的夺宝次数还未达到[$(夺宝福地3次数)]次,或者你已经拥有更高级称号


[@领取称号5]
#IF
CHECKGAMEPOINT > 199
#ACT
GAMEPOINT - 200
MOV U20 3888
DEPRIVETITLE 夺宝奇兵
DEPRIVETITLE 夺宝先锋
DEPRIVETITLE 夺宝统领
CONFERTITLE 夺宝至尊
GIVE 20000元宝
GIVE 50000元宝
GIVE 100000元宝
GIVE 1000幻辰币
GIVE 5000幻辰币
GIVE 10000幻辰币
GIVE 200金钻
GIVE 500金钻
GIVE 一坨狗粮
GIVE 誰主沉浮「無敵」剑1.4倍
GIVE 誰主沉浮「無敵」甲1.4倍
GIVE 幻辰神界
GIVE 幻辰魔界
GIVE 魔法盾
GIVE 5元充值点
GIVE 10元充值点
SENDMSG 0 神土豪‘<$USERNAME>’领取了3888全部奖励!!!!
#CALL [\在线刷新属性\爆率属性.txt] @爆率
BREAK



[@开始夺宝1次]
#IF
CHECK [0] 0
#ACT
MOV N$物品剩余总数 0
INC N$物品剩余总数 <$STR($(记录余数变量1))>
INC N$物品剩余总数 <$STR($(记录余数变量2))>
INC N$物品剩余总数 <$STR($(记录余数变量3))>
INC N$物品剩余总数 <$STR($(记录余数变量4))>
INC N$物品剩余总数 <$STR($(记录余数变量5))>
INC N$物品剩余总数 <$STR($(记录余数变量6))>
INC N$物品剩余总数 <$STR($(记录余数变量7))>
INC N$物品剩余总数 <$STR($(记录余数变量8))>
INC N$物品剩余总数 <$STR($(记录余数变量9))>
INC N$物品剩余总数 <$STR($(记录余数变量10))>
INC N$物品剩余总数 <$STR($(记录余数变量11))>
INC N$物品剩余总数 <$STR($(记录余数变量12))>
INC N$物品剩余总数 <$STR($(记录余数变量13))>
INC N$物品剩余总数 <$STR($(记录余数变量14))>
INC N$物品剩余总数 <$STR($(记录余数变量15))>
INC N$物品剩余总数 <$STR($(记录余数变量16))>
;;;;;;;;#IF
;;;;;;;;LARGE N$物品剩余总数 0
;;;;;;;;#ELSEACT
;;;;;;;;messagebox 你来晚了,当前全部物品已被抽完!
;;;;;;;;BREAK
;;;;;;;;#IF
;;;;;;;;SMALL $(记录总数变量) <$STR(N$物品总次数)>
;;;;;;;;#ELSEACT
;;;;;;;;messagebox 你来晚了,本区总抽奖次数已抽完!
;;;;;;;;BREAK
#IF
small u30 <$STR(N$夺宝消耗值)>
#ACT
messagebox 你的抽奖数不足<$STR(N$夺宝消耗值)>点,无法夺宝!
#ELSEACT
dec u30 <$STR(N$夺宝消耗值)>
GOTO @开始夺宝触发




[@开始夺宝10次]
#IF
CHECK [0] 0
#ACT
MOV N$物品剩余总数 0
INC N$物品剩余总数 <$STR($(记录余数变量1))>
INC N$物品剩余总数 <$STR($(记录余数变量2))>
INC N$物品剩余总数 <$STR($(记录余数变量3))>
INC N$物品剩余总数 <$STR($(记录余数变量4))>
INC N$物品剩余总数 <$STR($(记录余数变量5))>
INC N$物品剩余总数 <$STR($(记录余数变量6))>
INC N$物品剩余总数 <$STR($(记录余数变量7))>
INC N$物品剩余总数 <$STR($(记录余数变量8))>
INC N$物品剩余总数 <$STR($(记录余数变量9))>
INC N$物品剩余总数 <$STR($(记录余数变量10))>
INC N$物品剩余总数 <$STR($(记录余数变量11))>
INC N$物品剩余总数 <$STR($(记录余数变量12))>
INC N$物品剩余总数 <$STR($(记录余数变量13))>
INC N$物品剩余总数 <$STR($(记录余数变量14))>
INC N$物品剩余总数 <$STR($(记录余数变量15))>
INC N$物品剩余总数 <$STR($(记录余数变量16))>
;;;;;;;;#IF
;;;;;;;;SMALL $(记录总数变量) <$STR(N$物品总次数)>
;;;;;;;;#ACT
MUL N$夺宝消耗值 10
MOV N$临时记录次数 10
INC N$临时记录次数 <$STR(N$物品总次数)>
;;;;;;;;#ELSEACT
;;;;;;;;messagebox 你来晚了,本区总抽奖次数已抽完!
;;;;;;;;BREAK
;;;;;;;;#IF
;;;;;;;;SMALL $(记录总数变量) <$STR(N$临时记录次数)>
;;;;;;;;#ELSEACT
;;;;;;;;messagebox 当前全区剩余次数已不足10次,不能连续夺宝10次!
;;;;;;;;BREAK
#IF
small u30 <$STR(N$夺宝消耗值)>
#ACT
GOTO @main
messagebox 你的抽奖次数不足<$STR(N$夺宝消耗值)>点,无法夺宝!
#ELSEACT
dec u30 <$STR(N$夺宝消耗值)>
GOTO @开始夺宝触发
GOTO @开始夺宝触发
GOTO @开始夺宝触发
GOTO @开始夺宝触发
GOTO @开始夺宝触发
GOTO @开始夺宝触发
GOTO @开始夺宝触发
GOTO @开始夺宝触发
GOTO @开始夺宝触发
GOTO @开始夺宝触发













[@开始夺宝触发]
#IF
CHECK [0] 0
#ACT
MOV N$物品剩余总数 0
INC N$物品剩余总数 <$STR($(记录余数变量1))>
INC N$物品剩余总数 <$STR($(记录余数变量2))>
INC N$物品剩余总数 <$STR($(记录余数变量3))>
INC N$物品剩余总数 <$STR($(记录余数变量4))>
INC N$物品剩余总数 <$STR($(记录余数变量5))>
INC N$物品剩余总数 <$STR($(记录余数变量6))>
INC N$物品剩余总数 <$STR($(记录余数变量7))>
INC N$物品剩余总数 <$STR($(记录余数变量8))>
INC N$物品剩余总数 <$STR($(记录余数变量9))>
INC N$物品剩余总数 <$STR($(记录余数变量10))>
INC N$物品剩余总数 <$STR($(记录余数变量11))>
INC N$物品剩余总数 <$STR($(记录余数变量12))>
INC N$物品剩余总数 <$STR($(记录余数变量13))>
INC N$物品剩余总数 <$STR($(记录余数变量14))>
INC N$物品剩余总数 <$STR($(记录余数变量15))>
INC N$物品剩余总数 <$STR($(记录余数变量16))>
MOV N$剩余次数 <$STR(N$物品总次数)>
DEC N$剩余次数 <$STR($(记录总数变量))>


#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品1机率)>
LARGE $(记录余数变量1) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量1) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称1)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称1)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK

#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品2机率)>
LARGE $(记录余数变量2) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量2) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称2)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称2)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK

#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品3机率)>
LARGE $(记录余数变量3) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量3) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称3)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称3)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK

#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品4机率)>
LARGE $(记录余数变量4) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量4) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称4)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称4)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK

#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品5机率)>
LARGE $(记录余数变量5) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量5) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称5)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称5)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK

#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品6机率)>
LARGE $(记录余数变量6) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量6) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称6)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称6)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK

#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品7机率)>
LARGE $(记录余数变量7) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量7) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称7)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称7)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK

#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品8机率)>
LARGE $(记录余数变量8) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量8) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称8)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称8)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK

#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品9机率)>
LARGE $(记录余数变量9) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量9) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称9)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称9)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK

#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品10机率)>
LARGE $(记录余数变量10) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量10) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称10)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称10)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK

#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品11机率)>
LARGE $(记录余数变量11) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量11) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称11)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称11)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK

#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品12机率)>
LARGE $(记录余数变量12) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量12) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称12)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称12)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK

#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品13机率)>
LARGE $(记录余数变量13) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量13) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称13)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称13)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK

#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品14机率)>
LARGE $(记录余数变量14) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量14) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称14)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称14)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK

#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品15机率)>
LARGE $(记录余数变量15) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量15) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称15)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称15)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK

#IF
LARGE N$剩余次数 <$STR(N$物品剩余总数)>
#ACT
MOVR N$夺宝几率 1 <$STR(N$机率机制)>
#ELSEACT
MOV N$夺宝几率 0
#IF
SMALL N$夺宝几率 <$STR(N$物品16机率)>
LARGE $(记录余数变量16) 0
#ACT
INC $(记录个人次数) 1
DEC $(记录余数变量16) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
GIVE <$STR(S$物品实际名称16)> 1
SENDMSG 0 恭喜!‘<$USERNAME>’在夺宝中获得:[<$STR(S$物品实际名称16)>]!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
BREAK
#IF
SMALL $(记录总数变量) <$STR(N$物品总次数)>
#ACT
INC $(记录个人次数) 1
MOV N$剩余次数 <$STR(N$物品总次数)>
INC $(记录总数变量) 1
DEC N$剩余次数 <$STR($(记录总数变量))>
gamegold + <$STR(N$安慰奖值)>
SENDMSG 0 ‘<$USERNAME>’在夺宝中获得:[<$STR(N$安慰奖值)>]元宝!当前全服剩余夺宝次数:<$STR(N$剩余次数)>次!
GOTO @main
#ELSEACT
INC $(记录个人次数) 1
gamegold + <$STR(N$安慰奖值)>
SENDMSG 0 ‘<$USERNAME>’在夺宝中获得:[<$STR(N$安慰奖值)>]元宝!
GOTO @main














[@排版数据读取]
#IF
EQUAL $(记录总数变量) 0
#ACT
MOV $(记录余数变量1) <$STR(N$物品1总数)>
MOV $(记录余数变量2) <$STR(N$物品2总数)>
MOV $(记录余数变量3) <$STR(N$物品3总数)>
MOV $(记录余数变量4) <$STR(N$物品4总数)>
MOV $(记录余数变量5) <$STR(N$物品5总数)>
MOV $(记录余数变量6) <$STR(N$物品6总数)>
MOV $(记录余数变量7) <$STR(N$物品7总数)>
MOV $(记录余数变量8) <$STR(N$物品8总数)>
MOV $(记录余数变量9) <$STR(N$物品9总数)>
MOV $(记录余数变量10) <$STR(N$物品10总数)>
MOV $(记录余数变量11) <$STR(N$物品11总数)>
MOV $(记录余数变量12) <$STR(N$物品12总数)>
MOV $(记录余数变量13) <$STR(N$物品13总数)>
MOV $(记录余数变量14) <$STR(N$物品14总数)>
MOV $(记录余数变量15) <$STR(N$物品15总数)>
MOV $(记录余数变量16) <$STR(N$物品16总数)>


#IF
CHECK [0] 0
#ACT
MOV S$物品总显示1 <$STR(N$物品1总数)>
MOV S$物品剩显示1 <$STR($(记录余数变量1))>
SetStringBlank <$STR(S$物品总显示1)> 4 0
SetStringBlank <$STR(S$物品剩显示1)> 6 1

MOV S$物品总显示2 <$STR(N$物品2总数)>
MOV S$物品剩显示2 <$STR($(记录余数变量2))>
SetStringBlank <$STR(S$物品总显示2)> 4 0
SetStringBlank <$STR(S$物品剩显示2)> 6 1

MOV S$物品总显示3 <$STR(N$物品3总数)>
MOV S$物品剩显示3 <$STR($(记录余数变量3))>
SetStringBlank <$STR(S$物品总显示3)> 4 0
SetStringBlank <$STR(S$物品剩显示3)> 6 1

MOV S$物品总显示4 <$STR(N$物品4总数)>
MOV S$物品剩显示4 <$STR($(记录余数变量4))>
SetStringBlank <$STR(S$物品总显示4)> 4 0
SetStringBlank <$STR(S$物品剩显示4)> 6 1

MOV S$物品总显示5 <$STR(N$物品5总数)>
MOV S$物品剩显示5 <$STR($(记录余数变量5))>
SetStringBlank <$STR(S$物品总显示5)> 4 0
SetStringBlank <$STR(S$物品剩显示5)> 6 1

MOV S$物品总显示6 <$STR(N$物品6总数)>
MOV S$物品剩显示6 <$STR($(记录余数变量6))>
SetStringBlank <$STR(S$物品总显示6)> 4 0
SetStringBlank <$STR(S$物品剩显示6)> 6 1

MOV S$物品总显示7 <$STR(N$物品7总数)>
MOV S$物品剩显示7 <$STR($(记录余数变量7))>
SetStringBlank <$STR(S$物品总显示7)> 4 0
SetStringBlank <$STR(S$物品剩显示7)> 6 1

MOV S$物品总显示8 <$STR(N$物品8总数)>
MOV S$物品剩显示8 <$STR($(记录余数变量8))>
SetStringBlank <$STR(S$物品总显示8)> 4 0
SetStringBlank <$STR(S$物品剩显示8)> 6 1

MOV S$物品总显示9 <$STR(N$物品9总数)>
MOV S$物品剩显示9 <$STR($(记录余数变量9))>
SetStringBlank <$STR(S$物品总显示9)> 4 0
SetStringBlank <$STR(S$物品剩显示9)> 6 1

MOV S$物品总显示10 <$STR(N$物品10总数)>
MOV S$物品剩显示10 <$STR($(记录余数变量10))>
SetStringBlank <$STR(S$物品总显示10)> 4 0
SetStringBlank <$STR(S$物品剩显示10)> 6 1

MOV S$物品总显示11 <$STR(N$物品11总数)>
MOV S$物品剩显示11 <$STR($(记录余数变量11))>
SetStringBlank <$STR(S$物品总显示11)> 4 0
SetStringBlank <$STR(S$物品剩显示11)> 6 1

MOV S$物品总显示12 <$STR(N$物品12总数)>
MOV S$物品剩显示12 <$STR($(记录余数变量12))>
SetStringBlank <$STR(S$物品总显示12)> 4 0
SetStringBlank <$STR(S$物品剩显示12)> 6 1

MOV S$物品总显示13 <$STR(N$物品13总数)>
MOV S$物品剩显示13 <$STR($(记录余数变量13))>
SetStringBlank <$STR(S$物品总显示13)> 4 0
SetStringBlank <$STR(S$物品剩显示13)> 6 1

MOV S$物品总显示14 <$STR(N$物品14总数)>
MOV S$物品剩显示14 <$STR($(记录余数变量14))>
SetStringBlank <$STR(S$物品总显示14)> 4 0
SetStringBlank <$STR(S$物品剩显示14)> 6 1

MOV S$物品总显示15 <$STR(N$物品15总数)>
MOV S$物品剩显示15 <$STR($(记录余数变量15))>
SetStringBlank <$STR(S$物品总显示15)> 4 0
SetStringBlank <$STR(S$物品剩显示15)> 6 1

MOV S$物品总显示16 <$STR(N$物品16总数)>
MOV S$物品剩显示16 <$STR($(记录余数变量16))>
SetStringBlank <$STR(S$物品总显示16)> 4 0
SetStringBlank <$STR(S$物品剩显示16)> 6 1

我要评论
全部回复 ( 0)