设为首页收藏本站★元宝充值★★购买会员★★传奇QQ群★

一休论坛

网络广告风险自担
 找回密码
 立即注册
查看: 72|回复: 0

[GOM引擎] GOM引擎的传奇GM基地本星级转移脚本教程说明和范例使用

[复制链接]
  • TA的每日心情
    慵懒
    2015-7-29 13:47
  • 签到天数: 2 天

    [LV.1]初来乍到

    发表于 2019-6-29 09:33:10 | 显示全部楼层 |阅读模式
    网络广告风险自担
    网络广告风险自担
    GOM引擎的传奇GM基地本星级转移脚本教程说明和范例使用

    [@main]

    #IF
    #ACT
    OPENMERCHANTBIGDLG 36 69 1 4 -30 -100 0 455 30
    #say
    <ImgEx:36:19:20:21:270:-12/@EXIT>\ \  \

             <勇士,这里可以把你鉴定的高星装备转移到新的装备上/AUTOCOLOR=151>\ \

             <接受转移的装备将会重新定义属性,高级属性几率加强/AUTOCOLOR=70>\ \

             <转移条件1:需要转移的装备必须大于四星以上/AUTOCOLOR=253>\ \

             <转移条件2:(转星神水只能转移九星)/AUTOCOLOR=250>\ \ \

             <转移方式1:需要2RMB点/AUTOCOLOR=146>          <RMB点转移/@转移>\ \

             <转移方式2:需要转星神水*1/AUTOCOLOR=146>      <神水 转移/@转移2>\ \ \

    <>      <↓放入主装备↓/AUTOCOLOR=253>          <↓放入副装备↓/AUTOCOLOR=253>      \ \

    <ITEMBOX:2:-1:127:35:-22:90:90:10,5,15,26,19,22,64,62:254#请放入主装备>\

    <ITEMBOX:3:-1:127:176:-38:90:90:10,5,15,26,19,22,64,62:254#请放入接受转移的装备>\ \ \





    [@ItemIntoBox2]
    #IF
    NOT large <$BOXITEM[2].UPGRADECOUNT> 4
    #ACT
    ReturnBoxItem 2
    MESSAGEBOX \\您放入的主装备没有大于5星就不要转移了亲!
    break

    [@转移]

    #IF
    NOT CheckBoxItemCount 2
    #ACT
    MESSAGEBOX \\请放入要转移的装备!
    break

    #IF
    NOT CheckBoxItemCount 3
    #ACT
    MESSAGEBOX \\请放入接受转移的装备!
    break





    #IF
    equal <$BOXITEM[2].UPGRADECOUNT> 5
    CHECKGAMEPOINT > 1
    #ACT
    GAMEPOINT - 2
    SetUpgradeItem 3
    MOVR N91 15000 25000
    MOVR N92 12000 19000
    MOVR N93 1700 1900
    MOVR N94 100000 110000
    MOV <$STR(N$附加体力)> <$STR(N91)>
    MOV <$STR(N$附加魔力)> <$STR(N92)>
    MOV <$STR(N$附加攻击)> <$STR(N93)>
    MOV <$STR(N$附加真伤)> <$STR(N94)>
    SetNewItemValue -1 9 = 5
    CHANGEITEMUPGRADECOUNT -1 = 5
    CHANGECUSTOMITEMTEXT -1 [神圣鉴定]:
    CHANGECUSTOMITEMTEXTColor -1 146
    CHANGECUSTOMITEMABIL -1 1 3 0
    CHANGECUSTOMITEMABIL -1 2 3 0
    CHANGECUSTOMITEMABIL -1 3 3 0
    CHANGECUSTOMITEMABIL -1 4 3 0
    CHANGECUSTOMITEMABIL -1 1 2 1
    CHANGECUSTOMITEMABIL -1 2 2 2
    CHANGECUSTOMITEMABIL -1 3 2 3
    CHANGECUSTOMITEMABIL -1 4 2 4
    CHANGECUSTOMITEMABIL -1 1 1 3
    CHANGECUSTOMITEMABIL -1 2 1 6
    CHANGECUSTOMITEMABIL -1 3 1 7
    CHANGECUSTOMITEMABIL -1 4 1 9
    CHANGECUSTOMITEMVALUE -1 1 = <$STR(N$附加攻击)>
    CHANGECUSTOMITEMVALUE -1 2 = <$STR(N$附加体力)>
    CHANGECUSTOMITEMVALUE -1 3 = <$STR(N$附加魔力)>
    CHANGECUSTOMITEMVALUE -1 4 = <$STR(N$附加真伤)>
    CHANGECUSTOMITEMABIL -1 1 0 250
    CHANGECUSTOMITEMABIL -1 2 0 253
    CHANGECUSTOMITEMABIL -1 3 0 70
    CHANGECUSTOMITEMABIL -1 4 0 254
    UpDateBoxItem 3
    goto @zhuanyi
    ##ELSEACT
    break



    #IF
    equal <$BOXITEM[2].UPGRADECOUNT> 6
    CHECKGAMEPOINT > 1
    #ACT
    GAMEPOINT - 2
    SetUpgradeItem 3
    MOVR N91 30000 38000
    MOVR N92 22000 23000
    MOVR N93 2000 2100
    MOVR N94 170000 180000
    MOV <$STR(N$附加体力)> <$STR(N91)>
    MOV <$STR(N$附加魔力)> <$STR(N92)>
    MOV <$STR(N$附加攻击)> <$STR(N93)>
    MOV <$STR(N$附加真伤)> <$STR(N94)>
    SetNewItemValue -1 9 = 6
    CHANGEITEMUPGRADECOUNT -1 = 6
    CHANGECUSTOMITEMTEXT -1 [神圣鉴定]:
    CHANGECUSTOMITEMTEXTColor -1 146
    CHANGECUSTOMITEMABIL -1 1 3 0
    CHANGECUSTOMITEMABIL -1 2 3 0
    CHANGECUSTOMITEMABIL -1 3 3 0
    CHANGECUSTOMITEMABIL -1 4 3 0
    CHANGECUSTOMITEMABIL -1 1 2 1
    CHANGECUSTOMITEMABIL -1 2 2 2
    CHANGECUSTOMITEMABIL -1 3 2 3
    CHANGECUSTOMITEMABIL -1 4 2 4
    CHANGECUSTOMITEMABIL -1 1 1 3
    CHANGECUSTOMITEMABIL -1 2 1 6
    CHANGECUSTOMITEMABIL -1 3 1 7
    CHANGECUSTOMITEMABIL -1 4 1 9
    CHANGECUSTOMITEMVALUE -1 1 = <$STR(N$附加攻击)>
    CHANGECUSTOMITEMVALUE -1 2 = <$STR(N$附加体力)>
    CHANGECUSTOMITEMVALUE -1 3 = <$STR(N$附加魔力)>
    CHANGECUSTOMITEMVALUE -1 4 = <$STR(N$附加真伤)>
    CHANGECUSTOMITEMABIL -1 1 0 250
    CHANGECUSTOMITEMABIL -1 2 0 253
    CHANGECUSTOMITEMABIL -1 3 0 70
    CHANGECUSTOMITEMABIL -1 4 0 254
    UpDateBoxItem 3
    goto @zhuanyi
    ##ELSEACT
    break



    #IF
    equal <$BOXITEM[2].UPGRADECOUNT> 7
    CHECKGAMEPOINT > 1
    #ACT
    GAMEPOINT - 2
    SetUpgradeItem 3
    MOVR N91 60000 89000
    MOVR N92 35000 40000
    MOVR N93 2200 2400
    MOVR N94 200000 380000
    MOV <$STR(N$附加体力)> <$STR(N91)>
    MOV <$STR(N$附加魔力)> <$STR(N92)>
    MOV <$STR(N$附加攻击)> <$STR(N93)>
    MOV <$STR(N$附加真伤)> <$STR(N94)>
    SetNewItemValue -1 9 = 7
    CHANGEITEMUPGRADECOUNT -1 = 7
    CHANGECUSTOMITEMTEXT -1 [神圣鉴定]:
    CHANGECUSTOMITEMTEXTColor -1 146
    CHANGECUSTOMITEMABIL -1 1 3 0
    CHANGECUSTOMITEMABIL -1 2 3 0
    CHANGECUSTOMITEMABIL -1 3 3 0
    CHANGECUSTOMITEMABIL -1 4 3 0
    CHANGECUSTOMITEMABIL -1 1 2 1
    CHANGECUSTOMITEMABIL -1 2 2 2
    CHANGECUSTOMITEMABIL -1 3 2 3
    CHANGECUSTOMITEMABIL -1 4 2 4
    CHANGECUSTOMITEMABIL -1 1 1 3
    CHANGECUSTOMITEMABIL -1 2 1 6
    CHANGECUSTOMITEMABIL -1 3 1 7
    CHANGECUSTOMITEMABIL -1 4 1 9
    CHANGECUSTOMITEMVALUE -1 1 = <$STR(N$附加攻击)>
    CHANGECUSTOMITEMVALUE -1 2 = <$STR(N$附加体力)>
    CHANGECUSTOMITEMVALUE -1 3 = <$STR(N$附加魔力)>
    CHANGECUSTOMITEMVALUE -1 4 = <$STR(N$附加真伤)>
    CHANGECUSTOMITEMABIL -1 1 0 250
    CHANGECUSTOMITEMABIL -1 2 0 253
    CHANGECUSTOMITEMABIL -1 3 0 70
    CHANGECUSTOMITEMABIL -1 4 0 254
    UpDateBoxItem 3
    goto @zhuanyi
    ##ELSEACT
    break


    #IF
    equal <$BOXITEM[2].UPGRADECOUNT> 8
    CHECKGAMEPOINT > 1
    #ACT
    GAMEPOINT - 2
    SetUpgradeItem 3
    MOVR N91 140000 189000
    MOVR N92 70000 90000
    MOVR N93 2500 2700
    MOVR N94 600000 999999
    MOV <$STR(N$附加体力)> <$STR(N91)>
    MOV <$STR(N$附加魔力)> <$STR(N92)>
    MOV <$STR(N$附加攻击)> <$STR(N93)>
    MOV <$STR(N$附加真伤)> <$STR(N94)>
    SetNewItemValue -1 9 = 8
    CHANGEITEMUPGRADECOUNT -1 = 8
    CHANGECUSTOMITEMTEXT -1 [神圣鉴定]:
    CHANGECUSTOMITEMTEXTColor -1 146
    CHANGECUSTOMITEMABIL -1 1 3 0
    CHANGECUSTOMITEMABIL -1 2 3 0
    CHANGECUSTOMITEMABIL -1 3 3 0
    CHANGECUSTOMITEMABIL -1 4 3 0
    CHANGECUSTOMITEMABIL -1 1 2 1
    CHANGECUSTOMITEMABIL -1 2 2 2
    CHANGECUSTOMITEMABIL -1 3 2 3
    CHANGECUSTOMITEMABIL -1 4 2 4
    CHANGECUSTOMITEMABIL -1 1 1 3
    CHANGECUSTOMITEMABIL -1 2 1 6
    CHANGECUSTOMITEMABIL -1 3 1 7
    CHANGECUSTOMITEMABIL -1 4 1 9
    CHANGECUSTOMITEMVALUE -1 1 = <$STR(N$附加攻击)>
    CHANGECUSTOMITEMVALUE -1 2 = <$STR(N$附加体力)>
    CHANGECUSTOMITEMVALUE -1 3 = <$STR(N$附加魔力)>
    CHANGECUSTOMITEMVALUE -1 4 = <$STR(N$附加真伤)>
    CHANGECUSTOMITEMABIL -1 1 0 250
    CHANGECUSTOMITEMABIL -1 2 0 253
    CHANGECUSTOMITEMABIL -1 3 0 70
    CHANGECUSTOMITEMABIL -1 4 0 254
    UpDateBoxItem 3
    goto @zhuanyi
    ##ELSEACT
    break

    #IF
    equal <$BOXITEM[2].UPGRADECOUNT> 9
    CHECKGAMEPOINT > 1
    #ACT
    GAMEPOINT - 2
    SetUpgradeItem 3
    MOVR N91 300000 370000
    MOVR N92 100000 130000
    MOVR N93 2400 2700
    MOVR N94 1711111 2222222
    MOV <$STR(N$附加体力)> <$STR(N91)>
    MOV <$STR(N$附加魔力)> <$STR(N92)>
    MOV <$STR(N$附加攻击)> <$STR(N93)>
    MOV <$STR(N$附加真伤)> <$STR(N94)>
    SetNewItemValue -1 9 = 9
    CHANGEITEMUPGRADECOUNT -1 = 9
    CHANGECUSTOMITEMTEXT -1 [神圣鉴定]:
    CHANGECUSTOMITEMTEXTColor -1 146
    CHANGECUSTOMITEMABIL -1 1 3 0
    CHANGECUSTOMITEMABIL -1 2 3 0
    CHANGECUSTOMITEMABIL -1 3 3 0
    CHANGECUSTOMITEMABIL -1 4 3 0
    CHANGECUSTOMITEMABIL -1 1 2 1
    CHANGECUSTOMITEMABIL -1 2 2 2
    CHANGECUSTOMITEMABIL -1 3 2 3
    CHANGECUSTOMITEMABIL -1 4 2 4
    CHANGECUSTOMITEMABIL -1 1 1 3
    CHANGECUSTOMITEMABIL -1 2 1 6
    CHANGECUSTOMITEMABIL -1 3 1 7
    CHANGECUSTOMITEMABIL -1 4 1 9
    CHANGECUSTOMITEMVALUE -1 1 = <$STR(N$附加攻击)>
    CHANGECUSTOMITEMVALUE -1 2 = <$STR(N$附加体力)>
    CHANGECUSTOMITEMVALUE -1 3 = <$STR(N$附加魔力)>
    CHANGECUSTOMITEMVALUE -1 4 = <$STR(N$附加真伤)>
    CHANGECUSTOMITEMABIL -1 1 0 250
    CHANGECUSTOMITEMABIL -1 2 0 253
    CHANGECUSTOMITEMABIL -1 3 0 70
    CHANGECUSTOMITEMABIL -1 4 0 254
    UpDateBoxItem 3
    goto @zhuanyi
    ##ELSEACT
    break




    [@转移2]

    #IF
    NOT CheckBoxItemCount 2
    #ACT
    MESSAGEBOX \\请放入要转移的装备!
    break

    #IF
    NOT CheckBoxItemCount 3
    #ACT
    MESSAGEBOX \\请放入接受转移的装备!
    break

    #IF
    equal <$BOXITEM[2].UPGRADECOUNT> 9
    checkitem 转星神水 1
    #ACT
    TAKE 转星神水  1
    SetUpgradeItem 3
    MOVR N91 300000 370000
    MOVR N92 100000 130000
    MOVR N93 2400 2700
    MOVR N94 1711111 2222222
    MOV <$STR(N$附加体力)> <$STR(N91)>
    MOV <$STR(N$附加魔力)> <$STR(N92)>
    MOV <$STR(N$附加攻击)> <$STR(N93)>
    MOV <$STR(N$附加真伤)> <$STR(N94)>
    SetNewItemValue -1 9 = 9
    CHANGEITEMUPGRADECOUNT -1 = 9
    CHANGECUSTOMITEMTEXT -1 [神圣鉴定]:
    CHANGECUSTOMITEMTEXTColor -1 146
    CHANGECUSTOMITEMABIL -1 1 3 0
    CHANGECUSTOMITEMABIL -1 2 3 0
    CHANGECUSTOMITEMABIL -1 3 3 0
    CHANGECUSTOMITEMABIL -1 4 3 0
    CHANGECUSTOMITEMABIL -1 1 2 1
    CHANGECUSTOMITEMABIL -1 2 2 2
    CHANGECUSTOMITEMABIL -1 3 2 3
    CHANGECUSTOMITEMABIL -1 4 2 4
    CHANGECUSTOMITEMABIL -1 1 1 3
    CHANGECUSTOMITEMABIL -1 2 1 6
    CHANGECUSTOMITEMABIL -1 3 1 7
    CHANGECUSTOMITEMABIL -1 4 1 9
    CHANGECUSTOMITEMVALUE -1 1 = <$STR(N$附加攻击)>
    CHANGECUSTOMITEMVALUE -1 2 = <$STR(N$附加体力)>
    CHANGECUSTOMITEMVALUE -1 3 = <$STR(N$附加魔力)>
    CHANGECUSTOMITEMVALUE -1 4 = <$STR(N$附加真伤)>
    UpDateBoxItem 3
    goto @zhuanyi
    ##ELSEACT
    break


    [@zhuanyi]
    #IF
    #ACT
    SetUpgradeItem 2
    #IF
    #ACT
    MOVR N11 2000 3000
    MOVR N12 800 2000
    MOVR N13 399 599
    MOVR N14 13000 18000
    SetNewItemValue -1 9 = 1
    CHANGEITEMUPGRADECOUNT -1 = 1
    CHANGECUSTOMITEMVALUE -1 1 = <$STR(N11)>
    CHANGECUSTOMITEMVALUE -1 2 = <$STR(N12)>
    CHANGECUSTOMITEMVALUE -1 3 = <$STR(N13)>
    CHANGECUSTOMITEMVALUE -1 4 = <$STR(N14)>
    UpDateBoxItem 2
    ReturnBoxItem 2
    ReturnBoxItem 3
    break




    上一篇:GOM清引擎传奇服务端通天塔第17层脚本 清理完地图内的怪物才能下一层
    下一篇:GOM引擎传奇一条龙今日土豪脚本,怎么申请每日神豪命令范例
    回复

    举报

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

    本版积分规则

    网络广告风险自担

    网络广告风险自担
    一休论坛在线客服
    收 起 客 服

    小黑屋|传奇一条龙|GM基地|GM版本库|一休论坛

    GMT+8, 2019-7-23 09:10 , Processed in 0.483601 second(s), 91 queries , Gzip On.

    传奇一条龙 GM基地 版本库 传奇论坛 传奇漏洞论坛 传奇服务端下载 传奇版本

    一休论坛资料来自网络仅供学习交流之用,用于商业后果自负

    快速回复 返回顶部 返回列表