装备添加元素NPC脚本-64GM论坛 - Powered by Discuz! Archiver

和怡6021 发表于 2023-5-19 14:55:09

装备添加元素NPC脚本

[@main]
#IF
CheckLevelEx > 1
#ACT
CloseBigDialogBox
Mov S20 <$WEAPON>
Mov S21 <$DRESS>
Mov S22 <$HELMET>
Mov S23 <$NECKLACE>
Mov S24 <$ARMRING_R>
Mov S25 <$ARMRING_L>
Mov S26 <$RING_R>
Mov S27 <$RING_L>
Mov S28 <$RIGHTHAND>
Mov S29 <$BELT>
Mov S30 <$BOOTS>
Mov S31 <$CHARM>
SetStringBlank S20 14 0
SetStringBlank S21 14 0
SetStringBlank S22 14 0
SetStringBlank S23 14 0
SetStringBlank S24 14 0
SetStringBlank S25 14 0
SetStringBlank S26 14 0
SetStringBlank S27 14 0
SetStringBlank S28 14 0
SetStringBlank S29 14 0
SetStringBlank S30 14 0
SetStringBlank S31 14 0
#SAY
<▁/AUTOCOLOR=249,95,70,133,146,241,238><▂/AUTOCOLOR=95,70,133,146,241,238,249><▃/AUTOCOLOR=70,133,146,241,238,249,95><▄/AUTOCOLOR=133,146,241,238,249,95,70><▅/AUTOCOLOR=146,241,238,249,95,70,133><▇/AUTOCOLOR=241,238,249,95,70,133,146><█/AUTOCOLOR=238,249,95,70,133,146,241>　<◆◆◆◆◆铁血国战◆◆◆◆◆/SCOLOR=151>　<█/AUTOCOLOR=238,249,95,70,133,146,241><▇/AUTOCOLOR=241,238,249,95,70,133,146><▅/AUTOCOLOR=146,241,238,249,95,70,133><▄/AUTOCOLOR=133,146,241,238,249,95,70><▃/AUTOCOLOR=70,133,146,241,238,249,95><▂/AUTOCOLOR=95,70,133,146,241,238,249><▁/AUTOCOLOR=249,95,70,133,146,241,238>\
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=141>\
{<$STR(S20)>/SCOLOR=149}<开启/@KYS01>　 {<$STR(S21)>/SCOLOR=149}<开启/@KYS02>\
{<$STR(S23)>/SCOLOR=149}<开启/@KYS04>　 {<$STR(S22)>/SCOLOR=149}<开启/@KYS03>　　<一次加4种元素/SCOLOR=250>\
{<$STR(S24)>/SCOLOR=149}<开启/@KYS05> {<$STR(S28)>/SCOLOR=149}<开启/@KYS09>　　<每种随机1-5点/SCOLOR=146>\
{<$STR(S25)>/SCOLOR=149}<开启/@KYS06>　 {<$STR(S29)>/SCOLOR=149}<开启/@KYS10>　　<每次1千万元宝/SCOLOR=243>\
{<$STR(S26)>/SCOLOR=149}<开启/@KYS07>　 {<$STR(S30)>/SCOLOR=149}<开启/@KYS11>　　<不满意可重刷/SCOLOR=239>\
{<$STR(S27)>/SCOLOR=149}<开启/@KYS08>　 {<$STR(S31)>/SCOLOR=149}<开启/@KYS12>\
<┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄/SCOLOR=141>\
[@KYS01]
#IF
CheckGameGold < 10000000
#ACT
MessageBox 不好意思，开启元素需要1000万元宝，腰包准备充足再来
Break
#IF
CHECKUSEITEM 1
CheckGameGold > 9999999
#ACT
Mov M7 1
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_1
Break
#IF
CheckLevelEx > 1
#ACT
MessageBox 武器位置没有装备，无法开启元素
Break

[@KYS02]
#IF
CheckGameGold < 10000000
#ACT
MessageBox 不好意思，开启元素需要1000万元宝，腰包准备充足再来
Break
#IF
CHECKUSEITEM 0
CheckGameGold > 9999999
#ACT
Mov M7 0
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_1
Break
#IF
CheckLevelEx > 1
#ACT
MessageBox 衣服位置没有装备，无法开启元素
Break

[@KYS03]
#IF
CheckGameGold < 10000000
#ACT
MessageBox 不好意思，开启元素需要1000万元宝，腰包准备充足再来
Break
#IF
CHECKUSEITEM 4
CheckGameGold > 9999999
#ACT
Mov M7 4
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_1
Break
#IF
CheckLevelEx > 1
#ACT
MessageBox 头盔位置没有装备，无法开启元素
Break

