Legendm2引擎龙的传人属性加成变色脚本

admin · 发表于 2016-11-10 15:37:51

[@龙的传人NPC]
{
<COLOR=clLime 开启龙的传人需要>2个龙鳞碎片才能开启，<COLOR=clLime 时长>5<COLOR=clLime 分钟>\
<COLOR=clLime 死亡，小退神力都不消失，可以累计开启，时间也累计>\
<COLOR=clLime 开启神力后人物名字变成><COLOR=clFuchsia 紫色>，<COLOR=clLime 并隐藏特殊属性:攻魔道增加5点>\
<2个龙鳞碎片开启神力[url=]/@kaiq[/url]> <COLOR=clRed 你当前龙的传人剩余时间：><$HUMAN(神力时间)><COLOR=clRed 秒>\ \
<总换龙鳞碎片[url=]/@duih[/url]> <COLOR=clRed 每个龙鳞碎片需要一个星王装备兑换>\
[@kaiq]
#if
CHECKITEM 龙鳞碎片 2
#ACT
TAKE 龙鳞碎片 2
CALCVAR HUMAN 神力时间 + 300
SAVEVAR HUMAN 神力时间 ..\QuestDiary\数据文件\神力时间保存.txt
AbilityAdd 4 5 <$HUMAN(神力时间)>
AbilityAdd 5 5 <$HUMAN(神力时间)>
AbilityAdd 6 5 <$HUMAN(神力时间)>
GMexecute TestStatus 4 <$HUMAN(神力时间)>
SetScTimer 3 1
MESSAGEBOX 恭喜你，成功开启龙的传人，累计剩余：<$HUMAN(神力时间)>秒！
SENDMSG 0 恭喜玩家【<$USERNAME>】成功开启[龙的传人]！
#ELSEACT
MESSAGEBOX 您确认是否有2个[龙鳞碎片]
[@duih]
<COLOR=$73008c ---------------------------------------------------------->\
星王首饰1个可以换取1个龙鳞碎片，每次需要2个龙鳞碎片完成任务！\
<COLOR=$73008c ---------------------------------------------------------->\
　　<COLOR=clLime 「温馨提示」>：<COLOR=clAqua 本功能为一键回收[星王首饰](战魔道)>\
<COLOR=$73008c ---------------------------------------------------------->\
　　　　　　<COLOR=clAqua 请将包裹内星王贵重首饰放入英雄包裹！>\
<COLOR=$73008c ---------------------------------------------------------->\
　　　　　　　　　　　<一键回收星王首饰[url=]/@huishou>\[/url]
<COLOR=$73008c ---------------------------------------------------------->\
[@huishou]
#IF
CHECKITEM 星王战链 1
#ACT
TAKE 星王战链 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王战镯 1
#ACT
TAKE 星王战镯 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王战戒 1
#ACT
TAKE 星王战戒 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王战带 1
#ACT
TAKE 星王战带 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王战靴 1
#ACT
TAKE 星王战靴 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王战盔 1
#ACT
TAKE 星王战盔 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王法链 1
#ACT
TAKE 星王法链 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王法镯 1
#ACT
TAKE 星王法镯 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王法戒 1
#ACT
TAKE 星王法戒 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王法带 1
#ACT
TAKE 星王法带 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王法靴 1
#ACT
TAKE 星王法靴 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王法盔 1
#ACT
TAKE 星王法盔 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王道链 1
#ACT
TAKE 星王道链 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王道镯 1
#ACT
TAKE 星王道镯 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王道戒 1
#ACT
TAKE 星王道戒 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王道带 1
#ACT
TAKE 星王道带 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王道靴 1
#ACT
TAKE 星王道靴 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
#IF
CHECKITEM 星王道盔 1
#ACT
TAKE 星王道盔 1
give 龙鳞碎片 1
SENDMSG 6  〖提示〗成功兑换【龙鳞碎片】一个!
DELAYGOTO 1 @huishou
break
}

完整脚本回复下载：

游客，如果您要查看本帖隐藏内容请回复

