人物狂暴和龙的传人神力护身

meinvwudi · 6 月 '22

NPC内容

[@main]

#say
<COLOR=clRed ──────────────────────────────>\
　　　<COLOR=$0079FF 〝≈><COLOR=$00A0FF 九州><COLOR=$00C2FF 合><COLOR=$00D3FF 击><COLOR=$00E4FF ≈><COLOR=$00F5FF 正><COLOR=$00FFF8 版><COLOR=$00FFE7 授><COLOR=$00FFD6 权><COLOR=$00FFB4 ≈><COLOR=$00FFB4 公><COLOR=$00FFD6 司><COLOR=$00FFE7 运><COLOR=$00FFF8 营><COLOR=$00F5FF ≈><COLOR=$00E4FF 独><COLOR=$00D3FF 家><COLOR=$00C2FF 奉><COLOR=$00B1FF 献><COLOR=$0079FF ≈〞>\
<COLOR=clRed ──────────────────────────────>\
．<COLOR=clCream 来自玛珐大陆的通士.不知您可曾听说过><COLOR=clFuchsia 【神力护身】>~~~\
．<COLOR=clCream 现在魔兽入侵大陆~我需要一批有实力的勇士来征服魔兽！>\
．<COLOR=clFuchsia 如果你交给我><COLOR=clLime 15金币><COLOR=clFuchsia 。我可以帮你开启神力护身助你斩尽妖魔>\
．<COLOR=clFuchsia 神力护身><COLOR=clLime :开启后主号HP+10000！>\
．<COLOR=clFuchsia 被怪物杀死或者下线不消失.被玩家杀死封号消失>\
．<COLOR=clFuchsia 杀死神力护身者可获得><COLOR=clLime 5金币！>         【<成为神力护身/@传人>】\


[@传人]
#IF
CHECK [168] 0
NOT CHECKTITLE 神力护身
checkgold  15
#ACT
take 金币 15
SET [168] 1
CONFERTITLE 神力护身
; #CALL [\Mir2m2人物封号脚本(免费脚本群.347979)\Mir2m2人物封号脚本.txt] @Mir2m2人物封号脚本QM
;#CALL [\系统功能\属性脚本.txt] @Mir2m2英雄封号脚本
SendMsg 0 恭喜玩家[<$USERNAME>]花费“15金币”开启神力护身.杀死他可获得了“5金币”奖励  251 249
SendMsg 0 恭喜玩家[<$USERNAME>]花费“15金币”开启神力护身.杀死他可获得了“5金币”奖励  251 249
SendMsg 0 恭喜玩家[<$USERNAME>]花费“15金币”开启神力护身.杀死他可获得了“5金币”奖励  251 249
MESSAGEBOX 恭喜您成功开启[神力护身]+[英雄上线奖励全属性+100]+[人物HP+10000]\　\请您小退上线以便获得封号和属性奖励!!
break
#ELSEACT
MESSAGEBOX 您没有15金币，无法开启“神力护身”！\　\或者你已经是神力护身了！
break

meinvwudi · 6 月 '22

QF杀人触发脚本


[@PlayDie]



#IF
ISONMAP XINGHUI
#ACT
SENDMSG 5 [%s]行会战争中光荣牺牲了！！
#Act
SENDMSG 5 提示:[%s]恭喜你挂了！死亡地点:[%M].坐标:[%x:%y]

#IF
KillByHum
ISONMAP QFJQ
<$KILLER>.ISONMAP QFJQ
#ACT
<$KILLER>.GAMEGOLD + 100
SendMsg 0 全服激情：【<$KILLER>】战胜【%S】，获得100元宝激情奖励！





#IF
KILLBYHUM
check [168] 0
#ACT
MOV A33 <$USERNAME>
MOV A34 <$KILLER>

DELAYGOTO 1 @检测杀人2
delayGoto 6000 @复活
CALCVAR HUMAN sw + 1
SAVEVAR HUMAN sw ..\QuestDiary\龙龟数据\死亡.txt
SENDMSG 1 [丑闻]:玩家[<$KILLER>]在:%m(%x:%y)把玩家[<$USERNAME>]干掉了！ 255 0
Close