[@KYS04]
#IF
CheckGameGold < 10000000
#ACT
MessageBox 不好意思，开启元素需要1000万元宝，腰包准备充足再来
Break
#IF
CHECKUSEITEM 3
CheckGameGold > 9999999
#ACT
Mov M7 3
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_1
Break
#IF
CheckLevelEx > 1
#ACT
MessageBox 项链位置没有装备，无法开启元素
Break

[@KYS05]
#IF
CheckGameGold < 10000000
#ACT
MessageBox 不好意思，开启元素需要1000万元宝，腰包准备充足再来
Break
#IF
CHECKUSEITEM 6
CheckGameGold > 9999999
#ACT
Mov M7 6
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_1
Break
#IF
CheckLevelEx > 1
#ACT
MessageBox 左手镯位置没有装备，无法开启元素
Break

[@KYS06]
#IF
CheckGameGold < 10000000
#ACT
MessageBox 不好意思，开启元素需要1000万元宝，腰包准备充足再来
Break
#IF
CHECKUSEITEM 5
CheckGameGold > 9999999
#ACT
Mov M7 5
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_1
Break
#IF
CheckLevelEx > 1
#ACT
MessageBox 右手镯位置没有装备，无法开启元素
Break

[@KYS07]
#IF
CheckGameGold < 10000000
#ACT
MessageBox 不好意思，开启元素需要1000万元宝，腰包准备充足再来
Break
#IF
CHECKUSEITEM 8
CheckGameGold > 9999999
#ACT
Mov M7 8
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_1
Break
#IF
CheckLevelEx > 1
#ACT
MessageBox 左戒指位置没有装备，无法开启元素
Break

[@KYS08]
#IF
CheckGameGold < 10000000
#ACT
MessageBox 不好意思，开启元素需要1000万元宝，腰包准备充足再来
Break
#IF
CHECKUSEITEM 7
CheckGameGold > 9999999
#ACT
Mov M7 7
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_1
Break
#IF
CheckLevelEx > 1
#ACT
MessageBox 右戒指位置没有装备，无法开启元素
Break

[@KYS09]
#IF
CheckGameGold < 10000000
#ACT
MessageBox 不好意思，开启元素需要1000万元宝，腰包准备充足再来
Break
#IF
CHECKUSEITEM 2
CheckGameGold > 9999999
#ACT
Mov M7 2
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_1
Break
#IF
CheckLevelEx > 1
#ACT
MessageBox 勋章位置没有装备，无法开启元素
Break

[@KYS10]
#IF
CheckGameGold < 10000000
#ACT
MessageBox 不好意思，开启元素需要1000万元宝，腰包准备充足再来
Break
#IF
CHECKUSEITEM 10
CheckGameGold > 9999999
#ACT
Mov M7 10
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_1
Break
#IF
CheckLevelEx > 1
#ACT
MessageBox 腰带位置没有装备，无法开启元素
Break

[@KYS11]
#IF
CheckGameGold < 10000000
#ACT
MessageBox 不好意思，开启元素需要1000万元宝，腰包准备充足再来
Break
#IF
CHECKUSEITEM 11
CheckGameGold > 9999999
#ACT
Mov M7 11
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_1
Break
#IF
CheckLevelEx > 1
#ACT
MessageBox 靴子位置没有装备，无法开启元素
Break

[@KYS12]
#IF
CheckGameGold < 10000000
#ACT
MessageBox 不好意思，开启元素需要1000万元宝，腰包准备充足再来
Break
#IF
CHECKUSEITEM 12
CheckGameGold > 9999999
#ACT
Mov M7 12
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_1
Break
#IF
CheckLevelEx > 1
#ACT
MessageBox 宝石位置没有装备，无法开启元素
Break

[@KYSOK_1]
#IF
EQUAL M11 6
#ACT
MUL N11 <$STR(N11)> 10
#IF
#ACT
SetNewItemValue <$STR(M7)> 0 = 0
SetNewItemValue <$STR(M7)> 1 = 0
SetNewItemValue <$STR(M7)> 2 = 0
SetNewItemValue <$STR(M7)> 3 = 0
SetNewItemValue <$STR(M7)> 4 = 0
SetNewItemValue <$STR(M7)> 5 = 0
SetNewItemValue <$STR(M7)> 6 = 0
SetNewItemValue <$STR(M7)> 7 = 0
SetNewItemValue <$STR(M7)> <$STR(M11)> + <$STR(N11)>
Goto @KYSOK_2
Break