3036 · 发表于 2016-12-6 15:23:01

[@main]
<color=clFuchsia 极品属性转移：><color=clRed 可以把任何极品装备属性转移到身上的首饰中。>\
<color=clFuchsia 属性转移条件：><color=clRed 首饰1.5W元宝+火云石*5 物品衣服2.5W元宝+火云石*10>\
<武  器极品属性转移/@武器>  |  <color=clFuchsia 当前佩戴武  器：>[ <$WEAPON> ]\
<衣  服极品属性转移/@衣服>  |  <color=clFuchsia 当前佩戴衣  服：>[ <$DRESS> ]\
<头  盔极品属性转移/@头盔>  |  <color=clFuchsia 当前佩戴头  盔：>[ <$HELMET> ]\
<项  链极品属性转移/@项链>  |  <color=clFuchsia 当前佩戴项  链：>[ <$NECKLACE> ]\
<右手镯极品属性转移/@右手镯>  |  <color=clFuchsia 当前佩戴右手镯：>[ <$ARMRING_R> ]\
<左手镯极品属性转移/@左手镯>  |  <color=clFuchsia 当前佩戴左手镯：>[ <$ARMRING_L> ]\
<右戒指极品属性转移/@右戒指>  |  <color=clFuchsia 当前佩戴右戒指：>[ <$RING_R> ]\
<左戒指极品属性转移/@左戒指>  |  <color=clFuchsia 当前佩戴左戒指：>[ <$RING_L> ]\
[@项链]
#IF
CHECKUSEITEM 3
#ACT
MOV S60 <$NECKLACE>
MOV S61 项链
MOV S62 NECKLACE
MOV M63 2
MOV M64 3
MOV M65 4
MOV M66 3
MOV M67 5
MOV M68 15000
DELAYCALL 5 @选择区域
#elseact
MessageBox [错误提示]：你没有穿戴任何[项链]，不能属性转移。

[@左戒指]
#IF
CHECKUSEITEM 7
#ACT
MOV S60 <$RING_L>
MOV S61 左戒指
MOV S62 RING
MOV M63 2
MOV M64 3
MOV M65 4
MOV M66 7
MOV M67 5
MOV M68 15000
DELAYCALL 5 @选择区域
#elseact
MessageBox [错误提示]：你没有穿戴任何[左戒指]，不能属性转移。
[@右戒指]
#IF
CHECKUSEITEM 8
#ACT
MOV S60 <$RING_R>
MOV S61 右戒指
MOV S62 RING
MOV M63 2
MOV M64 3
MOV M65 4
MOV M66 8
MOV M67 5
MOV M68 15000
DELAYCALL 5 @选择区域
#elseact
MessageBox [错误提示]：你没有穿戴任何[右戒指]，不能属性转移。
[@左手镯]
#IF
CHECKUSEITEM 5
#ACT
MOV S60 <$ARMRING_L>
MOV S61 左手镯
MOV S62 ARMRING
MOV M63 2
MOV M64 3
MOV M65 4
MOV M66 5
MOV M67 5
MOV M68 15000
DELAYCALL 5 @选择区域
#elseact
MessageBox [错误提示]：你没有穿戴任何[左手镯]，不能属性转移。
[@右手镯]
#IF
CHECKUSEITEM 6
#ACT
MOV S60 <$ARMRING_R>
MOV S61 右手镯
MOV S62 ARMRING
MOV M63 2
MOV M64 3
MOV M65 4
MOV M66 6
MOV M67 5
MOV M68 15000
DELAYCALL 5 @选择区域
#elseact
MessageBox [错误提示]：你没有穿戴任何[右手镯]，不能属性转移。
[@头盔]
#IF
CHECKUSEITEM 4
#ACT
MOV S60 <$HELMET>
MOV S61 头盔
MOV S62 HELMET
MOV M63 2
MOV M64 3
MOV M65 4
MOV M66 4
MOV M67 5
MOV M68 15000
DELAYCALL 5 @选择区域
#elseact
MessageBox [错误提示]：你没有穿戴任何[头盔]，不能属性转移。