#IF
KILLBYHUM
check [168] 1
#ACT
MOV A33 <$USERNAME>
MOV A34 <$KILLER>
SET [168] 0
DEPRIVETITLE 神力护身
<$KILLER>.give 金币 5
SendMsg 1 [<$KILLER>]把“开启神力护身的”[<$USERNAME>]杀害了.获得了“5金币”奖励  251 249  10
SendMsg 1 [<$KILLER>]把“开启神力护身的”[<$USERNAME>]杀害了.获得了“5金币”奖励  251 249  
SendMsg 1 [<$KILLER>]把“开启神力护身的”[<$USERNAME>]杀害了.获得了“5金币”奖励  251 249  
SendMsg 1 [<$KILLER>]把“开启神力护身的”[<$USERNAME>]杀害了.获得了“5金币”奖励  251 249  
SendMsg 6 您被杀害了“龙的传人”封号被取消  250  3
delayGoto 6000 @复活
CALCVAR HUMAN sw + 1
SAVEVAR HUMAN sw ..\QuestDiary\龙龟数据\死亡.txt
SENDMSG 1 [丑闻]:玩家[<$KILLER>]在:%m(%x:%y)把玩家[<$USERNAME>]干掉了！ 255 0
Close


#ElseAct
delayGoto 6000 @复活
SendMsg 1 凶残的[<$MONKILLER>]在%m(%x:%y)把[<$USERNAME>]给分尸了！！ 250  0
SendMsg 1 凶残的[<$MONKILLER>]在%m(%x:%y)把[<$USERNAME>]给分尸了！！ 250  0
break

meinvwudi · 6 月 '22

人物上线给属性脚本

;名字颜色：【D9】可设置赋值1-255的颜色，【D20】设置赋值大于0为七彩变色
;属性累加：D10-D16分别代表0-6个属性，检测某个条件满足则INC对应的D10-D16即可累计附加属性
;属性累加：D10为HP，D11为MP，D12为防御，D13为魔防，D14为攻击，D15为魔法，D16为道术
;封号累加：S1代表封号，检测某个条件满足INC S1 即可累计封号，封号名前加符号：\

