使用CALL命令调用，如何加NPC这里就不多讲了，在本站查看教程 [@互换灵兽石] #IF ISRIDEON 1 #ACT SENDMSG 5 本体骑战状态不能使用此功能！ BREAK #IF PNEUMARELEASED $PNEUMANAME.ISRIDEON 1 #ACT SENDMSG 5 元神骑战状态不能
使用CALL命令调用，如何加NPC这里就不多讲了，在本站查看教程 [@互换灵兽石] #IF ISRIDEON 1 #ACT SENDMSG 5 本体骑战状态不能使用此功能！ BREAK #IF PNEUMARELEASED $PNEUMANAME.ISRIDEON 1 #ACT SENDMSG 5 元神骑战状态不能使用此功能！ BREAK #IF CHECKPETFOLLOW #ACT SENDMSG 5 互换灵兽石，必须先收回你的灵兽！ BREAK #IF CHECK [4] 1 #ACT Showspotdlg 6 请放入互换的灵兽石 @开始互换 [@开始互换] #IF !CHECK [4] 1 #ACT SENDMSG 5 你还不是主宰者，互换灵兽石失败！ break #IF EQUAL $ITEMINFO[$PARAM(1)].STDMODE 49 EQUAL $ITEMINFO[$PARAM(1)].SHAPE 51 #ELSEACT MESSAGEBOX 你放入的不是灵兽石，请检查后操作！ BREAK #IF EQUAL $PARAM(1) $PETMAKEINDEX(0) #ACT SENDMSG 5 该灵兽在跟随，无法操作！ BREAK #IF EQUAL $PARAM(1) $PETMAKEINDEX(1) #ACT SENDMSG 5 该灵兽在摆摊，无法操作！ BREAK #IF EQUAL $PARAM(1) $PETMAKEINDEX(2) #ACT SENDMSG 5 该灵兽在骑乘，无法操作！ BREAK #IF EQUAL $PARAM(1) $PETMAKEINDEX(3) #ACT SENDMSG 5 该灵兽在元神骑乘，无法操作！ BREAK #IF EQUAL $PARAM(1) $PETMAKEINDEX(4) #ACT SENDMSG 5 该灵兽在凤凰探宝，无法操作！5uwl.net BREAK #IF !CHECKVARLIST $PARAM(1) ..QuestDiary数据文件主宰者灵兽石.txt #ACT SENDMSG 5 你放入的$PARAM(0)不是主宰者灵兽石，互换失败！ BREAK #IF TRUE #ACT #SAY COLOR=GREEN 请选择你要兑换的灵兽石 ;COLOR=green 新的灵万倍攻击超变传奇兽石将会集成原始灵兽石的除五行属性以外的全部属性! #IF EQUAL $PARAM(0) 豹魔石 #SAY COLOR=GRAY 当前已是豹魔石，无法兑换 #ELSESAY 兑换豹魔石/@JY在牛逼也是死豹魔石 #IF EQUAL $PARAM(0) 虎魔石 #SAY COLOR=GRAY 当前已是虎魔石，无法兑换 #ELSESAY 兑换虎魔石/@JY在牛逼也是死虎魔石 #IF EQUAL $PARAM(0) 凤凰石 #SAY COLOR=GRAY 当前已是凤凰石，无法兑换 #ELSESAY 兑换凤凰石/@JY在牛逼也是死凤凰石 #IF EQUAL $PARAM(0) 麒麟石 #SAY COLOR=GRAY 当前已是麒麟石，无法兑换 #ELSESAY 兑换麒麟石/@JY在牛逼也是死麒麟石 #IF EQUAL $PARAM(0) 狮魔石 #SAY COLOR=GRAY 当前已是狮魔石，无法兑换 #ELSESAY 兑换狮魔石/@JY在牛逼也是死狮魔石 [@JY在牛逼也是死] #IF CHECK [4] 1 CHECKVAR HUMAN 主宰币 100 #ACT CALCVAR HUMAN 主宰币 - 100 SAVEVAR HUMAN 主宰币 ..QuestDiary数据文件主宰币.txt GIVE $SCRIPTPARAM(1) 1 UPGRADEUSERITEM $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.EVOLUTION ;幻化 SETPETATTRIBUTE $PARAM(10) 2 = $ITEMINFO[$PARAM(1)].PET.APTITUDE ;资质 SETPETATTRIBUTE $PARAM(10) 3 = $ITEMINFO[$PARAM(1)].PET.HP ;HP SETPETATTRIBUTE $PARAM(10) 4 = $ITEMINFO[$PARAM(1)].PET.MP ;MP SETPETATTRIBUTE $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 = $IT传奇私服服务器EMINFO[$PARAM(1)].PET.AC2 ;防上线 SETPETATTRIBUTE $PARAM(10) 12 = $ITEMINFO[$PARAM(1)].PET.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 $PAR网通传奇AM(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 $PARAM(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数据文件主宰者灵兽石.txt TAKEM $PARAM(1) SENDMSG 5 灵兽石互换成功，新的灵兽石已经集成原来灵兽石的全部属性！ CLOSE break
TAGS：haosf无忧
