- Diễn đàn
- CLB NGHIÊN CỨU & PHÁT TRIỂN MMORPG
- Võ Lâm Truyền Kỳ (Jx Server)
- Hỏi Đáp/ Yêu Cầu
- [JX] Sử dụng lệnh bài 1 lần mất luôn. Cần cao nhân chỉ giáo ạ
Kết quả 1 đến 3 của 3
-
28-04-20, 03:10 PM #1Thành Viên
- Ngày tham gia
- Oct 2015
- Bài viết
- 121
- Thanks
- 4
- Thanked 5 Times in 5 Posts
Sử dụng lệnh bài 1 lần mất luôn. Cần cao nhân chỉ giáo ạ
Code: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.lua") Include("\\script\\global\\pgaming\\\hotrotanthu\\duatop.lua") Include("\\script\\tagnewplayer\\tbitemHK.lua"); Include("\\script\\global\\pgaming\\hotrotanthu\\hotroitem.lua") Include("\\script\\global\\fuyuan.lua") Include("\\script\\global\\pgaming\\hotrotanthu\\hotrogm.lua") Include("\\script\\global\\pgaming\\hotrotanthu\\nc_topall.lua") Include("\\script\\task\\partner\\education\\swordking_people.lua") Include("\\script\\global\\pgaming\\hotrotanthu\\doiraclayvk.lua") Include("\\script\\global\\pgaming\\hotrotanthu\\diemdanhhangngay.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=43200,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=43200,nBindState = -2}, [6] ={szName="T©n Thñ LÖnh",tbProp={6,1,4265,1,0,0},nCount=1,nExpiredTime=14400,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 ạKhách viếng thăm hãy cùng vikingnguyen xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
29-04-20, 12:11 PM #2Vi phạm quy định
- Ngày tham gia
- Mar 2015
- Đang ở
- https://t.me/pump_upp
- Bài viết
- 116
- Thanks
- 11
- Thanked 35 Times in 22 Posts
Ðề: Sử dụng lệnh bài 1 lần mất luôn. Cần cao nhân chỉ giáo ạ
Code: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.lua") Include("\\script\\global\\pgaming\\\hotrotanthu\\duatop.lua") Include("\\script\\tagnewplayer\\tbitemHK.lua"); Include("\\script\\global\\pgaming\\hotrotanthu\\hotroitem.lua") Include("\\script\\global\\fuyuan.lua") Include("\\script\\global\\pgaming\\hotrotanthu\\hotrogm.lua") Include("\\script\\global\\pgaming\\hotrotanthu\\nc_topall.lua") Include("\\script\\task\\partner\\education\\swordking_people.lua") Include("\\script\\global\\pgaming\\hotrotanthu\\doiraclayvk.lua") Include("\\script\\global\\pgaming\\hotrotanthu\\diemdanhhangngay.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=43200,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=43200,nBindState = -2}, [6] ={szName="T©n Thñ LÖnh",tbProp={6,1,4265,1,0,0},nCount=1,nExpiredTime=14400,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 ạ
fix
CreateNewSayEx(szTitle, tbOpt)
else
thanh
CreateNewSayEx(szTitle, tbOpt)
return 1;
elseKhách viếng thăm hãy cùngtapdevjxlinuxxây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
-
29-04-20, 06:36 PM #3Thành Viên
- Ngày tham gia
- Oct 2015
- Bài viết
- 121
- Thanks
- 4
- Thanked 5 Times in 5 Posts
Ðề: Sử dụng lệnh bài 1 lần mất luôn. Cần cao nhân chỉ giáo ạ
Em cảm ơn bác ạ. Em đã fix được rồi!
Khách viếng thăm hãy cùng vikingnguyen xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!
Chọn nhanh
Hỏi Đáp/ Yêu Cầu
Lên trên
- Khu vực riêng
- Thiếp lập
- Tin nhắn riêng
- Các theo dõi
- Đang trực tuyến
- Tìm diễn đàn
- Trang chính
- Diễn đàn
- ĐẠI SẢNH CLBGAMESVN
- GIAO LƯU CÙNG DOANH NGHIỆP
- CLB NGHIÊN CỨU & PHÁT TRIỂN MMORPG
- Mu Server
- Võ Lâm Truyền Kỳ (Jx Server)
- Thiên Long Bát Bộ
- Kiếm Thế Server
- Gunny - Webgame Bắn Súng
- Hiệp Khách Giang Hồ
- Tổng Hợp Các Server Games Khác
- Private Server For Linux
- CHUYÊN ĐỀ WEB GAMES
- Old Archived Server
- GIỚI THIỆU CÁC SERVER GAME PRIVATE
- CLB GAMES OFFLINE & THẢO LUẬN GAMES
- CLB WEBMASTER - SECURITY - SOFTWARE
- CHUYÊN MỤC GIẢI TRÍ
- LINH TINH KHÁC
Các Chủ đề tương tự
-
[KT] Nhờ Anh Jie với anh vipbk hay những cao thủ khác chỉ chổ sai giùm em
Bởi sice1995 trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 6Bài viết cuối: 12-06-16, 10:06 PM -
[JX] [LINUX] Xin tên skill trong những file skill của từng phái(emei.lua,wudu.lua)
Bởi sanerhp trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 4Bài viết cuối: 24-07-15, 07:58 AM -
[JX] Xin Hỏi các Cao nhân có cao nhân nào FIX được dấu ? ở Chữ Hạng sever linux không
Bởi ShareSever trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 1Bài viết cuối: 14-04-15, 01:18 AM -
[MU] nhờ các cao thủ giúp đỡ việc xin DLL chỉ chứa chức năng fix dame over 6 5 k
Bởi jangaka1 trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 1Bài viết cuối: 24-02-15, 09:45 PM -
[KT] Đã ai vọc file player.lua và offline.lua chưa nhỉ ????
Bởi kandylee trong diễn đàn Hỏi Đáp/ Yêu CầuTrả lời: 2Bài viết cuối: 13-10-12, 12:10 PM