您当前的位置:首页 > 其他技术 > 其他技术

仙侣2修改新人上线送东西和全部技能

本文出处:网游动力作者:本站发布时间:2009-12-25阅读次数:

举例六一公测礼包
Proc Main
GetItemNum($Num)
If ($Num > 36)
SendMsgToSpc("物品栏空间不足");
UseItem(0)
Return
EndIf
UseItem(1)
MsgLog("六一礼包","打开六一礼包获得奖励")
SetItemFlag(1)
GiveItem("元神丹",30)
GiveItem("经验丹",1)
GiveItem("天灵焰",1)
GiveItem("化神剑",1)
GiveItem("云晶雀",1)
GiveItem("七彩玉莲",1)
GiveItem("九天玄凰",1)
GiveItem("烟波浩淼",1)
GiveItem("神器碎片",100)
GiveItem("邪灵元魄",100)
SendMsgToWorld("恭喜『%s』打开六一大礼包,获得经验丹、元神丹、宠物经验丹及特色宠物奖励。")
SetItemDate(0)
Random($Ra,3)
If($Ra == 1)
GiveTaskItem("小飞鱼",3,4,1055,0)
Return
EndIf
If($Ra == 2)
GiveTaskItem("扣扣",3,4,287,0)
Return
EndIf
If($Ra == 3)
GiveTaskItem("人参果",3,4,287,0)
Return
EndIf

EndProc


看着我的和你们的又什么不同 就清楚了

GiveTaskItem("人参果",3,4,287,0)

3为品级  例如 法器 宝器 仙器 神器


修改技能在 
X:UsrGameServerTask新人

ProcMain
GetLevel($L)
If ($L==1)
GiveItem("尺素仙笺",1)
Call Item
Call Skill
EndIf
GiveItem("庆公测礼包",5)
EndProc

Proc Item
GiveGold(1000)
GiveItem("回城符",100)
GiveItem("七彩金丹",100)
GiveItem("仙缘酒",100)
GiveItem("蟹肉烧麦",100)
GiveItem("金宝箱钥匙",10)
GiveItem("木宝箱钥匙",10)
GiveItem("水宝箱钥匙",10)
GiveItem("火宝箱钥匙",10)
GiveItem("土宝箱钥匙",10)
GetSex($xing别)
GetProfession($职业)
If($xing别 == 0)
If($职业 == 0)
AddEquipItem("古铜甲",0);
AddEquipItem("金鳞刀",0);
Return
EndIf
If($职业 == 1)
AddEquipItem("夕云法袍",0);
AddEquipItem("金顶杖",0);
Return
EndIf
If($职业 == 2)
AddEquipItem("蓝缎道袍",0);
AddEquipItem("青锋剑",0);
Return
EndIf
EndIf
If($xing别 == 1)
If($职业 == 0)
AddEquipItem("紫罗衫",0);
AddEquipItem("百炼刀",0);
Return
EndIf
If($职业 == 1)
AddEquipItem("珍珠法裙",0);
AddEquipItem("星辉杖",0);
Return
EndIf
If($职业 == 2)
AddEquipItem("仙舞之裙",0);
AddEquipItem("青霜剑",0);
Return
EndIf
EndIf
EndProc

