vikingnguyen
28-04-20, 03:10 PM
Include("\\script\\lib\\awardtemplet.lua")
Include("\\script\\activitysys\\functionlib.lua")
Include("\\script\\lib\\log.lua")
IncludeLib("SETTING")
IncludeLib("TONG")
IncludeLib("RELAYLADDER");
Include( "\\script\\item\\compound\\compound_header.lua" );
Include( "\\script\\item\\compound\\atlas.lua" );
Include("\\script\\global\\rename_head.lua")
Include("\\script\\dailogsys\\dailogsay.lua")
Include("\\script\\lib\\awardtemplet.lua")
Include("\\script\\global\\fuyuan.lua")
Include("\\script\\missions\\leaguematch\\npc\\officer.lua")
Include("\\script\\lib\\log.lua")
Include("\\script\\global\\pgaming\\hotrotanthu\\itemblue.l ua")
Include("\\script\\global\\pgaming\\\hotrotanthu\\duatop.lu a")
Include("\\script\\tagnewplayer\\tbitemHK.lua");
Include("\\script\\global\\pgaming\\hotrotanthu\\hotroitem. lua")
Include("\\script\\global\\fuyuan.lua")
Include("\\script\\global\\pgaming\\hotrotanthu\\hotrogm.lu a")
Include("\\script\\global\\pgaming\\hotrotanthu\\nc_topall. lua")
Include("\\script\\task\\partner\\education\\swordking_peop le.lua")
Include("\\script\\global\\pgaming\\hotrotanthu\\doiraclayv k.lua")
Include("\\script\\global\\pgaming\\hotrotanthu\\diemdanhha ngngay.lua")
Include("\\script\\global\\translife.lua")
Include("\\script\\global\\skills_table.lua")
Include("\\script\\task\\lv120skill\\head.lua")
Include("\\script\\task\\150skilltask\\g_task.lua")
Include("\\script\\misc\\daiyitoushi\\toushi_function.lua")
szNpcName = "<color=yellow>Hç trî T©n thñ<color>: "
szPlayer = "§¹i HiÖp"
if GetSex() == 1 then
szPlayer = "N÷ HiÖp"
end
tbSkillBook90 = {
shaolin = {56,57,58},
tianwang = {37,38,39},
tangmen = {27,28,45,46},
wudu = {47,48,49},
emei = {42,43,59},
cuiyan = {40,41},
gaibang = {54,55},
tianren = {35,36,53},
wudang = {33,34},
kunlun = {50,51,52},
}
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},
},
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},
},
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},
},
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},
},
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},
},
cuiyan = {
[1] = {99,102},
[2] = {95,97},
[3] = {269},
[4] = {105,113},
[5] = {100},
[6] = {109},
[7] = {108,111,114},
[9] = {336,337},
},
gaibang = {
[1] = {119,122},
[2] = {115,116},
[3] = {129},
[4] = {124,274},
[5] = {277},
[6] = {125,128},
[7] = {130,360},
[9] = {357,359},
},
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},
},
wudang = {
[1] = {153,155},
[2] = {151,152},
[3] = {159},
[4] = {158,164},
[5] = {160},
[6] = {157},
[7] = {165,166,267},
[9] = {365,368},
},
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},
},
}
local tbGMAccount = {"pgaming", "pgaming2", "pgaming3", "pgaming4", "pgaming5"}
function main()
dofile("script/global//namcung/hotrotanthu/item/tanthulenh.lua");
str = "Chµo mõng c¸c b¹n ®· tham gia thÕ giíi <color=red>Vâ L©m TruyÒn Kú<color> Hoan nghªnh c¸c anh hïng hµo kiÖt."
AddGlobalCountNews(str, 1)
local szAccount = GetAccount()
for i=1, getn(%tbGMAccount) do
if szAccount == %tbGMAccount[i] then
local szTitle = "<npc><color=red>ThÕ Giíi<color>.<enter><color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! "
local tbOpt =
{
{"§iÓm Danh H»ng Ngµy", DailyMuster},
{"Xem Danh ngêi ch¬i ®ang Online", dkgm9},
{"Häc Kü N¨ng ph¸i Hoa S¬n", fix_skill_hs},
{"NhËn vËt phÈm hæ trî tu luyÖn", hotrotrain},
--{"Hæ trî Admin", dkgm2},
{"NhËn ThÇn Binh TrÊn Bang Chi B¶o", vkHKMP},
{"Gäi b¹n ®ång hµnh", Pet},
{"NhËn kü n¨ng hæ trî t©n thñ.", hotrotanthu},
{"Mua Kim Nguyªn B¶o ®Ó ®æi TiÒn §ång ë TiÒn Trang L©m An", knbshop},
--{"NhËn TiÒn §ång",tiendong},
{"NhËn Hæ trî Kü N¨ng", HoTroSkill},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
else
--Talk(1, "", "<color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline edit by PGaming<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! ")
str = "ThÕ Giíi <color=red>Vâ L©m TruyÒn Kú<color> Hoan nghªnh c¸c anh hïng hµo kiÖt."
AddGlobalCountNews(str, 2)
local szTitle = "<npc><color=red>ThÕ Giíi<color>.<enter><color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! "
local tbOpt =
{
--{"Th«ng Tin cÇn biÕt cho Vâ L©m T©n Thñ", camnangtanthu},
{"Céng ®iÓm nhanh",add_prop},
--{"Trïng Sinh cÊp tèc", cs5},
--{"Ta muèn chuyÓn sinh nhanh", transfer},
--{"Häc Kü N¨ng ph¸i Hoa S¬n", fix_skill_hs},
--{"NhËn vËt phÈm hæ trî tu luyÖn", hotrotrain},
--{"Mua Kim Nguyªn B¶o ®Ó ®æi TiÒn §ång ë TiÒn Trang L©m An", knbshop},
--{"NhËn ThÇn Binh TrÊn Bang Chi B¶o", vkHKMP},
--{"Gäi b¹n ®ång hµnh", Pet},
{"NhËn kü n¨ng hæ trî t©n thñ.", hotrotanthu},
--{"Mua Ngùa", chienma},
--{"NhËn §ång Xu",tiendong},
--{"Mua Kho¸ng Th¹ch chÕ t¹o", khoangthach},
{"NhËn Hæ trî Kü N¨ng M«n Ph¸i", HoTroSkill},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
return 1;
end
end
end
function camnangtanthu()
local szTitle = "<npc>CÈm nang hç trî cho c¸c vÞ T©n Thñ trong viÖc hµnh tÈu giang hå!"
local tbOpt =
{
{"Nh÷ng ®iÒu cÇn biÕt khi S¬ NhËp Giang Hå", sonhapgiangho},
{"Tin Tøc Sù KiÖn", thongtinevent},
{"ThËp §¹i Ph¸i", thongtinphaichinh},
{"T×m hiÓu ph¸i Hoa S¬n", thongtinphaihoason},
{"VÊn ®Ò trang bÞ", thongtintrangbi},
{"C¸c nh©n vËt ®æi vËt phÈm hæ trî", thongtinnpcchinh},
{"Th«ng tin Kú Tr©n C¸c", thongtinkytrancac},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function sonhapgiangho()
local szTitle = "<npc>HÖ thèng kinh nghiÖm vµ ng©n lîng khi tu luyÖn ®îc tèi u hãa gióp cho C¸c H¹ n©ng cÊp nhanh vµ cã thu nhËp kha kh¸ dïng ®Ó ®æi c¸c vËt phÈm cÇn thiÕt còng nh viÖc më réng r¬ng khi nãi chuyÖn víi ThÈm C©u ë Ba L¨ng HuyÖn. Cã thÓ dïng Kim Nguyªn B¶o ®Ó ®æi tiÒn xu ë Chñ TiÒn Trang L©m An. Mua Kim Nguyªn B¶o ë chç nh©n vËt Hç Trî T©n Thñ!"
local tbOpt =
{
{"Trë l¹i trang tríc", camnangtanthu},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end;
function thongtinevent()
local szTitle = "<npc>Khi ®¸nh qu¸i tu luyÖn, cã c¬ héi nhËn ®îc <color=Yellow>Hµnh HiÖp LÖnh<color>, dïng ®Ó ®æi c¸c Hoµng Kim Trang BÞ LÖnh Bµi ë chç Hµng Rong thÊt ®¹i thµnh thÞ. Cßn cã LÔ bao Trung Thu ®Ó ®æi vËt phÈm sù kiÖn t¹i NPC Trung Thu n»m ë Minh NguyÖt TrÊn. Bao L× X× khi më ra ®îc c¸c lo¹i Ph¸o ®Ó tham gia sù kiÖn Chóc Mõng N¨m Míi t¹i chç ThÇn Tµi thÊt ®¹i thµnh thÞ chÝnh. Ph¹t ¸c vµ thëng thiÖn lÖnh chØ h÷u Ých khi C¸c H¹ ®· gia nhËp bang ph¸i vµ chiÕm lÜnh thµnh thÞ khi tham gia C«ng Thµnh ChiÕn. Khi ®¸nh qu¸i ë c¸c b¶n ®å cÊp 90 trë lªn, C¸c H¹ cã c¬ héi nhËn ®îc R¬ng Hoµng Kim cña ThËp §¹i Ph¸i. Vµo trong §¹o Cô cña Kú Tr©n C¸c, dïng tiÒn xu ®Ó mua Ch×a Khãa R¬ng Hoµng Kim. Më ra sÏ ngÉu nhiªn nhËn ®îc c¸c trang bÞ vµ vò khÝ Hoµng Kim M«n Ph¸i ®· tõng dËy sãng Giang Hå n¨m xa!"
local tbOpt =
{
{"Trë l¹i trang tríc", camnangtanthu},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end;
function thongtinphaichinh()
local szTitle = "<npc>Khi Gia NhËp thËp ®¹i ph¸i vµ Hoa S¬n Ph¸i, C¸c H¹ sÏ cã ®îc Xng HiÖu Cao NhÊt cña ph¸i ®ã. Nhng h·y nhí lµm nhiÖm vô m«n ph¸i ®Ó chøng minh r»ng ng¬i xøng ®¸ng víi Xng HiÖu cña m«n ph¸i ®· gia nhËp, ®ång thêi khi hoµn thµnh nhiÖm vô cã thÓ häc ®îc nh÷ng chiªu thøc míi cña m«n ph¸i ®ã ®Õn lóc XuÊt S vµ Trïng Ph¶n S M«n ®Ó häc ®îc TrÊn Ph¸i Vâ Häc. C¸c Chiªu Thøc Thîng Thõa Kü N¨ng 90, 120, 150 vµ BÝ TÞch 180 cã thÓ mua ë Kú Tr©n C¸c. Ngoµi ra, c¸c kü n¨ng cÊp 150 cã thÓ luyÖn ë §µo Hoa Nguyªn MËt §¹o khi nãi chuyÖn víi ngêi tiÕp dÉn cã tªn lµ V« Danh T¨ng."
local tbOpt =
{
{"Trë l¹i trang tríc", camnangtanthu},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end;
function thongtinphaihoason()
local szTitle = "<npc>Hoa S¬n KiÕm Kh¸ch lµ nh÷ng Èn sü kh«ng ®îc nh¾c ®Õn cïng ThËp §¹i Ph¸i v× sù hµnh hiÖp trîng nghÜa 1 c¸ch bÝ Èn cña hä trªn Giang Hå. Cã c¸c Kü N¨ng M«n Ph¸i lóc XuÊt S vµ Trïng Ph¶n S M«n n¨ng lùc ngang tÇm víi Chiªu Thøc Thîng Thõa CÊp 90, ph¶i sö dông §¹i Thµnh BÝ KiÕp ®Ó t¨ng cÊp ®Ò tr¸nh bÞ TÈu Háa NhËp Ma. Hoa S¬n gia nhËp Giang Hå sau ThËp §¹i Ph¸i nªn kh«ng cã VËt PhÈm Hoµng Kim ®· tõng oai chÊn Vâ L©m. H¬n thÕ Hoa S¬n còng cã nh÷ng trang bÞ Hoµng Kim m«n ph¸i cã phÈm chÊt kh«ng thua kÐm ThËp §¹i Ph¸i sau nµy, trong ®ã cã c¶ TuyÖt ThÕ ThÇn Binh oai hïng Thiªn H¹ s¸nh vai cïng c¸c ThÇn Binh Chi B¶o cña c¸c Ph¸i kh¸c."
local tbOpt =
{
{"Trë l¹i trang tríc", camnangtanthu},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end;
function thongtintrangbi()
local szTitle = "<npc>Trang bÞ Hoµng Kim cña ThËp §¹i Ph¸i khi më R¬ng Hoµng Kim cã thÓ ®îc n©ng lªn B¹ch Kim t¹i LÔ Quan. C¸c lo¹i trang bÞ Hoµng Kim kh¸c nh Thanh C©u, V©n Léc, Th¬ng Lang ®Õn cao cÊp nh Tinh S¬ng vµ Minh NguyÖt cã thÓ dïng lÖnh bµi ®Ó ®æi. LÖnh Bµi dïng Hµnh HiÖp LÖnh ®æi ë Hµng Rong hoÆc mua ë Kú Tr©n DÞ B¶o. C¸c H¹ cßn cã thÓ giao chiÕn víi c¸c Cao Nh©n cña m«n ph¸i ®Ó t×m ra nh÷ng TrÊn Bang Hoµng Kim trang bÞ vµ TuyÖt ThÕ ThÇn Binh, ®ång thêi còng cã c¬ héi t×m thÊy c¸c YÕu QuyÕt Kü N¨ng 150 §¹i Thµnh cÊp 21 tíi 30. TriÖu Ho¸n Phï cña c¸c Cao Nh©n cã thÓ mua t¹i ThÇn BÝ Cao Nh©n t¹i c¸c th«n lµng."
local tbOpt =
{
{"Trë l¹i trang tríc", camnangtanthu},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end;
function thongtinnpcchinh()
local szTitle = "<npc>Khi Hµnh TÈu trong chèn Giang Hå, h·y nhí gÆp Hç Trî T©n Thñ vµ LÔ Quan t¹i c¸c T©n Thñ Th«n ®Ó ®æi nh÷ng vËt phÈm quý gi¸ hç trî trong viÖc tu luyÖn vµ phiªu lu tø h¶i. Khi muèn chuyÓn ph¸i, h·y ®èi tho¹i víi Hoµnh Ba Tiªn Tö ë c¸c th«n trÊn ®Ó ®îc trî gióp. VÊn ®Ò trïng sinh, cã thÓ ®èi tho¹i cïng B¾c §Èu L·o Nh©n ë Minh NguyÖt TrÊn, hoÆc dïng ng©n lîng ®Ó trïng sinh khi nãi chuyÖn cïng Hç Trî T©n Thñ. Ngoµi ra, t¹i 7 thµnh thÞ lín, Hç Trî Tiªn Tö cã thÓ gióp C¸c H¹ t×m hiÓu thªm tÝnh n¨ng cña ThÕ Giíi Vâ L©m TruyÒn Kú 1 c¸ch têng tËn nhÊt, c« Êy ®ãng vai trß nh 1 tÝnh n¨ng cña GameMaster!"
local tbOpt =
{
{"Trë l¹i trang tríc", camnangtanthu},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end;
function thongtinkytrancac()
local szTitle = "<npc>Kú Tr©n C¸c lµ giang hµng th¬ng m¹i chÝnh trong Vâ L©m TruyÖn Kú. HÖ thèng TiÒn Xu hay nãi c¸ch kh¸c, TiÒn §ång, cã thÓ nhËn ®îc 1 lÇn ë chç Hç Trî T©n Thñ khi S¬ NhËp Giang Hå vµ dïng Kim Nguyªn B¶o ®Ó ®æi ë Chñ TiÒn Trang L©m An. VËt phÈm ®¸ng chó ý lµ <color=Yellow>Kim M· CÈm Nang<color>. Thu ThËp ®ñ 7 kim m· lÖnh bµi trong <color=Green>Kim M· LÔ Bao<color> mua ë Kú Tr©n C¸c cã thÓ t¨ng 1 sè lîng lín ®iÓm kinh nghiÖm trong 1 ngµy. C¸c lo¹i M· Bµi ®îc tèi u hãa cho t©n thñ khi sö dông gióp viÖc di chuyÓn khi tu luyÖn trë nªn dÔ dµng h¬n. B«n Tiªu vµ Phiªn Vò sÏ hç trî cho nh©n sÜ cÊp 100 trë lªn, chóng n»m ë phÇn §¹o Cô cña Kú Tr©n C¸c. Ngoµi ra, c¸c LÖnh Bµi ®Ó ®æi Trang BÞ Hoµng Kim còng n»m t¹i ®©y cho viÖc tiÖn lîi khi hµnh tÈu vµ sau khi chuyÓn sinh vÒ l¹i cÊp 10. Nguyªn liÖu ®óc trang bÞ n»m ë phÇn Tinh Th¹ch vµ ®îc bæ sung ë phÇn §¹o Cô. Kho¸ng Th¹ch cã thÓ ®îc mua t¹i ®©y hoÆc giao dÞch t¹i Hç Trî T©n Thñ b»ng ng©n lîng."
local tbOpt =
{
{"Trë l¹i trang tríc", camnangtanthu},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end;
function khoangthach()
local szTitle = "<npc>Mçi 1 bé kho¸ng th¹ch theo ngò hµnh tèn 300 v¹n lîng. Xin h·y chän ngò hµnh cña kho¸ng th¹ch cÇn mua:"
local tbOpt =
{
{"HÖ Kim",hekim},
{"HÖ Méc",hemoc},
{"HÖ Thñy",hethuy},
{"HÖ Háa",hehoa},
{"HÖ Thæ",hetho},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function hekim()
if (GetCash() <= 3000000) then
Talk(1, "", "Ph¶i mang ®ñ 300 v¹n míi cã thÓ mua.")
return
end
AddItem(6,1,149,1,0,0,0)
AddItem(6,1,150,1,0,0,0)
AddItem(6,1,151,1,0,0,0)
AddItem(6,1,152,1,0,0,0)
AddItem(6,1,153,1,0,0,0)
AddItem(6,1,154,1,0,0,0)
Pay(3000000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 1 bé kho¸ng th¹ch")
end
function hemoc()
if (GetCash() <= 3000000) then
Talk(1, "", "Ph¶i mang ®ñ 300 v¹n míi cã thÓ mua.")
return
end
AddItem(6,1,149,1,0,0,0)
AddItem(6,1,150,1,1,0,0)
AddItem(6,1,151,1,0,0,0)
AddItem(6,1,152,1,1,0,0)
AddItem(6,1,153,1,0,0,0)
AddItem(6,1,154,1,1,0,0)
Pay(3000000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 1 bé kho¸ng th¹ch")
end
function hethuy()
if (GetCash() <= 3000000) then
Talk(1, "", "Ph¶i mang ®ñ 300 v¹n míi cã thÓ mua.")
return
end
AddItem(6,1,149,1,0,0,0)
AddItem(6,1,150,1,2,0,0)
AddItem(6,1,151,1,0,0,0)
AddItem(6,1,152,1,2,0,0)
AddItem(6,1,153,1,0,0,0)
AddItem(6,1,154,1,2,0,0)
Pay(3000000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 1 bé kho¸ng th¹ch")
end
function hehoa()
if (GetCash() <= 3000000) then
Talk(1, "", "Ph¶i mang ®ñ 300 v¹n míi cã thÓ mua.")
return
end
AddItem(6,1,149,1,0,0,0)
AddItem(6,1,150,1,3,0,0)
AddItem(6,1,151,1,0,0,0)
AddItem(6,1,152,1,3,0,0)
AddItem(6,1,153,1,0,0,0)
AddItem(6,1,154,1,3,0,0)
Pay(3000000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 1 bé kho¸ng th¹ch")
end
function hetho()
if (GetCash() <= 3000000) then
Talk(1, "", "Ph¶i mang ®ñ 300 v¹n míi cã thÓ mua.")
return
end
AddItem(6,1,149,1,0,0,0)
AddItem(6,1,150,1,4,0,0)
AddItem(6,1,151,1,0,0,0)
AddItem(6,1,152,1,4,0,0)
AddItem(6,1,153,1,0,0,0)
AddItem(6,1,154,1,4,0,0)
Pay(3000000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 1 bé kho¸ng th¹ch")
end
function knbshop()
local szTitle = "<npc>C¸c H¹ muèn mua bao nhiªu Kim Nguyªn B¶o?"
local tbOpt =
{
{"1 Kim Nguyªn B¶o gi¸ 100 v¹n lîng",knb1},
{"5 Kim Nguyªn B¶o gi¸ 450 v¹n lîng",knb2},
{"10 Kim Nguyªn B¶o gi¸ 950 v¹n lîng",knb3},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function knb1()
if (GetCash() <= 1000000) then
Talk(1, "", "Ph¶i mang ®ñ 100 v¹n míi cã thÓ mua.")
return
end
AddEventItem(343)
Pay(1000000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 1 Kim Nguyªn B¶o")
end
function knb2()
if (GetCash() <= 4500000) then
Talk(1, "", "Ph¶i mang ®ñ 450 v¹n míi cã thÓ mua.")
return
end
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
Pay(4500000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 5 Kim Nguyªn B¶o")
end
function knb3()
if (GetCash() <= 9500000) then
Talk(1, "", "Ph¶i mang ®ñ 950 v¹n míi cã thÓ mua.")
return
end
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
Pay(9500000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 10 Kim Nguyªn B¶o")
end
function transfer()
if GetLevel() < 190 then
Talk(1, "", "CÊp 190 trë lªn míi cã thÓ chuyÓn sinh.")
return
end
if (GetCash() <= 50000000) then
Talk(1, "", "Ph¶i mang ®ñ 5 ngh×n v¹n míi cã thÓ chuyÓn sinh.")
return
end
if (CalcItemCount(2,0,-1,-1,-1) > 0) then
Talk(1, "", "Muèn Trïng Sinh th× C¸c H¹ cÇn ph¶i th¸o bá tÊt c¶ trang bÞ ®ang sö dông. Trang BÞ ®ang mang sÏ kh«ng phï hîp víi cÊp ®é sau khi kinh m¹ch ®îc ®¶ th«ng.")
return
end
Pay(50000000)
ST_DoTransLife()
end
function cs5()
ST_DoTransLife()
end
function lv70equip()
local szTitle = "<npc><color=red>ThÕ Giíi<color>.<enter><color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! "
local tbOpt =
{
{"ThiÕu L©m QuyÒn",setumang,{1}},
{"ThiÕu L©m C«n",setumang,{2}},
{"ThiÕu L©m §ao",setumang,{3}},
{"Thiªn V¬ng Chïy",setumang,{4}},
{"Thiªn V¬ng Th¬ng",setumang,{5}},
{"Thiªn V¬ng §ao",setumang,{6}},
{"Nga Mi KiÕm",setumang,{7}},
{"Nga Mi Chëng",setumang,{8}},
{"Thóy Yªn §¬n §ao",setumang,{9}},
{"Thóy Yªn Song §ao",setumang,{10}},
{"Ngò §éc Chëng Ph¸p",setumang,{11}},
{"Ngò §éc §ao Ph¸p",setumang,{12}},
{"Trang KÕ",setumangT2},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function setumangT2()
local szTitle = "<npc><color=red>ThÕ Giíi<color>.<enter><color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! "
local tbOpt =
{
{"§êng M«n Phi §ao",setumang,{13}},
{"§êng M«n Tô TiÔn",setumang,{14}},
{"§êng M«n Phi Tiªu",setumang,{15}},
{"C¸i Bang Rång",setumang,{16}},
{"C¸i Bang C«n Ph¸p",setumang,{17}},
{"Thiªn NhÉn KÝch",setumang,{18}},
{"Thiªn NhÉn §ao",setumang,{19}},
{"Vâ §ang KhÝ",setumang,{20}},
{"Vâ §ang KiÕm",setumang,{21}},
{"C«n L«n §ao",setumang,{22}},
{"C«n L«n KiÕm",setumang,{23}},
{"Hoa S¬n KiÕm T«ng",setumanghs,{2}},
{"Hoa S¬n KhÝ T«ng",setumanghs,{1}},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function setumang(nId)
for i = 1825, 1834 do
AddGoldItem(0,10*nId+i-10)
end
end
function setumanghs(nId)
for i = 4713, 4722 do
AddGoldItem(0,10*nId+i-10)
end
end
function add_prop()
local tbOpt =
{
{"T¨ng søc m¹nh.", add_prop_str},
{"T¨ng th©n ph¸p.", add_prop_dex},
{"T¨ng sinh khÝ.", add_prop_vit},
{"T¨ng néi c«ng.", add_prop_eng},
{"Tho¸t."}
}
CreateNewSayEx("<npc>Xin mêi chän ti?m n¨ng cÇn t¨ng!", tbOpt)
end
function add_prop_str()
AskClientForNumber("enter_str_num", 0, GetProp(), "Mêi nhËp chØ sè søc m¹nh: ");
end
function add_prop_dex()
AskClientForNumber("enter_dex_num", 0, GetProp(), "Mêi nhËp chØ sè th©n ph¸p: ");
end
function add_prop_vit()
AskClientForNumber("enter_vit_num", 0, GetProp(), "Mêi nhËp chØ sè sinh kh?:");
end
function add_prop_eng()
AskClientForNumber("enter_eng_num", 0, GetProp(), "Mêi nhËp chØ sè néi c«ng: ");
end
function enter_str_num(n_key)
if (n_key < 0 or n_key > GetProp()) then
return
end
AddStrg(n_key);
end
function enter_dex_num(n_key)
if (n_key < 0 or n_key > GetProp()) then
return
end
AddDex(n_key);
end
function enter_vit_num(n_key)
if (n_key < 0 or n_key > GetProp()) then
return
end
AddVit(n_key);
end
function enter_eng_num(n_key)
if (n_key < 0 or n_key > GetProp()) then
return
end
AddEng(n_key);
end
function Pet()
local szTitle = "<npc><color=red>ThÕ Giíi<color>.<enter><color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! "
local tbOpt =
{
{"Chän ®ång hµnh",Pet1},
{"Xãa ®ång hµnh",Pet2},
{"Trë L¹i", main},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function Pet1()
local szTitle = "<npc><color=red>ThÕ Giíi<color>.<enter><color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! "
local tbOpt =
{
{"Chu Tíc",Pet3},
{"Háa Kú L©n",Pet4},
{"Thanh Long",Pet5},
{"HuyÒn Vò",Pet6},
{"Dòng HÇu",Pet7},
{"Trë L¹i",Pet},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function Pet3()
local partneridex = PARTNER_AddFightPartner(4,4,1,5,5,5,5,5,5)
PARTNER_CallOutCurPartner(1)
end
function Pet4()
local partneridex = PARTNER_AddFightPartner(1,1,1,5,5,5,5,5,5)
PARTNER_CallOutCurPartner(1)
end
function Pet5()
local partneridex = PARTNER_AddFightPartner(2,2,1,5,5,5,5,5,5)
PARTNER_CallOutCurPartner(1)
end
function Pet6()
local partneridex = PARTNER_AddFightPartner(3,3,1,5,5,5,5,5,5)
PARTNER_CallOutCurPartner(1)
end
function Pet7()
local partneridex = PARTNER_AddFightPartner(5,0,1,5,5,5,5,5,5)
PARTNER_CallOutCurPartner(1)
end
function Pet2()
PARTNER_RemovePartner(1,1,1,5,5,5,5,5,5)
end
function fix_skill_hs()
AddMagic(1347) --Skill Hoa son
AddMagic(1372) --Skill Hoa son
AddMagic(1349) --Skill Hoa son
AddMagic(1374) --Skill Hoa son
AddMagic(1350) --Skill Hoa son
AddMagic(1375) --Skill Hoa son
AddMagic(1351) --Skill Hoa son
AddMagic(1376) --Skill Hoa son
AddMagic(1354) --Skill Hoa son
AddMagic(1378) --Skill Hoa son
AddMagic(1355) --Skill Hoa son
AddMagic(1379) --Skill Hoa son
AddMagic(1358) --Skill Hoa son
AddMagic(1360) --Skill Hoa son
AddMagic(1380) --Skill Hoa son
AddMagic(1364,20) --Skill Hoa son 90
AddMagic(1382,20) --Skill Hoa son 90
AddMagic(1363,20) --Skill Hoa son --------Skill
AddMagic(1365,20) --Skill Hoa son 120
AddMagic(1370,20) --Skill Hoa son
AddMagic(1369,20) --Skill Hoa son 150
AddMagic(1384,20) --Skill Hoa son 150
AddMagic(1368,20) --Skill Hoa son --------Doc Co Cuu Kiem
KickOutSelf()
end
function vkHKMP()
local szTitle = "<npc><color=red>ThÕ Giíi<color>.<enter><color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! "
local tbOpt =
{
{"ThiÕu L©m", VKTL},
{"Thiªn V¬ng", VKTV},
{"Nga Mi", VKNM},
{"Thóy Yªn", VKTY},
{"Ngò §éc", VK5D},
{"§êng M«n", VKDM},
{"C¸i Bang", VKCB},
{"Thiªn NhÉn", VKTN},
{"Vâ §ang", VKVD},
{"C«n L«n", VKCL},
{"Hoa S¬n", VKHSS},
{"Trë L¹i", main},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function VKTL()
AddGoldItem(0, 6265)
AddGoldItem(0, 6266)
AddGoldItem(0, 6267)
end
function VKTV()
AddGoldItem(0, 6268)
AddGoldItem(0, 6269)
AddGoldItem(0, 6270)
end
function VKNM()
AddGoldItem(0, 6271)
AddGoldItem(0, 6272)
end
function VKTY()
AddGoldItem(0, 6273)
AddGoldItem(0, 6274)
end
function VK5D()
AddGoldItem(0, 6275)
AddGoldItem(0, 6276)
end
function VKDM()
AddGoldItem(0, 6277)
AddGoldItem(0, 6278)
AddGoldItem(0, 6279)
end
function VKCB()
AddGoldItem(0, 6280)
AddGoldItem(0, 6281)
end
function VKTN()
AddGoldItem(0, 6282)
AddGoldItem(0, 6283)
end
function VKVD()
AddGoldItem(0, 6284)
AddGoldItem(0, 6285)
end
function VKCL()
AddGoldItem(0, 6286)
AddGoldItem(0, 6287)
end
function VKHSS()
AddGoldItem(0, 6288)
AddGoldItem(0, 6289)
end
function chienma()
local szTitle = "<npc>C¸c H¹ muèn mua 5 lo¹i ThÇn M· Danh ChÊn Thiªn H¹? Chi phÝ sÏ lµ 5000 v¹n lîng!"
local tbOpt =
{
{"§ång ý", muangua},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function muangua()
if (GetCash() <= 50000000) then
Talk(1, "", "Ph¶i mang ®ñ 5000 v¹n míi cã thÓ mua.")
return
end
AddItem(0,10,9,10,0,0,0)
AddItem(0,10,11,10,0,0,0)
AddItem(0,10,13,10,0,0,0)
AddItem(0,10,18,10,0,0,0)
AddGoldItem(0, 5933)
Pay(50000000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 5 lo¹i Giang Hå TuyÖt ThÕ ChiÕn M·!")
end
function knb()
AddItem(4,343,0,0,0,0)
AddItem(4,343,0,0,0,0)
AddItem(4,343,0,0,0,0)
AddItem(4,343,0,0,0,0)
AddItem(4,343,0,0,0,0)
end
function hotrotrain()
if GetTask(5000) <=0 then
FuYuan_Start();
FuYuan_Add(1000)
Earn(10000000)
AddLeadExp(500000000)
AddRepute(1000)
AddItem(6,1,4835,0,0,0,10000)
AddItem(6,1,4639,0,0,0)
AddGoldItem(0, 3541)
AddGoldItem(0, 3878)
AddStackItem(999,4,417,1,1,0,0,0)
SetTask(5000, GetTask(5000) +1)
else Talk(1,"no","C¸c H¹ ®· nhËn vËt phÈm råi")
end
end
function tiendong()
AskClientForNumber("tiendong1",0,5000,"NhËp Sè Lîng:")
end;
function tiendong1(sltiendong)
for i = 1, sltiendong do
AddStackItem(1,4,417,1,1,0,0,0)
end
Msg2Player("B¹n nhËn ®îc <color=yellow>"..sltiendong.." <color>tiÒn ®ång.")
end
function HoTroSkill()
if GetLastFactionNumber(10) and (HaveMagic(1347) >= 0) and (HaveMagic(1364) < 0) and GetTask(169) < 73 then
AddMagic(1349)
AddMagic(1374)
AddMagic(1350)
AddMagic(1375)
AddMagic(1351)
AddMagic(1376)
AddMagic(1354)
AddMagic(1378)
AddMagic(1355)
AddMagic(1379)
AddMagic(1358)
AddMagic(1360)
AddMagic(1380)
AddMagic(1364,20)
AddMagic(1382,20)
Talk(1,"",szNpcName.."Vâ häc ®· ®îc truyÒn thô, "..szPlayer .." h·y thö vËn c«ng n©ng thµnh xem sao.")
elseif (HaveMagic(1364) > 0) then
Talk(1,"",szNpcName.."Vâ häc ®· ®îc truyÒn thô, "..szPlayer .." h·y thö vËn c«ng n©ng thµnh xem sao.")
end
local nIndex = floor(GetLevel()/10)
local szFaction = GetFaction()
if tbAllSkill[szFaction] == nil then
return
end
if nIndex >= 1 then
for i=1, min(9,nIndex) do
if tbAllSkill[szFaction][i] ~= nil then
for j=1, getn(tbAllSkill[szFaction][i]) do
if i ==9 then
if HaveMagic(tbAllSkill[szFaction][i][j]) == -1 then
AddMagic(tbAllSkill[szFaction][i][j],20)
end
else
if HaveMagic(tbAllSkill[szFaction][i][j]) == -1 then
AddMagic(tbAllSkill[szFaction][i][j])
end
end
end
end
end
end
Talk(1,"",szNpcName.."Vâ häc ®· ®îc truyÒn thô, "..szPlayer .." h·y thö vËn c«ng n©ng thµnh xem sao.")
end
function dkgm9()
Msg2Player("<color=yellow>HiÖn t¹i ®ang cã<color><color=green> "..GetPlayerCount().."<color> Ngêi Online !.")
end
function dkgm4()
LoadFromFile()
tbTop10:Regist()
tbTop10:UpdateTopList()
tbTop10:hangcanhan()
tbTop10:ShowTopList()
end
function dkgm3()
hoason()
end
function dkgm2()
namcung2()
end
function phanthuong()
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
AskClientForString("checkcode", "", 1, 100, "Xin nhËp code");
end
tbitem =
{
[1] ={szName = "Tiªn th¶o lé", tbProp = {6, 1, 71, 1,0,0}, nCount = 5, nExpiredTime = 10080, nBindState = -2},
[2] ={szName = "Håi thµnh phï (nhá)", tbProp = {6, 1, 1082,1,0,0}, nCount = 1, nExpiredTime = 43200, nBindState = -2},
[3] ={szName="Kim M· CÈm Nang",tbProp={6,1,4088,1,0,0},nCount=1,nExpiredTime=432 00,nBindState = -2},
[4] ={szName = "M¶nh b¶n ®å s¬n hµ x· t¾c (1000 m¶nh)", tbProp = {6, 1, 2514,1,0,0}, nCount = 1, nExpiredTime = 10080, nBindState = -2},
[5] ={szName="ThÇn Hµnh Phï",tbProp={6,1,1266,1,0,0},nCount=1,nExpiredTime=432 00,nBindState = -2},
[6] ={szName="T©n Thñ LÖnh",tbProp={6,1,4265,1,0,0},nCount=1,nExpiredTime=144 00,nBindState = -2},
[7] ={szName="Phông NguyÖt Qu¶ Dung",tbProp={6,1,127,1,0,0},nCount=2,nBindState = -2},
[8] ={szName="Cèng NguyÖt Phï Dung",tbProp={6,1,128,1,0,0},nCount=2,nBindState = -2},
}
function checkcode(strings)
if GetTask(3000)==1 then
Talk(1, "", "B¹n ®· nhËn råi mµ ");
return
end
if (strings=="PGAMING6" or strings=="PGAMING" or strings=="PGAMING1" or strings=="PGAMING2" or strings=="PGAMING3" or strings=="PGAMING4" or strings=="PGMAING5")then
tbAwardTemplet:GiveAwardByList(tbitem, "PhÇn thëng t©n thñ");
SetTask(3000,1)
str = "Tin chÊn ®éng giang hå, Cao thñ<color=red>"..GetName().."<color> Ch¨m chØ luyÖn tËp ®· nhËn ®îc <color=green>phÇn thëng T©n Thñ<color> xng b¸ thiªn h¹ kh«ng ®Þch thñ !."
AddGlobalCountNews(str, 1)
Msg2Player( "Chóc mõng b¹n ®· nhËn ®îc phÇn th¬ng T©n Thñ" );
else
Talk(1, "", "Code sai");
end
end
function hotrotanthu()
if GetLevel()<150 then
AddSkillState(512,20,1,1440*1440*18) --Bao toc hoang ky nang
AddSkillState(527,5,1,1440*1440*18) --Truong menh hoang
AddSkillState(1618,15,1,1440*1440*18)
AddSkillState(1619,15,1,1440*1440*18)
AddSkillState(1620,15,1,1440*1440*18)
AddSkillState(1621,15,1,1440*1440*18)
AddSkillState(451, 20, 1,1440*1440*18) --Banh trung thu
AddSkillState(450, 20, 1,1440*1440*18) --Que hoa tuu
AddSkillState(892, 5, 1, 64800 * 24) --Tien Thao Lo
AddSkillState(1622, 5, 1, 64800 * 24) --Tien Thao Lo
AddSkillState(441, 1, 1, 1555200) --Thien son bao lo
AddSkillState(313,5,1,1440*1440*18) --Vong duoi chan
AddSkillState(314,50,1,1440*1440*18) --Vong duoi chan
AddSkillState(546,1,1,1440*1440*18) --Rong bay
Talk(1, "", "B¹n sÏ ®îc nhËn hæ trî kü n¨ng nµy ®Õn cÊp 150");
Msg2Player( "Lªn Trang Chñ <color=yellow>192.168.1.200<color> §Ó nhËn gift code" );
tbAwardTemplet:GiveAwardByList(tbItem, "PhÇn thëng t©n thñ");
end
end
function partner_getdust1()
partner_givetodo()
end
function DoiTenNV()
AskClientForString("danhten", "", 1, 100, "Xin nhËp tªn muèn ®æi");
end
function danhten(strings)
RenameRole(strings)
end
function dkgm()
n_title = 5000 -- S?a ID danh hi?u vào
local nServerTime = GetCurServerTime()+ 1728000; --20*24*60*60
local nDate = FormatTime2Number(nServerTime);
local nDay = floor(mod(nDate,1000000) / 10000);
local nMon = mod(floor(nDate / 1000000) , 100)
local nTime = nMon * 1000000 + nDay * 10000
Title_AddTitle(n_title, 2, nTime)
Title_ActiveTitle(n_title)
local nCurLevel = GetLevel()
if nCurLevel < 150 then
ST_LevelUp(150 - nCurLevel)
end
SetFightState(0)
SetCamp(6)
SetCurCamp(6)
AddMagic(732, 50) --Skill GM
AddMagic(733, 50) --Skill GM
if CalcFreeItemCellCount() >= 1 then
local tbItem = {szName="LÖnh bµi Gm", tbProp={6,1,4257,1,0,0}, nBindState=-2}
tbAwardTemplet:GiveAwardByList(tbItem, "LÖnh bµi Gm", 1)
end
end
function deltem()
if (GetBoxLockState() ~= 0) then
Say("Xin më khãa r¬ng tríc !", 0)
return
end
GiveItemUI("Hñy vËt phÈm", "§¹i hiÖp h·y cÈn träng trong viÖc hñy vËt phÈm!", "DisposeConfirm", "onCancel", 1);
end
function DisposeConfirm(nCount)
if (nCount ~= 1) then
Talk(1, "", "Mçi lÇn chØ cã thÓ hñy ®îc mét vËt phÈm!!");
return
end
local nItemIndex = GetGiveItemUnit(nCount)
local nBindState = GetItemBindState(nItemIndex)
if (nBindState >=0) then
Talk(1, "", "VËt phÈm cÇn hñy ph¶i lµ vËt phÈm khãa!");
return
end
local strItem = GetItemName(nItemIndex)
RemoveItemByIndex(nItemIndex)
Talk(1, "", "§¹i hiÖp cã thÓ s¾p xÕp l¹i r¬ng chøa ®å råi!");
Msg2Player("§¹i hiÖp võa hñy vËt phÈm thµnh c«ng")
WriteLog(date("%Y%m%d %H%M%S").."\t".." Hñy item khãa "..GetAccount().."\t"..GetName().."\t".." Huû item "..strItem)
end
function doirac()
weapon_ring()
end
Em sài dòng script này, copy từ NPC tân thủ dán vào lệnh bài, nhưng mà sao em lấy lệnh bài ra mở đc 1 lần là biến mất cái lệnh bài luôn. Ai giúp e với ạ. Làm sao để ko bị mất lệnh bài mỗi lần mở lên vậy ạ
Include("\\script\\activitysys\\functionlib.lua")
Include("\\script\\lib\\log.lua")
IncludeLib("SETTING")
IncludeLib("TONG")
IncludeLib("RELAYLADDER");
Include( "\\script\\item\\compound\\compound_header.lua" );
Include( "\\script\\item\\compound\\atlas.lua" );
Include("\\script\\global\\rename_head.lua")
Include("\\script\\dailogsys\\dailogsay.lua")
Include("\\script\\lib\\awardtemplet.lua")
Include("\\script\\global\\fuyuan.lua")
Include("\\script\\missions\\leaguematch\\npc\\officer.lua")
Include("\\script\\lib\\log.lua")
Include("\\script\\global\\pgaming\\hotrotanthu\\itemblue.l ua")
Include("\\script\\global\\pgaming\\\hotrotanthu\\duatop.lu a")
Include("\\script\\tagnewplayer\\tbitemHK.lua");
Include("\\script\\global\\pgaming\\hotrotanthu\\hotroitem. lua")
Include("\\script\\global\\fuyuan.lua")
Include("\\script\\global\\pgaming\\hotrotanthu\\hotrogm.lu a")
Include("\\script\\global\\pgaming\\hotrotanthu\\nc_topall. lua")
Include("\\script\\task\\partner\\education\\swordking_peop le.lua")
Include("\\script\\global\\pgaming\\hotrotanthu\\doiraclayv k.lua")
Include("\\script\\global\\pgaming\\hotrotanthu\\diemdanhha ngngay.lua")
Include("\\script\\global\\translife.lua")
Include("\\script\\global\\skills_table.lua")
Include("\\script\\task\\lv120skill\\head.lua")
Include("\\script\\task\\150skilltask\\g_task.lua")
Include("\\script\\misc\\daiyitoushi\\toushi_function.lua")
szNpcName = "<color=yellow>Hç trî T©n thñ<color>: "
szPlayer = "§¹i HiÖp"
if GetSex() == 1 then
szPlayer = "N÷ HiÖp"
end
tbSkillBook90 = {
shaolin = {56,57,58},
tianwang = {37,38,39},
tangmen = {27,28,45,46},
wudu = {47,48,49},
emei = {42,43,59},
cuiyan = {40,41},
gaibang = {54,55},
tianren = {35,36,53},
wudang = {33,34},
kunlun = {50,51,52},
}
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},
},
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},
},
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},
},
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},
},
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},
},
cuiyan = {
[1] = {99,102},
[2] = {95,97},
[3] = {269},
[4] = {105,113},
[5] = {100},
[6] = {109},
[7] = {108,111,114},
[9] = {336,337},
},
gaibang = {
[1] = {119,122},
[2] = {115,116},
[3] = {129},
[4] = {124,274},
[5] = {277},
[6] = {125,128},
[7] = {130,360},
[9] = {357,359},
},
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},
},
wudang = {
[1] = {153,155},
[2] = {151,152},
[3] = {159},
[4] = {158,164},
[5] = {160},
[6] = {157},
[7] = {165,166,267},
[9] = {365,368},
},
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},
},
}
local tbGMAccount = {"pgaming", "pgaming2", "pgaming3", "pgaming4", "pgaming5"}
function main()
dofile("script/global//namcung/hotrotanthu/item/tanthulenh.lua");
str = "Chµo mõng c¸c b¹n ®· tham gia thÕ giíi <color=red>Vâ L©m TruyÒn Kú<color> Hoan nghªnh c¸c anh hïng hµo kiÖt."
AddGlobalCountNews(str, 1)
local szAccount = GetAccount()
for i=1, getn(%tbGMAccount) do
if szAccount == %tbGMAccount[i] then
local szTitle = "<npc><color=red>ThÕ Giíi<color>.<enter><color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! "
local tbOpt =
{
{"§iÓm Danh H»ng Ngµy", DailyMuster},
{"Xem Danh ngêi ch¬i ®ang Online", dkgm9},
{"Häc Kü N¨ng ph¸i Hoa S¬n", fix_skill_hs},
{"NhËn vËt phÈm hæ trî tu luyÖn", hotrotrain},
--{"Hæ trî Admin", dkgm2},
{"NhËn ThÇn Binh TrÊn Bang Chi B¶o", vkHKMP},
{"Gäi b¹n ®ång hµnh", Pet},
{"NhËn kü n¨ng hæ trî t©n thñ.", hotrotanthu},
{"Mua Kim Nguyªn B¶o ®Ó ®æi TiÒn §ång ë TiÒn Trang L©m An", knbshop},
--{"NhËn TiÒn §ång",tiendong},
{"NhËn Hæ trî Kü N¨ng", HoTroSkill},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
else
--Talk(1, "", "<color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline edit by PGaming<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! ")
str = "ThÕ Giíi <color=red>Vâ L©m TruyÒn Kú<color> Hoan nghªnh c¸c anh hïng hµo kiÖt."
AddGlobalCountNews(str, 2)
local szTitle = "<npc><color=red>ThÕ Giíi<color>.<enter><color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! "
local tbOpt =
{
--{"Th«ng Tin cÇn biÕt cho Vâ L©m T©n Thñ", camnangtanthu},
{"Céng ®iÓm nhanh",add_prop},
--{"Trïng Sinh cÊp tèc", cs5},
--{"Ta muèn chuyÓn sinh nhanh", transfer},
--{"Häc Kü N¨ng ph¸i Hoa S¬n", fix_skill_hs},
--{"NhËn vËt phÈm hæ trî tu luyÖn", hotrotrain},
--{"Mua Kim Nguyªn B¶o ®Ó ®æi TiÒn §ång ë TiÒn Trang L©m An", knbshop},
--{"NhËn ThÇn Binh TrÊn Bang Chi B¶o", vkHKMP},
--{"Gäi b¹n ®ång hµnh", Pet},
{"NhËn kü n¨ng hæ trî t©n thñ.", hotrotanthu},
--{"Mua Ngùa", chienma},
--{"NhËn §ång Xu",tiendong},
--{"Mua Kho¸ng Th¹ch chÕ t¹o", khoangthach},
{"NhËn Hæ trî Kü N¨ng M«n Ph¸i", HoTroSkill},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
return 1;
end
end
end
function camnangtanthu()
local szTitle = "<npc>CÈm nang hç trî cho c¸c vÞ T©n Thñ trong viÖc hµnh tÈu giang hå!"
local tbOpt =
{
{"Nh÷ng ®iÒu cÇn biÕt khi S¬ NhËp Giang Hå", sonhapgiangho},
{"Tin Tøc Sù KiÖn", thongtinevent},
{"ThËp §¹i Ph¸i", thongtinphaichinh},
{"T×m hiÓu ph¸i Hoa S¬n", thongtinphaihoason},
{"VÊn ®Ò trang bÞ", thongtintrangbi},
{"C¸c nh©n vËt ®æi vËt phÈm hæ trî", thongtinnpcchinh},
{"Th«ng tin Kú Tr©n C¸c", thongtinkytrancac},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function sonhapgiangho()
local szTitle = "<npc>HÖ thèng kinh nghiÖm vµ ng©n lîng khi tu luyÖn ®îc tèi u hãa gióp cho C¸c H¹ n©ng cÊp nhanh vµ cã thu nhËp kha kh¸ dïng ®Ó ®æi c¸c vËt phÈm cÇn thiÕt còng nh viÖc më réng r¬ng khi nãi chuyÖn víi ThÈm C©u ë Ba L¨ng HuyÖn. Cã thÓ dïng Kim Nguyªn B¶o ®Ó ®æi tiÒn xu ë Chñ TiÒn Trang L©m An. Mua Kim Nguyªn B¶o ë chç nh©n vËt Hç Trî T©n Thñ!"
local tbOpt =
{
{"Trë l¹i trang tríc", camnangtanthu},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end;
function thongtinevent()
local szTitle = "<npc>Khi ®¸nh qu¸i tu luyÖn, cã c¬ héi nhËn ®îc <color=Yellow>Hµnh HiÖp LÖnh<color>, dïng ®Ó ®æi c¸c Hoµng Kim Trang BÞ LÖnh Bµi ë chç Hµng Rong thÊt ®¹i thµnh thÞ. Cßn cã LÔ bao Trung Thu ®Ó ®æi vËt phÈm sù kiÖn t¹i NPC Trung Thu n»m ë Minh NguyÖt TrÊn. Bao L× X× khi më ra ®îc c¸c lo¹i Ph¸o ®Ó tham gia sù kiÖn Chóc Mõng N¨m Míi t¹i chç ThÇn Tµi thÊt ®¹i thµnh thÞ chÝnh. Ph¹t ¸c vµ thëng thiÖn lÖnh chØ h÷u Ých khi C¸c H¹ ®· gia nhËp bang ph¸i vµ chiÕm lÜnh thµnh thÞ khi tham gia C«ng Thµnh ChiÕn. Khi ®¸nh qu¸i ë c¸c b¶n ®å cÊp 90 trë lªn, C¸c H¹ cã c¬ héi nhËn ®îc R¬ng Hoµng Kim cña ThËp §¹i Ph¸i. Vµo trong §¹o Cô cña Kú Tr©n C¸c, dïng tiÒn xu ®Ó mua Ch×a Khãa R¬ng Hoµng Kim. Më ra sÏ ngÉu nhiªn nhËn ®îc c¸c trang bÞ vµ vò khÝ Hoµng Kim M«n Ph¸i ®· tõng dËy sãng Giang Hå n¨m xa!"
local tbOpt =
{
{"Trë l¹i trang tríc", camnangtanthu},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end;
function thongtinphaichinh()
local szTitle = "<npc>Khi Gia NhËp thËp ®¹i ph¸i vµ Hoa S¬n Ph¸i, C¸c H¹ sÏ cã ®îc Xng HiÖu Cao NhÊt cña ph¸i ®ã. Nhng h·y nhí lµm nhiÖm vô m«n ph¸i ®Ó chøng minh r»ng ng¬i xøng ®¸ng víi Xng HiÖu cña m«n ph¸i ®· gia nhËp, ®ång thêi khi hoµn thµnh nhiÖm vô cã thÓ häc ®îc nh÷ng chiªu thøc míi cña m«n ph¸i ®ã ®Õn lóc XuÊt S vµ Trïng Ph¶n S M«n ®Ó häc ®îc TrÊn Ph¸i Vâ Häc. C¸c Chiªu Thøc Thîng Thõa Kü N¨ng 90, 120, 150 vµ BÝ TÞch 180 cã thÓ mua ë Kú Tr©n C¸c. Ngoµi ra, c¸c kü n¨ng cÊp 150 cã thÓ luyÖn ë §µo Hoa Nguyªn MËt §¹o khi nãi chuyÖn víi ngêi tiÕp dÉn cã tªn lµ V« Danh T¨ng."
local tbOpt =
{
{"Trë l¹i trang tríc", camnangtanthu},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end;
function thongtinphaihoason()
local szTitle = "<npc>Hoa S¬n KiÕm Kh¸ch lµ nh÷ng Èn sü kh«ng ®îc nh¾c ®Õn cïng ThËp §¹i Ph¸i v× sù hµnh hiÖp trîng nghÜa 1 c¸ch bÝ Èn cña hä trªn Giang Hå. Cã c¸c Kü N¨ng M«n Ph¸i lóc XuÊt S vµ Trïng Ph¶n S M«n n¨ng lùc ngang tÇm víi Chiªu Thøc Thîng Thõa CÊp 90, ph¶i sö dông §¹i Thµnh BÝ KiÕp ®Ó t¨ng cÊp ®Ò tr¸nh bÞ TÈu Háa NhËp Ma. Hoa S¬n gia nhËp Giang Hå sau ThËp §¹i Ph¸i nªn kh«ng cã VËt PhÈm Hoµng Kim ®· tõng oai chÊn Vâ L©m. H¬n thÕ Hoa S¬n còng cã nh÷ng trang bÞ Hoµng Kim m«n ph¸i cã phÈm chÊt kh«ng thua kÐm ThËp §¹i Ph¸i sau nµy, trong ®ã cã c¶ TuyÖt ThÕ ThÇn Binh oai hïng Thiªn H¹ s¸nh vai cïng c¸c ThÇn Binh Chi B¶o cña c¸c Ph¸i kh¸c."
local tbOpt =
{
{"Trë l¹i trang tríc", camnangtanthu},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end;
function thongtintrangbi()
local szTitle = "<npc>Trang bÞ Hoµng Kim cña ThËp §¹i Ph¸i khi më R¬ng Hoµng Kim cã thÓ ®îc n©ng lªn B¹ch Kim t¹i LÔ Quan. C¸c lo¹i trang bÞ Hoµng Kim kh¸c nh Thanh C©u, V©n Léc, Th¬ng Lang ®Õn cao cÊp nh Tinh S¬ng vµ Minh NguyÖt cã thÓ dïng lÖnh bµi ®Ó ®æi. LÖnh Bµi dïng Hµnh HiÖp LÖnh ®æi ë Hµng Rong hoÆc mua ë Kú Tr©n DÞ B¶o. C¸c H¹ cßn cã thÓ giao chiÕn víi c¸c Cao Nh©n cña m«n ph¸i ®Ó t×m ra nh÷ng TrÊn Bang Hoµng Kim trang bÞ vµ TuyÖt ThÕ ThÇn Binh, ®ång thêi còng cã c¬ héi t×m thÊy c¸c YÕu QuyÕt Kü N¨ng 150 §¹i Thµnh cÊp 21 tíi 30. TriÖu Ho¸n Phï cña c¸c Cao Nh©n cã thÓ mua t¹i ThÇn BÝ Cao Nh©n t¹i c¸c th«n lµng."
local tbOpt =
{
{"Trë l¹i trang tríc", camnangtanthu},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end;
function thongtinnpcchinh()
local szTitle = "<npc>Khi Hµnh TÈu trong chèn Giang Hå, h·y nhí gÆp Hç Trî T©n Thñ vµ LÔ Quan t¹i c¸c T©n Thñ Th«n ®Ó ®æi nh÷ng vËt phÈm quý gi¸ hç trî trong viÖc tu luyÖn vµ phiªu lu tø h¶i. Khi muèn chuyÓn ph¸i, h·y ®èi tho¹i víi Hoµnh Ba Tiªn Tö ë c¸c th«n trÊn ®Ó ®îc trî gióp. VÊn ®Ò trïng sinh, cã thÓ ®èi tho¹i cïng B¾c §Èu L·o Nh©n ë Minh NguyÖt TrÊn, hoÆc dïng ng©n lîng ®Ó trïng sinh khi nãi chuyÖn cïng Hç Trî T©n Thñ. Ngoµi ra, t¹i 7 thµnh thÞ lín, Hç Trî Tiªn Tö cã thÓ gióp C¸c H¹ t×m hiÓu thªm tÝnh n¨ng cña ThÕ Giíi Vâ L©m TruyÒn Kú 1 c¸ch têng tËn nhÊt, c« Êy ®ãng vai trß nh 1 tÝnh n¨ng cña GameMaster!"
local tbOpt =
{
{"Trë l¹i trang tríc", camnangtanthu},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end;
function thongtinkytrancac()
local szTitle = "<npc>Kú Tr©n C¸c lµ giang hµng th¬ng m¹i chÝnh trong Vâ L©m TruyÖn Kú. HÖ thèng TiÒn Xu hay nãi c¸ch kh¸c, TiÒn §ång, cã thÓ nhËn ®îc 1 lÇn ë chç Hç Trî T©n Thñ khi S¬ NhËp Giang Hå vµ dïng Kim Nguyªn B¶o ®Ó ®æi ë Chñ TiÒn Trang L©m An. VËt phÈm ®¸ng chó ý lµ <color=Yellow>Kim M· CÈm Nang<color>. Thu ThËp ®ñ 7 kim m· lÖnh bµi trong <color=Green>Kim M· LÔ Bao<color> mua ë Kú Tr©n C¸c cã thÓ t¨ng 1 sè lîng lín ®iÓm kinh nghiÖm trong 1 ngµy. C¸c lo¹i M· Bµi ®îc tèi u hãa cho t©n thñ khi sö dông gióp viÖc di chuyÓn khi tu luyÖn trë nªn dÔ dµng h¬n. B«n Tiªu vµ Phiªn Vò sÏ hç trî cho nh©n sÜ cÊp 100 trë lªn, chóng n»m ë phÇn §¹o Cô cña Kú Tr©n C¸c. Ngoµi ra, c¸c LÖnh Bµi ®Ó ®æi Trang BÞ Hoµng Kim còng n»m t¹i ®©y cho viÖc tiÖn lîi khi hµnh tÈu vµ sau khi chuyÓn sinh vÒ l¹i cÊp 10. Nguyªn liÖu ®óc trang bÞ n»m ë phÇn Tinh Th¹ch vµ ®îc bæ sung ë phÇn §¹o Cô. Kho¸ng Th¹ch cã thÓ ®îc mua t¹i ®©y hoÆc giao dÞch t¹i Hç Trî T©n Thñ b»ng ng©n lîng."
local tbOpt =
{
{"Trë l¹i trang tríc", camnangtanthu},
{"Kh«ng Hái N÷a"},
}
CreateNewSayEx(szTitle, tbOpt)
end;
function khoangthach()
local szTitle = "<npc>Mçi 1 bé kho¸ng th¹ch theo ngò hµnh tèn 300 v¹n lîng. Xin h·y chän ngò hµnh cña kho¸ng th¹ch cÇn mua:"
local tbOpt =
{
{"HÖ Kim",hekim},
{"HÖ Méc",hemoc},
{"HÖ Thñy",hethuy},
{"HÖ Háa",hehoa},
{"HÖ Thæ",hetho},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function hekim()
if (GetCash() <= 3000000) then
Talk(1, "", "Ph¶i mang ®ñ 300 v¹n míi cã thÓ mua.")
return
end
AddItem(6,1,149,1,0,0,0)
AddItem(6,1,150,1,0,0,0)
AddItem(6,1,151,1,0,0,0)
AddItem(6,1,152,1,0,0,0)
AddItem(6,1,153,1,0,0,0)
AddItem(6,1,154,1,0,0,0)
Pay(3000000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 1 bé kho¸ng th¹ch")
end
function hemoc()
if (GetCash() <= 3000000) then
Talk(1, "", "Ph¶i mang ®ñ 300 v¹n míi cã thÓ mua.")
return
end
AddItem(6,1,149,1,0,0,0)
AddItem(6,1,150,1,1,0,0)
AddItem(6,1,151,1,0,0,0)
AddItem(6,1,152,1,1,0,0)
AddItem(6,1,153,1,0,0,0)
AddItem(6,1,154,1,1,0,0)
Pay(3000000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 1 bé kho¸ng th¹ch")
end
function hethuy()
if (GetCash() <= 3000000) then
Talk(1, "", "Ph¶i mang ®ñ 300 v¹n míi cã thÓ mua.")
return
end
AddItem(6,1,149,1,0,0,0)
AddItem(6,1,150,1,2,0,0)
AddItem(6,1,151,1,0,0,0)
AddItem(6,1,152,1,2,0,0)
AddItem(6,1,153,1,0,0,0)
AddItem(6,1,154,1,2,0,0)
Pay(3000000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 1 bé kho¸ng th¹ch")
end
function hehoa()
if (GetCash() <= 3000000) then
Talk(1, "", "Ph¶i mang ®ñ 300 v¹n míi cã thÓ mua.")
return
end
AddItem(6,1,149,1,0,0,0)
AddItem(6,1,150,1,3,0,0)
AddItem(6,1,151,1,0,0,0)
AddItem(6,1,152,1,3,0,0)
AddItem(6,1,153,1,0,0,0)
AddItem(6,1,154,1,3,0,0)
Pay(3000000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 1 bé kho¸ng th¹ch")
end
function hetho()
if (GetCash() <= 3000000) then
Talk(1, "", "Ph¶i mang ®ñ 300 v¹n míi cã thÓ mua.")
return
end
AddItem(6,1,149,1,0,0,0)
AddItem(6,1,150,1,4,0,0)
AddItem(6,1,151,1,0,0,0)
AddItem(6,1,152,1,4,0,0)
AddItem(6,1,153,1,0,0,0)
AddItem(6,1,154,1,4,0,0)
Pay(3000000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 1 bé kho¸ng th¹ch")
end
function knbshop()
local szTitle = "<npc>C¸c H¹ muèn mua bao nhiªu Kim Nguyªn B¶o?"
local tbOpt =
{
{"1 Kim Nguyªn B¶o gi¸ 100 v¹n lîng",knb1},
{"5 Kim Nguyªn B¶o gi¸ 450 v¹n lîng",knb2},
{"10 Kim Nguyªn B¶o gi¸ 950 v¹n lîng",knb3},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function knb1()
if (GetCash() <= 1000000) then
Talk(1, "", "Ph¶i mang ®ñ 100 v¹n míi cã thÓ mua.")
return
end
AddEventItem(343)
Pay(1000000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 1 Kim Nguyªn B¶o")
end
function knb2()
if (GetCash() <= 4500000) then
Talk(1, "", "Ph¶i mang ®ñ 450 v¹n míi cã thÓ mua.")
return
end
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
Pay(4500000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 5 Kim Nguyªn B¶o")
end
function knb3()
if (GetCash() <= 9500000) then
Talk(1, "", "Ph¶i mang ®ñ 950 v¹n míi cã thÓ mua.")
return
end
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
Pay(9500000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 10 Kim Nguyªn B¶o")
end
function transfer()
if GetLevel() < 190 then
Talk(1, "", "CÊp 190 trë lªn míi cã thÓ chuyÓn sinh.")
return
end
if (GetCash() <= 50000000) then
Talk(1, "", "Ph¶i mang ®ñ 5 ngh×n v¹n míi cã thÓ chuyÓn sinh.")
return
end
if (CalcItemCount(2,0,-1,-1,-1) > 0) then
Talk(1, "", "Muèn Trïng Sinh th× C¸c H¹ cÇn ph¶i th¸o bá tÊt c¶ trang bÞ ®ang sö dông. Trang BÞ ®ang mang sÏ kh«ng phï hîp víi cÊp ®é sau khi kinh m¹ch ®îc ®¶ th«ng.")
return
end
Pay(50000000)
ST_DoTransLife()
end
function cs5()
ST_DoTransLife()
end
function lv70equip()
local szTitle = "<npc><color=red>ThÕ Giíi<color>.<enter><color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! "
local tbOpt =
{
{"ThiÕu L©m QuyÒn",setumang,{1}},
{"ThiÕu L©m C«n",setumang,{2}},
{"ThiÕu L©m §ao",setumang,{3}},
{"Thiªn V¬ng Chïy",setumang,{4}},
{"Thiªn V¬ng Th¬ng",setumang,{5}},
{"Thiªn V¬ng §ao",setumang,{6}},
{"Nga Mi KiÕm",setumang,{7}},
{"Nga Mi Chëng",setumang,{8}},
{"Thóy Yªn §¬n §ao",setumang,{9}},
{"Thóy Yªn Song §ao",setumang,{10}},
{"Ngò §éc Chëng Ph¸p",setumang,{11}},
{"Ngò §éc §ao Ph¸p",setumang,{12}},
{"Trang KÕ",setumangT2},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function setumangT2()
local szTitle = "<npc><color=red>ThÕ Giíi<color>.<enter><color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! "
local tbOpt =
{
{"§êng M«n Phi §ao",setumang,{13}},
{"§êng M«n Tô TiÔn",setumang,{14}},
{"§êng M«n Phi Tiªu",setumang,{15}},
{"C¸i Bang Rång",setumang,{16}},
{"C¸i Bang C«n Ph¸p",setumang,{17}},
{"Thiªn NhÉn KÝch",setumang,{18}},
{"Thiªn NhÉn §ao",setumang,{19}},
{"Vâ §ang KhÝ",setumang,{20}},
{"Vâ §ang KiÕm",setumang,{21}},
{"C«n L«n §ao",setumang,{22}},
{"C«n L«n KiÕm",setumang,{23}},
{"Hoa S¬n KiÕm T«ng",setumanghs,{2}},
{"Hoa S¬n KhÝ T«ng",setumanghs,{1}},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function setumang(nId)
for i = 1825, 1834 do
AddGoldItem(0,10*nId+i-10)
end
end
function setumanghs(nId)
for i = 4713, 4722 do
AddGoldItem(0,10*nId+i-10)
end
end
function add_prop()
local tbOpt =
{
{"T¨ng søc m¹nh.", add_prop_str},
{"T¨ng th©n ph¸p.", add_prop_dex},
{"T¨ng sinh khÝ.", add_prop_vit},
{"T¨ng néi c«ng.", add_prop_eng},
{"Tho¸t."}
}
CreateNewSayEx("<npc>Xin mêi chän ti?m n¨ng cÇn t¨ng!", tbOpt)
end
function add_prop_str()
AskClientForNumber("enter_str_num", 0, GetProp(), "Mêi nhËp chØ sè søc m¹nh: ");
end
function add_prop_dex()
AskClientForNumber("enter_dex_num", 0, GetProp(), "Mêi nhËp chØ sè th©n ph¸p: ");
end
function add_prop_vit()
AskClientForNumber("enter_vit_num", 0, GetProp(), "Mêi nhËp chØ sè sinh kh?:");
end
function add_prop_eng()
AskClientForNumber("enter_eng_num", 0, GetProp(), "Mêi nhËp chØ sè néi c«ng: ");
end
function enter_str_num(n_key)
if (n_key < 0 or n_key > GetProp()) then
return
end
AddStrg(n_key);
end
function enter_dex_num(n_key)
if (n_key < 0 or n_key > GetProp()) then
return
end
AddDex(n_key);
end
function enter_vit_num(n_key)
if (n_key < 0 or n_key > GetProp()) then
return
end
AddVit(n_key);
end
function enter_eng_num(n_key)
if (n_key < 0 or n_key > GetProp()) then
return
end
AddEng(n_key);
end
function Pet()
local szTitle = "<npc><color=red>ThÕ Giíi<color>.<enter><color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! "
local tbOpt =
{
{"Chän ®ång hµnh",Pet1},
{"Xãa ®ång hµnh",Pet2},
{"Trë L¹i", main},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function Pet1()
local szTitle = "<npc><color=red>ThÕ Giíi<color>.<enter><color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! "
local tbOpt =
{
{"Chu Tíc",Pet3},
{"Háa Kú L©n",Pet4},
{"Thanh Long",Pet5},
{"HuyÒn Vò",Pet6},
{"Dòng HÇu",Pet7},
{"Trë L¹i",Pet},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function Pet3()
local partneridex = PARTNER_AddFightPartner(4,4,1,5,5,5,5,5,5)
PARTNER_CallOutCurPartner(1)
end
function Pet4()
local partneridex = PARTNER_AddFightPartner(1,1,1,5,5,5,5,5,5)
PARTNER_CallOutCurPartner(1)
end
function Pet5()
local partneridex = PARTNER_AddFightPartner(2,2,1,5,5,5,5,5,5)
PARTNER_CallOutCurPartner(1)
end
function Pet6()
local partneridex = PARTNER_AddFightPartner(3,3,1,5,5,5,5,5,5)
PARTNER_CallOutCurPartner(1)
end
function Pet7()
local partneridex = PARTNER_AddFightPartner(5,0,1,5,5,5,5,5,5)
PARTNER_CallOutCurPartner(1)
end
function Pet2()
PARTNER_RemovePartner(1,1,1,5,5,5,5,5,5)
end
function fix_skill_hs()
AddMagic(1347) --Skill Hoa son
AddMagic(1372) --Skill Hoa son
AddMagic(1349) --Skill Hoa son
AddMagic(1374) --Skill Hoa son
AddMagic(1350) --Skill Hoa son
AddMagic(1375) --Skill Hoa son
AddMagic(1351) --Skill Hoa son
AddMagic(1376) --Skill Hoa son
AddMagic(1354) --Skill Hoa son
AddMagic(1378) --Skill Hoa son
AddMagic(1355) --Skill Hoa son
AddMagic(1379) --Skill Hoa son
AddMagic(1358) --Skill Hoa son
AddMagic(1360) --Skill Hoa son
AddMagic(1380) --Skill Hoa son
AddMagic(1364,20) --Skill Hoa son 90
AddMagic(1382,20) --Skill Hoa son 90
AddMagic(1363,20) --Skill Hoa son --------Skill
AddMagic(1365,20) --Skill Hoa son 120
AddMagic(1370,20) --Skill Hoa son
AddMagic(1369,20) --Skill Hoa son 150
AddMagic(1384,20) --Skill Hoa son 150
AddMagic(1368,20) --Skill Hoa son --------Doc Co Cuu Kiem
KickOutSelf()
end
function vkHKMP()
local szTitle = "<npc><color=red>ThÕ Giíi<color>.<enter><color=yellow>Vâ L©m TruyÒn Kú<color><enter><color=red>Offline<color>.<enter>Hoan nghªnh c¸c anh hïng hµo kiÖt... ! "
local tbOpt =
{
{"ThiÕu L©m", VKTL},
{"Thiªn V¬ng", VKTV},
{"Nga Mi", VKNM},
{"Thóy Yªn", VKTY},
{"Ngò §éc", VK5D},
{"§êng M«n", VKDM},
{"C¸i Bang", VKCB},
{"Thiªn NhÉn", VKTN},
{"Vâ §ang", VKVD},
{"C«n L«n", VKCL},
{"Hoa S¬n", VKHSS},
{"Trë L¹i", main},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function VKTL()
AddGoldItem(0, 6265)
AddGoldItem(0, 6266)
AddGoldItem(0, 6267)
end
function VKTV()
AddGoldItem(0, 6268)
AddGoldItem(0, 6269)
AddGoldItem(0, 6270)
end
function VKNM()
AddGoldItem(0, 6271)
AddGoldItem(0, 6272)
end
function VKTY()
AddGoldItem(0, 6273)
AddGoldItem(0, 6274)
end
function VK5D()
AddGoldItem(0, 6275)
AddGoldItem(0, 6276)
end
function VKDM()
AddGoldItem(0, 6277)
AddGoldItem(0, 6278)
AddGoldItem(0, 6279)
end
function VKCB()
AddGoldItem(0, 6280)
AddGoldItem(0, 6281)
end
function VKTN()
AddGoldItem(0, 6282)
AddGoldItem(0, 6283)
end
function VKVD()
AddGoldItem(0, 6284)
AddGoldItem(0, 6285)
end
function VKCL()
AddGoldItem(0, 6286)
AddGoldItem(0, 6287)
end
function VKHSS()
AddGoldItem(0, 6288)
AddGoldItem(0, 6289)
end
function chienma()
local szTitle = "<npc>C¸c H¹ muèn mua 5 lo¹i ThÇn M· Danh ChÊn Thiªn H¹? Chi phÝ sÏ lµ 5000 v¹n lîng!"
local tbOpt =
{
{"§ång ý", muangua},
{"Tho¸t"},
}
CreateNewSayEx(szTitle, tbOpt)
end
function muangua()
if (GetCash() <= 50000000) then
Talk(1, "", "Ph¶i mang ®ñ 5000 v¹n míi cã thÓ mua.")
return
end
AddItem(0,10,9,10,0,0,0)
AddItem(0,10,11,10,0,0,0)
AddItem(0,10,13,10,0,0,0)
AddItem(0,10,18,10,0,0,0)
AddGoldItem(0, 5933)
Pay(50000000)
Msg2Player("Giao dÞch thµnh c«ng, nhËn ®îc 5 lo¹i Giang Hå TuyÖt ThÕ ChiÕn M·!")
end
function knb()
AddItem(4,343,0,0,0,0)
AddItem(4,343,0,0,0,0)
AddItem(4,343,0,0,0,0)
AddItem(4,343,0,0,0,0)
AddItem(4,343,0,0,0,0)
end
function hotrotrain()
if GetTask(5000) <=0 then
FuYuan_Start();
FuYuan_Add(1000)
Earn(10000000)
AddLeadExp(500000000)
AddRepute(1000)
AddItem(6,1,4835,0,0,0,10000)
AddItem(6,1,4639,0,0,0)
AddGoldItem(0, 3541)
AddGoldItem(0, 3878)
AddStackItem(999,4,417,1,1,0,0,0)
SetTask(5000, GetTask(5000) +1)
else Talk(1,"no","C¸c H¹ ®· nhËn vËt phÈm råi")
end
end
function tiendong()
AskClientForNumber("tiendong1",0,5000,"NhËp Sè Lîng:")
end;
function tiendong1(sltiendong)
for i = 1, sltiendong do
AddStackItem(1,4,417,1,1,0,0,0)
end
Msg2Player("B¹n nhËn ®îc <color=yellow>"..sltiendong.." <color>tiÒn ®ång.")
end
function HoTroSkill()
if GetLastFactionNumber(10) and (HaveMagic(1347) >= 0) and (HaveMagic(1364) < 0) and GetTask(169) < 73 then
AddMagic(1349)
AddMagic(1374)
AddMagic(1350)
AddMagic(1375)
AddMagic(1351)
AddMagic(1376)
AddMagic(1354)
AddMagic(1378)
AddMagic(1355)
AddMagic(1379)
AddMagic(1358)
AddMagic(1360)
AddMagic(1380)
AddMagic(1364,20)
AddMagic(1382,20)
Talk(1,"",szNpcName.."Vâ häc ®· ®îc truyÒn thô, "..szPlayer .." h·y thö vËn c«ng n©ng thµnh xem sao.")
elseif (HaveMagic(1364) > 0) then
Talk(1,"",szNpcName.."Vâ häc ®· ®îc truyÒn thô, "..szPlayer .." h·y thö vËn c«ng n©ng thµnh xem sao.")
end
local nIndex = floor(GetLevel()/10)
local szFaction = GetFaction()
if tbAllSkill[szFaction] == nil then
return
end
if nIndex >= 1 then
for i=1, min(9,nIndex) do
if tbAllSkill[szFaction][i] ~= nil then
for j=1, getn(tbAllSkill[szFaction][i]) do
if i ==9 then
if HaveMagic(tbAllSkill[szFaction][i][j]) == -1 then
AddMagic(tbAllSkill[szFaction][i][j],20)
end
else
if HaveMagic(tbAllSkill[szFaction][i][j]) == -1 then
AddMagic(tbAllSkill[szFaction][i][j])
end
end
end
end
end
end
Talk(1,"",szNpcName.."Vâ häc ®· ®îc truyÒn thô, "..szPlayer .." h·y thö vËn c«ng n©ng thµnh xem sao.")
end
function dkgm9()
Msg2Player("<color=yellow>HiÖn t¹i ®ang cã<color><color=green> "..GetPlayerCount().."<color> Ngêi Online !.")
end
function dkgm4()
LoadFromFile()
tbTop10:Regist()
tbTop10:UpdateTopList()
tbTop10:hangcanhan()
tbTop10:ShowTopList()
end
function dkgm3()
hoason()
end
function dkgm2()
namcung2()
end
function phanthuong()
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
AskClientForString("checkcode", "", 1, 100, "Xin nhËp code");
end
tbitem =
{
[1] ={szName = "Tiªn th¶o lé", tbProp = {6, 1, 71, 1,0,0}, nCount = 5, nExpiredTime = 10080, nBindState = -2},
[2] ={szName = "Håi thµnh phï (nhá)", tbProp = {6, 1, 1082,1,0,0}, nCount = 1, nExpiredTime = 43200, nBindState = -2},
[3] ={szName="Kim M· CÈm Nang",tbProp={6,1,4088,1,0,0},nCount=1,nExpiredTime=432 00,nBindState = -2},
[4] ={szName = "M¶nh b¶n ®å s¬n hµ x· t¾c (1000 m¶nh)", tbProp = {6, 1, 2514,1,0,0}, nCount = 1, nExpiredTime = 10080, nBindState = -2},
[5] ={szName="ThÇn Hµnh Phï",tbProp={6,1,1266,1,0,0},nCount=1,nExpiredTime=432 00,nBindState = -2},
[6] ={szName="T©n Thñ LÖnh",tbProp={6,1,4265,1,0,0},nCount=1,nExpiredTime=144 00,nBindState = -2},
[7] ={szName="Phông NguyÖt Qu¶ Dung",tbProp={6,1,127,1,0,0},nCount=2,nBindState = -2},
[8] ={szName="Cèng NguyÖt Phï Dung",tbProp={6,1,128,1,0,0},nCount=2,nBindState = -2},
}
function checkcode(strings)
if GetTask(3000)==1 then
Talk(1, "", "B¹n ®· nhËn råi mµ ");
return
end
if (strings=="PGAMING6" or strings=="PGAMING" or strings=="PGAMING1" or strings=="PGAMING2" or strings=="PGAMING3" or strings=="PGAMING4" or strings=="PGMAING5")then
tbAwardTemplet:GiveAwardByList(tbitem, "PhÇn thëng t©n thñ");
SetTask(3000,1)
str = "Tin chÊn ®éng giang hå, Cao thñ<color=red>"..GetName().."<color> Ch¨m chØ luyÖn tËp ®· nhËn ®îc <color=green>phÇn thëng T©n Thñ<color> xng b¸ thiªn h¹ kh«ng ®Þch thñ !."
AddGlobalCountNews(str, 1)
Msg2Player( "Chóc mõng b¹n ®· nhËn ®îc phÇn th¬ng T©n Thñ" );
else
Talk(1, "", "Code sai");
end
end
function hotrotanthu()
if GetLevel()<150 then
AddSkillState(512,20,1,1440*1440*18) --Bao toc hoang ky nang
AddSkillState(527,5,1,1440*1440*18) --Truong menh hoang
AddSkillState(1618,15,1,1440*1440*18)
AddSkillState(1619,15,1,1440*1440*18)
AddSkillState(1620,15,1,1440*1440*18)
AddSkillState(1621,15,1,1440*1440*18)
AddSkillState(451, 20, 1,1440*1440*18) --Banh trung thu
AddSkillState(450, 20, 1,1440*1440*18) --Que hoa tuu
AddSkillState(892, 5, 1, 64800 * 24) --Tien Thao Lo
AddSkillState(1622, 5, 1, 64800 * 24) --Tien Thao Lo
AddSkillState(441, 1, 1, 1555200) --Thien son bao lo
AddSkillState(313,5,1,1440*1440*18) --Vong duoi chan
AddSkillState(314,50,1,1440*1440*18) --Vong duoi chan
AddSkillState(546,1,1,1440*1440*18) --Rong bay
Talk(1, "", "B¹n sÏ ®îc nhËn hæ trî kü n¨ng nµy ®Õn cÊp 150");
Msg2Player( "Lªn Trang Chñ <color=yellow>192.168.1.200<color> §Ó nhËn gift code" );
tbAwardTemplet:GiveAwardByList(tbItem, "PhÇn thëng t©n thñ");
end
end
function partner_getdust1()
partner_givetodo()
end
function DoiTenNV()
AskClientForString("danhten", "", 1, 100, "Xin nhËp tªn muèn ®æi");
end
function danhten(strings)
RenameRole(strings)
end
function dkgm()
n_title = 5000 -- S?a ID danh hi?u vào
local nServerTime = GetCurServerTime()+ 1728000; --20*24*60*60
local nDate = FormatTime2Number(nServerTime);
local nDay = floor(mod(nDate,1000000) / 10000);
local nMon = mod(floor(nDate / 1000000) , 100)
local nTime = nMon * 1000000 + nDay * 10000
Title_AddTitle(n_title, 2, nTime)
Title_ActiveTitle(n_title)
local nCurLevel = GetLevel()
if nCurLevel < 150 then
ST_LevelUp(150 - nCurLevel)
end
SetFightState(0)
SetCamp(6)
SetCurCamp(6)
AddMagic(732, 50) --Skill GM
AddMagic(733, 50) --Skill GM
if CalcFreeItemCellCount() >= 1 then
local tbItem = {szName="LÖnh bµi Gm", tbProp={6,1,4257,1,0,0}, nBindState=-2}
tbAwardTemplet:GiveAwardByList(tbItem, "LÖnh bµi Gm", 1)
end
end
function deltem()
if (GetBoxLockState() ~= 0) then
Say("Xin më khãa r¬ng tríc !", 0)
return
end
GiveItemUI("Hñy vËt phÈm", "§¹i hiÖp h·y cÈn träng trong viÖc hñy vËt phÈm!", "DisposeConfirm", "onCancel", 1);
end
function DisposeConfirm(nCount)
if (nCount ~= 1) then
Talk(1, "", "Mçi lÇn chØ cã thÓ hñy ®îc mét vËt phÈm!!");
return
end
local nItemIndex = GetGiveItemUnit(nCount)
local nBindState = GetItemBindState(nItemIndex)
if (nBindState >=0) then
Talk(1, "", "VËt phÈm cÇn hñy ph¶i lµ vËt phÈm khãa!");
return
end
local strItem = GetItemName(nItemIndex)
RemoveItemByIndex(nItemIndex)
Talk(1, "", "§¹i hiÖp cã thÓ s¾p xÕp l¹i r¬ng chøa ®å råi!");
Msg2Player("§¹i hiÖp võa hñy vËt phÈm thµnh c«ng")
WriteLog(date("%Y%m%d %H%M%S").."\t".." Hñy item khãa "..GetAccount().."\t"..GetName().."\t".." Huû item "..strItem)
end
function doirac()
weapon_ring()
end
Em sài dòng script này, copy từ NPC tân thủ dán vào lệnh bài, nhưng mà sao em lấy lệnh bài ra mở đc 1 lần là biến mất cái lệnh bài luôn. Ai giúp e với ạ. Làm sao để ko bị mất lệnh bài mỗi lần mở lên vậy ạ