[@衣服]
#IF
CHECKUSEITEM 0
#ACT
MOV S60 <$DRESS>
MOV S61 衣服
MOV S62 DRESS
MOV M63 2
MOV M64 3
MOV M65 4
MOV M66 0
MOV M67 10
MOV M68 25000
DELAYCALL 5 @选择区域
#elseact
MessageBox [错误提示]：你没有穿戴任何[衣服]，不能属性转移。
[@武器]
#IF
CHECKUSEITEM 1
#ACT
MOV S60 <$WEAPON>
MOV S61 武器
MOV S62 WEAPON
MOV M63 0
MOV M64 1
MOV M65 2
MOV M66 1
MOV M67 10
MOV M68 25000
DELAYCALL 5 @选择区域
#elseact
MessageBox [错误提示]：你没有穿戴任何[武器]，不能属性转移。
[@选择区域]
<color=clFuchsia 属性转移条件：>已经选择[<$STR(S60)>]需要<$STR(M68)>元宝,火云石*<$STR(M67)>个\ \
<color=clAqua 你选择是将极品属性转移到当前佩戴><$STR(S61)>：[<$STR(S60)>]\ \
　          <确认开始极品属性转移/@转移>\ \
<color=clFuchsia 注意：><color=clRed 此操作将覆盖><$STR(S60)><color=clRed 已拥有的所有极品属性，幸运保留。>\
<color=clFuchsia 说明：><color=clRed 将OK框内的极品属性转移到>[<$STR(S60)>]。\
<color=clFuchsia 说明：><color=clRed OK框内的装备将被系统收回。><color=clYellow 请勿放入没有极品属性的装备>\
[@转移]
#IF
#ACT
QUERYITEMDLG 放入极品属性<$STR(S61)> @转移属性 0
break
[@转移属性]
#IF
CHECKDLGITEMTYPE <$STR(S62)>
CHECKGAMEGOLD > <$STR(M68)>
checkitem 火云石 <$STR(M67)>
#ACT
GAMEGOLD - <$STR(M68)>
take 火云石 <$STR(M67)>
MOV M60 0
MOV M61 0
MOV M62 0
GETDLGITEMVALUE M60 <$STR(M63)>
GETDLGITEMVALUE M61 <$STR(M64)>
GETDLGITEMVALUE M62 <$STR(M65)>
TAKEDLGITEM
GMEXECUTE 改属性 <$STR(M66)> <$STR(M63)> <$STR(M60)>
GMEXECUTE 改属性 <$STR(M66)> <$STR(M64)> <$STR(M61)>
GMEXECUTE 改属性 <$STR(M66)> <$STR(M65)> <$STR(M62)>
SendMSG 0 [属性转移]：恭喜[<$USERNAME>]，成功转移属性到装备[<$STR(S60)>]上。 18 249
SendMSG 0 [属性转移]：恭喜[<$USERNAME>]，成功转移属性到装备[<$STR(S60)>]上。 18 249
#elseact
MessageBox [错误提示]：你放入的不是<$STR(S61)>，或者材料不齐全。
break

zl6803586 · 发表于 2017-4-1 21:35:09

Legendm2引擎装备回收排行榜奖励脚本

xiang123 · 发表于 2017-4-12 12:26:58

1111111111111111111111

zq5550905 · 发表于 2017-5-4 17:45:33

11111111111111111111111

haoren123 · 发表于 2017-7-18 11:40:11

谢谢谢谢谢谢

pwb6801267 · 发表于 2017-7-19 00:56:07

的防守打法水电费士大夫撒的

wslyy611 · 发表于 2017-7-31 16:58:06

55555555555555555555

sdzdw · 发表于 2019-3-21 16:26:27

Legendm2引擎龙的传人属性加成变色脚本 [修改]

q15149711 · 发表于 2019-11-28 13:43:44

迷失传奇服务端实在太少了，希望管理员多更新点啊！有没有和我一样想法的朋友？

GM起点

[传奇脚本] Legendm2引擎龙的传人属性加成变色脚本

相关帖子