Proc Skill
AddSkill("Skill生活剥取.txt");
AddSkill("Skill生活捕捉.txt");
AddSkill("Skill生活采集.txt");
AddSkill("Skill生活挖矿.txt");
GetProfession($P)
If($P==0)
AddSkill("Skill释家武道01.txt")
AddSkill("Skill释家武道02.txt")
AddSkill("Skill释家武道03.txt")
AddSkill("Skill释家武道04.txt")
AddSkill("Skill释家武道05.txt")
AddSkill("Skill释家武道06.txt")
AddSkill("Skill释家武道07.txt")
AddSkill("Skill释家武道08.txt")
AddSkill("Skill释家武道09.txt")
AddSkill("Skill释家武道10.txt")
AddSkill("Skill释家武道11.txt")
AddSkill("Skill释家武道12.txt")
AddSkill("Skill释家武道13.txt")
AddSkill("Skill释家武道14.txt")
AddSkill("Skill释家武道15.txt")
AddSkill("Skill释家禅宗01.txt")
AddSkill("Skill释家禅宗02.txt")
AddSkill("Skill释家禅宗03.txt")
AddSkill("Skill释家禅宗04.txt")
AddSkill("Skill释家禅宗05.txt")
AddSkill("Skill释家禅宗06.txt")
AddSkill("Skill释家禅宗07.txt")
AddSkill("Skill释家禅宗08.txt")
AddSkill("Skill释家禅宗09.txt")
AddSkill("Skill释家禅宗10.txt")
AddSkill("Skill释家禅宗11.txt")
AddSkill("Skill释家禅宗12.txt")
AddSkill("Skill释家禅宗13.txt")
AddSkill("Skill释家禅宗14.txt")
AddSkill("Skill释家禅宗15.txt")
AddSkill("Skill释家密宗01.txt")
AddSkill("Skill释家密宗02.txt")
AddSkill("Skill释家密宗03.txt")
AddSkill("Skill释家密宗04.txt")
AddSkill("Skill释家密宗05.txt")
AddSkill("Skill释家密宗06.txt")
AddSkill("Skill释家密宗07.txt")
AddSkill("Skill释家密宗08.txt")
AddSkill("Skill释家密宗09.txt")
AddSkill("Skill释家密宗10.txt")
AddSkill("Skill释家密宗11.txt")
AddSkill("Skill释家密宗12.txt")
AddSkill("Skill释家密宗13.txt")
AddSkill("Skill释家密宗14.txt")
AddSkill("Skill释家密宗15.txt")
Return
EndIf
If($P==1)
AddSkill("Skill儒家火系01.txt")
AddSkill("Skill儒家火系02.txt")
AddSkill("Skill儒家火系03.txt")
AddSkill("Skill儒家火系04.txt")
AddSkill("Skill儒家火系05.txt")
AddSkill("Skill儒家火系06.txt")
AddSkill("Skill儒家火系07.txt")
AddSkill("Skill儒家火系08.txt")
AddSkill("Skill儒家火系09.txt")
AddSkill("Skill儒家火系10.txt")
AddSkill("Skill儒家火系11.txt")
AddSkill("Skill儒家火系12.txt")
AddSkill("Skill儒家火系13.txt")
AddSkill("Skill儒家火系14.txt")
AddSkill("Skill儒家火系15.txt")
AddSkill("Skill儒家电系01.txt")
AddSkill("Skill儒家电系02.txt")
AddSkill("Skill儒家电系03.txt")
AddSkill("Skill儒家电系04.txt")
AddSkill("Skill儒家电系05.txt")
AddSkill("Skill儒家电系06.txt")
AddSkill("Skill儒家电系07.txt")
AddSkill("Skill儒家电系08.txt")
AddSkill("Skill儒家电系09.txt")
AddSkill("Skill儒家电系10.txt")
AddSkill("Skill儒家电系11.txt")
AddSkill("Skill儒家电系12.txt")
AddSkill("Skill儒家电系13.txt")
AddSkill("Skill儒家电系14.txt")
AddSkill("Skill儒家电系15.txt")
AddSkill("Skill儒家冰系01.txt")
AddSkill("Skill儒家冰系02.txt")
AddSkill("Skill儒家冰系03.txt")
AddSkill("Skill儒家冰系04.txt")
AddSkill("Skill儒家冰系05.txt")
AddSkill("Skill儒家冰系06.txt")
AddSkill("Skill儒家冰系07.txt")
AddSkill("Skill儒家冰系08.txt")
AddSkill("Skill儒家冰系09.txt")
AddSkill("Skill儒家冰系10.txt")
AddSkill("Skill儒家冰系11.txt")
AddSkill("Skill儒家冰系12.txt")
AddSkill("Skill儒家冰系13.txt")
AddSkill("Skill儒家冰系14.txt")
AddSkill("Skill儒家冰系15.txt")
Return
EndIf
If($P==2)
AddSkill("Skill道家咒术01.txt")
AddSkill("Skill道家咒术02.txt")
AddSkill("Skill道家咒术03.txt")
AddSkill("Skill道家咒术04.txt")
AddSkill("Skill道家咒术05.txt")
AddSkill("Skill道家咒术06.txt")
AddSkill("Skill道家咒术07.txt")
AddSkill("Skill道家咒术08.txt")
AddSkill("Skill道家咒术09.txt")
AddSkill("Skill道家咒术10.txt")
AddSkill("Skill道家咒术11.txt")
AddSkill("Skill道家咒术12.txt")
AddSkill("Skill道家咒术13.txt")
AddSkill("Skill道家咒术14.txt")
AddSkill("Skill道家咒术15.txt")
AddSkill("Skill道家符术01.txt")
AddSkill("Skill道家符术02.txt")
AddSkill("Skill道家符术03.txt")
AddSkill("Skill道家符术04.txt")
AddSkill("Skill道家符术05.txt")
AddSkill("Skill道家符术06.txt")
AddSkill("Skill道家符术07.txt")
AddSkill("Skill道家符术08.txt")
AddSkill("Skill道家符术09.txt")
AddSkill("Skill道家符术10.txt")
AddSkill("Skill道家符术11.txt")
AddSkill("Skill道家符术12.txt")
AddSkill("Skill道家符术13.txt")
AddSkill("Skill道家符术14.txt")
AddSkill("Skill道家符术15.txt")
AddSkill("Skill道家剑术01.txt")
AddSkill("Skill道家剑术02.txt")
AddSkill("Skill道家剑术03.txt")
AddSkill("Skill道家剑术04.txt")
AddSkill("Skill道家剑术05.txt")
AddSkill("Skill道家剑术06.txt")
AddSkill("Skill道家剑术07.txt")
AddSkill("Skill道家剑术08.txt")
AddSkill("Skill道家剑术09.txt")
AddSkill("Skill道家剑术10.txt")
AddSkill("Skill道家剑术11.txt")
AddSkill("Skill道家剑术12.txt")
AddSkill("Skill道家剑术13.txt")
AddSkill("Skill道家剑术14.txt")
AddSkill("Skill道家剑术15.txt")
Return
EndIf
EndProc