[@KYSOK_2]
#IF
EQUAL M12 <$STR(M11)>
EQUAL M12 7
#ACT
DEC M12 1
#IF
EQUAL M12 <$STR(M11)>
EQUAL M12 0
#ACT
INC M12 6
#IF
EQUAL M12 <$STR(M11)>
#ACT
INC M12 1
#IF
EQUAL M12 6
#ACT
MUL N12 <$STR(N12)> 10
#IF
#ACT
SetNewItemValue <$STR(M7)> <$STR(M12)> + <$STR(N12)>
Goto @KYSOK_3
Break

[@KYSOK_3]
#IF
EQUAL M13 <$STR(M12)>
EQUAL M13 7
#ACT
DEC M13 1
#IF
EQUAL M13 <$STR(M12)>
EQUAL M13 0
#ACT
INC M13 6
#IF
EQUAL M13 <$STR(M12)>
#ACT
INC M13 1

#IF
EQUAL M13 <$STR(M11)>
EQUAL M13 7
#ACT
DEC M13 1
#IF
EQUAL M13 <$STR(M11)>
EQUAL M13 0
#ACT
INC M13 6
#IF
EQUAL M13 <$STR(M11)>
#ACT
INC M13 1

#IF
EQUAL M13 <$STR(M12)>
EQUAL M13 7
#ACT
DEC M13 2
#IF
EQUAL M13 <$STR(M12)>
EQUAL M13 0
#ACT
INC M13 6
#IF
EQUAL M13 <$STR(M12)>
#ACT
INC M13 2

#IF
EQUAL M13 8
#ACT
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_1
Break

#IF
EQUAL M13 6
#ACT
MUL N13 <$STR(N13)> 10
#IF
#ACT
SetNewItemValue <$STR(M7)> <$STR(M13)> + <$STR(N13)>
Goto @KYSOK_4
Break

[@KYSOK_4]
#IF
EQUAL M14 <$STR(M13)>
EQUAL M14 7
#ACT
DEC M14 1
#IF
EQUAL M14 <$STR(M13)>
EQUAL M14 0
#ACT
INC M14 6
#IF
EQUAL M14 <$STR(M13)>
#ACT
INC M14 1

#IF
EQUAL M14 <$STR(M12)>
EQUAL M14 7
#ACT
DEC M14 1
#IF
EQUAL M14 <$STR(M12)>
EQUAL M14 0
#ACT
INC M14 6
#IF
EQUAL M14 <$STR(M12)>
#ACT
INC M14 1

#IF
EQUAL M14 <$STR(M11)>
EQUAL M14 7
#ACT
DEC M14 1
#IF
EQUAL M14 <$STR(M11)>
EQUAL M14 0
#ACT
INC M14 6
#IF
EQUAL M14 <$STR(M11)>
#ACT
INC M14 1

#IF
EQUAL M14 <$STR(M13)>
EQUAL M14 7
#ACT
DEC M14 2
#IF
EQUAL M14 <$STR(M13)>
EQUAL M14 0
#ACT
INC M14 6
#IF
EQUAL M14 <$STR(M13)>
#ACT
INC M14 2

#IF
EQUAL M14 <$STR(M12)>
EQUAL M14 7
#ACT
DEC M14 2
#IF
EQUAL M14 <$STR(M12)>
EQUAL M14 0
#ACT
INC M14 6
#IF
EQUAL M14 <$STR(M12)>
#ACT
INC M14 2

#IF
EQUAL M14 <$STR(M13)>
EQUAL M14 7
#ACT
DEC M14 3
#IF
EQUAL M14 <$STR(M13)>
EQUAL M14 0
#ACT
INC M14 6
#IF
EQUAL M14 <$STR(M13)>
#ACT
INC M14 3

#IF
EQUAL M14 <$STR(M12)>
EQUAL M14 7
#ACT
DEC M14 3
#IF
EQUAL M14 <$STR(M12)>
EQUAL M14 0
#ACT
INC M14 6
#IF
EQUAL M14 <$STR(M12)>
#ACT
INC M14 3

#IF
EQUAL M14 8
#ACT
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_1
Break

#IF
EQUAL M14 <$STR(M11)>
#ACT
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_4
Break

#IF
EQUAL M14 <$STR(M12)>
#ACT
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_4
Break

