登录
×
  • 首页
  • 传奇论坛
  • 传奇版本库
  • 传奇服务端
  • 传奇三端手游
  • 传奇素材网
  • 传奇客户端
  • 下载排行
  • 获取邀请码
  • 网络广告 风险自担
    115763

    [GOM引擎] GOM引擎传奇一条龙开区时福利夺宝脚本记录总抽奖次数教程

     火... [复制链接]

    [GOM引擎] GOM引擎传奇一条龙开区时福利夺宝脚本记录总抽奖次数教程

     火... [复制链接]
    趣游论坛

    1万

    主题

    10

    回帖

    11万

    积分

    管理员

    积分
    112181

    灌水之王活跃会员突出贡献优秀版主荣誉管理论坛元老

    趣游论坛 2019-8-8 11:34:26 / 显示全部楼层 /阅读模式
    115763
    20190808112247.png

    ;说明:使用变量G387记录总抽奖次数,U20记录玩家抽奖次数。 A371-A385  G370-G385分别为抽奖物品名称及数量   G386为读取控制

    [@main]
    #if
    #act
    delaygoto 200 @福利夺宝
    break

    [@福利夺宝]
    #if
    EQUAL G386 0
    #act
    MOV G386 1
    MOV G387 0
    OPENMERCHANTBIGDLG 111 20 1 4 0 -80 0 745 0
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 0 A370 G370
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 1 A371 G371
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 2 A372 G372
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 3 A373 G373
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 4 A374 G374
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 5 A375 G375
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 6 A376 G376
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 7 A377 G377
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 8 A378 G378
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 9 A379 G379
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 10 A380 G380
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 11 A381 G381
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 12 A382 G382
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 13 A383 G383
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 14 A384 G384
    GetListString ..\QuestDiary\福利夺宝\夺宝物品.txt 15 A385 G385

    #if
    #act
    OPENMERCHANTBIGDLG 111 20 1 4 0 -80 0 745 0
    MOV S$福利1 <$STR(G370)>
    MOV S$福利2 <$STR(G371)>
    MOV S$福利3 <$STR(G372)>
    MOV S$福利4 <$STR(G373)>
    MOV S$福利5 <$STR(G374)>
    MOV S$福利6 <$STR(G375)>
    MOV S$福利7 <$STR(G376)>
    MOV S$福利8 <$STR(G377)>
    MOV S$福利9 <$STR(G378)>
    MOV S$福利10 <$STR(G379)>
    MOV S$福利11 <$STR(G380)>
    MOV S$福利12 <$STR(G381)>
    MOV S$福利13 <$STR(G382)>
    MOV S$福利14 <$STR(G383)>
    MOV S$福利15 <$STR(G384)>
    MOV S$福利16 <$STR(G385)>

    SetStringBlank <$STR(S$福利1)> 7 1
    SetStringBlank <$STR(S$福利2)> 8 1
    SetStringBlank <$STR(S$福利3)> 8 1
    SetStringBlank <$STR(S$福利4)> 8 1
    SetStringBlank <$STR(S$福利5)> 8 1
    SetStringBlank <$STR(S$福利6)> 8 1
    SetStringBlank <$STR(S$福利7)> 8 1
    SetStringBlank <$STR(S$福利8)> 8 1

    SetStringBlank <$STR(S$福利9)> 9 1
    SetStringBlank <$STR(S$福利10)> 9 1
    SetStringBlank <$STR(S$福利11)> 9 1
    SetStringBlank <$STR(S$福利12)> 9 1
    SetStringBlank <$STR(S$福利13)> 9 1
    SetStringBlank <$STR(S$福利14)> 9 1
    SetStringBlank <$STR(S$福利15)> 9 1
    SetStringBlank <$STR(S$福利16)> 9 1

    #say
    \ \ \
    <ImgEx:111:25:26:26:755:-22/@exit> \ \
    <>    <幸运夺宝4880次以内必出一下全部物品奖励,全靠拼运气一切看脸,每次夺宝都可以获得50至尊币/SCOLOR=253>\
    <>    <总数/SCOLOR=251>|<剩余/SCOLOR=251>  <总数/SCOLOR=251>|<剩余/SCOLOR=251>  <总数/SCOLOR=251>|<剩余/SCOLOR=251>  <总数/SCOLOR=251>|<剩余/SCOLOR=251>  <总数/SCOLOR=251>|<剩余/SCOLOR=251>  <总数/SCOLOR=251>|<剩余/SCOLOR=251>  <总数/SCOLOR=251>|<剩余/SCOLOR=251>  <总数/SCOLOR=251>|<剩余/SCOLOR=251>           <【夺宝地图说明】/SCOLOR=119>\
    <>    <100/SCOLOR=250>|{<$STR(S$福利1)>/SCOLOR=250}<80/SCOLOR=250>|{<$STR(S$福利2)>/SCOLOR=250}<40/SCOLOR=250>|{<$STR(S$福利3)>/SCOLOR=250}<30/SCOLOR=250>|{<$STR(S$福利4)>/SCOLOR=250}<20/SCOLOR=250>|{<$STR(S$福利5)>/SCOLOR=250}<20/SCOLOR=250>|{<$STR(S$福利6)>/SCOLOR=250}<15/SCOLOR=250>|{<$STR(S$福利7)>/SCOLOR=250}<10/SCOLOR=250>|{<$STR(S$福利8)>/SCOLOR=250}\
    <>   <itemshow:40:0:7:20:0>   <itemshow:710:0:10:20:0>   <itemshow:711:0:22:23:0>   <itemshow:704:0:37:17:0>   <itemshow:705:0:48:20:0>   <itemshow:706:0:47:15:0>   <itemshow:712:0:44:8:0>   <itemshow:713:0:35:8:0>\
    <>                                                                                                   <《夺宝奇兵专属地图》/SCOLOR=250>   \ \

    <>                                                                                                <条件:个人夺宝次数达到100次/SCOLOR=250>   \
    <>                                                                                                     <进入夺宝奇兵专属/@夺宝奇兵地图>   \

    <>    <总数/SCOLOR=251>|<剩余/SCOLOR=251>  <总数/SCOLOR=251>|<剩余/SCOLOR=251>  <总数/SCOLOR=251>|<剩余/SCOLOR=251>  <总数/SCOLOR=251>|<剩余/SCOLOR=251>  <总数/SCOLOR=251>|<剩余/SCOLOR=251>  <总数/SCOLOR=251>|<剩余/SCOLOR=251>  <总数/SCOLOR=251>|<剩余/SCOLOR=251>  <总数/SCOLOR=251>|<剩余/SCOLOR=251>\
    <>    <8/SCOLOR=250>|{<$STR(S$福利9)>/SCOLOR=250}<15/SCOLOR=250>|{<$STR(S$福利10)>/SCOLOR=250}<10/SCOLOR=250>|{<$STR(S$福利11)>/SCOLOR=250}<2/SCOLOR=250>|{<$STR(S$福利12)>/SCOLOR=250}<5/SCOLOR=250>|{<$STR(S$福利13)>/SCOLOR=250}<3/SCOLOR=250>|{<$STR(S$福利14)>/SCOLOR=250}<2/SCOLOR=250>|{<$STR(S$福利15)>/SCOLOR=250}<1/SCOLOR=250>|{<$STR(S$福利16)>/SCOLOR=250}\
    <>   <itemshow:3:0:0:13:0>   <itemshow:707:0:-13:6:0>     <itemshow:708:0:-39:6:0>     <itemshow:709:0:-67:5:0>    <itemshow:670:0:-82:13:0>   <itemshow:671:0:-83:13:0>   <itemshow:672:0:-87:15:0>   <itemshow:663:0:-90:6:0>\
    <>                                                                                                    <《夺宝先锋专属地图》/SCOLOR=254>   \ \

    <>                                                                                                <条件:个人夺宝次数达到300次/SCOLOR=254>   \
    <>                                                                                                      <进入夺宝先锋专属/@夺宝先锋地图>   \
    <>                                 {本区夺宝箱总共已抽奖次数:【<$STR(G387)>】/SCOLOR=250} \
    \ \
    <>                                      {你当前的抽奖次数:【<$STR(U20)>】/SCOLOR=253}                                         <《夺宝圣手专属地图》/SCOLOR=253>\
    <>                                      {你当前拥有夺宝点:【<$CREDITPOINT>】/SCOLOR=254}          \
    <>      <ImgEx:111:22:21:21:0:-33/@夺宝一次><全区抽到4880次,全部剩余奖品全部归他/AUTOCOLOR=254,251,168,191,250,242,245,249,253><ImgEx:111:24:23:23:0:-33/@夺宝十次>    <条件:个人夺宝次数达到500次/SCOLOR=253>  \
    <>                                {【夺宝说明】每次夺宝需要消耗/SCOLOR=249} 1<夺宝点/SCOLOR=249>                       <进入夺宝圣手专属/@夺宝圣手地图>  \
    \ \
    <>    <抽奖达到100次 可以获得/SCOLOR=161><夺宝奇兵/SCOLOR=250><称号附带 50%爆率加成/SCOLOR=161><天魔终结【万能石】*100/SCOLOR=250> <点我领取夺宝奇兵/@领取奇兵>\
    <>    <抽奖达到300次 可以获得/SCOLOR=161><夺宝先锋/SCOLOR=250><称号附带100%爆率加成/SCOLOR=161><天魔终结【万能石】*200/SCOLOR=250> <点我领取夺宝先锋/@领取先锋>        <《天下第一专属地图》/SCOLOR=58>  \
    <>    <抽奖达到500次 可以获得/SCOLOR=161><夺宝圣手/SCOLOR=250><称号附带150%爆率加成/SCOLOR=161><天魔终结【万能石】*300/SCOLOR=250> <点我领取夺宝圣手/@领取圣手>\
    <>    <抽奖达到800次 可以获得/SCOLOR=161><天下第一/SCOLOR=250><称号附带200%爆率加成/SCOLOR=161><天魔终结【万能石】*400/SCOLOR=250> <点我领取天下第一/@天下第一>     <条件:个人夺宝次数达到800次/SCOLOR=58>  \
    <>    <若是本区抽奖超过4880次 依旧可以继续抽奖 虽无奖品 但仍可获得夺宝称号及爆率,和夺宝地图/SCOLOR=239>              <进入天下第一专属/@天下第一地图>\
    <>    <本区夺宝总次数达到一定次数后,全区爆率会永久提升!!/SCOLOR=239>       <详细爆率加成规则点我|^ ^215#全区夺宝次数达到500次---全区爆率提升0.2倍^ ^254#全区夺宝次数达到1000次---全区爆率提升0.4倍^ ^151#全区夺宝次数达到1500次---全区爆率提升0.6倍^ ^242#全区夺宝次数达到2000次---全区爆率提升0.8倍^ ^253#全区夺宝次数达到3000次---全区爆率提升1.0倍^ ^253#全区夺宝次数达到4000次---全区爆率提升1.5倍^ ^70#   该爆率加成可与夺宝系列称号叠加!>\
    <PlayImg:118:395:10:100:-36:-443:0:><PlayImg:118:395:12:100:-196:-443:0:><PlayImg:118:395:12:100:-350:-443:0:><PlayImg:118:395:12:100:-504:-443:0:><PlayImg:118:395:12:100:-655:-443:0:><PlayImg:118:395:12:100:-812:-443:0:><PlayImg:118:395:12:100:-964:-443:0:><PlayImg:118:395:12:100:-1114:-443:0:>\ \ \ \ \ \ \
    <PlayImg:118:395:12:100:-36:-443:0:><PlayImg:118:395:12:100:-196:-443:0:><PlayImg:118:395:12:100:-350:-443:0:><PlayImg:118:395:12:100:-504:-443:0:><PlayImg:118:395:12:100:-655:-443:0:><PlayImg:118:395:12:100:-808:-443:0:><PlayImg:118:395:12:100:-964:-443:0:><PlayImg:118:395:12:100:-1114:-443:0:>\

    ;---------------------------纯净水500CC独家制作:QQ1875927366--------------------------------

    [@领取奇兵]
    #if
    LARGE U20 99
    EQUAL U21 0
    #ACT
    MOV U21 1
    CONFERTITLE 夺宝奇兵
    GIVE 天魔终结【万能石】 100
    ;#CALL [\福利夺宝\夺宝爆率.txt] @爆率加成
    MESSAGEBOX 恭喜您获得夺宝奇兵称号,请在人物-称号面板查看!
    #elseact
    MESSAGEBOX 1、您的抽奖次数没有达到100次;\\2、请从上到下依次领取称号!
    break
    [@领取先锋]
    #if
    LARGE U20 299
    EQUAL U21 1
    #ACT
    MOV U21 2
    CONFERTITLE 夺宝先锋
    DEPRIVETITLE 天下第一
    DEPRIVETITLE 夺宝圣手
    DEPRIVETITLE 夺宝奇兵
    GIVE 天魔终结【万能石】 200
    ;#CALL [\福利夺宝\夺宝爆率.txt] @爆率加成
    MESSAGEBOX 恭喜您获得夺宝先锋称号,请在人物-称号面板查看!
    #elseact
    MESSAGEBOX 1、您的抽奖次数没有达到300次;\\2、请从上到下依次领取称号!
    break
    [@领取圣手]
    #if
    LARGE U20 499
    EQUAL U21 2
    #ACT
    MOV U21 3
    CONFERTITLE 夺宝圣手
    DEPRIVETITLE 天下第一
    DEPRIVETITLE 夺宝先锋
    DEPRIVETITLE 夺宝奇兵
    GIVE 天魔终结【万能石】 300
    ;#CALL [\福利夺宝\夺宝爆率.txt] @爆率加成
    MESSAGEBOX 恭喜您获得夺宝圣手称号,请在人物-称号面板查看!
    #elseact
    MESSAGEBOX 1、您的抽奖次数没有达到500次;\\2、请从上到下依次领取称号!
    break

    [@天下第一]
    #if
    LARGE U20 799
    EQUAL U21 3
    #ACT
    MOV U21 4
    CONFERTITLE 天下第一
    DEPRIVETITLE 夺宝圣手
    DEPRIVETITLE 夺宝先锋
    DEPRIVETITLE 夺宝奇兵
    GIVE 天魔终结【万能石】 400
    ;#CALL [\福利夺宝\夺宝爆率.txt] @爆率加成
    MESSAGEBOX 恭喜您获得天下第一称号,请在人物-称号面板查看!
    #elseact
    MESSAGEBOX 1、您的抽奖次数没有达到800次;\\2、请从上到下依次领取称号!
    break

    ;---------------------------纯净水500CC独家制作:QQ1875927366--------------------------------
    [@夺宝奇兵地图]
    #if
    LARGE U20 99
    #ACT
    MAP DBQB
    GuildNoticeMsg 222 0 》∶{玩家『<$USERNAME>』进入了【<$mapname>】地图|254:0}{∶|249:0}{『此地图爆率是其他地图数倍,刷新各种BOSS』.....|70:0}
    #elseact
    MESSAGEBOX 您的抽奖次数没有达到100次无法进入。
    break
    [@夺宝先锋地图]
    #if
    LARGE U20 299
    #ACT
    MAP DBXF
    GuildNoticeMsg 222 0 》∶{玩家『<$USERNAME>』进入了【<$mapname>】地图|254:0}{∶|249:0}{『此地图爆率是其他地图数倍,刷新各种BOSS』.....|70:0}
    #elseact
    MESSAGEBOX 您的抽奖次数没有达到300次无法进入。
    break


    [@夺宝圣手地图]
    #if
    LARGE U20 499
    #ACT
    MAP DBSS
    GuildNoticeMsg 222 0 》∶{玩家『<$USERNAME>』进入了【<$mapname>】地图|254:0}{∶|249:0}{『此地图爆率是其他地图数倍,刷新各种BOSS』.....|70:0}
    #elseact
    MESSAGEBOX 您的抽奖次数没有达到500次无法进入。
    break

    [@天下第一地图]
    #if
    LARGE U20 799
    #ACT
    mapmove TXDY
    GuildNoticeMsg 222 0 》∶{玩家『<$USERNAME>』进入了【<$mapname>】地图|254:0}{∶|249:0}{『此地图爆率是其他地图数倍,刷新各种BOSS』.....|70:0}
    #elseact
    MESSAGEBOX 您的抽奖次数没有达到800次无法进入。
    break


    ;---------------------------纯净水500CC独家制作:QQ1875927366--------------------------------

    [@夺宝一次]
    #IF
    CHECKBAGSIZE 1
    #elseact
    messagebox 对不起!您的身上背包的空格不够1格,请清理后再来!!
    break

    #IF
    CHECKCREDITPOINT > 0
    #ACT
    CREDITPOINT - 1
    INC G387 1
    INC U20 1
    #CALL [\福利夺宝\夺宝抽奖.txt] @抽奖夺宝
    goto @main
    break
    #elseact
    messagebox 对不起!您的夺宝点不够1点,请充值后再来!!
    break

    [@夺宝十次]
    #IF
    CHECKCREDITPOINT > 9
    #ACT
    CREDITPOINT - 10
    INC G387 10
    INC U20 10
    MOV N$次数 10
    goto @抽奖10次
    goto @main
    break
    #elseact
    messagebox 对不起!您的夺宝点不够10点,请充值后再来!!
    break


    [@抽奖10次]
    #IF
    CHECKBAGSIZE 10
    #elseact
    messagebox 对不起!您的身上背包的空格不够10格,请清理后再来!!
    break

    #if
    LARGE N$次数 0
    #ACT
    DEC N$次数 1
    #CALL [\福利夺宝\夺宝抽奖.txt] @抽奖夺宝
    GOTO @抽奖10次
    BREAK


    [@123123]
    #IF
    CHECKBAGSIZE 16
    #ELSEACT
    messagebox 对不起!您的身上背包的空格不够16格,请清理后再来!!
    BREAK


    #IF
    CHECKGAMEPOINT > 887
    #ACT
    GAMEPOINT - 888
    GAMEDIAMOND + 7000
    GAMEGIRD + 30000
    gamegold + 50000000
    GAMEGLORY +3000
    INC G387 800
    INC U20 800
    #ELSEACT
    messagebox 对不起!您的游戏点不足888点!!!
    break


    #IF
    #ACT
    GIVE <$STR(A370)> 1


    #IF
    #ACT
    GIVE <$STR(A371)> 1



    #IF
    #ACT
    GIVE <$STR(A372)> 1



    #IF

    #ACT
    GIVE <$STR(A373)> 1



    #IF
    #ACT
    GIVE <$STR(A374)> 1



    #IF
    #ACT
    GIVE <$STR(A375)> 1



    #IF
    LARGE G376 0
    #ACT
    GIVE <$STR(A376)> 1
    DEC G376 1


    #IF
    #ACT
    GIVE <$STR(A377)> 1



    #IF
    #ACT
    GIVE <$STR(A378)> 1



    #IF
    #ACT
    GIVE <$STR(A379)> 1



    #IF
    #ACT
    GIVE <$STR(A380)> 1

    #IF
    #ACT
    GIVE <$STR(A381)> 1



    #IF
    #ACT
    GIVE <$STR(A382)> 1



    #IF
    #ACT
    GIVE <$STR(A383)> 1



    #IF
    #ACT
    GIVE <$STR(A384)> 1


    #IF
    #ACT
    GiveStateItem <$STR(A385)> 1 1 1 1 1 1 1 1
    SET [101] 1
    ChangeHumAbility 11 + 200000000



    #if
    #act
    goto @main

    #IF
    LARGE G387 4887
    #ACT
    mapmove 20 60 44
    #ELSEACT
    break


    #IF
    #ACT
    GiveStateItem <$STR(A385)> 1 1 1 1 1 1 1 <$STR(G385)>
    SET [101] 1
    ChangeHumAbility 11 + 200000000



    #IF
    LARGE G370 0
    #ACT
    MOV N$元宝 100000
    MUL <$STR(N$元宝)> <$STR(G370)>
    GAMEGOLD + <$STR(N$元宝)>
    MOV N$元宝
    MOV G370 0

    #IF
    LARGE G371 0
    #ACT
    MOV N$元宝 200000
    MUL <$STR(N$元宝)> <$STR(G371)>
    GAMEGOLD + <$STR(N$元宝)>
    MOV N$元宝
    MOV G371 0


    #IF
    LARGE G372 0
    #ACT
    MOV N$元宝 500000
    MUL <$STR(N$元宝)> <$STR(G372)>
    GAMEGOLD + <$STR(N$元宝)>
    MOV N$元宝
    MOV G372 0


    #IF
    LARGE G373 0
    #ACT
    ThrowItem 20 66 44 5 <$STR(A373)> <$STR(G373)>|65535 0 1
    MOV G373 0


    #IF
    LARGE G374 0
    #ACT
    ThrowItem 20 66 44 5 <$STR(A374)> <$STR(G374)>|65535 0 1
    MOV G374 0


    #IF
    LARGE G375 0
    #ACT
    ThrowItem 20 66 44 5 <$STR(A375)> <$STR(G375)>|65535 0 1
    MOV G375 0


    #IF
    LARGE G376 0
    #ACT
    ThrowItem 20 66 44 5 <$STR(A376)> <$STR(G376)>|65535 0 1
    MOV G376 0


    #IF
    LARGE G377 0
    #ACT
    ThrowItem 20 66 44 8 <$STR(A377)> <$STR(G377)>|65535 0 1
    MOV G377 0


    #IF
    LARGE G378 0
    #ACT
    ThrowItem 20 66 44 8 <$STR(A378)> <$STR(G378)>|65535 0 1
    MOV G378 0


    #IF
    LARGE G379 0
    #ACT
    ThrowItem 20 66 44 8 <$STR(A379)> <$STR(G379)>|65535 0 1
    MOV G379 0


    #IF
    LARGE G380 0
    #ACT
    ThrowItem 20 66 44 8 <$STR(A380)> <$STR(G380)>|65535 0 1
    MOV G380 0

    #IF
    LARGE G381 0
    #ACT
    ThrowItem 20 66 44 8 <$STR(A381)> <$STR(G381)>|65535 0 1
    MOV G381 0


    #IF
    LARGE G382 0
    #ACT
    ThrowItem 20 66 44 8 <$STR(A382)> <$STR(G382)>|65535 0 1
    MOV G382 0


    #IF
    LARGE G383 0
    #ACT
    ThrowItem 20 66 44 8 <$STR(A383)> <$STR(G383)>|65535 0 1
    MOV G383 0


    #IF
    LARGE G384 0
    #ACT
    ThrowItem 20 66 44 8 <$STR(A384)> <$STR(G384)>|65535 0 1
    MOV G384 0


    回复

    使用道具 举报

    传奇发布网

    117

    主题

    567

    回帖

    1万

    积分

    超级版主

    积分
    12661
    传奇发布网 2024-11-6 11:45:51 / 显示全部楼层
    回复 支持 反对

    使用道具 举报

    nicholaszl

    0

    主题

    23

    回帖

    177

    积分

    注册用户

    积分
    177
    nicholaszl 2024-11-7 10:47:43 / 显示全部楼层
    回复 支持 反对

    使用道具 举报

    5578613

    0

    主题

    20

    回帖

    55

    积分

    注册用户

    积分
    55
    5578613 4 天前 / 显示全部楼层
    回复 支持 反对

    使用道具 举报

    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则

    扫一扫加群沟通交流

    首页 论坛 !mobpost! 最新 我的