carotkhoaitay
08-04-15, 02:31 PM
Include("\\script\\lib\\awardtemplet.lua");
function main()
dofile("script/event/birthday_jieri/200905/npc/npc_zhanxin_zunzhe.lua")
local tbSay = {}
tinsert(tbSay,"NhËn kü n¨ng hæ trî t©n thñ./hotrotanthu")
tinsert(tbSay,"NhËn lÖnh bµi hæ trî t©n thñ./lenhbaihotrotanthu")
tinsert(tbSay,"NhËn thuong cap do./nhanthuongcap")
tinsert(tbSay,"NhËn m¸u hæ trî t©n thñ./nhanmau")
tinsert(tbSay,"Hæ trî häc vâ c«ng/HoTroSkill")
tinsert(tbSay,"KÕt thóc ®èi tho¹i/Quit")
Say("Hæ trî t©n thñ", getn(tbSay), tbSay)
end
function lenhbaihotrotanthu()
AddItem(6,1,4257,0,0,0,0)
end
function nhanthuongcap()
local tbSay = {}
tinsert(tbSay,"NhËn thuong cap 80/cap80")
tinsert(tbSay,"NhËn thuong cap 100/cap100")
tinsert(tbSay,"NhËn nhan thuong cap 120/cap120")
tinsert(tbSay,"NhËn thuong cap 150/cap150")
tinsert(tbSay,"Nhan thuong cap 180/cap180")
tinsert(tbSay,"KÕt thóc ®èi tho¹i/Quit")
Say("Hæ trî t©n thñ", getn(tbSay), tbSay)
end
function cap80()
if (GetLevel ()>80 ) then
local nSel = GetFactionNo()
Talk (1, "", "<color = red > Ban Chua len cap 80 di luyen them di");
Return end
if (nSel >= 1) then
Talk (1, "", "<color = red > Ban Da Nhan Phan Thuong Nay roi muon lay nua ak");
Return end
if (CheckRoom(3 ,5)== 0) then
Talk (1, "", "<color = red > ban vui long sap xep hanh trang lai de tranh roi vat pham");
Return end
--AddItem()--
end
function cap100()
if (GetLevel ()>100 ) then
local nSel = GetFactionNo()
Talk (1, "", "<color = red > Ban Chua len cap 100 di luyen them di");
Return end
if (nSel >= 1) then
Talk (1, "", "<color = red > Ban Da Nhan Phan Thuong Nay roi muon lay nua ak");
Return end
if (CheckRoom(3 ,5)== 0) then
Talk (1, "", "<color = red > ban vui long sap xep hanh trang lai de tranh roi vat pham");
Return end
--AddItem()--
end
function cap120()
if (GetLevel ()>120 ) then
local nSel = GetFactionNo()
Talk (1, "", "<color = red > Ban Chua len cap 120 di luyen them di");
Return end
if (nSel >= 1) then
Talk (1, "", "<color = red > Ban Da Nhan Phan Thuong Nay roi muon lay nua ak");
Return end
if (CheckRoom(3 ,5)== 0) then
Talk (1, "", "<color = red > ban vui long sap xep hanh trang lai de tranh roi vat pham");
Return end
--AddItem()--
end
function cap150()
if (GetLevel ()>150 ) then
local nSel = GetFactionNo()
Talk (1, "", "<color = red > Ban Chua len cap 150 di luyen them di");
Return end
if (nSel >= 1) then
Talk (1, "", "<color = red > Ban Da Nhan Phan Thuong Nay roi muon lay nua ak");
Return end
if (CheckRoom(3 ,5)== 0) then
Talk (1, "", "<color = red > ban vui long sap xep hanh trang lai de tranh roi vat pham");
Return end
--AddItem()--
end
function cap180()
if (GetLevel ()>180 ) then
local nSel = GetFactionNo()
Talk (1, "", "<color = red > Ban Chua len cap 180 di luyen them di");
Return end
if (nSel >= 1) then
Talk (1, "", "<color = red > Ban Da Nhan Phan Thuong Nay roi muon lay nua ak");
Return end
if (CheckRoom(3 ,5)== 0) then
Talk (1, "", "<color = red > ban vui long sap xep hanh trang lai de tranh roi vat pham");
Return end
--AddItem()--
end
function nhanmau()
if CalcFreeItemCellCount() < 10 then
Say("H·y cÊt bít vËt phÈm ®Ó ®¶m b¶o cã 10 « trèng råi h·y më.",0);
return 1;
end
if GetLevel()<90 then
local tbItem = {szName="Ngò Hoa Ngäc Lé Hoµn", tbProp={1, 2, 0, 5, 0, 0}, nCount = 10, nExpiredTime = 10080, nBindState = -2}
Talk(1, "", "B¹n nhËn ®îc hæ trî nµy ®Õn cÊp 90");
tbAwardTemplet:GiveAwardByList(tbItem, "PhÇn thëng t©n thñ");
end
end
function hotrotanthu()
if GetLevel()<90 then
AddSkillState(512,20,1,60*60*18)
AddSkillState(527,5,1,60*60*18)
AddSkillState(313,5,1,60*60*18)
AddSkillState(314,12,1,60*60*18)
AddSkillState(546,1,1,60*60*18)
Talk(1, "", "B¹n sÏ ®îc nhËn hæ trî kü n¨ng nµy ®Õn cÊp 90");
Msg2Player( "§Õn LÔ quan nhËp m· <color=yellow>PLANGAME<color> ®Ó ®îc tÆng thëng nhÐ" );
tbAwardTemplet:GiveAwardByList(tbItem, "PhÇn thëng t©n thñ");
end
end
function Quit() end
tbAllSkill = {
shaolin = {
[1] = {10,14},
[2] = {4,6,8},
[3] = {15},
[4] = {16},
[5] = {20},
[6] = {11,19,271},
[7] = {21,273},
[9] = {318,319,321,709},
},
tianwang = {
[1] = {29,30,34},
[2] = {23,24,26},
[3] = {33},
[4] = {31,35,37},
[5] = {40},
[6] = {42},
[7] = {32,36,41,324},
[9] = {322,323,325,708},
},
tangmen = {
[1] = {45},
[2] = {43,347},
[3] = {303},
[4] = {47,50,54,343},
[5] = {345},
[6] = {349},
[7] = {48,58,249,341},
[9] = {302,339,342,351,710},
},
wudu = {
[1] = {63,65},
[2] = {60,62,67},
[3] = {66,70},
[4] = {64,68,69,384},
[5] = {73,356},
[6] = {72},
[7] = {71,74,75},
[9] = {353,355,390,711},
},
emei = {
[1] = {80,85},
[2] = {77,79},
[3] = {93},
[4] = {82,89,385},
[5] = {86},
[6] = {92},
[7] = {88,91,252,282},
[9] = {328,332,380,712},
},
cuiyan = {
[1] = {99,102},
[2] = {95,97},
[3] = {269},
[4] = {105,113},
[5] = {100},
[6] = {109},
[7] = {108,111,114},
[9] = {336,337,713},
},
gaibang = {
[1] = {119,122},
[2] = {115,116},
[3] = {129},
[4] = {124,274},
[5] = {277},
[6] = {125,128},
[7] = {130,360},
[9] = {357,359,714},
},
tianren = {
[1] = {135,145},
[2] = {131,132,136},
[3] = {137},
[4] = {138,140,141},
[5] = {364},
[6] = {143},
[7] = {142,148,150},
[9] = {361,362,391,715},
},
wudang = {
[1] = {153,155},
[2] = {151,152},
[3] = {159},
[4] = {158,164},
[5] = {160},
[6] = {157},
[7] = {165,166,267},
[9] = {365,368,716},
},
kunlun = {
[1] = {169,179},
[2] = {167,168,171,392},
[3] = {174},
[4] = {172,173,178,393},
[5] = {175,181},
[6] = {90,176},
[7] = {182,275,630},
[9] = {372,375,394,717},
},
}
function HoTroSkill()
local szFaction = GetFaction()
if tbAllSkill[szFaction] == nil then
return
end
for i=1, 7 do
if tbAllSkill[szFaction][i] ~= nil then
for j=1, getn(tbAllSkill[szFaction][i]) do
if HaveMagic(tbAllSkill[szFaction][i][j]) == -1 then
AddMagic(tbAllSkill[szFaction][i][j])
end
end
end
end
Talk(1, "", "Xin chóc mõng b¹n ®· nhËn ®îc hæ trî kü n¨ng tõ BQT");
end
bạn nào rành xem dùm mình với, mình chạy thì GS nó ko load dc báo lỗi script
function main()
dofile("script/event/birthday_jieri/200905/npc/npc_zhanxin_zunzhe.lua")
local tbSay = {}
tinsert(tbSay,"NhËn kü n¨ng hæ trî t©n thñ./hotrotanthu")
tinsert(tbSay,"NhËn lÖnh bµi hæ trî t©n thñ./lenhbaihotrotanthu")
tinsert(tbSay,"NhËn thuong cap do./nhanthuongcap")
tinsert(tbSay,"NhËn m¸u hæ trî t©n thñ./nhanmau")
tinsert(tbSay,"Hæ trî häc vâ c«ng/HoTroSkill")
tinsert(tbSay,"KÕt thóc ®èi tho¹i/Quit")
Say("Hæ trî t©n thñ", getn(tbSay), tbSay)
end
function lenhbaihotrotanthu()
AddItem(6,1,4257,0,0,0,0)
end
function nhanthuongcap()
local tbSay = {}
tinsert(tbSay,"NhËn thuong cap 80/cap80")
tinsert(tbSay,"NhËn thuong cap 100/cap100")
tinsert(tbSay,"NhËn nhan thuong cap 120/cap120")
tinsert(tbSay,"NhËn thuong cap 150/cap150")
tinsert(tbSay,"Nhan thuong cap 180/cap180")
tinsert(tbSay,"KÕt thóc ®èi tho¹i/Quit")
Say("Hæ trî t©n thñ", getn(tbSay), tbSay)
end
function cap80()
if (GetLevel ()>80 ) then
local nSel = GetFactionNo()
Talk (1, "", "<color = red > Ban Chua len cap 80 di luyen them di");
Return end
if (nSel >= 1) then
Talk (1, "", "<color = red > Ban Da Nhan Phan Thuong Nay roi muon lay nua ak");
Return end
if (CheckRoom(3 ,5)== 0) then
Talk (1, "", "<color = red > ban vui long sap xep hanh trang lai de tranh roi vat pham");
Return end
--AddItem()--
end
function cap100()
if (GetLevel ()>100 ) then
local nSel = GetFactionNo()
Talk (1, "", "<color = red > Ban Chua len cap 100 di luyen them di");
Return end
if (nSel >= 1) then
Talk (1, "", "<color = red > Ban Da Nhan Phan Thuong Nay roi muon lay nua ak");
Return end
if (CheckRoom(3 ,5)== 0) then
Talk (1, "", "<color = red > ban vui long sap xep hanh trang lai de tranh roi vat pham");
Return end
--AddItem()--
end
function cap120()
if (GetLevel ()>120 ) then
local nSel = GetFactionNo()
Talk (1, "", "<color = red > Ban Chua len cap 120 di luyen them di");
Return end
if (nSel >= 1) then
Talk (1, "", "<color = red > Ban Da Nhan Phan Thuong Nay roi muon lay nua ak");
Return end
if (CheckRoom(3 ,5)== 0) then
Talk (1, "", "<color = red > ban vui long sap xep hanh trang lai de tranh roi vat pham");
Return end
--AddItem()--
end
function cap150()
if (GetLevel ()>150 ) then
local nSel = GetFactionNo()
Talk (1, "", "<color = red > Ban Chua len cap 150 di luyen them di");
Return end
if (nSel >= 1) then
Talk (1, "", "<color = red > Ban Da Nhan Phan Thuong Nay roi muon lay nua ak");
Return end
if (CheckRoom(3 ,5)== 0) then
Talk (1, "", "<color = red > ban vui long sap xep hanh trang lai de tranh roi vat pham");
Return end
--AddItem()--
end
function cap180()
if (GetLevel ()>180 ) then
local nSel = GetFactionNo()
Talk (1, "", "<color = red > Ban Chua len cap 180 di luyen them di");
Return end
if (nSel >= 1) then
Talk (1, "", "<color = red > Ban Da Nhan Phan Thuong Nay roi muon lay nua ak");
Return end
if (CheckRoom(3 ,5)== 0) then
Talk (1, "", "<color = red > ban vui long sap xep hanh trang lai de tranh roi vat pham");
Return end
--AddItem()--
end
function nhanmau()
if CalcFreeItemCellCount() < 10 then
Say("H·y cÊt bít vËt phÈm ®Ó ®¶m b¶o cã 10 « trèng råi h·y më.",0);
return 1;
end
if GetLevel()<90 then
local tbItem = {szName="Ngò Hoa Ngäc Lé Hoµn", tbProp={1, 2, 0, 5, 0, 0}, nCount = 10, nExpiredTime = 10080, nBindState = -2}
Talk(1, "", "B¹n nhËn ®îc hæ trî nµy ®Õn cÊp 90");
tbAwardTemplet:GiveAwardByList(tbItem, "PhÇn thëng t©n thñ");
end
end
function hotrotanthu()
if GetLevel()<90 then
AddSkillState(512,20,1,60*60*18)
AddSkillState(527,5,1,60*60*18)
AddSkillState(313,5,1,60*60*18)
AddSkillState(314,12,1,60*60*18)
AddSkillState(546,1,1,60*60*18)
Talk(1, "", "B¹n sÏ ®îc nhËn hæ trî kü n¨ng nµy ®Õn cÊp 90");
Msg2Player( "§Õn LÔ quan nhËp m· <color=yellow>PLANGAME<color> ®Ó ®îc tÆng thëng nhÐ" );
tbAwardTemplet:GiveAwardByList(tbItem, "PhÇn thëng t©n thñ");
end
end
function Quit() end
tbAllSkill = {
shaolin = {
[1] = {10,14},
[2] = {4,6,8},
[3] = {15},
[4] = {16},
[5] = {20},
[6] = {11,19,271},
[7] = {21,273},
[9] = {318,319,321,709},
},
tianwang = {
[1] = {29,30,34},
[2] = {23,24,26},
[3] = {33},
[4] = {31,35,37},
[5] = {40},
[6] = {42},
[7] = {32,36,41,324},
[9] = {322,323,325,708},
},
tangmen = {
[1] = {45},
[2] = {43,347},
[3] = {303},
[4] = {47,50,54,343},
[5] = {345},
[6] = {349},
[7] = {48,58,249,341},
[9] = {302,339,342,351,710},
},
wudu = {
[1] = {63,65},
[2] = {60,62,67},
[3] = {66,70},
[4] = {64,68,69,384},
[5] = {73,356},
[6] = {72},
[7] = {71,74,75},
[9] = {353,355,390,711},
},
emei = {
[1] = {80,85},
[2] = {77,79},
[3] = {93},
[4] = {82,89,385},
[5] = {86},
[6] = {92},
[7] = {88,91,252,282},
[9] = {328,332,380,712},
},
cuiyan = {
[1] = {99,102},
[2] = {95,97},
[3] = {269},
[4] = {105,113},
[5] = {100},
[6] = {109},
[7] = {108,111,114},
[9] = {336,337,713},
},
gaibang = {
[1] = {119,122},
[2] = {115,116},
[3] = {129},
[4] = {124,274},
[5] = {277},
[6] = {125,128},
[7] = {130,360},
[9] = {357,359,714},
},
tianren = {
[1] = {135,145},
[2] = {131,132,136},
[3] = {137},
[4] = {138,140,141},
[5] = {364},
[6] = {143},
[7] = {142,148,150},
[9] = {361,362,391,715},
},
wudang = {
[1] = {153,155},
[2] = {151,152},
[3] = {159},
[4] = {158,164},
[5] = {160},
[6] = {157},
[7] = {165,166,267},
[9] = {365,368,716},
},
kunlun = {
[1] = {169,179},
[2] = {167,168,171,392},
[3] = {174},
[4] = {172,173,178,393},
[5] = {175,181},
[6] = {90,176},
[7] = {182,275,630},
[9] = {372,375,394,717},
},
}
function HoTroSkill()
local szFaction = GetFaction()
if tbAllSkill[szFaction] == nil then
return
end
for i=1, 7 do
if tbAllSkill[szFaction][i] ~= nil then
for j=1, getn(tbAllSkill[szFaction][i]) do
if HaveMagic(tbAllSkill[szFaction][i][j]) == -1 then
AddMagic(tbAllSkill[szFaction][i][j])
end
end
end
end
Talk(1, "", "Xin chóc mõng b¹n ®· nhËn ®îc hæ trî kü n¨ng tõ BQT");
end
bạn nào rành xem dùm mình với, mình chạy thì GS nó ko load dc báo lỗi script