#IF
EQUAL M14 <$STR(M13)>
#ACT
Movr M11 0 8
Movr M12 0 8
Movr M13 0 8
Movr M14 0 8
Movr N11 1 6
Movr N12 1 6
Movr N13 1 6
Movr N14 1 6
Goto @KYSOK_4
Break

#IF
EQUAL M14 6
#ACT
MUL N14 <$STR(N14)> 10
#IF
CheckGameGold > 9999999
#ACT
GameGold - 10000000
SetNewItemValue <$STR(M7)> <$STR(M14)> + <$STR(N14)>
Goto @SAYOK
Break
#IF
ChecklevelEx > 1
#ACT
Close
MessageBox 不好意思，开启元素需要1000万元宝，准备好腰包再来
Break

[@SAYOK]
#IF
EQUAL M7 0
#ACT
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$DRESS>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$DRESS>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$DRESS>的元素属性
MessageBox 元素开启完成，打开装备栏查看元素属性！
Break

#IF
EQUAL M7 1
#ACT
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$WEAPON>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$WEAPON>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$WEAPON>的元素属性
MessageBox 元素开启完成，打开装备栏查看元素属性！
Break

#IF
EQUAL M7 2
#ACT
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$RIGHTHAND>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$RIGHTHAND>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$RIGHTHAND>的元素属性
MessageBox 元素开启完成，打开装备栏查看元素属性！
Break

#IF
EQUAL M7 3
#ACT
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$NECKLACE>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$NECKLACE>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$NECKLACE>的元素属性
MessageBox 元素开启完成，打开装备栏查看元素属性！
Break

#IF
EQUAL M7 4
#ACT
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$HELMET>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$HELMET>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$HELMET>的元素属性
MessageBox 元素开启完成，打开装备栏查看元素属性！
Break

#IF
EQUAL M7 5
#ACT
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$ARMRING_L>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$ARMRING_L>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$ARMRING_L>的元素属性
MessageBox 元素开启完成，打开装备栏查看元素属性！
Break

#IF
EQUAL M7 6
#ACT
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$ARMRING_R>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$ARMRING_R>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$ARMRING_R>的元素属性
MessageBox 元素开启完成，打开装备栏查看元素属性！
Break

#IF
EQUAL M7 7
#ACT
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$RING_L>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$RING_L>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$RING_L>的元素属性
MessageBox 元素开启完成，打开装备栏查看元素属性！
Break

#IF
EQUAL M7 8
#ACT
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$RING_R>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$RING_R>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$RING_R>的元素属性
MessageBox 元素开启完成，打开装备栏查看元素属性！
Break

#IF
EQUAL M7 10
#ACT
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$BELT>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$BELT>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$BELT>的元素属性
MessageBox 元素开启完成，打开装备栏查看元素属性！
Break

#IF
EQUAL M7 11
#ACT
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$BOOTS>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$BOOTS>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$BOOTS>的元素属性
MessageBox 元素开启完成，打开装备栏查看元素属性！
Break

#IF
EQUAL M7 12
#ACT
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$CHARM>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$CHARM>的元素属性
GuildNoticeMsg 146 173 【%d】:[<$USERNAME>]开启<$CHARM>的元素属性
MessageBox 元素开启完成，打开装备栏查看元素属性！
Break

青龙传说 发表于 2023-11-20 16:49:52

楼主发贴辛苦了，谢谢楼主分享！

玩命道盾英雄 发表于 2023-11-20 18:50:49

传奇论坛里面相对来说比较好的一个！感谢站长分享的技术教程。

多情公益 发表于 2023-11-20 23:25:10

开传奇一条龙不求人，自己学习架设。

道盾合击 发表于 2023-11-21 05:00:32

楼主发贴辛苦了，谢谢楼主分享！

迷失沉默 发表于 2023-11-21 10:25:35

楼主发贴辛苦了，谢谢楼主分享！

独家迷失 发表于 2023-11-21 14:08:01

感谢楼主提供这么好的论坛！

红牛迷失 发表于 2023-11-21 19:10:05

比较全的传奇教程分享网站，站长辛苦了。

金币传奇 发表于 2023-11-22 01:05:05

这东西我收了！

牛家村专属 发表于 2023-11-22 07:03:56

楼主发贴辛苦了，谢谢楼主分享！

页: [1] 2

传奇版本_GM基地_传奇一条龙_单机服务端下载-64GM论坛's Archiver

装备添加元素NPC脚本