传奇复活术技能脚本
QManage.txt[@login]
#IF
CHECKLEVELEX > 0
#act
#CALL [魔法技艺.txt] @CHECKMF
[@CHECKMF]
{
#IF
checkjob warrior
#act
DELUSERDATE..\QuestDiary\数据文件\技艺魔法\复生术.txt
#IF
checkjob wizard
#act
DELUSERDATE..\QuestDiary\数据文件\技艺魔法\复生术.txt
#IF
CHECKUSERDATE ..\QuestDiary\数据文件\技艺魔法\复生术.txt < 30 p1 p2
#act
sendmsg 6 〖提醒〗复生术技艺剩余<$STR(p2)>天
#elseact
DELUSERDATE..\QuestDiary\数据文件\技艺魔法\复生术.txt
Delskill 复生术
#IF
#ACT
DELNOJOBSKILL
}
[@技艺魔法]
{
按照魔法技艺类型每学习一次技艺的有用期在30天。\
您目前声望值：<$CREDITPOINT>，能否计划学习新技艺呢？\ \
武士新技艺<彻地钉/@学习彻地钉> \
法师新技艺<群体雷电术/@学习群体雷电术><寒冰掌/@学习寒冰掌><灭天火/@学习灭天火>\
道士新技艺<群体施毒术/@学习群体施毒术><气功波/@学习顺从气功波><解毒术/@学习解毒术><解毒术/@学习复生术>\ \
<前往/@main>
[@学习复生术]
复生术：能够赐予去世的人物原地复生的时机，\
成功概率率与修炼等级及人物等级有关。\
有用时刻：30天\
学习要求：道士等级到达80级，10000元宝。\
<确定学习/@学习复生术1>\ \
<前往/@技艺魔法>
[@学习复生术1]
#IF
CheckMagicName 复生术
#act
MESSAGEBOX 您已然修炼过此技艺魔法！！！
break
#IF
checklevel 80
checkjobtaoist
ISADMIN
#act
ADDSKILL 复生术 3
ADDUSERDATE ..\QuestDiary\数据文件\技艺魔法\复生术.txt
MESSAGEBOX <$USERNAME>的复生术技艺修炼成功！！！
#IF
CHECKGAMEGOLD < 10000
#act
MESSAGEBOX 元宝不够！！！
break
#IF
checklevel 80
checkjobtaoist
CHECKGAMEGOLD > 9999
#act
GAMEGOLD - 10000
ADDSKILL 复生术 3
ADDUSERDATE ..\QuestDiary\数据文件\技艺魔法\复生术.txt
MESSAGEBOX <$USERNAME>的复生术技艺修炼成功！！！
#IF
CHECKUSERDATE ..\QuestDiary\数据文件\技艺魔法\复生术.txt < 30 p1 p2
#act
ADDSKILL 复生术 3
MESSAGEBOX <$USERNAME>的复生术技艺剩余：<$STR(p2)>天
break
#elseact
MESSAGEBOX <$USERNAME>的复生术技艺修炼失败！！！
}
QFunction-0.txt
[@PlayDie]
#if
CHECKLEVELEX > 0
#act
mov D3 1
[@MagTagFunc100]
#if
EQUAL D3 0
#act
break
#if
random 2
#act
break
#if
#SAY
你的灵魂已然归窍...\ \
复生后你的HP血量很底，请留意平安！！！\ \
<目前地位复生/@MagTagFunc100MAP> \ \
<主动回城复生/@MagTagFunc100hc>
[@MagTagFunc100hc]
#act
SENDMSG 5 正在复生中...
mapmove 3 330 330
DELAYGOTO 1000 @MagTagFunc100OK
[@MagTagFunc100MAP]
#act
SENDMSG 5 正在复生中...
DELAYGOTO 3000 @MagTagFunc100OK
[@MagTagFunc100OK]
#if
EQUAL D3 1
#act
mov D3 0
GmExeCute 复生 Self
#if
checkjob warrior
#act
HUMANHP = 1500
HUMANMP = 300
#if
checkjob wizard
#act
HUMANHP = 300
HUMANMP = 1500
#if
checkjob taoist
#act
HUMANHP = 1200
HUMANMP = 1200
#IF
CHECKUSEITEM 1
#ACT
give 回城卷 1
页:
[1]