设为首页收藏本站
开启辅助访问
快捷导航

热点推荐

司徒游论坛»论坛 › 传奇版块 › 技术脚本区 › GOM引擎的传奇一条龙开区版本星级转移脚本教程说明和范 ...

小喇叭+ 发布

01-16 02:17
01-16 02:04
01-13 17:30
返回列表 发新帖
查看: 2644|回复: 0

[脚本示例] GOM引擎的传奇一条龙开区版本星级转移脚本教程说明和范例使用司徒游

[复制链接]
admin
avatar

签到天数: 350 天

[LV.8]以坛为家I

7651

主题

255

回帖

31万

积分

司徒主管

Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20

UID
1
司徒币
260203
传世币
3000
元宝
0
在线时间
266 小时

最佳新人灌水之王

QQ
online_admin 发表于 2020-12-30 19:09:29 | 显示全部楼层 |阅读模式
[@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层脚本 清理完地图内的怪物才能下一层司徒游
下一篇：GEEM2传奇版本等级奖励脚本 GEE写入文本记录等级命令4tuu

相关帖子
回复

使用道具 举报

返回列表 发新帖
懒得打字嘛，点击右侧快捷回复 【乱回复灌水将给予禁言处理】
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋| 司徒游论坛

GMT+8, 2024-11-24 05:08 , Processed in 1.240592 second(s), 40 queries .

Powered by 4tuu.com X3.4

© 2020-2021 司徒游网单.

备案号:鄂ICP备2023000181号-3