[@Mir2m2人物封号脚本QM]
{
#ACT

DELAYGOTO 1 @Mir2m2人物封号脚本
[@Mir2m2人物封号脚本]
#IF
CHECKLEVELEX > 0
#ACT
MOV S1 
MOV D9 0
MOV D10 0
MOV D11 0
MOV D12 0
MOV D13 0
MOV D14 0
MOV D15 0
MOV D16 0
MOV D20 0

;【↓手动添加封号段】


#IF
checklevelex > 0
#ACT
MOV D8 0
MOV D21 0
MOV D22 0
MOV D23 0
#IF
EQUAL D8 0
CHECKVAR GLOBAL 捐献人物姓名1 = <$USERNAME>
#act
MOV D8 1
;INC S1 \【国王】
INC D14 10
INC D15 10
INC D16 10
MOV D21 500
MOV D22 300
MOV D23 200
#IF
EQUAL D8 0
CHECKVAR GLOBAL 捐献人物姓名2 = <$USERNAME>
#act
MOV D8 1
;INC S1 \【公爵】
INC D14 8
INC D15 8
INC D16 8
MOV D21 250
MOV D22 165
MOV D23 100
#IF
EQUAL D8 0
CHECKVAR GLOBAL 捐献人物姓名3 = <$USERNAME>
#act
MOV D8 1
;INC S1 \【侯爵】
INC D14 6
INC D15 6
INC D16 6
MOV D21 200
MOV D22 130
MOV D23 75
#IF
EQUAL D8 0
CHECKVAR GLOBAL 捐献人物姓名4 = <$USERNAME>
#act
MOV D8 1
;INC S1 \【伯爵】
INC D14 4
INC D15 4
INC D16 4
MOV D21 150
MOV D22 100
MOV D23 55
#IF
EQUAL D8 0
CHECKVAR GLOBAL 捐献人物姓名5 = <$USERNAME>
#act
MOV D8 1
;INC S1 \【子爵】
INC D14 2
INC D15 2
INC D16 2
MOV D21 100
MOV D22 70
MOV D23 40

#IF
EQUAL D8 0
checkvar human 捐献个人数量A ? $(捐献人物上榜数量)
#act

MOV D8 1
;INC S1 \【男爵】
INC D14 1
INC D15 1
INC D16 1
MOV D21 60
MOV D22 35
MOV D23 20


#IF
LARGE D21 0
checkjob warrior
#ACT
INC D10 <$STR(D21)>
#IF
LARGE D22 0
checkjob taoist
#ACT
INC D10 <$STR(D22)>
#IF
LARGE D23 0
checkjob wizard
#ACT
INC D10 <$STR(D23)>

#if
check [168] 1
CHECKTITLE  神力护身 = 1
#act
inc D10 10000

;【↑手动添加封号段】

#IF
large D9 0
SMALL D9 256
#act
CHANGENAMECOLOR <$STR(D9)>
#IF
EQUAL D20 0
CHECKVAR HUMAN 名字七彩变色 > 0
#ACT
CALCVAR HUMAN 名字七彩变色 = 0
#IF
LARGE D20 0
CHECKVAR HUMAN 名字七彩变色 = 0
#act
DELAYGOTO 1 @Mir2m2名字七彩变色
CALCVAR HUMAN 名字七彩变色 = 1
#IF
EQUAL S1 
#ACT
;SETRANKLEVELNAME %s
#ELSEACT
;SETRANKLEVELNAME %s<$STR(S1)>
#IF
EQUAL D10 <$ABILITYADDPOINT0>
#ACT
MOV D17 0
#ELSEACT
MOV D17 1

#IF
EQUAL D17 1
LARGE D10 0
#ACT
ABILITYADD 0 <$STR(D10)> 9999999


#IF
EQUAL D17 1
EQUAL D10 0
#ACT
ABILITYADD 0 0 1


[@bak]
#IF
EQUAL D11 <$ABILITYADDPOINT1>
#ACT
MOV D17 0
#ELSEACT
MOV D17 1

#IF
EQUAL D17 1
LARGE D11 0
#ACT
ABILITYADD 1 <$STR(D11)> 9999999

#IF
EQUAL D17 1
EQUAL D11 0
#ACT
ABILITYADD 1 0 1

#IF
EQUAL D12 <$ABILITYADDPOINT2>
#ACT
MOV D17 0
#ELSEACT
MOV D17 1

#IF
EQUAL D17 1
LARGE D12 0
#ACT
;ABILITYADD 2 <$STR(D12)> 9999999
#IF
EQUAL D17 1
EQUAL D12 0
#ACT
;ABILITYADD 2 0 1
#IF
EQUAL D13 <$ABILITYADDPOINT3>
#ACT
MOV D17 0
#ELSEACT
MOV D17 1
#IF
EQUAL D17 1
LARGE D13 0
#ACT
;ABILITYADD 3 <$STR(D13)> 9999999
#IF
EQUAL D17 1
EQUAL D13 0
#ACT
;ABILITYADD 3 0 1
#IF
EQUAL D14 <$ABILITYADDPOINT4>
#ACT
MOV D17 0
#ELSEACT
MOV D17 1
#IF
EQUAL D17 1
LARGE D14 0
#ACT
ABILITYADD 4 <$STR(D14)> 9999999
#IF
EQUAL D17 1
EQUAL D14 0
#ACT
ABILITYADD 4 0 1
#IF
EQUAL D15 <$ABILITYADDPOINT5>
#ACT
MOV D17 0
#ELSEACT
MOV D17 1
#IF
EQUAL D17 1
LARGE D15 0
#ACT
ABILITYADD 5 <$STR(D15)> 9999999
#IF
EQUAL D17 1
EQUAL D15 0
#ACT
ABILITYADD 5 0 1
#IF
EQUAL D16 <$ABILITYADDPOINT6>
#ACT
MOV D17 0
#ELSEACT
MOV D17 1
#IF
EQUAL D17 1
LARGE D16 0
#ACT
ABILITYADD 6 <$STR(D16)> 9999999
#IF
EQUAL D17 1
EQUAL D16 0
#ACT
ABILITYADD 6 0 1

[@Mir2m2英雄封号脚本]
#IF
CHECKHEROONLINE
#ELSEACT
BREAK
#IF
CHECKLEVELEX > 0
#ACT
MOV D10 0
MOV D11 0
MOV D12 0
MOV D13 0
MOV D14 0
MOV D15 0
MOV D16 0

;【↓手动添加英雄属性段】


#IF
checklevelex > 0
#ACT
MOV D8 0
MOV D21 0
MOV D22 0
MOV D23 0
#IF
EQUAL D8 0
CHECKVAR GLOBAL 捐献主号姓名1 = <$USERNAME>
#act
MOV D8 1
INC D14 10
INC D15 10
INC D16 10
MOV D21 500
MOV D22 300
MOV D23 200
#IF
EQUAL D8 0
CHECKVAR GLOBAL 捐献主号姓名2 = <$USERNAME>
#act
MOV D8 1
INC D14 8
INC D15 8
INC D16 8
MOV D21 250
MOV D22 165
MOV D23 100
#IF
EQUAL D8 0
CHECKVAR GLOBAL 捐献主号姓名3 = <$USERNAME>
#act
MOV D8 1
INC D14 6
INC D15 6
INC D16 6
MOV D21 200
MOV D22 130
MOV D23 75
#IF
EQUAL D8 0
CHECKVAR GLOBAL 捐献主号姓名4 = <$USERNAME>
#act
MOV D8 1
INC D14 4
INC D15 4
INC D16 4
MOV D21 150
MOV D22 100
MOV D23 55
#IF
EQUAL D8 0
CHECKVAR GLOBAL 捐献人物姓名5 = <$USERNAME>
#act
MOV D8 1
INC D14 2
INC D15 2
INC D16 2
MOV D21 100
MOV D22 70
MOV D23 40
#IF
EQUAL D8 0
checkvar human 捐献个人数量B ? $(捐献英雄上榜数量)
#act
MOV D8 1
INC D14 1
INC D15 1
INC D16 1
MOV D21 60
MOV D22 35
MOV D23 20
#IF
LARGE D21 0
H.checkjob warrior
#ACT
INC D10 <$STR(D21)>
#IF
LARGE D22 0
H.checkjob taoist
#ACT
INC D10 <$STR(D22)>
#IF
LARGE D23 0
H.checkjob wizard
#ACT
INC D10 <$STR(D23)>


;【↑手动添加英雄属性段】

#IF
EQUAL D10 <$H.ABILITYADDPOINT0>
#ACT
MOV D17 0
#ELSEACT
MOV D17 1
#IF
EQUAL D17 1
LARGE D10 0
#ACT
H.ABILITYADD 0 <$STR(D10)> 9999999
#IF
EQUAL D17 1
EQUAL D10 0
#ACT
H.ABILITYADD 0 0 1
#IF
EQUAL D11 <$H.ABILITYADDPOINT1>
#ACT
MOV D17 0
#ELSEACT
MOV D17 1
#IF
EQUAL D17 1
LARGE D11 0
#ACT
H.ABILITYADD 1 <$STR(D11)> 9999999
#IF
EQUAL D17 1
EQUAL D11 0
#ACT
H.ABILITYADD 1 0 1
#IF
EQUAL D12 <$H.ABILITYADDPOINT2>
#ACT
MOV D17 0
#ELSEACT
MOV D17 1
#IF
EQUAL D17 1
LARGE D12 0
#ACT
;H.ABILITYADD 2 <$STR(D12)> 9999999
#IF
EQUAL D17 1
EQUAL D12 0
#ACT
;H.ABILITYADD 2 0 1
#IF
EQUAL D13 <$H.ABILITYADDPOINT3>
#ACT
MOV D17 0
#ELSEACT
MOV D17 1
#IF
EQUAL D17 1
LARGE D13 0
#ACT
;H.ABILITYADD 3 <$STR(D13)> 9999999
#IF
EQUAL D17 1
EQUAL D13 0
#ACT
;H.ABILITYADD 3 0 1
#IF
EQUAL D14 <$H.ABILITYADDPOINT4>
#ACT
MOV D17 0
#ELSEACT
MOV D17 1
#IF
EQUAL D17 1
LARGE D14 0
#ACT
H.ABILITYADD 4 <$STR(D14)> 9999999
#IF
EQUAL D17 1
EQUAL D14 0
#ACT
H.ABILITYADD 4 0 1
#IF
EQUAL D15 <$H.ABILITYADDPOINT5>
#ACT
MOV D17 0
#ELSEACT
MOV D17 1
#IF
EQUAL D17 1
LARGE D15 0
#ACT
H.ABILITYADD 5 <$STR(D15)> 9999999
#IF
EQUAL D17 1
EQUAL D15 0
#ACT
H.ABILITYADD 5 0 1
#IF
EQUAL D16 <$H.ABILITYADDPOINT6>
#ACT
MOV D17 0
#ELSEACT
MOV D17 1
#IF
EQUAL D17 1
LARGE D16 0
#ACT
H.ABILITYADD 6 <$STR(D16)> 9999999
#IF
EQUAL D17 1
EQUAL D16 0
#ACT
H.ABILITYADD 6 0 1

[@Mir2m2名字七彩变色]
#IF
CHECKVAR HUMAN 名字七彩变色 = 0
#act
break
#ELSEACT
DELAYGOTO 1000 @Mir2m2名字七彩变色
#IF
CHECKVAR HUMAN 名字七彩变色 > 10
#act
CALCVAR HUMAN 名字七彩变色 = 1
#IF
CHECKVAR HUMAN 名字七彩变色 = 1
#act
CHANGENAMECOLOR 254
CALCVAR HUMAN 名字七彩变色 + 1
break
#IF
CHECKVAR HUMAN 名字七彩变色 = 2
#act
CHANGENAMECOLOR 249
CALCVAR HUMAN 名字七彩变色 + 1
break
#IF
CHECKVAR HUMAN 名字七彩变色 = 3
#act
CHANGENAMECOLOR 216
CALCVAR HUMAN 名字七彩变色 + 1
break
#IF
CHECKVAR HUMAN 名字七彩变色 = 4
#act
CHANGENAMECOLOR 250
CALCVAR HUMAN 名字七彩变色 + 1
break
#IF
CHECKVAR HUMAN 名字七彩变色 = 5
#act
CHANGENAMECOLOR 252
CALCVAR HUMAN 名字七彩变色 + 1
break
#IF
CHECKVAR HUMAN 名字七彩变色 = 6
#act
CHANGENAMECOLOR 253
CALCVAR HUMAN 名字七彩变色 + 1
break
#IF
CHECKVAR HUMAN 名字七彩变色 = 7
#act
CHANGENAMECOLOR 255
CALCVAR HUMAN 名字七彩变色 + 1
break
#IF
CHECKVAR HUMAN 名字七彩变色 = 8
#act
CHANGENAMECOLOR 152
CALCVAR HUMAN 名字七彩变色 + 1
break
#IF
CHECKVAR HUMAN 名字七彩变色 = 9
#act
CHANGENAMECOLOR 149
CALCVAR HUMAN 名字七彩变色 + 1
break
#IF
CHECKVAR HUMAN 名字七彩变色 = 10
#act
CHANGENAMECOLOR 170
CALCVAR HUMAN 名字七彩变色 + 1
break
}

meinvwudi · 6 月 '22

以上狂暴只会对人杀怪对方才有效.英雄的没有考虑在内

人物狂暴和龙的传人神力护身

Mmeinvwudi

Mmeinvwudi

Mmeinvwudi

Mmeinvwudi