免费列表
搜索
网络广告 风险自担
趣游论坛»论坛 › 脚本教程发布区 › 传奇脚本教程 › GOM引擎的传奇一条龙开区版本星级转移脚本教程说明和范 ...
12345678910... 11下一页
返回列表 发新帖

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

  [复制链接]
趣游论坛 发表于 2019-6-28 10:11:17 | 显示全部楼层 |阅读模式
6877105
20190627153413.png

[@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：需要2游戏点/AUTOCOLOR=146>          <游戏点转移/@转移>\ \

         <转移方式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

回复

使用道具 举报

趣游 发表于 2019-6-28 10:11:20 | 显示全部楼层 沙发
把沙发带走。
回复 支持 反对

使用道具 举报

紫夜 发表于 2019-6-28 10:29:52 | 显示全部楼层 板凳
向楼主学习
回复 支持 反对

使用道具 举报

卜卦 发表于 2019-6-28 11:44:03 | 显示全部楼层 地板
不错的脚本，感谢楼主
回复 支持 反对

使用道具 举报

聆听 发表于 2019-6-28 13:00:34 | 显示全部楼层 5#
是爷们的娘们的都帮顶！大力支持
回复 支持 反对

使用道具 举报

豪杰 发表于 2019-6-28 13:09:03 | 显示全部楼层 6#
介是神马？！！
回复 支持 反对

使用道具 举报

天涯 发表于 2019-6-28 13:59:59 | 显示全部楼层 7#
介是神马？！！
回复 支持 反对

使用道具 举报

熟悉的陌生人 发表于 2019-6-28 14:07:50 | 显示全部楼层 8#
顶起顶起顶起
回复 支持 反对

使用道具 举报

飞鱼 发表于 2019-6-28 14:43:57 | 显示全部楼层 9#
支持，赞一个
回复 支持 反对

使用道具 举报

遥遥无期ING 发表于 2019-6-28 15:08:44 | 显示全部楼层 10#
确实不错，顶先
回复 支持 反对

使用道具 举报

趣游论坛管理员

关注0

粉丝2

帖子13199

发布主题
图片广告
网络广告 风险自担
一周下载排行最近7x24小时热帖
下一页 »
12345678910... 11下一页
返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|关于我们|会员加入|网站介绍|( 湘ICP备2021013222号-1 )|网站地图

GMT+8, 2024-12-24 10:53 , Processed in 0.229061 second(s), 38 queries . 传奇版本库GM部落交流论坛