传奇Herom2引擎脚本实现忍技怒技忍怒合技

腾飞论坛 发表于 2012-12-4 10:47:31

传奇Herom2引擎脚本实现忍技怒技忍怒合技

1、技能和物品数据库增加101忍技、102怒技、103忍怒合技

2、QManage.txt添加如下脚本
脚本实现的技能为0～3级，头上显示技能图标，如需更多级可自行修改！
--------------------------------------------------------------------
;变量声明
VAR Integer HUMAN XJN01
VAR Integer HUMAN XJN02
VAR Integer HUMAN XJN03
VAR Integer HUMAN XJN101
VAR Integer HUMAN XJN102
VAR Integer HUMAN XJN103
LOADVAR HUMAN XJN01 ../QuestDiary/Hero引擎/变量文件/XJN01Save.txt
LOADVAR HUMAN XJN02 ../QuestDiary/Hero引擎/变量文件/XJN02Save.txt
LOADVAR HUMAN XJN03 ../QuestDiary/Hero引擎/变量文件/XJN03Save.txt
LOADVAR HUMAN XJN101 ../QuestDiary/Hero引擎/变量文件/XJN101Save.txt
LOADVAR HUMAN XJN102 ../QuestDiary/Hero引擎/变量文件/XJN102Save.txt
LOADVAR HUMAN XJN103 ../QuestDiary/Hero引擎/变量文件/XJN103Save.txt
;定时器
[@OnTimer5]
#IF
check 1
#ACT
setofftimer 5
ChangeHumAbility 5 - <$str(N51)>
ChangeHumAbility 6 - <$str(N52)>
ChangeHumAbility 7 - <$str(N53)>
ChangeHumAbility 8 - <$str(N54)>
ChangeHumAbility 9 - <$str(N55)>
ChangeHumAbility 10 - <$str(N56)>
set 0
#CALL [/游戏登陆/顶戴花翎.txt] @顶戴花翎
sendmsg 6 怒气已消.....
break
#IF
check 1
#ACT
setofftimer 5
ChangeHumAbility 1 - <$str(N57)>
ChangeHumAbility 2 - <$str(N58)>
ChangeHumAbility 3 - <$str(N59)>
ChangeHumAbility 4 - <$str(N60)>
set 0
#CALL [/游戏登陆/顶戴花翎.txt] @顶戴花翎
sendmsg 6 忍气已消.....
break
#IF
check 1
#ACT
setofftimer 5
ChangeHumAbility 1 - <$str(N57)>
ChangeHumAbility 2 - <$str(N58)>
ChangeHumAbility 3 - <$str(N59)>
ChangeHumAbility 4 - <$str(N60)>
ChangeHumAbility 5 - <$str(N51)>
ChangeHumAbility 6 - <$str(N52)>
ChangeHumAbility 7 - <$str(N53)>
ChangeHumAbility 8 - <$str(N54)>
ChangeHumAbility 9 - <$str(N55)>
ChangeHumAbility 10 - <$str(N56)>
set 0
#CALL [/游戏登陆/顶戴花翎.txt] @顶戴花翎
sendmsg 6 忍怒气已消.....
----------------------------------------------------------------
[@启动忍技]
#IF
CHECKVAR HUMAN XJN02 = 0
check 0
#ACT
mov N57 <$AC>
mov N58 <$MAXAC>
mov N59 <$MAC>
mov N60 <$MAXMAC>
SetOnTimer 5 60
GameGold - 2
changeDressEffect 31
SetIcon 3 41
set 1
ChangeHumAbility 1 + <$str(N57)>
ChangeHumAbility 2 + <$str(N58)>
ChangeHumAbility 3 + <$str(N59)>
ChangeHumAbility 4 + <$str(N60)>
CALCVAR HUMAN XJN102 + 1
SAVEVAR HUMAN XJN102 ../QuestDiary/Hero引擎/变量文件/XJN102Save.txt
sendmsg 7 你暴发了"0级忍气"，二倍[攻防][魔防]，持续时间<60>秒.
sendmsg 7 每次收2元宝/(现有<$GAMEGOLD>元宝)|忍气值为<$HUMAN(XJN102)>/(升顶级忍气需900忍气值).
#ELSEact
#IF
CHECKVAR HUMAN XJN02 = 1
check 0
#ACT
mov N57 <$AC>
mov N58 <$MAXAC>
mov N59 <$MAC>
mov N60 <$MAXMAC>
SetOnTimer 5 80
GameGold - 2
changeDressEffect 31
SetIcon 3 41
set 1
ChangeHumAbility 1 + <$str(N57)>
ChangeHumAbility 2 + <$str(N58)>
ChangeHumAbility 3 + <$str(N59)>
ChangeHumAbility 4 + <$str(N60)>
CALCVAR HUMAN XJN102 + 1
SAVEVAR HUMAN XJN102 ../QuestDiary/Hero引擎/变量文件/XJN102Save.txt
sendmsg 7 你暴发了"1级忍气"，二倍[攻防][魔防]，持续时间<80>秒.
sendmsg 7 每次收2元宝/(现有<$GAMEGOLD>元宝)|忍气值为<$HUMAN(XJN102)>/(升顶级忍气需900忍气值).
#ELSEact
#IF
CHECKVAR HUMAN XJN02 = 2
check 0
#ACT
mov N57 <$AC>
mov N58 <$MAXAC>
mov N59 <$MAC>
mov N60 <$MAXMAC>
SetOnTimer 5 100
GameGold - 2
changeDressEffect 31
SetIcon 3 41
set 1
ChangeHumAbility 1 + <$str(N57)>
ChangeHumAbility 2 + <$str(N58)>
ChangeHumAbility 3 + <$str(N59)>
ChangeHumAbility 4 + <$str(N60)>
CALCVAR HUMAN XJN102 + 1
SAVEVAR HUMAN XJN102 ../QuestDiary/Hero引擎/变量文件/XJN102Save.txt
sendmsg 7 你暴发了"2级忍气"，二倍[攻防][魔防]，持续时间<100>秒.
sendmsg 7 每次收2元宝/(现有<$GAMEGOLD>元宝)|忍气值为<$HUMAN(XJN102)>/(升顶级忍气需900忍气值).
#ELSEact
#IF
CHECKVAR HUMAN XJN02 = 3
check 0
#ACT
mov N57 <$AC>
mov N58 <$MAXAC>
mov N59 <$MAC>
mov N60 <$MAXMAC>
SetOnTimer 5 120
GameGold - 2
changeDressEffect 31
SetIcon 3 41
set 1
ChangeHumAbility 1 + <$str(N57)>
ChangeHumAbility 2 + <$str(N58)>
ChangeHumAbility 3 + <$str(N59)>
ChangeHumAbility 4 + <$str(N60)>
CALCVAR HUMAN XJN102 + 1
SAVEVAR HUMAN XJN102 ../QuestDiary/Hero引擎/变量文件/XJN102Save.txt
sendmsg 7 你暴发了"3级忍气"，二倍[攻防][魔防]，持续时间<120>秒.
sendmsg 7 每次收2元宝/(现有<$GAMEGOLD>元宝)|忍气值为<$HUMAN(XJN102)>/(升顶级忍气需900忍气值).
[@MagSelfFunc103]
#if
CHECKVAR HUMAN XJN03 = 0
CHECKVAR HUMAN XJN103 > 99
#act
CALCVAR HUMAN XJN03 + 1
CALCVAR HUMAN XJN103 - 100
SAVEVAR HUMAN XJN03 ../QuestDiary/Hero引擎/变量文件/XJN03Save.txt
SAVEVAR HUMAN XJN103 ../QuestDiary/Hero引擎/变量文件/XJN103Save.txt
sendmsg 7 恭喜你，你的[忍怒合技]已经练到1层,时间延长20秒.
goto @启动忍怒合技
#ELSEact
#if
CHECKVAR HUMAN XJN03 = 1
CHECKVAR HUMAN XJN103 > 299
#act
CALCVAR HUMAN XJN03 + 1
CALCVAR HUMAN XJN103 - 300
SAVEVAR HUMAN XJN03 ../QuestDiary/Hero引擎/变量文件/XJN03Save.txt
SAVEVAR HUMAN XJN103 ../QuestDiary/Hero引擎/变量文件/XJN103Save.txt
sendmsg 7 恭喜你，你的[忍怒合技]已经练到2层,时间延长40秒.
goto @启动忍怒合技
#ELSEact
#if
CHECKVAR HUMAN XJN03 = 2
CHECKVAR HUMAN XJN103 > 499
#act
CALCVAR HUMAN XJN03 + 1
CALCVAR HUMAN XJN103 - 500
SAVEVAR HUMAN XJN03 ../QuestDiary/Hero引擎/变量文件/XJN03Save.txt
SAVEVAR HUMAN XJN103 ../QuestDiary/Hero引擎/变量文件/XJN301Save.txt
sendmsg 7 恭喜你，你的[忍怒合技]已经练到3层,时间延长60秒.
goto @启动忍怒合技
#ELSEact
goto @启动忍怒合技
[@启动忍怒合技]
#IF
CHECKVAR HUMAN XJN03 = 0
check 0
#ACT
mov N57 <$AC>
mov N58 <$MAXAC>
mov N59 <$MAC>
mov N60 <$MAXMAC>
mov N51 <$DC>
mov N52 <$MAXDC>
mov N53 <$MC>
mov N54 <$MAXMC>
mov N55 <$SC>
mov N56 <$MAXSC>
SetOnTimer 5 60
GameGold - 2
changeDressEffect 31
SetIcon 3 43
set 1
ChangeHumAbility 1 + <$str(N57)>
ChangeHumAbility 2 + <$str(N58)>
ChangeHumAbility 3 + <$str(N59)>
ChangeHumAbility 4 + <$str(N60)>
ChangeHumAbility 5 + <$str(N51)>
ChangeHumAbility 6 + <$str(N52)>
ChangeHumAbility 7 + <$str(N53)>
ChangeHumAbility 8 + <$str(N54)>
ChangeHumAbility 9 + <$str(N55)>
ChangeHumAbility 10 + <$str(N56)>
CALCVAR HUMAN XJN103 + 1
SAVEVAR HUMAN XJN103 ../QuestDiary/Hero引擎/变量文件/XJN103Save.txt
sendmsg 7 你暴发了"0级合气"，2倍[攻击][魔法][道术][攻防][魔防]，持续时间<60>秒.
sendmsg 7 每次收2元宝/(现有<$GAMEGOLD>元宝)|合气值为<$HUMAN(XJN103)>/(升顶级合气需900合气值).
#ELSEact
#IF
CHECKVAR HUMAN XJN03 = 1
check 0
#ACT
mov N57 <$AC>
mov N58 <$MAXAC>
mov N59 <$MAC>
mov N60 <$MAXMAC>
mov N51 <$DC>
mov N52 <$MAXDC>
mov N53 <$MC>
mov N54 <$MAXMC>
mov N55 <$SC>
mov N56 <$MAXSC>
SetOnTimer 5 80
GameGold - 2
changeDressEffect 31
SetIcon 3 43
set 1
ChangeHumAbility 1 + <$str(N57)>
ChangeHumAbility 2 + <$str(N58)>
ChangeHumAbility 3 + <$str(N59)>
ChangeHumAbility 4 + <$str(N60)>
ChangeHumAbility 5 + <$str(N51)>
ChangeHumAbility 6 + <$str(N52)>
ChangeHumAbility 7 + <$str(N53)>
ChangeHumAbility 8 + <$str(N54)>
ChangeHumAbility 9 + <$str(N55)>
ChangeHumAbility 10 + <$str(N56)>
CALCVAR HUMAN XJN103 + 1
SAVEVAR HUMAN XJN103 ../QuestDiary/Hero引擎/变量文件/XJN103Save.txt
sendmsg 7 你暴发了"1级合气"，2倍[攻击][魔法][道术][攻防][魔防]，持续时间<80>秒.
sendmsg 7 每次收2元宝/(现有<$GAMEGOLD>元宝)|合气值为<$HUMAN(XJN103)>/(升顶级合气需900合气值).
#ELSEact
#IF
CHECKVAR HUMAN XJN03 = 2
check 0
#ACT
mov N57 <$AC>
mov N58 <$MAXAC>
mov N59 <$MAC>
mov N60 <$MAXMAC>
mov N51 <$DC>
mov N52 <$MAXDC>
mov N53 <$MC>
mov N54 <$MAXMC>
mov N55 <$SC>
mov N56 <$MAXSC>
SetOnTimer 5 100
GameGold - 2
changeDressEffect 31
SetIcon 3 43
set 1
ChangeHumAbility 1 + <$str(N57)>
ChangeHumAbility 2 + <$str(N58)>
ChangeHumAbility 3 + <$str(N59)>
ChangeHumAbility 4 + <$str(N60)>
ChangeHumAbility 5 + <$str(N51)>
ChangeHumAbility 6 + <$str(N52)>
ChangeHumAbility 7 + <$str(N53)>
ChangeHumAbility 8 + <$str(N54)>
ChangeHumAbility 9 + <$str(N55)>
ChangeHumAbility 10 + <$str(N56)>
CALCVAR HUMAN XJN103 + 1
SAVEVAR HUMAN XJN103 ../QuestDiary/Hero引擎/变量文件/XJN103Save.txt
sendmsg 7 你暴发了"2级合气"，2倍[攻击][魔法][道术][攻防][魔防]，持续时间<100>秒.
sendmsg 7 每次收2元宝/(现有<$GAMEGOLD>元宝)|合气值为<$HUMAN(XJN103)>/(升顶级合气需900合气值).
#ELSEact
#IF
CHECKVAR HUMAN XJN03 = 3
check 0
#ACT
mov N57 <$AC>
mov N58 <$MAXAC>
mov N59 <$MAC>
mov N60 <$MAXMAC>
mov N51 <$DC>
mov N52 <$MAXDC>
mov N53 <$MC>
mov N54 <$MAXMC>
mov N55 <$SC>
mov N56 <$MAXSC>
SetOnTimer 5 120
GameGold - 2
changeDressEffect 31
SetIcon 3 43
set 1
ChangeHumAbility 1 + <$str(N57)>
ChangeHumAbility 2 + <$str(N58)>
ChangeHumAbility 3 + <$str(N59)>
ChangeHumAbility 4 + <$str(N60)>
ChangeHumAbility 5 + <$str(N51)>
ChangeHumAbility 6 + <$str(N52)>
ChangeHumAbility 7 + <$str(N53)>
ChangeHumAbility 8 + <$str(N54)>
ChangeHumAbility 9 + <$str(N55)>
ChangeHumAbility 10 + <$str(N56)>
CALCVAR HUMAN XJN103 + 1
SAVEVAR HUMAN XJN103 ../QuestDiary/Hero引擎/变量文件/XJN103Save.txt
sendmsg 7 你暴发了"3级合气"，2倍[攻击][魔法][道术][攻防][魔防]，持续时间<120>秒.
sendmsg 7 每次收2元宝/(现有<$GAMEGOLD>元宝)|合气值为<$HUMAN(XJN103)>/(升顶级合气需900合气值).

论坛一条龙

君剑发表于 2014-5-25 15:25:59

楼主，您提前出院了？

王治郅 发表于 2014-5-25 15:31:57

看帖、回帖、拿分、走人

大兵发表于 2014-5-25 15:40:29

管它三七二十一！

啊啊啊啊 发表于 2014-5-25 16:14:55

聚信网络 发表于 2014-5-25 15:54:38

感觉不错！

艾夕发表于 2014-6-1 11:47:31

鸟大了，什么林子都敢进啊！

懒猪发表于 2014-6-1 11:56:35

楼上的真不讲道理！

老大毛 发表于 2014-6-1 11:21:01

楼上的这是啥态度呢？

追逐梦想 发表于 2014-6-1 11:59:57

看了这么多帖子，第一次看看到这么有内涵的！

页: [1] 2

腾飞论坛's Archiver

传奇Herom2引擎脚本实现忍技怒技忍怒合技