仿盛大主宰者灵兽互换属性完整脚本

使用CALL命令调用，如何加NPC这里就不多讲了，在本站查看教程[@互换灵兽石]#IFISRIDEON 1#ACTSENDMSG 5 本体骑战状态不能使用此功能！BREAK#IFPNEUMARELEASED$PNEUMANAME.ISRIDEON 1#ACTSENDMSG 5 元神骑战状态不能使用此功能！BR传奇在线查广告EAK#IFCHECKPETFOLLOW#ACTSENDMSG 5 互换灵兽石，必须先收回你的灵兽！BREAK#IFCHECK [4] 1#ACTShowspotdlg 6 请放入互换的灵兽石 @开始互换[@开始互换]#IF!CHECK [4] 1#ACTSENDMSG 5 你还不是主宰者，互换灵兽石失败！break#IFEQUAL $ITEMINFO[$PARAM(1)].STDMODE 49EQUAL $ITEMINFO[$PARAM(1)].SHAPE 51#ELSEACTMESSAGEBOX 你放入的不是灵兽石，请检查后操作！BREAK#IFEQUAL $PARAM(1) $PETMAKEINDEX(0)#ACTSENDMSG 5 该灵兽在跟随，无法操作！BREAK#IFEQUAL $PARAM(1) $PETMAKEINDEX(1)#ACTSENDMSG 5 该灵兽在摆摊，无法操作！BREAK#IFEQUAL $PARAM(1) $PETMAKEINDEX(2)#ACTSENDMSG 5 该灵兽在骑乘，无法操作！BREAK#IFEQUAL $PARAM(1) $PETMAKEINDEX(3)#ACTSENDMSG 5 该灵兽在元神骑乘，无法操作！BREAK#IFEQUAL $PARAM(1) $PETMAKEINDEX(4)#ACTSENDMSG 5 该灵兽在凤凰探宝，无法操作！5uwl.netBREAK#IF!CHECKVARLIST $PARAM(1) ..QuestDiary数据文件主宰者灵兽石.txt#ACTSENDMSG 5 你放入的$PARAM(0)不是主宰者灵兽石，互换失败！BREAK#IFTRUE#ACT#SAY COLOR=GREEN 请选择你要兑换的灵兽石;COLOR=green 新的灵兽石将会集成原始灵兽石的除五行属性以外的全部属性!#IFEQUAL $PARAM(0) 豹魔石#SAY COLOR=GRAY 当前已是豹魔石，无法兑换#ELSESAY 兑换豹魔石/@JY在牛逼也是死豹魔石#IFEQUAL $PARAM(0) 虎魔石#SAY COLOR=GRAY 当前已是虎魔石，无法兑换#ELSESAY 兑换虎魔石/@JY在牛逼也是死虎魔石#IFEQUAL $PARAM(0) 凤凰石#SAY COLOR=GRAY 当前已是凤凰石，无法兑换#ELSESAY 兑换凤凰石/@JY在牛逼也是死凤凰石#IFEQUAL $PARAM(0) 麒麟石#SAY COLOR=GRAY 当前已是麒麟石，无法兑换#ELSESAY 兑换麒麟石/@JY在牛逼也是死麒麟石#IFEQUAL $PARAM(0) 狮魔石#SAY COLOR=GRAY 当前已是狮魔石，无法兑换#ELSESAY 兑换狮魔石/@JY在牛逼也是死狮魔石[@JY在牛逼也是死]#IFCHECK [4] 1CHECKVAR HUMAN 主宰币 100#ACTCALCVAR HUMAN 主宰币 - 100SAVEVAR HUMAN 主宰币 ..QuestDiary数据文件主宰币.txtGIVE $SCRIPTPARAM(1) 1UPGRADEUSERITEM $PARAM(10) 88 = 1 ;避水UPGRADEUSERITEM $PARAM(10) 4 = $ITEMINFO[$PARAM(1)].PET.LEVEL ;等级UPGRADEUSERITEM $PARAM(10) 8 = 1 ;颜色UPGRADEUSERITEM $PARAM(10) 9 = 2 ;二转UPGRADEUSERITEM $PARAM(10) 59 = 1 ;绑定SETPETATTRIBUTE $PARAM(10) 1 = $ITEMINFO[$PARAM(1)].PET.EV176英雄OLUTION ;幻化SETPETATTRIBUTE $PARAM(10) 2 = $ITEMINFO[$PARAM(1)].PET.APTITUDE ;资质SETPETATTRIBUTE $PARAM(10) 3 = $ITEMINFO[$PARAM(1)].PET.HP ;HPSETPETATTRIBUTE $PARAM(10) 4 = $ITEMINFO[$PARAM(1)].PET.MP ;MPSETPETATTRIBUTE $PARAM(10) 5 = $ITEMINFO[$PARAM(1)].PET.ANTIPOISON ;中毒躲避SETPETATTRIBUTE $PARAM(10) 6 = $ITEMINFO[$PARAM(1)].PET.MAC1 ;魔防下线SETPETATTRIBUTE $PARAM(10) 7 = $ITEMINFO[$PARAM(1)].PET.MAC2 ;魔防上线SETPETATTRIBUTE $PARAM(10) 8 = $ITEMINFO[$PARAM(1)].PET.MAGICNICETY ;魔法命中SETPETATTRIBUTE $PARAM(10) 9 = $ITEMINFO[$PARAM(1)].PET.EVADET ;躲避SETPETATTRIBUTE $PARAM(10) 10 = $ITEMINFO[$PARAM(1)].PET.AC1 ;防下线SETPETATTRIBUTE $PARAM(10) 11 = $ITEMINFO[$PARAM(1)].PET.AC2 ;防上线SETPETATTRIBUTE $PARAM(10) 12 = $ITEMINFO[$PARAM(1)].PET网络游戏sf.ANTIMAGIC ;魔法躲避SETPETATTRIBUTE $PARAM(10) 13 = $ITEMINFO[$PARAM(1)].PET.POISONNICETY ;中毒命中SETPETATTRIBUTE $PARAM(10) 14 = $ITEMINFO[$PARAM(1)].PET.SAVVY ;顿悟SETPETATTRIBUTE $PARAM(10) 17 = $ITEMINFO[$PARAM(1)].PET.EXP ;经验SETPETATTRIBUTE $PARAM(10) 19 = $ITEMINFO[$PARAM(1)].PET.MC1 ;魔攻下线SETPETATTRIBUTE $PARAM(10) 20 = $ITEMINFO[$PARAM(1)].PET.MC2 ;魔攻上线SETPETATTRIBUTE $PARAM(10) 21 = $ITEMINFO[$PARAM(1)].PET.SC1 ;道术下线SETPETATTRIBUTE $PARAM(10) 22 = $ITEMINFO[$PARAM(1)].PET.SC2 ;道术上线SETPETATTRIBUTE $PARAM(10) 23 = $ITEMINFO[$PARAM(1)].PET.DC1 ;攻击下线SETPETATTRIBUTE $PARAM(10) 24 = $ITEMINFO[$PARAM(1)].PET.DC2 ;攻击上线SETPETATTRIBUTE $PARAM(10) 25 = $ITEMINFO[$PARAM(1)].PET.NICETY ;命中SETPETATTRIBUTE $PARAM(10)我本沉默传奇 26 = $ITEMINFO[$PARAM(1)].PET.LUCK ;幸运SETPETATTRIBUTE $PARshenqiAM(10) 27 = $ITEMINFO[$PARAM(1)].PET.SPEED ;骑战速度SETPETATTRIBUTE $PARAM(10) 15 $ITEMINFO[$PARAM(1)].PET.FELEMENT1 = $ITEMINFO[$PARAM(1)].PET.FELEMENTPOINT1 ;五行属性SETPETATTRIBUTE $PARAM(10) 16 $ITEMINFO[$PARAM(1)].PET.FELEMENT2 = $ITEMINFO[$PARAM(1)].PET.FELEMENTPOINT2 ;五行属性ADDVARLIST $PARAM(10) ..QuestDiary数据文件主宰者灵兽石.txtTAKEM $PARAM(1)SENDMSG 5 灵兽石互换成功，新的灵兽石已经集成原来灵兽石的全部属性！CLOSEbreak