Tổng hợp tất cả sever + update + Fix lỗi ....Tất tần tật từ A->Z Sever Linux VL

[alextran2587]

được bạn nhé..... file lễ quan như nhau hết mà... miền là đúng đường dẫn

Em cám ơn anh nhìu nhìu nếu đuợc em xin lại đuờng dẫn đó và tên file lễ quan nha e cảm ơn anh nhìu

[ngocht]

Có một vấn đề này mình muốn hỏi mong các bác ở đây giúp đỡ mình với. Đại khái là file script của lễ quan nó như thế này.
[Only registered and activated users can see links. ]
Mình test thử muốn thêm tính năng nhận lệnh bài admin ở thằng lễ quan ấy. Giả sử mình thêm đoạn code ({"lÊy LÖnh Bµi Admin", lbadmin}, vào ở giữa dòng {"Màu PK", trangthai}, với dòng {"Thoát"}, rồi thêm đoạn code

function lbadmin()
AddItem(6,1,4369,1,0,0,0,0)--lenh bai adm
end

thì lúc vào game bấm nó vẫn hiện các lựa chọn của thằng lễ quan như là không thêm vào. Không có dòng "Lấy lệnh bài admin" nhưng bấm vào dòng thoát thì vẫn nhận được lệnh bài admin tương tự nếu như thêm vào giữa hai dòng bất kì thì nó bị thụt lùi xuống một dòng từ chỗ thêm vào ấy và cũng không có dòng "lấy lệnh bải admin" . Vậy làm thế nào để nó hiển thị đúng từng dòng các bác nhỉ . Ngồi sửa cả chiều rồi vẫn không được !!!

[vuduymanh]

của bạn đây

IncludeLib("SETTING")Include("\\script\\dailogsys\ \dailogsay.lua")
Include("\\script\\lib\\awardtemplet.lua")
Include("\\script\\global\\fuyuan.lua")
Include("\\script\\global\\hotrothem.lua")
Include ("\\script\\class\\ktabfile.lua") --CÇn ¢®Ã“ ch¢¹y TabFile_Load
Include("\\script\\global\\gmrole.lua")


SKILL_180 = {1220,1221,1223,1222,1224,1225,1227,1226,1228,1229 }
local tbFaction =
{
[1] =
{
szShowName = "ThiÕu L©m",
szFaction = "shaolin",
nShortFaction = "sl",
tbSkill = {318, 319, 321, 709, 1055, 1056, 1057},
tbEquip =
{
{
szFaction = "ThiÕu L©m QuyÒn",
nFirstEquipId = 4863,
tbEquipName =
{
" Minh Ph­îng ch©u liªn", " Minh Ph­îng t¨ng m·o", " Minh Ph­îng th­îng giíi", " Minh Ph­îng hé uyÓn", " Minh Ph­îng yªu ®¸i",
" Minh Ph­îng cµ sa ", " Minh Ph­îng triÒn thñ ", " Minh Ph­îng t¨ng hµi ", " Minh Ph­îng yªu trôy ", " Minh Ph­îng h¹ giíi ",
},
},
{
szFaction = "ThiÕu L©m C«n",
nFirstEquipId = 4873,
tbEquipName =
{
"Minh Ph­îng ch©u liªn", "Minh Ph­îng t¨ng m·o", "Minh Ph­îng th­îng giíi", "Minh Ph­îng hé uyÓn", "Minh Ph­îng yªu ®¸i",
"Minh Ph­îng cµ sa", "Minh Ph­îng c«n", "Minh Ph­îng t¨ng hµi", "Minh Ph­îng yªu trôy", "Minh Ph­îng h¹ giíi",
},
},
{
szFaction = "ThiÕu L©m §ao",
nFirstEquipId = 4883,
tbEquipName =
{
"Minh Ph­îng ch©u liªn", "Minh Ph­îng t¨ng m·o", "Minh Ph­îng th­îng giíi", "Minh Ph­îng hé uyÓn", "Minh Ph­îng yªu ®¸i",
"Minh Ph­îng cµ sa", "Minh Ph­îng ®ao", "Minh Ph­îng t¨ng hµi", "Minh Ph­îng yªu trôy", "Minh Ph­îng h¹ giíi",
},
},
},
},
[2] =
{
szShowName = "Thiªn V­¬ng Bang",
szFaction = "tianwang",
nShortFaction = "tw",
tbSkill = {322, 325, 323, 708, 1058, 1059, 1060},
tbEquip =
{
{
szFaction = "Thiªn V­¬ng Chïy",
nFirstEquipId = 4893,
tbEquipName =
{
"Minh Ph­îng ®Þnh quang liªn", "Minh Ph­îng ®Þnh quang kh«i", "Minh Ph­îng ®Þnh quang th­îng giíi", "Minh Ph­îng ®Þnh quang thóc o¶n", "Minh Ph­îng ®Þnh quang yªu ®¸i",
"Minh Ph­îng ®Þnh quang kh¶i", "Minh Ph­îng ®Þnh quang chïy", "Minh Ph­îng ®Þnh quang ngoa", "Minh Ph­îng ®Þnh quang béi", "Minh Ph­îng ®Þnh quang h¹ giíi",
},
},
{
szFaction = "Thiªn V­¬ng Th­¬ng",
nFirstEquipId = 4903,
tbEquipName =
{
"Minh Ph­îng ngù phong liªn", "Minh Ph­îng ngù phong kh«i", "Minh Ph­îng ngù phong th­îng giíi", "Minh Ph­îng ngù phong thóc o¶n", "Minh Ph­îng ngù phong yªu ®¸i",
"Minh Ph­îng ngù phong kh¶i", "Minh Ph­îng ngù phong th­¬ng", "Minh Ph­îng ngù phong ngoa", "Minh Ph­îng ngù phong béi", "Minh Ph­îng ngù phong h¹ giíi",
},
},
{
szFaction = "Thiªn V­¬ng §ao",
nFirstEquipId = 4913,
tbEquipName =
{
"Minh Ph­îng biÓu phong liªn", "Minh Ph­îng biÓu phong kh«i", "Minh Ph­îng biÓu phong th­îng giíi", "Minh Ph­îng biÓu phong thóc o¶n", "Minh Ph­îng biÓu phong yªu ®¸i",
"Minh Ph­îng biÓu phong kh¶i", "Minh Ph­îng biÓu phong ®ao", "Minh Ph­îng biÓu phong ngoa", "Minh Ph­îng biÓu phong béi", "Minh Ph­îng biÓu phong h¹ giíi",
},
},
},
},
[3] =
{
szShowName = "§­êng M«n",
szFaction = "tangmen",
nShortFaction = "tm",
tbSkill = {339, 302, 342, 710, 1069, 1070, 1071},
tbEquip =
{
{
szFaction = "Phi §ao §­êng M«n",
nFirstEquipId = 4983,
tbEquipName =
{
"Minh Ph­îng nÆc ¶nh h¹ng liªn", "Minh Ph­îng nÆc ¶nh qu¸n", "Minh Ph­îng nÆc ¶nh th­îng giíi", "Minh Ph­îng nÆc ¶nh hé uyÓn", "Minh Ph­îng nÆc ¶nh triÒn yªu",
"Minh Ph­îng nÆc ¶nh gi¸p", "Minh Ph­îng nÆc ¶nh phi ®ao", "Minh Ph­îng nÆc ¶nh ngoa", "Minh Ph­îng nÆc ¶nh yªu trôy", "Minh Ph­îng nÆc ¶nh h¹ giíi",
},
},
{
szFaction = "Ná §­êng M«n",
nFirstEquipId = 4993,
tbEquipName =
{
"Minh Ph­îng cùc quang h¹ng liªn", "Minh Ph­îng cùc quang qu¸n", "Minh Ph­îng cùc quang th­îng giíi", "Minh Ph­îng cùc quang hé uyÓn", "Minh Ph­îng cùc quang triÒn yªu",
"Minh Ph­îng cùc quang gi¸p", "Minh Ph­îng cùc quang ná ", "Minh Ph­îng cùc quang ngoa ", "Minh Ph­îng cùc quang yªu trôy ", "Minh Ph­îng cùc quang h¹ giíi ",
},
},
{
szFaction = "Phi Tiªu §­êng M«n",
nFirstEquipId = 5003,
tbEquipName =
{
" Minh Ph­îng th­íc kim h¹ng liªn ", " Minh Ph­îng th­íc kim qu¸n ", " Minh Ph­îng th­íc kim th­îng giíi ", " Minh Ph­îng th­íc kim hé uyÓn ", " Minh Ph­îng th­íc kim triÒn yªu ",
" Minh Ph­îng th­íc kim gi¸p ", " Minh Ph­îng th­íc kim phi tiªu ", " Minh Ph­îng th­íc kim ngoa ", " Minh Ph­îng th­íc kim yªu trôy ", " Minh Ph­îng th­íc kim h¹ giíi ",
},
},
},
},
[4] =
{
szShowName = "Ngò §éc Gi¸o",
szFaction = "wudu",
nShortFaction = "wu",
tbSkill = {353, 355, 711, 1066, 1067},
tbEquip =
{
{
szFaction = "Ngò §éc Ch­ëng",
nFirstEquipId = 4963,
tbEquipName =
{
" Minh Ph­îng ®éc sa h¹ng liªn ", " H¹ch Hæ ®éc sa ph¸t ®¸i ", " Minh Ph­îng ®éc sa th­îng giíi ", " Minh Ph­îng ®éc sa hé uyÓn ", " Minh Ph­îng ®éc sa yªu ®¸i ",
" Minh Ph­îng ®éc sa bÝ trang ", " Minh Ph­îng ®éc sa triÒn thñ ", " Minh Ph­îng ®éc sa ngoa ", " Minh Ph­îng ®éc sa yªu trôy ", " Minh Ph­îng ®éc sa h¹ giíi ",
},
},
{
szFaction = "Ngò §éc §ao",
nFirstEquipId = 4973,
tbEquipName =
{
" Minh Ph­îng u linh h¹ng liªn ", " H¹ch Hæ u linh ph¸t ®¸i ", " Minh Ph­îng u linh th­îng giíi ", " Minh Ph­îng u linh hé uyÓn ", " Minh Ph­îng u linh yªu ®¸i ",
" Minh Ph­îng u linh bÝ trang ", " Minh Ph­îng u linh ®ao ", " Minh Ph­îng u linh ngoa ", " Minh Ph­îng u linh yªu trôy ", " Minh Ph­îng u linh h¹ giíi ",
},
},
},
},
[5] =
{
szShowName = "Nga Mi",
szFaction = "emei",
nShortFaction = "em",
tbSkill = {380, 328, 712, 1061, 1062, 1114},
tbEquip =
{
{
szFaction = "Nga Mi KiÕm",
nFirstEquipId = 4923,
tbEquipName =
{
"Minh Ph­îng l­u v©n ch©u liªn", "Minh Ph­îng l­u v©n ph¸t ®¸i", "Minh Ph­îng l­u v©n th­îng giíi", "Minh Ph­îng l­u v©n hé uyÓn", "Minh Ph­îng l­u v©n yªu ®¸i ",
"Minh Ph­îng l­u v©n sam", "Minh Ph­îng l­u v©n kiÕm", "Minh Ph­îng l­u v©n ngoa", "Minh Ph­îng l­u v©n béi ", "Minh Ph­îng l­u v©n h¹ giíi ",
},
},
{
szFaction = "Nga Mi Ch­ëng",
nFirstEquipId = 4933,
tbEquipName =
{
"Minh Ph­îng hµn ngäc ch©u liªn ", "Minh Ph­îng hµn ngäc ph¸t ®¸i", "Minh Ph­îng hµn ngäc th­îng giíi", "Minh Ph­îng hµn ngäc hé uyÓn", "Minh Ph­îng hµn ngäc yªu ®¸i",
"Minh Ph­îng hµn ngäc sam", "Minh Ph­îng hµn ngäc triÒn thñ ", "Minh Ph­îng hµn ngäc ngoa ", "Minh Ph­îng hµn ngäc béi ", "Minh Ph­îng hµn ngäc h¹ giíi ",
},
},
},
},
[6] =
{
szShowName = "Thóy Yªn",
szFaction = "cuiyan",
nShortFaction = "cy",
tbSkill = {336, 337, 713, 1063, 1065},
tbEquip =
{
{
szFaction = "Thóy Yªn §ao (Ngo¹i)",
nFirstEquipId = 4943,
tbEquipName =
{
"Minh Ph­îng hång nhan ch©u liªn ", "Minh Ph­îng hång nhan ph¸t ®¸i", "Minh Ph­îng hång nhan th­îng giíi", "Minh Ph­îng hång nhan hé uyÓn", "Minh Ph­îng hång nhan yªu ®¸i",
"Minh Ph­îng hång nhan sam", "Minh Ph­îng hång nhan ®ao ", "Minh Ph­îng hång nhan ngoa ", "Minh Ph­îng hång nhan béi ", "Minh Ph­îng hång nhan h¹ giíi ",
},
},
{
szFaction = "Thóy Yªn Song §ao (Néi)",
nFirstEquipId = 4953,
tbEquipName =
{
"Minh Ph­îng ¶o th¸i ch©u liªn ", "Minh Ph­îng ¶o th¸i ph¸t ®¸i", "Minh Ph­îng ¶o th¸i th­îng giíi", "Minh Ph­îng ¶o th¸i hé uyÓn", "Minh Ph­îng ¶o th¸i yªu ®¸i",
"Minh Ph­îng ¶o th¸i sam", "Minh Ph­îng ¶o th¸i ®ao ", "Minh Ph­îng ¶o th¸i ngoa ", "Minh Ph­îng ¶o th¸i béi ", "Minh Ph­îng ¶o th¸i h¹ giíi ",
},
},
},
},
[7] =
{
szShowName = "C¸i Bang",
szFaction = "gaibang",
nShortFaction = "gb",
tbSkill = {357, 359, 714, 1073, 1074},
tbEquip =
{
{
szFaction = "C¸i Bang Ch­ëng",
nFirstEquipId = 5013,
tbEquipName =
{
" Minh Ph­îng hé ph¸p h¹ng liªn", " Minh Ph­îng hé ph¸p ®Çu hoµn", " Minh Ph­îng hé ph¸p th­îng giíi ", " Minh Ph­îng hé ph¸p hé uyÓn ", " Minh Ph­îng hé ph¸p thóc yªu",
" Minh Ph­îng hé ph¸p c¸i y", " Minh Ph­îng hé ph¸p triÒn thñ ", " Minh Ph­îng hé ph¸p ngoa ", "Minh Ph­îng hé ph¸p béi ", " Minh Ph­îng hé ph¸p h¹ giíi ",
},
},
{
szFaction = "C¸i Bang Bæng",
nFirstEquipId = 5023,
tbEquipName =
{
"Minh Ph­îng trõng giíi h¹ng liªn", "Minh Ph­îng trõng giíi ®Çu hoµn", "Minh Ph­îng trõng giíi th­îng giíi ", "Minh Ph­îng trõng giíi hé uyÓn", "Minh Ph­îng trõng giíi thóc yªu",
"Minh Ph­îng trõng giíi c¸i y", "Minh Ph­îng trõng giíi tr­îng", "Minh Ph­îng trõng giíi ngoa", "Minh Ph­îng trõng giíi béi", "Minh Ph­îng trõng giíi h¹ giíi ",
},
},
},
},
[8] =
{
szShowName = "Thiªn NhÉn Gi¸o",
szFaction = "tianren",
nShortFaction = "tr",
tbSkill = {361, 362, 715, 1075, 1076},
tbEquip =
{
{
szFaction = "ChiÕn NhÉn",
nFirstEquipId = 5033,
tbEquipName =
{
"Minh Ph­îng xÝch minh h¹ng liªn", "H¹ch Hæ xÝch minh kh«i", "Minh Ph­îng xÝch minh th­îng giíi", "Minh Ph­îng xÝch minh hé o¶n", "Minh Ph­îng xÝch minh yªu ®¸i",
"Minh Ph­îng xÝch minh gi¸p", "Minh Ph­îng xÝch minh th­¬ng", "Minh Ph­îng xÝch minh ngoa", "Minh Ph­îng xÝch minh béi", "Minh Ph­îng xÝch minh h¹ giíi",
},
},
{
szFaction = "Ma NhÉn",
nFirstEquipId = 5043,
tbEquipName =
{
"Minh Ph­îng s¸t viªm h¹ng liªn", "H¹ch Hæ s¸t viªm kh«i", "Minh Ph­îng s¸t viªm th­îng giíi", "Minh Ph­îng s¸t viªm hé o¶n", "Minh Ph­îng s¸t viªm yªu ®¸i",
"Minh Ph­îng s¸t viªm gi¸p", "Minh Ph­îng s¸t viªm ®ao", "Minh Ph­îng s¸t viªm ngoa", "Minh Ph­îng s¸t viªm béi", "Minh Ph­îng s¸t viªm h¹ giíi",
},
},
},
},
[9] =
{
szShowName = "Vâ §ang",
szFaction = "wudang",
nShortFaction = "wd",
tbSkill = {365, 368, 716, 1078, 1079},
tbEquip =
{
{
szFaction = "Vâ §ang KhÝ",
nFirstEquipId = 5053,
tbEquipName =
{
" Minh Ph­îng tiªn ©m phï ", " Minh Ph­îng tiªn ©m qu¸n", " Minh Ph­îng tiªn ©m th­îng giíi ", " Minh Ph­îng tiªn ©m tô ", " Minh Ph­îng tiªn ©m ph¸p ®¸i ",
" Minh Ph­îng tiªn ©m ®¹o bµo ", " Minh Ph­îng tiªn ©m kiÕm ", " Minh Ph­îng tiªn ©m ngoa ", " Minh Ph­îng tiªn ©m béi ", " Minh Ph­îng tiªn ©m h¹ giíi ",
},
},
{
szFaction = "Vâ §ang KiÕm",
nFirstEquipId = 5063,
tbEquipName =
{
" Minh Ph­îng ®¹o minh phï ", " Minh Ph­îng ®¹o minh qu¸n ", " Minh Ph­îng ®¹o minh th­îng giíi ", " Minh Ph­îng ®¹o minh tô ", " Minh Ph­îng ®¹o minh ph¸p ®¸i ",
" Minh Ph­îng ®¹o minh ®¹o bµo ", " Minh Ph­îng ®¹o minh kiÕm ", " Minh Ph­îng ®¹o minh ngoa ", " Minh Ph­îng ®¹o minh béi ", " Minh Ph­îng ®¹o minh h¹ giíi ",
},
},
},
},
[10] =
{
szShowName = "C«n L«n",
szFaction = "kunlun",
nShortFaction = "kl",
tbSkill = {372, 375, 717, 1080, 1081},
tbEquip =
{
{
szFaction = "C«n L«n §ao",
nFirstEquipId = 5073,
tbEquipName =
{
"Minh Ph­îng thiªn canh h¹ng liªn ", "Minh Ph­îng thiªn canh ®¹o qu¸n", "Minh Ph­îng thiªn canh th­îng giíi", "Minh Ph­îng thiªn canh hé uyÓn", "Minh Ph­îng thiªn canh ph¸p ®¸i",
"Minh Ph­îng thiªn canh ®¹o bµo", "Minh Ph­îng thiªn canh ®ao", "Minh Ph­îng thiªn canh ngoa", "Minh Ph­îng thiªn canh béi", "Minh Ph­îng thiªn canh h¹ giíi",
},
},
{
szFaction = "C«n L«n KiÕm",
nFirstEquipId = 5083,
tbEquipName =
{
"Minh Ph­îng ng¹o s­¬ng h¹ng liªn ", "Minh Ph­îng ng¹o s­¬ng ®¹o qu¸n", "Minh Ph­îng ng¹o s­¬ng th­îng giíi", "Minh Ph­îng ng¹o s­¬ng hé uyÓn", "Minh Ph­îng ng¹o s­¬ng ph¸p ®¸i",
"Minh Ph­îng ng¹o s­¬ng ®¹o bµo", "Minh Ph­îng ng¹o s­¬ng kiÕm ", "Minh Ph­îng ng¹o s­¬ng ngoa ", "Minh Ph­îng ng¹o s­¬ng béi", "Minh Ph­îng ng¹o s­¬ng h¹ giíi",
},
},
},
},
}
local tbEquipFreeCell =
{
{2, 1}, {2, 2}, {1, 1}, {1, 2}, {2, 1}, --¾±´ø£¬¶¥´÷£¬ÉϽ䣬»¤Ýó£¬Ñ ü´ø
{2, 3}, {2, 4}, {2, 2}, {1, 2}, {1, 1}, --?¢ÎÎäÆ÷£¬Ñ¥×Ó£¬Ñü×¹£¬Ï� �½ä
}


local tbFactionSeries =
{
[1] = {1, 2},
[2] = {3, 4},
[3] = {5, 6},
[4] = {7, 8},
[5] = {9, 10},
}


local tbFreeItem =
{
{szName="Håi Thiªn T¸i T¹o CÈm Nang", tbProp={6,1,1781,1,0,0}, tbParam={60}},
{szName="VËt phÈm kh¸c", tbProp={6,1,298,1,0,0}},
{szName="Qu¶ huy hoµng cao cÊp.", tbProp={6,1,1075,1,0,0}},
{szName="Khiªu chiªn lÔ bao", tbProp={6,1,2006,1,0,0}},
{szName="-ThËp Toµn §¹i Bæ-", tbProp={6,1,1399,1,0,0}},
{szName="Viªm §ª ®å b¶o", tbProp={6,1,2805,1,0,0}},
{szName="Tèng kim qu©n c«ng", tbProp={6,1,1477,1,0,0}},
{szName="§¹i lùc", tbProp={6,1,2517,1,0,0}},
{szName="-H·n HuyÕt Long C©u-", tbProp={0,10,18,1,0,0}, nWidth=2, nHeigth=3},
}


local tbGMAccount = {"Manhga1", "Manhga2", "Manhga3", "Manhga4", "Manhga5"}


function main()
dofile("script/global/·ÈË_Àñ¹Ù.lua");
dialog_main()
end






--================================================== ========================================


Include("\\script\\global\\repute_head.lua")
Include("\\script\\misc\\league_cityinfo.lua")


function dmcreattongtest()
local strTongName = GetTongName()
local tszTitle = "Chµo mong b¹n ®· tham gia hÖ thèng <color=yellow>Bang Héi<color>"
if (strTongName == nil or strTongName == "") then
Say(tszTitle,4," NhËn ®i?u kiÖn t¹o bang héi/dmcreatetong","Gia nhËp bang héi/dmjointong","T¹o bang héi/dmcreateit","KOt thóc ®èi tho¹i")
else
Say(tszTitle,0)
end
end


function dmcreatetong()
if GetCamp() ~= 4 then
SetCamp(4)
SetCurCamp(4)
AddRepute(100000)
AddLeadExp(1000000)
AddLeadExp(1000000)


AddLeadExp(1000000)


AddEventItem(195)
Earn(1000000)
if GetLevel() <= 100 then
for i=1,100 do
AddOwnExp(100000000)
end
end
Msg2Player("<color=yellow>Ng­êi ®· héi ®ñ tÊt c¶ ®iªu kiÖn ®Ó t¹o Bang Héi!<color>")
else
end
end


function dmjointong()
if GetCamp() ~= 4 then


if GetLevel() <= 100 then
for i=1,100 do
AddOwnExp(100000000)
end
end


SetCamp(4)
SetCurCamp(4)
Msg2Player("<color=yellow>Gia nhËp Bang héi thµnh c«ng!<color>")
else
end
end


function dmcreateit()
Tong_name,oper = GetTong()
if (oper == 0) and (GetTask(99) == 1) then
Say("KiOm hiÖp ch­ëng m«n nh©n:Khai s¸ng bang héi, më réng b¸ nghiÖp." ,2,"B¾t ®Çu dùng bang/Direct_CreateTong","§îi ta mét chót/wait_a_moment")
elseif (oper == 0) and (GetCamp() == 4) and (GetLevel() >= 50) and (GetReputeLevel(GetRepute()) >= 6) and (GetLeadLevel() >= 30) and (HaveItem(195) == 1) then
Talk(6,"create_pay", "Ng­êi ch¬i: KiOm hiÖp ch­ëng m«n nh©n, xin hái ta ph¶i lµm nh­ thO nµo míi ca thÓ khai t«ng lËp ph¸i trë thµnh Bang chñ ®©y?", "KiOm hiÖp ch­ëng m«n nh©n: §Çu tiªn ng­¬i ph¶i ca ®ñ n¨ng lùc l·nh ®¹o, ca 16 ng­êi cïng chU h­íng cïng ng­¬i lËp bang, tr¶i qua 3 ngµy Kh¶o NghiÖm Kú ", "Ch­ëng m«n nh©n: NOu trong 3 ngµy ca ng­êi rêi bang th× néi trong 3 ngµy ®a ng­êi ph¶i t×m ng­êi kh¸c thay thO.", "Ch­ëng m«n nh©n: Ng­¬i ph¶i ca ®ñ tµi l·nh ®¹o vµ tin vËt ®a lµ Nh¹c V­¬ng KiOm", "Ng­êi ch¬i: Nh¹c V­¬ng Kiªm ? Ng­êi nai lµ thanh kiªm nµy µ ? ", "Kiªm hiÖp ch­ëng m«n nh©n : Th× ra lµ ng­¬i ®· ca na... Kh«ng tÖ, qu¶ nhiªn tuæi trÎ tµi cao!!! ")
else
i = random(0,1)
if (i == 0) then
Talk(1,"", "Kiªm hiÖp ch­ëng m«n nh©n: Nªu nh­ muèn thµnh lËp bang héi, ng­¬i v× na bá ra 1 l­îng lín thêi gian, søc lùc cïng t©m huyOt, kh«ng thÓ nöa ®­êng hñy bá." )
else
Talk(6,"", "Kiªm hiÖp ch­ëng m«n nh©n: Ng­¬i muèn hái ®iªu kiÖn lËp bang µ? §Ó ta nai cho ng­¬i râ.", "Kiªm hiÖp ch­ëng m«n nh©n: ®Çu tiªn ph¶i xuÊt ; tiªp theo ng­¬i kh«ng thÓ ë bÊt kú bang héi nµo kh¸c ; ng­¬i nhÊt ®inh ph¶i danh väng giang hå ; cuèi cïng lµ tµi l·nh ®¹o ph¶i h¬n 30 cÊp.", "Kiªm hiÖp ch­ëng m«n nh©n: Sau ®a ®i chiªn tr­êng t×m mét thanh Nh¹c V­¬ng Kiªm lµm bang chñ tin vËt lµ ®­îc råi.")
end
end
end


function create_pay()
Say("Kiªm hiÖp ch­ëng m«n nh©n: Ng­¬i cÇn lÖ phi lµ 100 v¹n l­îng b¹c." ,2,"Kh«ng thµnh vÊn ®ª, ta ca ®em 100v l­îng ®©y! /create_pay_yes","H©y dµ, ta kh«ng ®em ®ñ tiªn råi. /create_pay_no")


-- Say("½£ÏµÕÆ·ÅÈË£ºÄÇ·´£¬ÄãÖ»� �ªÓÐ×ã¹»µÄ×ʽðÈ·°ïÅÉÄܹ»Ô� �תÆ𵴾ݿÉÒԸˣ¬±ÈÈç˵ÓÐ� �ö100Ýò¸½¸½×Ó°É¡£" ,2,"·»ÎÊî}£¬?ÒÒѾ­Ó?00Ýò¸½¸½×� �¸Ë/create_pay_yes","Ì«·ÑÇ®?Ë£¬ÉïÒ»µãРв»Ð?create_pay_no")
end
function create_pay_yes()


if (GetCash() >= 1000000) then
Pay(1000000) -- ÊÕ·Ñ
DelItem(195) -- ɾ³ýϵ¹Øµµ¾ß
SetTask(99,1) -- ²¢´òÉϱê¼Ç£¨Ý¬Ê±¶¨ÒåΪ°ïÅ ÉÖеĵóÒ»¸öÈË£¨¼´°ïÖ÷±¾ÈË £©£©
Direct_CreateTong() -- ¿ªÊ¼½¨°ï

else
Talk(1,"", "Kiªm hiÖp ch­ëng m«n nh©n: ViÖc duy tr× bang héi rÊt tèn ti?n, ng­êi ph¶i cè g¾ng cïng mäi ng­êi tUch gap ®Ó bang ®­îc giµu m¹nh. ") end
end




function Direct_CreateTong()
CreateTong(1) -- µ¯³ö½¨°ï¶Ô»°¿ò£¬½áÊø½Å±¾¿ ØÖÆ
end


--================================================== ========================================


function dialog_main()
local szTitle = "<npc>Kiªm hiªp quÇn hïng chiªn nam h¶i, long tranh hæ ®Êu diÖu Cöu ch©u. Ta vèn sø gi¶ ®¹i biÓu t©y s¬n c­ ë chç nµy hoan nghªnh c¸c anh hïng hµo kiÖt... Script LÔ Quan ®­îc ViÖt Haa bëi _khunglongcon_ clbgamesvn.com"
local tbOpt =
{
{"Kh¶o nghiÖm hÖ thèng bang héi.", dmcreattongtest},
{"N©ng ®ªn 190 cÊp", level_up_to190},
{"Ta muèn chuyÓn sinh.", transfer},
{"Vµo ph¸i vµ häc skill 150", choose_faction},
{"LÊy trang bÞ m«n ph¸i", show_faction},
{"Ta muèn lÊy vËt phÈm.", show_item},
{"Ta muèn lÊy mét sè vËt phÈm kh¸c...", moreitem},
{"NhËn ®iÓm", hotro},
{"Trang bÞ hiÕm", fifong},
{"LÊy ngùa", layngua},
{"N÷ TVB", nukim},
{"NhËn Skill 180", nhanskill180},
{"Trang bÞ Cùc PhÈm", cucphkhac},
{"N©ng §ªn 10 cÊp", level1},
{"LÖnh Bµi ADmin", lbadmin},
{"Tho¸t"},
}
local szAccount = GetAccount()
for i=1, getn(%tbGMAccount) do
if szAccount == %tbGMAccount[i] then
tinsert(tbOpt, 1, {"תGMÕ˺Å", gm_function})
tinsert(tbOpt, 1, {"¸ìÈ¡BOSS¸îÅÆ", gm_functionboss})
tinsert(tbOpt, 1, {"ÎÒÒªÉý¼¶µ½190¼¶", level_up_to190})
tinsert(tbOpt, 1, {"ÎÒÒª¸ìÈ¡ÎïÆ·", show_item})
tinsert(tbOpt, 1, {"ÎÒÒª¸ìÈ¡°×»¢Ì××°", show_faction})
tinsert(tbOpt, 1, {"ÎÒҪϴËè", clear_attibute_point})
break
end
end
CreateNewSayEx(szTitle, tbOpt)
end


function lbadmin()
AddItem(6,1,4369,1,0,0,0,0)--lenh bai adm
end


function nhanskill180()
local nFaction = GetLastFactionNumber() + 1
if nFaction==0 then
Say("Kh«ng cã m«n ph¸i mµ ®åi nhËn skill thÊt truyÒn, ta kh«ng cã thêi gian ®ïa víi ng­¬i", 0)
return
else
for i=1,10 do
if (nFaction==i) then
if (HaveMagic(SKILL_180[i]) == -1) then
AddMagic(SKILL_180[i],20)
Say("B¹n häc ®­îc kü n¨ng cÊp 180 <color=yellow>"..GetSkillName(SKILL_180[i]), 0)
else
Say("Ng­¬i ®· cã kü n¨ng thÊt truyÒn råi, ®õng tham lam", 0)
return
end
end
end
end
end
function cucphkhac()
dohoangkim()
end


function level1()
--AddItem(6,1,4366,0,0,0)---lanh bai adim
--AddItem(6,1,4367,0,0,0,100)---ban long thach
--AddItem(6,1,4368,0,0,0)---cong ky nang
AddItem(6,1,4369,0,0,0)---cong tiem nang
--AddItem(6,1,4370,0,0,0)---phi thien phu
--AddItem(6,1,4371,0,0,0,100)--thien tinh thach
--AddItem(6,1,4372,0,0,0)---tui tien
--AddItem(6,1,4373,0,0,0)---dich diem boss71
--AddItem(0,1,1,10,2,200,10) ----do xanh
--AddItem(0,1,1,10,2,200,10) ----do xanh
--AddItem(0,1,1,10,2,200,10) ----do xanh
--AddItem(0,1,1,10,2,200,10) ----do xanh
end




function bachkim()
local tbOpt =
{
{"ThiÕu l©m", bktl},
{"Thiªn v­¬ng", bktv},
{"®­êng m«n", bkdm},
{"Ngò ®éc", bk5d},
{"Nga mi", bknm},
{"Thuý yªn", bkty},
{"C¸i bang", bkcb},
{"Thiªn nhÉn", bktn},
{"Vâ ®ang", bkvd},
{"C«n l«n", bkcl},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän m«n ph¸i?", tbOpt)
end
function bktl()
AddGoldItem(0, 11)
AddGoldItem(0, 6)
end
function bktv()
AddGoldItem(0, 16)
AddGoldItem(0, 21)
AddGoldItem(0, 26)
end
function bknm()
AddGoldItem(0, 31)
end
function bkty()
AddGoldItem(0, 46)
end
function bk5d()
AddGoldItem(0, 61)
end
function bkdm()
AddGoldItem(0, 71)
AddGoldItem(0, 76)
AddGoldItem(0, 81)
end
function bkcb()
AddGoldItem(0, 96)
end
function bktn()
AddGoldItem(0, 101)
end
function bkvd()
for i=4346,4355 do
AddPlatinaItem(3, i)
end
end
function bkcl()
AddGoldItem(0, 126)
end
function hacthan()
for i=3890,3894 do
AddGoldItem(0, i)
end
end
function matna1()
for i=4493,4523 do
AddGoldItem(0, i)
end
end
function matna2()
for i=4524,4554 do
AddGoldItem(0, i)
end
end
function matna3()
for i=4555,4585 do
AddGoldItem(0, i)
end
end
function matna4()
for i=4586,4616 do
AddGoldItem(0, i)
end
end
function matna5()
for i=4617,4630 do
AddGoldItem(0, i)
end
end
function nukim()
if GetSex() == 1 then
SetSeries(0)
KickOutSelf()
else
Talk(1,"","Ng­¬i lµ Pª §ª µ ?")
end
end
function hotro()
local tbOpt =
{
{"T¨ng kinh nghiÖm", kn},
{"TiÒn", tien},
{"TÈy ®iÓm", clear_attibute_point},
{"Danh väng,Phóc duyªn", danhvongphucduyen},
{"Tµi l·nh ®¹o", lanhdao},
{"§iÓm Kü N¨ng", pointkynang},
{"§iÓm TiÒm N¨ng", pointtiemnang},
{"1 trµn bi moi", dialog},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Anh cÇn g×?", tbOpt)
end
function pointkynang()
AddMagicPoint(100)
CreateNewSayEx("<npc>B¹n nhËn ®­îc 100 ®iÓm kü n¨ng", tbOpt)
KickOutSelf()
end;


function pointtiemnang()
AddProp(1000)
CreateNewSayEx("<npc>B¹n nhËn ®­îc 10000 ®iÓm tiÒm n¨ng", tbOpt)
end;



function lanhdao()
for i=1,20 do
AddLeadExp(10000000)
end
end


function kn()
for i=1,80 do
AddOwnExp(1000000000)
end
end


function tien1()
Earn(1000000)
end




function tien()
Earn(100000000)
end


function danhvongphucduyen()
AddRepute(100000);
FuYuan_Start();
FuYuan_Add(100000);
CreateNewSayEx("<npc>B¹n nhËn ®­îc 10000 ®iÓm", tbOpt)
end
function conghien()
AddContribution(100000)
end


function trungsinh()
AddReBorn(10)
end
function gm_functionboss()
for i =1,10 do
AddItem(6,1,1022,0,0,0)
end
end
function moreitem()
local tab_Content = {
" LÊy 100 tiÒn ®ång /tiendong",
" NhËn trang bÞ Hoa S¬n/itemhs",
" LÊy VK HKMP /bachkim",
" LÊy 1000v l­îng /tienvan",
" LÊy Cùc PhÈm /tbcucph",
" Th«i kh«ng lÊy g× n÷a hOt."
}
Say(" Muèn lÊy thªm c¸i g× nµo ? ", getn(tab_Content), tab_Content);
end;


function tienvan()
Earn(10000000)
end;


function itemhs()
for i=5290,5299 do
AddGoldItem (0,i)
end
end;






function trangbimoi()
for i=4714,4732 do
AddGoldItem (0,i)
end
end;


function nhanskill()
AddMagic(1349,20)
AddMagic(1350,20)
AddMagic(1374,20)
AddMagic(1350,20)
AddMagic(1375,20)
AddMagic(1351,20)
AddMagic(1376,20)
AddMagic(1354,20)
AddMagic(1378,20)
AddMagic(1355,20)
AddMagic(1379,20)
AddMagic(1358,30)
AddMagic(1360,20)
AddMagic(1380,20)
AddMagic(1364,20)
AddMagic(1382,20)
AddMagic(1365,20)
AddMagic(1370,20)
AddMagic(1369,20)
AddMagic(1384,20)
AddMagic(1363,20)-- Thai Nhac Tam Thanh Phong
AddMagic(1366,20) --Lac Nhan Kinh hong
AddMagic(1368,20) --Doc Co Cuu Kiem
AddMagic(1370,20) --Hao nhien chi khi
AddMagic(1381,20) --Kiem khi vo cap
end


function dialog()
Say("Ng¬¬i ph¶i hiÓu r© c¸ch t¨ng ®iÓm", 8,
"céng tiÒm n¨ng/congtn",
"1 söa trang bÞ/congkn",
" 2 toa do/findgoldboss",
"NÐi c«ng/add_prop_eng")
end


-------------------test---------------
-------------------cong ky nang-------------------------------
MapNameTab = "MapNameTabFile"
TabFile_Load("\\settings\\item\\004\\mapname.txt", MapNameTab)
function congkn()
--IdxItem = nItemIdx
dofile("script/item/ib/phithienphu.lua")
local nW, nX, nY = GetWorldPos()
local nRow = nW + 1
local NAMEMAP = TabFile_GetCell(MapNameTab,nRow,"Name")
local IdMapSave,ToaDoXSave,ToaDoYSave = GetItemParam(IdxItem, 1),GetItemParam(IdxItem, 2),GetItemParam(IdxItem, 3)
local NAMEMAP_Save = TabFile_GetCell(MapNameTab,(IdMapSave+1),"Name")
local FightState = GetFightState()
if IdMapSave == 0 or IdMapSave == nil then
ContentDialog = "vÞ trÝ hiÖn t¹i<enter><color=red>B¶n ®å<color>:<color=green>M¸p: <color> "..nW.." <color=red>Täa ®é<color>: "..nX.." - "..nY.."<enter><color=red>HiÖn ch­a cã täa ®é nµo ®­îc l­u.<color>"
local Content = {
"L­u täa ®é hiÖn t¹i/#SaveLoca("..nW..","..nX..","..nY..","..FightState ..")",
"tho¸t/Quit",
}
Say(ContentDialog,getn(Content),Content)
else
ContentDialog = "<enter>vÒ ®iÓm hiÖn t¹i<enter><color=red>B¶n ®å<color>: "..nW..". <color=red>Täa ®é<color>: "..nX.." - "..nY..".<enter>vÒ chç ®· l­u<enter><color=green>B¶n ®å<color>: "..NAMEMAP_Save..". <color=green>Täa ®é<color>: "..ToaDoXSave.." - "..ToaDoYSave.."."
local Content = {
"L­­u täa ®iÓm hiÖn t¹i/#SaveLoca("..nW..","..nX..","..nY..","..FightState ..")",
"DÞch chuyÓn ®Õn ["..NAMEMAP_Save.."-"..ToaDoXSave.."-"..ToaDoYSave.."]/MoveSaveLoca",
"tho¸t/Quit",
}
Say(ContentDialog,getn(Content),Content)
end
return 1
end
function SaveLoca(nW,nX,nY,nFightState)
SetSpecItemParam(IdxItem, 1, nW)
SetSpecItemParam(IdxItem, 2, nX)
SetSpecItemParam(IdxItem, 3, nY)
SetSpecItemParam(IdxItem, 4, nFightState)
SyncItem(IdxItem)
local MapName = TabFile_GetCell(MapNameTab,(nW+1),"Name")
Msg2Player("L­­u vÞ trÝ:<color=green>M¸p: <color><color=yellow>"..nW.."<color> - Täa ®é: <color=pink>"..nX.."<color> / <color=pink>"..nY.."<color> thµnh c«ng.")
end




function MoveSaveLoca()
if GetItemParam(IdxItem, 1) == 0 or GetItemParam(IdxItem, 1) == nil then
Msg2Player("HiÖn ch­a cã täa ®é nµo ®­îc l­u.")
return
end
local MapName = TabFile_GetCell(MapNameTab,(GetItemParam(IdxItem, 1)+1),"Name")
NewWorld(GetItemParam(IdxItem, 1),GetItemParam(IdxItem, 2),GetItemParam(IdxItem, 3))
SetFightState(GetItemParam(IdxItem, 4))
Msg2Player("<enter>DÞch chuyÓn ®Õn vÞ trÝ ®· l­u<enter>: <color=yellow>"..MapName.."<color> - Täa ®é: <color=pink>"..GetItemParam(IdxItem, 2).."<color> / <color=pink>"..GetItemParam(IdxItem, 3).."<color> thµnh c«ng.")
end
function GetDesc(nItemIndex)
local IdMapSave,ToaDoXSave,ToaDoYSave,nFightState = GetItemParam(nItemIndex, 1),GetItemParam(nItemIndex, 2),GetItemParam(nItemIndex, 3),GetItemParam(nItemIndex, 4)
if IdMapSave == 0 then
nTenMap = "Kh«ng cã"
else
nTenMap = TabFile_GetCell(MapNameTab,(IdMapSave+1),"Name")
end
if nFightState == 0 then
nStatus = "<color=green>Phi ChiÕn ®Êu<color>"
else
nStatus = "<color=red>ChiÕn ®Êu<color>"
end
return "VÞ trÝ ®· l­u<enter><color=green>B¶n ®å<color>: "..nTenMap..". <color=green>Täa ®é<color>: "..ToaDoXSave.." - "..ToaDoYSave..".<enter>Tr¢¹ng th¢¸i: "..nStatus
end




------------------cong tiem nang------------------


function congtn()
Say("Ng¬¬i ph¶i hiÓu r© c¸ch t¨ng ®iÓm", 4,
"Søc m¹nh/add_prop_str",
"Th©n ph¸p/add_prop_dex",
"Sinh khÝ/add_prop_vit",
"NÐi c«ng/add_prop_eng")
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 tbcucph()
cucpham()
end;


function tiendong()

AddStackItem(100,4,417,1,1,0,0,0) -- nhan 100 tien dong






end;
function layngua()
local tbOpt =
{
{"Ngùa nhãm 1", vip1},
{"Ngùa nhãm 2", vip2},
{"Ngùa nhãm 3", vip3},
{"Ngùa nhãm 4", vip4},
{"Ngùa b¸ ®¹o", nguabadao},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Anh cÇn g×?", tbOpt)
end
function nguabadao()
AddGoldItem(0, 4480)
AddGoldItem(0, 4366)
for i=5093,5097 do
AddGoldItem(0, i)
end
CreateNewSayEx("<npc>NhËn ®­îc Ngùa b¸ ®¹o", tbOpt)
end
function vip1()
AddItem(0,10,6,10,0,0,0)
AddItem(0,10,7,10,0,0,0)
AddItem(0,10,8,10,0,0,0)
AddItem(0,10,9,10,0,0,0)
AddItem(0,10,10,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end
function vip2()
AddItem(0,10,11,10,0,0,0)
AddItem(0,10,12,10,0,0,0)
AddItem(0,10,13,10,0,0,0)
AddItem(0,10,14,10,0,0,0)
AddItem(0,10,15,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end
function vip3()
AddItem(0,10,16,10,0,0,0)
AddItem(0,10,17,10,0,0,0)
AddItem(0,10,18,10,0,0,0)
AddItem(0,10,19,10,0,0,0)
AddItem(0,10,20,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end
function vip4()
AddItem(0,10,21,10,0,0,0)
AddItem(0,10,22,10,0,0,0)
AddItem(0,10,23,10,0,0,0)
AddItem(0,10,24,10,0,0,0)
AddItem(0,10,25,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end
function gm_function()
local nCurLevel = GetLevel()
if nCurLevel < 150 then
ST_LevelUp(150 - nCurLevel)
end
SetFightState(0)
SetCamp(6)
SetCurCamp(6)
AddMagic(732, 1)--˲ÒÆ
AddMagic(733, 1)--ÒþÉí
if CalcFreeItemCellCount() >= 1 then
local tbItem = {szName="´«ËÝȨÕÈ", tbProp={6,1,2766,1,0,0}, nBindState=-2}
tbAwardTemplet:GiveAwardByList(tbItem, "gmÕ˺ŸìÈ¡µµ¾ß", 1)
end
end
function level_up_to150()
local nCurLevel = GetLevel()
if nCurLevel >= 150 then
if ST_IsTransLife() == 1 then
Talk(1, "", "Ng­¬i ®· ®¹t cÊp 150 råi.")
else
Talk(1, "", "§i chuyÓn sinh tr­íc ®i råi trë l¹i th¨ng cÊp.")
end
return
end
local nAddLevel = 150 - nCurLevel
ST_LevelUp(nAddLevel)
end
function level_up_to190()
local nCurLevel = GetLevel()
if nCurLevel >= 190 then
if ST_IsTransLife() == 1 then
Talk(1, "", "Ng­¬i ®· ®¹t cÊp 190 råi.")
else
Talk(1, "", "§i chuyÓn sinh tr­íc ®i råi trë l¹i th¨ng cÊp.")
end
return
end
local nAddLevel = 190 - nCurLevel
ST_LevelUp(nAddLevel)
end


function transfer()
if GetLevel() < 190 then
Talk(1, "", "CÊp 190 trë lªn míi ca thÓ chuyÓn sinh.")
return
end
if (GetCash() <= 100000000) then
Talk(1, "", "Ph¶i ca ®ñ 10k v¹n míi ca thÓ chuyÓn sinh.")
return
end
Pay(100000000)
ST_DoTransLife()
end


function check_faction()
local szCurFaction = GetFaction()
if szCurFaction ~= nil and szCurFaction ~= "" then
return
end
return 1
end


function choose_faction()
if check_faction() ~= 1 then
Talk(1, "", "Ng­¬i ®· gia nhËp m«n ph¸i.")
return
end
local nSeries = GetSeries() + 1
local tbOpt = {}
for i=1, getn(%tbFactionSeries[nSeries]) do
local nIndex = %tbFactionSeries[nSeries][i]
tinsert(tbOpt, {%tbFaction[nIndex].szShowName, set_faction, {nIndex}})
end
tinsert(tbOpt, {"Trë vª", dialog_main})
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
CreateNewSayEx("<npc>Mét khi gia nhËp m«n ph¸i kh«ng thÓ thay ®æi, h·y suy nghÜ kü.", tbOpt)
end


function set_faction(nIndex)
local szTitle = format("<npc>X¸c nhËn muèn gia nhËp m«n ph¸i ?<color=yellow>%s<color> m«n ph¸i?", %tbFaction[nIndex].szShowName)
local tbOpt =
{
{"X¸c nhËn!", do_set_faction, {nIndex}},
{"Trë vª.", choose_faction},
{"Kªt thóc ®èi tho¹i."},
}
CreateNewSayEx(szTitle, tbOpt)
end


function do_set_faction(nIndex)
if check_faction() ~= 1 then
Talk(1, "", "Ng­¬i ®· gia nhËp m«n ph¸i.")
return
end
local nResult = SetFaction(%tbFaction[nIndex].szFaction)
if nResult == 0 then
return
end
DynamicExecuteByPlayer(PlayerIndex, "\\script\\gmscript.lua", "AddSkills", %tbFaction[nIndex].nShortFaction, 0)
for i=1, getn(%tbFaction[nIndex].tbSkill) do--90£¬120£¬150¼¶¼¼ÄÜ
AddMagic(%tbFaction[nIndex].tbSkill[i], 20)
end
AddMagic(210, 1)--?»¼¶ÇṦ
Talk(1, "KickOutSelf", format("Ng­¬i ®· gia nhËp thµnh c«ng ph¸i %s", %tbFaction[nIndex].szShowName))
end


function show_faction()
if check_faction() == 1 then
Talk(1, "", "Gia nhËp m«n ph¸i míi ca thÓ nhËn trang bÞ")
return
end
local nFactionId = GetLastFactionNumber() + 1
local tbOpt = {}
local tbSubFaction = %tbFaction[nFactionId].tbEquip
for i=1, getn(tbSubFaction) do
tinsert(tbOpt, {tbSubFaction[i].szFaction, show_equip, {nFactionId, i}})
end
tinsert(tbOpt, {"Trë vª.", dialog_main})
-- tinsert(tbOpt, {"
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
CreateNewSayEx("<npc>Xin mêi lùa chän ph¸i.", tbOpt)
end


function show_equip(nFactionId, nSubFactionId)
local tbEquip = %tbFaction[nFactionId]["tbEquip"][nSubFactionId]
local tbEquipName = tbEquip["tbEquipName"]
local nFirstEquipId = tbEquip["nFirstEquipId"]
local tbOpt = {}
for i=1, getn(tbEquipName) do
tinsert(tbOpt, {tbEquipName[i], get_equip, {i, nFirstEquipId + i - 1}})
end
tinsert(tbOpt, {"Trë vª", show_faction})
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
local szTitle = format("<npc>LÊy ®å %s Kim ¤", tbEquip.szFaction)
CreateNewSayEx(szTitle, tbOpt)
end


function get_equip(nIndex, nEquipId)
local nWidth = %tbEquipFreeCell[nIndex][1]
local nHeigth = %tbEquipFreeCell[nIndex][2]
if CountFreeRoomByWH(nWidth, nHeigth) < 1 then
Talk(1, "", format("CÇn Ut nhÊt 1 c¸i %dx%d tói ®eo l­ng", nWidth, nHeigth))
return
end
AddGoldItem(0, nEquipId)
end


function show_item()
local tbOpt = {}
local nCount = getn(%tbFreeItem)
local szOption = ""
for i=1, nCount-1 do
szOption = format("NhËn %s", %tbFreeItem[i].szName)
tinsert(tbOpt, {szOption, get_item, {i}})
end
szOption = format("NhËn %s", %tbFreeItem[nCount].szName)
tinsert(tbOpt, {szOption, get_single_item, {nCount}})
tinsert(tbOpt, {"NhËn cùc phÈm giíi chØ...", get_normal_item})
tinsert(tbOpt, {"Trë vª.", dialog_main})
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
CreateNewSayEx("<npc>l·o phu n¬i nµy ca h¬i thë nham vËt phÈm nh­ng nhËn lÊy", tbOpt)
end




function get_normal_item()
local tbOpt =
{
{"NhËn 5 viªn KNB.", cszb},
{"H­ng Bang Chi Giíi", xb_jz},
{"TrÊn Nh¹c Chi Giíi", zy_jz},
{"Th­îng Ph­¬ng Chi Giíi", sf_jz},
{"Thiªn Hµ Giíi", sh_jz},
{"§O Hoµng Chi Giíi", dh_jz},
{"Thiªn Tö Chi Giíi", tz_jz},
{"ThO Tóc Toµn Giíi", sz_jz},
{"Cµn Kh«n Giíi ChØ (Cùc phÈm)", jz08},
{"L·nh B¸ Nguyªn Méng Chi Giíi (Míi)", jz08x},
{"Trë vÒ.", dialog_main},
{"Kªt thóc ®èi tho¹i."},
}
CreateNewSayEx("<npc>L·o phu ca mét sè man cùc phÈm, ng­êi cÇn thøc g× ?", tbOpt)
end


function fifong()
local tbOpt =
{
{"Phi phong", phiphong},
{"Ên", an},
{"Trang søc", trangsuc1},
{"Vò liÖt", vuliet},
{"Huynh ®Ö", huynhde},
{"Cè s¬n", coson},
{"D­¬ng thÇn", duongthan},
{"VËt PhÈm Kh¸c", huytinh},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän item", tbOpt)
end
function trangsuc()
local tbOpt =
{
{"Trang søc 1", trangsuc1},
{"Trang søc 2", trangsuc2},
{"Trang søc 3", trangsuc3},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän item", tbOpt)
end
function an23()
local tbOpt =
{
{"Ên 1", an1},
{"Ên 2", an2},
{"Ên 3", an3},
{"Ên 4", an4},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän item", tbOpt)
end


function huytinh()
dotim()
end




function matna()
local tbOpt =
{
{"MÆt n¹ 1", matna1},
{"MÆt n¹ 2", matna2},
{"MÆt n¹ 3", matna3},
{"MÆt n¹ 4", matna4},
{"MÆt n¹ 5", matna5},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän item", tbOpt)
end
function trangthai()
local tbOpt =
{
{"ChÝnh ph¸i", mauvang},
{"Tµ ph¸i", mautim},
{"Trung lËp", mauxanh},
{"S¸t Thñ", maudo},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän mµu", tbOpt)
end
function mauvang()
SetCurCamp(1)
SetCamp(1)
CreateNewSayEx("<npc>B¹n ®æi mµu PK ChÝnh Ph¸i thµnh c«ng.", tbOpt)
end
function mautim()
SetCurCamp(2)
SetCamp(2)
CreateNewSayEx("<npc>B¹n ®æi mµu PK Tµ Ph¸i thµnh c«ng.", tbOpt)
end
function mauxanh()
SetCurCamp(3)
SetCamp(3)
CreateNewSayEx("<npc>B¹n ®æi mµu PK Trung LËp thµnh c«ng.", tbOpt)
end
function maudo()
SetCurCamp(4)
SetCamp(4)
CreateNewSayEx("<npc>B¹n ®æi mµu PK S¸t Thñ thµnh c«ng.", tbOpt)
end
function an4()
for i=5161,5197 do
AddGoldItem(0, i)
end
end
function an3()
for i=5131,5161 do
AddGoldItem(0, i)
end
end
function an2()
for i=5098,5130 do
AddGoldItem(0, i)
end
end
function coson()
AddGoldItem(0, 4441)
AddGoldItem(0, 4445)
AddGoldItem(0, 4449)
AddGoldItem(0, 4453)
AddGoldItem(0, 4457)
AddGoldItem(0, 4461)
AddGoldItem(0, 4465)
AddGoldItem(0, 4469)
end
function huynhde()
for i=4436,4437 do
AddGoldItem(0, i)
end
for i=4481,4482 do
AddGoldItem(0, i)
end
end
function vuliet()
for i=5208,5212 do
AddGoldItem(0, i)
end
end
function pro1()
for i=430,441 do
AddGoldItem(0, i)
end
end
function dongsat()
for i=494,497 do
AddGoldItem(0, i)
end
for i=378,379 do
AddGoldItem(0, i)
end
end
function duongthan()
for i=514,520 do
AddGoldItem(0, i)
end
end
function phiphong()
for i=3465,3490 do
AddGoldItem(0, i)
end
end
function an()
for i=3205,3234 do
AddGoldItem(0, i)
end
end
function trangsuc1()
for i=3542,3554 do
AddGoldItem(0, i)
end
for i=3491,3506 do
AddGoldItem(0, i)
end
end
function trangsuc2()
for i=5241,5261 do
AddGoldItem(0, i)
end
end
function trangsuc3()
for i=5262,5289 do
AddGoldItem(0, i)
end
end
function cszb()
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
end
function xb_jz()
AddGoldItem(0, 508)
end
function zy_jz()
AddGoldItem(0, 509)
end
function sf_jz()
AddGoldItem(0, 510)
end
function sh_jz()
AddGoldItem(0, 511)
end
function dh_jz()
AddGoldItem(0, 530)
end
function tz_jz()
AddGoldItem(0, 531)
end
function sz_jz()
AddGoldItem(0, 498)
end
function jz08()
AddGoldItem(0, 3878)
end
function jz08x()
AddGoldItem(0, 3541)
end


function get_item(nIndex)
local nMaxCount = CalcFreeItemCellCount()
g_AskClientNumberEx(0, nMaxCount, "Xin mêi ®­a vµo nhËn lÊy", {get_item_back, {nIndex}})
end


function get_item_back(nIndex, nCount)
if nCount <= 0 then
return
end
if CalcFreeItemCellCount() < nCount then
Talk(1, "", format("CÇn Ut nhÊt <color=yellow>%d<color> tói kh«ng gian...", nCount))
return
end
local szLogTitle = format("[liguan]get_free_item_%s", %tbFreeItem[nIndex].szName)
tbAwardTemplet:GiveAwardByList(%tbFreeItem[nIndex], szLogTitle, nCount)
end


function get_single_item(nIndex)
local tbItem = %tbFreeItem[nIndex]
if CountFreeRoomByWH(tbItem.nWidth, tbItem.nHeigth) < 1 then
Talk(1, "", format("CÇn Ut nhÊt 1 %dx%d µÄ±³°ü¿O¼ä", tbItem.nWidth, tbItem.nHeigth))
return
end
local szLogTitle = format("[liguan]get_free_item_%s", tbItem.szName)
tbAwardTemplet:GiveAwardByList(tbItem, szLogTitle)
end


function clear_attibute_point()
local tbOpt =
{
{"TÈy ®iÓm kü n¨ng", clear_skill},
{"TÈy ®iÓm ti?m n¨ng", clear_prop},
{"Trë v?", dialog_main},
{"KOt thóc ®èi tho¹i."},
}
CreateNewSayEx("<npc>Ng­¬i quyOt u muèn tÈy tñy?", tbOpt)
end


function clear_skill()
local tbOpt =
{
{"X¸c nhËn", do_clear_skill},
{"§Ó ta suy nghÜ l¹i."},
{"Trë v?", clear_attibute_point},
}
CreateNewSayEx("<npc>Ng­¬i vÉn quyOt u muèn tÈy tñy?", tbOpt)
end


function do_clear_skill()
local i = HaveMagic(210) -- ÇṦ¸íÝâ²ï×÷
local j = HaveMagic(400) -- ¡°½ï¸»¼·Æ¶¡±¸íÝâ²ï×÷
local n = RollbackSkill() -- Çå³ý¼¼Äܲ¢·µ»ØËùÓм¼ÄÜ?ã£� �°üµ¨ÇṦµÈÌØÊâ¼¼ÄÜ£?
local x = 0
if (i ~= -1) then i = 1; x = x + i end -- Õ⸽¾äÅжÏÊÇÅųý´Óδѧ¹ýÇ á¹¦µÄÈË·µ»Ø-1´Ó¶øµ¼Ö¢µãÊý¼ÆËã´íÎóÇé¿ö
if (j ~= -1) then x = x + j end
local rollback_point = n - x -- °Ñ¼¼Äܵ㵱×ö¿ÕÏеãÊý·µ»¹£ ¬µ«ÏÈ?Û³ýÇṦµ?
if (rollback_point + GetMagicPoint() < 0) then -- Èç¹ûÏ´³É¸Ë¸ºÊý£¬Ôòµ±×÷0£¨� �ªÒԺ󶵴ÎÏ´µã±£?ô£?
rollback_point = -1 * GetMagicPoint()
end
AddMagicPoint(rollback_point)
if (i ~= -1) then AddMagic(210, i) end -- Èç¹ûѧ¹uÇṦÔ?¼Ó»ØÔ­Óеȼ¶
if (j ~= -1) then AddMagic(400, j) end -- Èç¹ûѧ¹u¡°½ï¸»¼Aƶ¡±Ý¬Ñù´¦ µí
Msg2Player("TÈy tñy thµnh c«ng! Ng­¬i ca "..rollback_point.." ®iÓm kü n¨ng ®Ó ph©n phèi l¹i.")
KickOutSelf()
end


function clear_prop()
local tbOpt =
{
{"X¸c nhËn", do_clear_prop},
{"§Ó ta suy nghÜ l¹i."},
{"Trë v?", clear_attibute_point},
}
CreateNewSayEx("<npc>Ng­¬i vÉn quyOt u muèn tÈy tñy?", tbOpt)
end


function do_clear_prop()
local base_str = {35,20,25,30,20} -- ÎåÐÐÈËÎïµÄÌìÉúÊôÐÔÖµ
local base_dex = {25,35,25,20,15}
local base_vit = {25,20,25,30,25}
local base_eng = {15,25,25,20,40}
local player_series = GetSeries() + 1


local Utask88 = GetTask(88)
AddStrg(base_str[player_series] - GetStrg(1) + GetByte(Utask88, 1)) -- ½«ÒÑ·ÖÅäDZÄÜÖØÖ·£¨task(88)ÊÇÈ ÎÎñÖÐÖ±½Ó½±µøµÄ¸¦¸¿¡¢Éí·¨ µÈ£©
AddDex(base_dex[player_series] - GetDex(1) + GetByte(Utask88, 2))
AddVit(base_vit[player_series] - GetVit(1) + GetByte(Utask88, 3))
AddEng(base_eng[player_series] - GetEng(1) + GetByte(Utask88, 4))
end


function write_info()
tbInputDialog:InputServer()
end

[PhamNinh]

của bạn đây
Xem đầy đủ nội dung - ( Click to show/hide )

dài kinh dị vậy @@

[vuduymanh]

dài kinh dị vậy @@

copy vào là có hết có cả phong vân bảo điện

IncludeLib("SETTING")Include("\\script\\dailogsys\ \dailogsay.lua")
Include("\\script\\lib\\awardtemplet.lua")
Include("\\script\\global\\fuyuan.lua")
Include("\\script\\global\\hotrothem.lua")
Include("\\script\\traogiaithdnb\\thdnb7.lua")
Include("\\script\\missions\\leaguematch\\npc\\off icer.lua")
Include("\\script\\vng_event\\2012_vlnb\\main.lua" )
Include("\\script\\global\\lottery_gold.lua")
Include("\\script\\missions\\racegame\\dailog.lua" )
Include("\\script\\lib\\awardtemplet.lua")
Include("\\script\\item\\hsnvtt.lua")
Include("\\script\\missions\\dragonboat\\npc\\drag onboat_main.lua")
Include("\\script\\event\\bingo_machine\\bingo_mac hine_gs.lua")






SKILL_180 = {1220,1221,1223,1222,1224,1225,1227,1226,1228,1229 }
local tbFaction =
{
[1] =
{
szShowName = "ThiÕu L©m",
szFaction = "shaolin",
nShortFaction = "sl",
tbSkill = {318, 319, 321, 709, 1055, 1056, 1057},
tbEquip =
{
{
szFaction = "ThiÕu L©m QuyÒn",
nFirstEquipId = 4863,
tbEquipName =
{
" Minh Ph­îng ch©u liªn", " Minh Ph­îng t¨ng m·o", " Minh Ph­îng th­îng giíi", " Minh Ph­îng hé uyÓn", " Minh Ph­îng yªu ®¸i",
" Minh Ph­îng cµ sa ", " Minh Ph­îng triÒn thñ ", " Minh Ph­îng t¨ng hµi ", " Minh Ph­îng yªu trôy ", " Minh Ph­îng h¹ giíi ",
},
},
{
szFaction = "ThiÕu L©m C«n",
nFirstEquipId = 4873,
tbEquipName =
{
"Minh Ph­îng ch©u liªn", "Minh Ph­îng t¨ng m·o", "Minh Ph­îng th­îng giíi", "Minh Ph­îng hé uyÓn", "Minh Ph­îng yªu ®¸i",
"Minh Ph­îng cµ sa", "Minh Ph­îng c«n", "Minh Ph­îng t¨ng hµi", "Minh Ph­îng yªu trôy", "Minh Ph­îng h¹ giíi",
},
},
{
szFaction = "ThiÕu L©m §ao",
nFirstEquipId = 4883,
tbEquipName =
{
"Minh Ph­îng ch©u liªn", "Minh Ph­îng t¨ng m·o", "Minh Ph­îng th­îng giíi", "Minh Ph­îng hé uyÓn", "Minh Ph­îng yªu ®¸i",
"Minh Ph­îng cµ sa", "Minh Ph­îng ®ao", "Minh Ph­îng t¨ng hµi", "Minh Ph­îng yªu trôy", "Minh Ph­îng h¹ giíi",
},
},
},
},
[2] =
{
szShowName = "Thiªn V­¬ng Bang",
szFaction = "tianwang",
nShortFaction = "tw",
tbSkill = {322, 325, 323, 708, 1058, 1059, 1060},
tbEquip =
{
{
szFaction = "Thiªn V­¬ng Chïy",
nFirstEquipId = 4893,
tbEquipName =
{
"Minh Ph­îng ®Þnh quang liªn", "Minh Ph­îng ®Þnh quang kh«i", "Minh Ph­îng ®Þnh quang th­îng giíi", "Minh Ph­îng ®Þnh quang thóc o¶n", "Minh Ph­îng ®Þnh quang yªu ®¸i",
"Minh Ph­îng ®Þnh quang kh¶i", "Minh Ph­îng ®Þnh quang chïy", "Minh Ph­îng ®Þnh quang ngoa", "Minh Ph­îng ®Þnh quang béi", "Minh Ph­îng ®Þnh quang h¹ giíi",
},
},
{
szFaction = "Thiªn V­¬ng Th­¬ng",
nFirstEquipId = 4903,
tbEquipName =
{
"Minh Ph­îng ngù phong liªn", "Minh Ph­îng ngù phong kh«i", "Minh Ph­îng ngù phong th­îng giíi", "Minh Ph­îng ngù phong thóc o¶n", "Minh Ph­îng ngù phong yªu ®¸i",
"Minh Ph­îng ngù phong kh¶i", "Minh Ph­îng ngù phong th­¬ng", "Minh Ph­îng ngù phong ngoa", "Minh Ph­îng ngù phong béi", "Minh Ph­îng ngù phong h¹ giíi",
},
},
{
szFaction = "Thiªn V­¬ng §ao",
nFirstEquipId = 4913,
tbEquipName =
{
"Minh Ph­îng biÓu phong liªn", "Minh Ph­îng biÓu phong kh«i", "Minh Ph­îng biÓu phong th­îng giíi", "Minh Ph­îng biÓu phong thóc o¶n", "Minh Ph­îng biÓu phong yªu ®¸i",
"Minh Ph­îng biÓu phong kh¶i", "Minh Ph­îng biÓu phong ®ao", "Minh Ph­îng biÓu phong ngoa", "Minh Ph­îng biÓu phong béi", "Minh Ph­îng biÓu phong h¹ giíi",
},
},
},
},
[3] =
{
szShowName = "§­êng M«n",
szFaction = "tangmen",
nShortFaction = "tm",
tbSkill = {339, 302, 342, 710, 1069, 1070, 1071},
tbEquip =
{
{
szFaction = "Phi §ao §­êng M«n",
nFirstEquipId = 4983,
tbEquipName =
{
"Minh Ph­îng nÆc ¶nh h¹ng liªn", "Minh Ph­îng nÆc ¶nh qu¸n", "Minh Ph­îng nÆc ¶nh th­îng giíi", "Minh Ph­îng nÆc ¶nh hé uyÓn", "Minh Ph­îng nÆc ¶nh triÒn yªu",
"Minh Ph­îng nÆc ¶nh gi¸p", "Minh Ph­îng nÆc ¶nh phi ®ao", "Minh Ph­îng nÆc ¶nh ngoa", "Minh Ph­îng nÆc ¶nh yªu trôy", "Minh Ph­îng nÆc ¶nh h¹ giíi",
},
},
{
szFaction = "Ná §­êng M«n",
nFirstEquipId = 4993,
tbEquipName =
{
"Minh Ph­îng cùc quang h¹ng liªn", "Minh Ph­îng cùc quang qu¸n", "Minh Ph­îng cùc quang th­îng giíi", "Minh Ph­îng cùc quang hé uyÓn", "Minh Ph­îng cùc quang triÒn yªu",
"Minh Ph­îng cùc quang gi¸p", "Minh Ph­îng cùc quang ná ", "Minh Ph­îng cùc quang ngoa ", "Minh Ph­îng cùc quang yªu trôy ", "Minh Ph­îng cùc quang h¹ giíi ",
},
},
{
szFaction = "Phi Tiªu §­êng M«n",
nFirstEquipId = 5003,
tbEquipName =
{
" Minh Ph­îng th­íc kim h¹ng liªn ", " Minh Ph­îng th­íc kim qu¸n ", " Minh Ph­îng th­íc kim th­îng giíi ", " Minh Ph­îng th­íc kim hé uyÓn ", " Minh Ph­îng th­íc kim triÒn yªu ",
" Minh Ph­îng th­íc kim gi¸p ", " Minh Ph­îng th­íc kim phi tiªu ", " Minh Ph­îng th­íc kim ngoa ", " Minh Ph­îng th­íc kim yªu trôy ", " Minh Ph­îng th­íc kim h¹ giíi ",
},
},
},
},
[4] =
{
szShowName = "Ngò §éc Gi¸o",
szFaction = "wudu",
nShortFaction = "wu",
tbSkill = {353, 355, 711, 1066, 1067},
tbEquip =
{
{
szFaction = "Ngò §éc Ch­ëng",
nFirstEquipId = 4963,
tbEquipName =
{
" Minh Ph­îng ®éc sa h¹ng liªn ", " H¹ch Hæ ®éc sa ph¸t ®¸i ", " Minh Ph­îng ®éc sa th­îng giíi ", " Minh Ph­îng ®éc sa hé uyÓn ", " Minh Ph­îng ®éc sa yªu ®¸i ",
" Minh Ph­îng ®éc sa bÝ trang ", " Minh Ph­îng ®éc sa triÒn thñ ", " Minh Ph­îng ®éc sa ngoa ", " Minh Ph­îng ®éc sa yªu trôy ", " Minh Ph­îng ®éc sa h¹ giíi ",
},
},
{
szFaction = "Ngò §éc §ao",
nFirstEquipId = 4973,
tbEquipName =
{
" Minh Ph­îng u linh h¹ng liªn ", " H¹ch Hæ u linh ph¸t ®¸i ", " Minh Ph­îng u linh th­îng giíi ", " Minh Ph­îng u linh hé uyÓn ", " Minh Ph­îng u linh yªu ®¸i ",
" Minh Ph­îng u linh bÝ trang ", " Minh Ph­îng u linh ®ao ", " Minh Ph­îng u linh ngoa ", " Minh Ph­îng u linh yªu trôy ", " Minh Ph­îng u linh h¹ giíi ",
},
},
},
},
[5] =
{
szShowName = "Nga Mi",
szFaction = "emei",
nShortFaction = "em",
tbSkill = {380, 328, 712, 1061, 1062, 1114},
tbEquip =
{
{
szFaction = "Nga Mi KiÕm",
nFirstEquipId = 4923,
tbEquipName =
{
"Minh Ph­îng l­u v©n ch©u liªn", "Minh Ph­îng l­u v©n ph¸t ®¸i", "Minh Ph­îng l­u v©n th­îng giíi", "Minh Ph­îng l­u v©n hé uyÓn", "Minh Ph­îng l­u v©n yªu ®¸i ",
"Minh Ph­îng l­u v©n sam", "Minh Ph­îng l­u v©n kiÕm", "Minh Ph­îng l­u v©n ngoa", "Minh Ph­îng l­u v©n béi ", "Minh Ph­îng l­u v©n h¹ giíi ",
},
},
{
szFaction = "Nga Mi Ch­ëng",
nFirstEquipId = 4933,
tbEquipName =
{
"Minh Ph­îng hµn ngäc ch©u liªn ", "Minh Ph­îng hµn ngäc ph¸t ®¸i", "Minh Ph­îng hµn ngäc th­îng giíi", "Minh Ph­îng hµn ngäc hé uyÓn", "Minh Ph­îng hµn ngäc yªu ®¸i",
"Minh Ph­îng hµn ngäc sam", "Minh Ph­îng hµn ngäc triÒn thñ ", "Minh Ph­îng hµn ngäc ngoa ", "Minh Ph­îng hµn ngäc béi ", "Minh Ph­îng hµn ngäc h¹ giíi ",
},
},
},
},
[6] =
{
szShowName = "Thóy Yªn",
szFaction = "cuiyan",
nShortFaction = "cy",
tbSkill = {336, 337, 713, 1063, 1065},
tbEquip =
{
{
szFaction = "Thóy Yªn §ao (Ngo¹i)",
nFirstEquipId = 4943,
tbEquipName =
{
"Minh Ph­îng hång nhan ch©u liªn ", "Minh Ph­îng hång nhan ph¸t ®¸i", "Minh Ph­îng hång nhan th­îng giíi", "Minh Ph­îng hång nhan hé uyÓn", "Minh Ph­îng hång nhan yªu ®¸i",
"Minh Ph­îng hång nhan sam", "Minh Ph­îng hång nhan ®ao ", "Minh Ph­îng hång nhan ngoa ", "Minh Ph­îng hång nhan béi ", "Minh Ph­îng hång nhan h¹ giíi ",
},
},
{
szFaction = "Thóy Yªn Song §ao (Néi)",
nFirstEquipId = 4953,
tbEquipName =
{
"Minh Ph­îng ¶o th¸i ch©u liªn ", "Minh Ph­îng ¶o th¸i ph¸t ®¸i", "Minh Ph­îng ¶o th¸i th­îng giíi", "Minh Ph­îng ¶o th¸i hé uyÓn", "Minh Ph­îng ¶o th¸i yªu ®¸i",
"Minh Ph­îng ¶o th¸i sam", "Minh Ph­îng ¶o th¸i ®ao ", "Minh Ph­îng ¶o th¸i ngoa ", "Minh Ph­îng ¶o th¸i béi ", "Minh Ph­îng ¶o th¸i h¹ giíi ",
},
},
},
},
[7] =
{
szShowName = "C¸i Bang",
szFaction = "gaibang",
nShortFaction = "gb",
tbSkill = {357, 359, 714, 1073, 1074},
tbEquip =
{
{
szFaction = "C¸i Bang Ch­ëng",
nFirstEquipId = 5013,
tbEquipName =
{
" Minh Ph­îng hé ph¸p h¹ng liªn", " Minh Ph­îng hé ph¸p ®Çu hoµn", " Minh Ph­îng hé ph¸p th­îng giíi ", " Minh Ph­îng hé ph¸p hé uyÓn ", " Minh Ph­îng hé ph¸p thóc yªu",
" Minh Ph­îng hé ph¸p c¸i y", " Minh Ph­îng hé ph¸p triÒn thñ ", " Minh Ph­îng hé ph¸p ngoa ", "Minh Ph­îng hé ph¸p béi ", " Minh Ph­îng hé ph¸p h¹ giíi ",
},
},
{
szFaction = "C¸i Bang Bæng",
nFirstEquipId = 5023,
tbEquipName =
{
"Minh Ph­îng trõng giíi h¹ng liªn", "Minh Ph­îng trõng giíi ®Çu hoµn", "Minh Ph­îng trõng giíi th­îng giíi ", "Minh Ph­îng trõng giíi hé uyÓn", "Minh Ph­îng trõng giíi thóc yªu",
"Minh Ph­îng trõng giíi c¸i y", "Minh Ph­îng trõng giíi tr­îng", "Minh Ph­îng trõng giíi ngoa", "Minh Ph­îng trõng giíi béi", "Minh Ph­îng trõng giíi h¹ giíi ",
},
},
},
},
[8] =
{
szShowName = "Thiªn NhÉn Gi¸o",
szFaction = "tianren",
nShortFaction = "tr",
tbSkill = {361, 362, 715, 1075, 1076},
tbEquip =
{
{
szFaction = "ChiÕn NhÉn",
nFirstEquipId = 5033,
tbEquipName =
{
"Minh Ph­îng xÝch minh h¹ng liªn", "H¹ch Hæ xÝch minh kh«i", "Minh Ph­îng xÝch minh th­îng giíi", "Minh Ph­îng xÝch minh hé o¶n", "Minh Ph­îng xÝch minh yªu ®¸i",
"Minh Ph­îng xÝch minh gi¸p", "Minh Ph­îng xÝch minh th­¬ng", "Minh Ph­îng xÝch minh ngoa", "Minh Ph­îng xÝch minh béi", "Minh Ph­îng xÝch minh h¹ giíi",
},
},
{
szFaction = "Ma NhÉn",
nFirstEquipId = 5043,
tbEquipName =
{
"Minh Ph­îng s¸t viªm h¹ng liªn", "H¹ch Hæ s¸t viªm kh«i", "Minh Ph­îng s¸t viªm th­îng giíi", "Minh Ph­îng s¸t viªm hé o¶n", "Minh Ph­îng s¸t viªm yªu ®¸i",
"Minh Ph­îng s¸t viªm gi¸p", "Minh Ph­îng s¸t viªm ®ao", "Minh Ph­îng s¸t viªm ngoa", "Minh Ph­îng s¸t viªm béi", "Minh Ph­îng s¸t viªm h¹ giíi",
},
},
},
},
[9] =
{
szShowName = "Vâ §ang",
szFaction = "wudang",
nShortFaction = "wd",
tbSkill = {365, 368, 716, 1078, 1079},
tbEquip =
{
{
szFaction = "Vâ §ang KhÝ",
nFirstEquipId = 5053,
tbEquipName =
{
" Minh Ph­îng tiªn ©m phï ", " Minh Ph­îng tiªn ©m qu¸n", " Minh Ph­îng tiªn ©m th­îng giíi ", " Minh Ph­îng tiªn ©m tô ", " Minh Ph­îng tiªn ©m ph¸p ®¸i ",
" Minh Ph­îng tiªn ©m ®¹o bµo ", " Minh Ph­îng tiªn ©m kiÕm ", " Minh Ph­îng tiªn ©m ngoa ", " Minh Ph­îng tiªn ©m béi ", " Minh Ph­îng tiªn ©m h¹ giíi ",
},
},
{
szFaction = "Vâ §ang KiÕm",
nFirstEquipId = 5063,
tbEquipName =
{
" Minh Ph­îng ®¹o minh phï ", " Minh Ph­îng ®¹o minh qu¸n ", " Minh Ph­îng ®¹o minh th­îng giíi ", " Minh Ph­îng ®¹o minh tô ", " Minh Ph­îng ®¹o minh ph¸p ®¸i ",
" Minh Ph­îng ®¹o minh ®¹o bµo ", " Minh Ph­îng ®¹o minh kiÕm ", " Minh Ph­îng ®¹o minh ngoa ", " Minh Ph­îng ®¹o minh béi ", " Minh Ph­îng ®¹o minh h¹ giíi ",
},
},
},
},
[10] =
{
szShowName = "C«n L«n",
szFaction = "kunlun",
nShortFaction = "kl",
tbSkill = {372, 375, 717, 1080, 1081},
tbEquip =
{
{
szFaction = "C«n L«n §ao",
nFirstEquipId = 5073,
tbEquipName =
{
"Minh Ph­îng thiªn canh h¹ng liªn ", "Minh Ph­îng thiªn canh ®¹o qu¸n", "Minh Ph­îng thiªn canh th­îng giíi", "Minh Ph­îng thiªn canh hé uyÓn", "Minh Ph­îng thiªn canh ph¸p ®¸i",
"Minh Ph­îng thiªn canh ®¹o bµo", "Minh Ph­îng thiªn canh ®ao", "Minh Ph­îng thiªn canh ngoa", "Minh Ph­îng thiªn canh béi", "Minh Ph­îng thiªn canh h¹ giíi",
},
},
{
szFaction = "C«n L«n KiÕm",
nFirstEquipId = 5083,
tbEquipName =
{
"Minh Ph­îng ng¹o s­¬ng h¹ng liªn ", "Minh Ph­îng ng¹o s­¬ng ®¹o qu¸n", "Minh Ph­îng ng¹o s­¬ng th­îng giíi", "Minh Ph­îng ng¹o s­¬ng hé uyÓn", "Minh Ph­îng ng¹o s­¬ng ph¸p ®¸i",
"Minh Ph­îng ng¹o s­¬ng ®¹o bµo", "Minh Ph­îng ng¹o s­¬ng kiÕm ", "Minh Ph­îng ng¹o s­¬ng ngoa ", "Minh Ph­îng ng¹o s­¬ng béi", "Minh Ph­îng ng¹o s­¬ng h¹ giíi",
},
},
},
},
}
local tbEquipFreeCell =
{
{2, 1}, {2, 2}, {1, 1}, {1, 2}, {2, 1}, --¾±´ø£¬¶¥´÷£¬ÉϽ䣬»¤Ýó£¬Ñ ü´ø
{2, 3}, {2, 4}, {2, 2}, {1, 2}, {1, 1}, --?¢ÎÎäÆ÷£¬Ñ¥×Ó£¬Ñü×¹£¬Ï� �½ä
}


local tbFactionSeries =
{
[1] = {1, 2},
[2] = {3, 4},
[3] = {5, 6},
[4] = {7, 8},
[5] = {9, 10},
}


local tbFreeItem =
{
{szName="Håi Thiªn T¸i T¹o CÈm Nang", tbProp={6,1,1781,1,0,0}, tbParam={60}},
{szName="Qu¶ huy hoµng cao cÊp.", tbProp={6,1,1075,1,0,0}},
{szName="Khiªu chiªn lÔ bao", tbProp={6,1,2006,1,0,0}},
{szName="ThËp Toµn §¹i Bæ ThÇn §an", tbProp={6,1,1399,1,0,0}},
{szName="Viªm §Õ BÝ B¶o", tbProp={6,1,2805,1,0,0}},
{szName="H·n HuyÕt Long C©u", tbProp={0,10,18,1,0,0}, nWidth=2, nHeigth=3},
}


local tbGMAccount = {"", "", "KeyboardHero", "DarkLord", "sccddp"}


function main()
dofile("script/global/·ÈË_Àñ¹Ù.lua");
dialog_main()
end






--================================================== ========================================


Include("\\script\\global\\repute_head.lua")
Include("\\script\\misc\\league_cityinfo.lua")


function dmcreattongtest()
local strTongName = GetTongName()
local tszTitle = "Chµo mong b¹n ®· tham gia hÖ thèng <color=yellow>Bang Héi<color>"
if (strTongName == nil or strTongName == "") then
Say(tszTitle,4," NhËn ®i?u kiÖn t¹o bang héi/dmcreatetong","Gia nhËp bang héi/dmjointong","T¹o bang héi/dmcreateit","KOt thóc ®èi tho¹i")
else
Say(tszTitle,0)
end
end


function dmcreatetong()
if GetCamp() ~= 4 then
SetCamp(4)
SetCurCamp(4)
AddRepute(100000)
AddLeadExp(1000000)
AddLeadExp(1000000)


AddLeadExp(1000000)


AddEventItem(195)
Earn(1000000)
if GetLevel() <= 100 then
for i=1,100 do
AddOwnExp(100000000)
end
end
Msg2Player("<color=yellow>Ng­êi ®· héi ®ñ tÊt c¶ ®iªu kiÖn ®Ó t¹o Bang Héi!<color>")
else
end
end


function dmjointong()
if GetCamp() ~= 4 then


if GetLevel() <= 100 then
for i=1,100 do
AddOwnExp(100000000)
end
end


SetCamp(4)
SetCurCamp(4)
Msg2Player("<color=yellow>Gia nhËp Bang héi thµnh c«ng!<color>")
else
end
end


function dmcreateit()
Tong_name,oper = GetTong()
if (oper == 0) and (GetTask(99) == 1) then
Say("KiOm hiÖp ch­ëng m«n nh©n:Khai s¸ng bang héi, më réng b¸ nghiÖp." ,2,"B¾t ®Çu dùng bang/Direct_CreateTong","§îi ta mét chót/wait_a_moment")
elseif (oper == 0) and (GetCamp() == 4) and (GetLevel() >= 50) and (GetReputeLevel(GetRepute()) >= 6) and (GetLeadLevel() >= 30) and (HaveItem(195) == 1) then
Talk(6,"create_pay", "Ng­êi ch¬i: KiOm hiÖp ch­ëng m«n nh©n, xin hái ta ph¶i lµm nh­ thO nµo míi ca thÓ khai t«ng lËp ph¸i trë thµnh Bang chñ ®©y?", "KiOm hiÖp ch­ëng m«n nh©n: §Çu tiªn ng­¬i ph¶i ca ®ñ n¨ng lùc l·nh ®¹o, ca 16 ng­êi cïng chU h­íng cïng ng­¬i lËp bang, tr¶i qua 3 ngµy Kh¶o NghiÖm Kú ", "Ch­ëng m«n nh©n: NOu trong 3 ngµy ca ng­êi rêi bang th× néi trong 3 ngµy ®a ng­êi ph¶i t×m ng­êi kh¸c thay thO.", "Ch­ëng m«n nh©n: Ng­¬i ph¶i ca ®ñ tµi l·nh ®¹o vµ tin vËt ®a lµ Nh¹c V­¬ng KiOm", "Ng­êi ch¬i: Nh¹c V­¬ng Kiªm ? Ng­êi nai lµ thanh kiªm nµy µ ? ", "Kiªm hiÖp ch­ëng m«n nh©n : Th× ra lµ ng­¬i ®· ca na... Kh«ng tÖ, qu¶ nhiªn tuæi trÎ tµi cao!!! ")
else
i = random(0,1)
if (i == 0) then
Talk(1,"", "Kiªm hiÖp ch­ëng m«n nh©n: Nªu nh­ muèn thµnh lËp bang héi, ng­¬i v× na bá ra 1 l­îng lín thêi gian, søc lùc cïng t©m huyOt, kh«ng thÓ nöa ®­êng hñy bá." )
else
Talk(6,"", "Kiªm hiÖp ch­ëng m«n nh©n: Ng­¬i muèn hái ®iªu kiÖn lËp bang µ? §Ó ta nai cho ng­¬i râ.", "Kiªm hiÖp ch­ëng m«n nh©n: ®Çu tiªn ph¶i xuÊt ; tiªp theo ng­¬i kh«ng thÓ ë bÊt kú bang héi nµo kh¸c ; ng­¬i nhÊt ®inh ph¶i danh väng giang hå ; cuèi cïng lµ tµi l·nh ®¹o ph¶i h¬n 30 cÊp.", "Kiªm hiÖp ch­ëng m«n nh©n: Sau ®a ®i chiªn tr­êng t×m mét thanh Nh¹c V­¬ng Kiªm lµm bang chñ tin vËt lµ ®­îc råi.")
end
end
end


function create_pay()
Say("Kiªm hiÖp ch­ëng m«n nh©n: Ng­¬i cÇn lÖ phi lµ 100 v¹n l­îng b¹c." ,2,"Kh«ng thµnh vÊn ®ª, ta ca ®em 100v l­îng ®©y! /create_pay_yes","H©y dµ, ta kh«ng ®em ®ñ tiªn råi. /create_pay_no")


-- Say("½£ÏµÕÆ·ÅÈË£ºÄÇ·´£¬ÄãÖ»� �ªÓÐ×ã¹»µÄ×ʽðÈ·°ïÅÉÄܹ»Ô� �תÆ𵴾ݿÉÒԸˣ¬±ÈÈç˵ÓÐ� �ö100Ýò¸½¸½×Ó°É¡£" ,2,"·»ÎÊî}£¬?ÒÒѾ­Ó?00Ýò¸½¸½×� �¸Ë/create_pay_yes","Ì«·ÑÇ®?Ë£¬ÉïÒ»µãРв»Ð?create_pay_no")
end
function create_pay_yes()


if (GetCash() >= 1000000) then
Pay(1000000) -- ÊÕ·Ñ
DelItem(195) -- ɾ³ýϵ¹Øµµ¾ß
SetTask(99,1) -- ²¢´òÉϱê¼Ç£¨Ý¬Ê±¶¨ÒåΪ°ïÅ ÉÖеĵóÒ»¸öÈË£¨¼´°ïÖ÷±¾ÈË £©£©
Direct_CreateTong() -- ¿ªÊ¼½¨°ï

else
Talk(1,"", "Kiªm hiÖp ch­ëng m«n nh©n: ViÖc duy tr× bang héi rÊt tèn ti?n, ng­êi ph¶i cè g¾ng cïng mäi ng­êi tUch gap ®Ó bang ®­îc giµu m¹nh. ") end
end




function Direct_CreateTong()
CreateTong(1) -- µ¯³ö½¨°ï¶Ô»°¿ò£¬½áÊø½Å±¾¿ ØÖÆ
end


--================================================== ========================================


function dialog_main()
local szTitle = "<npc> KiÕm HiÖp QuÇn Hïng ChiÕn Nam H¶i,Long Tranh Hæ §Êu DiÖu Cöu Ch©u..Ta Vèn Sø GØa §¹i BiÓu T©y S¬n C­ ë Chç Nµy Hoan Nghªnh C¸c Anh Hïng Hµo KiÖt Kh¾p Thiªn H¹... Ngµi CÇn G× ë T¹i H¹? "
local tbOpt =
{
{"NhËn Hç Trî T©n Thñ ", helo},
{"Ta muèn lÊy vËt phÈm.", moreitem},
{"Ta muèn lÊy mét sè vËt phÈm kh¸c...", show_item},
{"NhËn ®iÓm", hotro},
{"Trang bÞ hiÕm", tbh},
{"LÊy trang bÞ m«n ph¸i", show_faction},
{"LÊy ngùa", layngua},
{"Kh¶o nghiÖm hÖ thèng bang héi ", dmcreattongtest},
{"Vµo ph¸i vµ häc skill 150", choose_faction},
{"NhËn Skill 180", nhanskill180},
{"Ta muèn chuyÓn sinh ", transfer},
{"§ua thuyÒn rång", dragonboat_main},--"§ua ThuyÓn Rång/#dragonboat_main()",
{"N÷ TVB", nukim},
{"Tho¸t"},
}
local szAccount = GetAccount()
for i=1, getn(%tbGMAccount) do
if szAccount == %tbGMAccount[i] then
tinsert(tbOpt, 1, {"תGMÕ˺Å", gm_function})
tinsert(tbOpt, 1, {"¸ìÈ¡BOSS¸îÅÆ", gm_functionboss})
tinsert(tbOpt, 1, {"ÎÒÒªÉý¼¶µ½190¼¶", level_up_to190})
tinsert(tbOpt, 1, {"ÎÒÒª¸ìÈ¡ÎïÆ·", show_item})
tinsert(tbOpt, 1, {"ÎÒÒª¸ìÈ¡°×»¢Ì××°", show_faction})
tinsert(tbOpt, 1, {"ÎÒҪϴËè", clear_attibute_point})
break
end
end
CreateNewSayEx(szTitle, tbOpt)
end


function helo()
local tbOpt =
{
{"NhËn Hç Trî Phôc Håi ", hotrotanthu},
{"Phong V©n B§ ", PVBD},
{"Nguyªn LiÖu ", nguyenlieu},
{"Set AB-§Q ", dcm1},
{"NhËn VK Xanh ", dcm2},
{"Set HKMP ", dcm3},
{"Set Th­¬ng Lang 100 ", dcm4},
{"NhËn Set 120 ", dcm5},
{"LÖnh Bµi ADmin", lbadmin},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän mµu", tbOpt)
end


function lbadmin()
AddItem(6,1,4369,1,0,0,0,0)--lenh bai adm
end
function hotrotanthu()
AddItem(6,1,4366,0,0,0)
AddStackItem(100,4,417,1,1,0,0,0)
AddStackItem(100,4,417,1,1,0,0,0)
end


function PVBD()
OpenBingoMachine()
end


function nguyenlieu()
AddStackItem(200,6,1,2312,1,0,0,0)
AddStackItem(200,6,1,2312,1,0,0,0)
AddStackItem(200,6,1,2312,1,0,0,0)
end


function dcm1()
local tab_Content = {
"Rêi khái/no",
"Set An Bang /#sethkold(424,427)",
"Set §Þnh Quèc /#sethkold(403,407)",
}
Say("Xin chµo <color=yellow>"..GetName().."<color>, h·y chän chøc n¨ng mµ b¹n muèn", getn(tab_Content), tab_Content);
end
function sethkold(nB,nE)
for i=nB,nE do AddGoldItem(0,i) end
end
function dcm2()
AddItem(0,0,0,10,2,200,10)
AddItem(0,0,0,10,2,200,10)
AddItem(0,0,0,10,2,200,10)
AddItem(0,0,0,10,2,200,10)
AddItem(0,0,1,10,3,200,10)
AddItem(0,0,1,10,3,200,10)
AddItem(0,0,1,10,3,200,10)
AddItem(0,0,3,10,3,200,10)
AddItem(0,0,3,10,3,200,10)
AddItem(0,0,3,10,2,200,10)
end
function dcm3()
local tab_Content = {
"Rêi khái/no",
"NhËn Vò KhÝ HKMP 9x /bachkim",
"Set HKMP NMK /#sethkold(250,259)",
"Set HKMP NMC /#sethkold(260,264)",
"Set HKMP TN§ao /#sethkold(325,334)",
}
Say("Xin chµo <color=yellow>"..GetName().."<color>, h·y chän chøc n¨ng mµ b¹n muèn", getn(tab_Content), tab_Content);
end
function sethkold(nB,nE)
for i=nB,nE do AddGoldItem(0,i) end
end


function dcm4()
local tab_Content = {
"Rêi khái/no",
"Set Th­¬ng Lang NMK /#sethkold(1425,1434)",
"Set Th­¬ng Lang NMC /#sethkold(1435,1444)",
"Set Th­¬ng Lang TN§ao /#sethkold(1545,1554)",
}
Say("Xin chµo <color=yellow>"..GetName().."<color>, h·y chän chøc n¨ng mµ b¹n muèn", getn(tab_Content), tab_Content);
end
function sethkold(nB,nE)
for i=nB,nE do AddGoldItem(0,i) end
end
function dcm5()
local tbOpt =
{
{"Set HuyÒn Viªn ", kcm1},
{"Set Tö M·ng ", kcm2},
{"Set Kim ¤ ", kcm3},
{"Set B¹ch Hæ ", kcm4},
{"Set XÝch L©n ", kcm5},
{"Set Minh Ph­îng ", kcm6},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän mµu", tbOpt)
end


function kcm1()
local tab_Content = {
"Rêi khái/no",
"Set HuyÒn Viªn NMK /#sethkold(1655,1664)",
"Set HuyÒn Viªn NMC /#sethkold(1665,1674)",
"Set HuyÒn Viªn TN§ao /#sethkold(1775,1784)",
}
Say("Xin chµo <color=yellow>"..GetName().."<color>, h·y chän chøc n¨ng mµ b¹n muèn", getn(tab_Content), tab_Content);
end
function sethkold(nB,nE)
for i=nB,nE do AddGoldItem(0,i) end
end


function kcm2()
local tab_Content = {
"Rêi khái/no",
"Set Tö M·ng NMK /#sethkold(1885,1894)",
"Set Tö M·ng NMC /#sethkold(1895,1904)",
"Set Tö M·ng TN§ao /#sethkold(2005,2014)",
}
Say("Xin chµo <color=yellow>"..GetName().."<color>, h·y chän chøc n¨ng mµ b¹n muèn", getn(tab_Content), tab_Content);
end
function sethkold(nB,nE)
for i=nB,nE do AddGoldItem(0,i) end
end


function kcm3()
local tab_Content = {
"Rêi khái/no",
"Set Kim ¤ NMK /#sethkold(2115,2124)",
"Set Kim ¤ NMC /#sethkold(2125,2134)",
"Set Kim ¤ TN§ao /#sethkold(2235,2244)",
}
Say("Xin chµo <color=yellow>"..GetName().."<color>, h·y chän chøc n¨ng mµ b¹n muèn", getn(tab_Content), tab_Content);
end
function sethkold(nB,nE)
for i=nB,nE do AddGoldItem(0,i) end
end


function kcm4()
local tab_Content = {
"Rêi khái/no",
"Set B¹ch Hæ NMK /#sethkold(2345,2354)",
"Set B¹ch Hæ NMC /#sethkold(2355,2364)",
"Set B¹ch Hæ TN§ao /#sethkold(2465,2474)",
}
Say("Xin chµo <color=yellow>"..GetName().."<color>, h·y chän chøc n¨ng mµ b¹n muèn", getn(tab_Content), tab_Content);
end
function sethkold(nB,nE)
for i=nB,nE do AddGoldItem(0,i) end
end


function kcm5()
local tab_Content = {
"Rêi khái/no",
"Set XÝch L©n NMK /#sethkold(2575,2584)",
"Set XÝch L©n NMC /#sethkold(2585,2594)",
"Set XÝch L©n TN§ao /#sethkold(2695,2704)",
}
Say("Xin chµo <color=yellow>"..GetName().."<color>, h·y chän chøc n¨ng mµ b¹n muèn", getn(tab_Content), tab_Content);
end
function sethkold(nB,nE)
for i=nB,nE do AddGoldItem(0,i) end
end


function kcm6()
local tab_Content = {
"Rêi khái/no",
"Set Minh Ph­îng NMK /#sethkold(4923,4932)",
"Set Minh Ph­îng NMC /#sethkold(4933,4942)",
"Set Minh Ph­îng TN§ao /#sethkold(5043,5052)",
"Set Long T­íng /#sethkold(5219,5227)",
}
Say("Xin chµo <color=yellow>"..GetName().."<color>, h·y chän chøc n¨ng mµ b¹n muèn", getn(tab_Content), tab_Content);
end
function sethkold(nB,nE)
for i=nB,nE do AddGoldItem(0,i) end
end


function moreitem()
local tab_Content = {
"LÊy Cùc PhÈm /tbcucph",
"Trang bÞ Cùc PhÈm kh¸c /cucphkhac",
"Thiªn H¹ §Ö NhÊt Bang/#GetBonusTHDNB7_main()",
"Gäi Boss /gm_functionboss",
"TriÖu Boss /boss",
"Trë l¹i /dialog_main",
" Th«i kh«ng lÊy g× n÷a hÕt."
}
Say(" Muèn lÊy thªm c¸i g× nµo ? ", getn(tab_Content), tab_Content);
end;


function tbcucph()
cucpham()
end;


function cucphkhac()
dohoangkim()
end


function gm_functionboss()
for i =1,10 do
AddItem(6,1,1022,0,0,0)
end
end


function boss()
AddItem(6,1,2595,0,0,0)
AddItem(6,1,3083,0,0,0)
AddItem(6,1,3084,0,0,0)
AddItem(6,1,3085,0,0,0)
end


function nhanskill180()
local nFaction = GetLastFactionNumber() + 1
if nFaction==0 then
Say("Kh«ng cã m«n ph¸i mµ ®åi nhËn skill thÊt truyÒn, ta kh«ng cã thêi gian ®ïa víi ng­¬i", 0)
return
else
for i=1,10 do
if (nFaction==i) then
if (HaveMagic(SKILL_180[i]) == -1) then
AddMagic(SKILL_180[i],20)
Say("B¹n häc ®­îc kü n¨ng cÊp 180 <color=yellow>"..GetSkillName(SKILL_180[i]), 0)
else
Say("Ng­¬i ®· cã kü n¨ng thÊt truyÒn råi, ®õng tham lam", 0)
return
end
end
end
end
end


function bachkim()
local tbOpt =
{
{"ThiÕu l©m", bktl},
{"Thiªn v­¬ng", bktv},
{"®­êng m«n", bkdm},
{"Ngò ®éc", bk5d},
{"Nga mi", bknm},
{"Thuý yªn", bkty},
{"C¸i bang", bkcb},
{"Thiªn nhÉn", bktn},
{"Vâ ®ang", bkvd},
{"C«n l«n", bkcl},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän m«n ph¸i?", tbOpt)
end
function bktl()
AddGoldItem(0, 11)
AddGoldItem(0, 6)
end
function bktv()
AddGoldItem(0, 16)
AddGoldItem(0, 21)
AddGoldItem(0, 26)
end
function bknm()
AddGoldItem(0, 31)
end
function bkty()
AddGoldItem(0, 46)
end
function bk5d()
AddGoldItem(0, 61)
end
function bkdm()
AddGoldItem(0, 71)
AddGoldItem(0, 76)
AddGoldItem(0, 81)
end
function bkcb()
AddGoldItem(0, 96)
end
function bktn()
AddGoldItem(0, 101)
end
function bkvd()
for i=4346,4355 do
AddPlatinaItem(3, i)
end
end
function bkcl()
AddGoldItem(0, 126)
end


function nukim()
if GetSex() == 1 then
SetSeries(0)
KickOutSelf()
else
Talk(1,"","Ng­¬i lµ Pª §ª µ ?")
end
end


function hotro()
local tbOpt =
{
{"§iÓm Kü N¨ng", pointkynang},
{"§iÓm TiÒm N¨ng", pointtiemnang},
{"TÈy ®iÓm", clear_attibute_point},
{"Danh väng,Phóc duyªn", danhvongphucduyen},
{"Tµi l·nh ®¹o", lanhdao},
{"§iÓm Cèng HiÕn", conghien},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Anh cÇn g×?", tbOpt)
end


function pointkynang()
AddMagicPoint(10)
CreateNewSayEx("<npc>B¹n nhËn ®­îc 10 ®iÓm kü n¨ng", tbOpt)
KickOutSelf()
end;


function pointtiemnang()
AddProp(100)
CreateNewSayEx("<npc>B¹n nhËn ®­îc 100 ®iÓm tiÒm n¨ng", tbOpt)
end;


function danhvongphucduyen()
AddRepute(5000);
FuYuan_Start();
FuYuan_Add(5000);
CreateNewSayEx("<npc>B¹n nhËn ®­îc 5000 ®iÓm", tbOpt)
end


function lanhdao()
for i=1,20 do
AddLeadExp(100000)
end
end


function conghien()
AddContribution(10000)
end


function layngua()
local tbOpt =
{
{"Ngùa nhãm 1", vip1},
{"Ngùa nhãm 2", vip2},
{"Ngùa nhãm 3", vip3},
{"Ngùa nhãm 4", vip4},
{"Ngùa nhãm 5", vip5},
{"Ngùa b¸ ®¹o", nguabadao},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Anh cÇn g×?", tbOpt)
end


function vip1()
AddItem(0,10,6,10,0,0,0)
AddItem(0,10,7,10,0,0,0)
AddItem(0,10,8,10,0,0,0)
AddItem(0,10,9,10,0,0,0)
AddItem(0,10,10,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end
function vip2()
AddItem(0,10,11,10,0,0,0)
AddItem(0,10,12,10,0,0,0)
AddItem(0,10,13,10,0,0,0)
AddItem(0,10,14,10,0,0,0)
AddItem(0,10,15,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end
function vip3()
AddItem(0,10,16,10,0,0,0)
AddItem(0,10,17,10,0,0,0)
AddItem(0,10,18,10,0,0,0)
AddItem(0,10,19,10,0,0,0)
AddItem(0,10,20,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end
function vip4()
AddItem(0,10,21,10,0,0,0)
AddItem(0,10,22,10,0,0,0)
AddItem(0,10,23,10,0,0,0)
AddItem(0,10,24,10,0,0,0)
AddItem(0,10,25,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end


function vip5()
for i=5093,5097 do
AddGoldItem(0, i)
end
end


function nguabadao()
AddGoldItem(0, 4480)
AddGoldItem(0, 4366)
for i=5093,5097 do
AddGoldItem(0, i)
end
CreateNewSayEx("<npc>NhËn ®­îc Ngùa b¸ ®¹o", tbOpt)
end


function gm_function()
local nCurLevel = GetLevel()
if nCurLevel < 150 then
ST_LevelUp(150 - nCurLevel)
end
SetFightState(0)
SetCamp(6)
SetCurCamp(6)
AddMagic(732, 1)--˲ÒÆ
AddMagic(733, 1)--ÒþÉí
if CalcFreeItemCellCount() >= 1 then
local tbItem = {szName="´«ËÝȨÕÈ", tbProp={6,1,2766,1,0,0}, nBindState=-2}
tbAwardTemplet:GiveAwardByList(tbItem, "gmÕ˺ŸìÈ¡µµ¾ß", 1)
end
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() <= 10000000) then
Talk(1, "", "Ph¶i cã ®ñ 1k v¹n míi cã thÓ chuyÓn sinh.")
return
end
Pay(10000000)
ST_DoTransLife()
end


function check_faction()
local szCurFaction = GetFaction()
if szCurFaction ~= nil and szCurFaction ~= "" then
return
end
return 1
end


function choose_faction()
if check_faction() ~= 1 then
Talk(1, "", "Ng­¬i ®· gia nhËp m«n ph¸i.")
return
end
local nSeries = GetSeries() + 1
local tbOpt = {}
for i=1, getn(%tbFactionSeries[nSeries]) do
local nIndex = %tbFactionSeries[nSeries][i]
tinsert(tbOpt, {%tbFaction[nIndex].szShowName, set_faction, {nIndex}})
end
tinsert(tbOpt, {"Trë vª", dialog_main})
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
CreateNewSayEx("<npc>Mét khi gia nhËp m«n ph¸i kh«ng thÓ thay ®æi, h·y suy nghÜ kü.", tbOpt)
end


function set_faction(nIndex)
local szTitle = format("<npc>X¸c nhËn muèn gia nhËp m«n ph¸i ?<color=yellow>%s<color> m«n ph¸i?", %tbFaction[nIndex].szShowName)
local tbOpt =
{
{"X¸c nhËn!", do_set_faction, {nIndex}},
{"Trë vª.", choose_faction},
{"Kªt thóc ®èi tho¹i."},
}
CreateNewSayEx(szTitle, tbOpt)
end


function do_set_faction(nIndex)
if check_faction() ~= 1 then
Talk(1, "", "Ng­¬i ®· gia nhËp m«n ph¸i.")
return
end
local nResult = SetFaction(%tbFaction[nIndex].szFaction)
if nResult == 0 then
return
end
DynamicExecuteByPlayer(PlayerIndex, "\\script\\gmscript.lua", "AddSkills", %tbFaction[nIndex].nShortFaction, 0)
for i=1, getn(%tbFaction[nIndex].tbSkill) do--90£¬120£¬150¼¶¼¼ÄÜ
AddMagic(%tbFaction[nIndex].tbSkill[i], 20)
end
AddMagic(210, 1)--?»¼¶ÇṦ
Talk(1, "KickOutSelf", format("Ng­¬i ®· gia nhËp thµnh c«ng ph¸i %s", %tbFaction[nIndex].szShowName))
end


function show_faction()
if check_faction() == 1 then
Talk(1, "", "Gia nhËp m«n ph¸i míi ca thÓ nhËn trang bÞ")
return
end
local nFactionId = GetLastFactionNumber() + 1
local tbOpt = {}
local tbSubFaction = %tbFaction[nFactionId].tbEquip
for i=1, getn(tbSubFaction) do
tinsert(tbOpt, {tbSubFaction[i].szFaction, show_equip, {nFactionId, i}})
end
tinsert(tbOpt, {"Trë vª.", dialog_main})
-- tinsert(tbOpt, {"
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
CreateNewSayEx("<npc>Xin mêi lùa chän ph¸i.", tbOpt)
end


function show_equip(nFactionId, nSubFactionId)
local tbEquip = %tbFaction[nFactionId]["tbEquip"][nSubFactionId]
local tbEquipName = tbEquip["tbEquipName"]
local nFirstEquipId = tbEquip["nFirstEquipId"]
local tbOpt = {}
for i=1, getn(tbEquipName) do
tinsert(tbOpt, {tbEquipName[i], get_equip, {i, nFirstEquipId + i - 1}})
end
tinsert(tbOpt, {"Trë vª", show_faction})
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
local szTitle = format("<npc>LÊy ®å %s Kim ¤", tbEquip.szFaction)
CreateNewSayEx(szTitle, tbOpt)
end


function get_equip(nIndex, nEquipId)
local nWidth = %tbEquipFreeCell[nIndex][1]
local nHeigth = %tbEquipFreeCell[nIndex][2]
if CountFreeRoomByWH(nWidth, nHeigth) < 1 then
Talk(1, "", format("CÇn Ut nhÊt 1 c¸i %dx%d tói ®eo l­ng", nWidth, nHeigth))
return
end
AddGoldItem(0, nEquipId)
end


function show_item()
local tbOpt = {}
local nCount = getn(%tbFreeItem)
local szOption = ""
for i=1, nCount-1 do
szOption = format("NhËn %s", %tbFreeItem[i].szName)
tinsert(tbOpt, {szOption, get_item, {i}})
end
szOption = format("NhËn %s", %tbFreeItem[nCount].szName)
tinsert(tbOpt, {szOption, get_single_item, {nCount}})
tinsert(tbOpt, {"NhËn cùc phÈm giíi chØ...", get_normal_item})
tinsert(tbOpt, {"Trë vª.", dialog_main})
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
CreateNewSayEx("<npc>l·o phu n¬i nµy ca h¬i thë nham vËt phÈm nh­ng nhËn lÊy", tbOpt)
end


function get_normal_item()
local tbOpt =
{
{"NhËn 5 viªn KNB.", cszb},
{"H­ng Bang Chi Giíi", xb_jz},
{"TrÊn Nh¹c Chi Giíi", zy_jz},
{"Th­îng Ph­¬ng Chi Giíi", sf_jz},
{"ThuÇn TÞnh Chi Giíi", sh_jz},
{"Thiªn tö chi giíi", tz_jz},
{"Cµn Kh«n Giíi ChØ (Cùc phÈm)", jz08},
{"CÆp V« Danh Giíi ChØ (Cùc phÈm)", jz08y},
{"§éc C« CÇu B¹i Th­îng Giíi", jz08z},
{"Trë vÒ.", dialog_main},
{"KÕt thóc ®èi tho¹i."},
}
CreateNewSayEx("<npc>L·o phu ca mét sè man cùc phÈm, ng­êi cÇn thøc g× ?", tbOpt)
end


function cszb()
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
end
function xb_jz()
AddGoldItem(0, 508)
end
function zy_jz()
AddGoldItem(0, 509)
end
function sf_jz()
AddGoldItem(0, 510)
end
function sh_jz()
AddGoldItem(0, 514)
end
function tz_jz()
AddGoldItem(0, 531)
end
function jz08()
AddGoldItem(0, 3878)
end
function jz08y()
AddGoldItem(0, 3770)
AddGoldItem(0, 3755)
end
function jz08z()
AddGoldItem(0, 4134)
AddGoldItem(0, 4135)
end


function tbh()
local tbOpt =
{
{"Vò liÖt", vuliet},
{"Huynh ®Ö", huynhde},
{"Cè s¬n", coson},
{"D­¬ng thÇn", duongthan},
{"H¾c ThÇn", hacthan},
{"CP §éng S¸t", dongsat},
{"Ph«i ®å TÝm", phoidotim},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän item", tbOpt)
end


function vuliet()
for i=5208,5212 do
AddGoldItem(0, i)
end
end
function huynhde()
for i=4436,4437 do
AddGoldItem(0, i)
end
for i=4481,4482 do
AddGoldItem(0, i)
end
end
function coson()
AddGoldItem(0, 4441)
AddGoldItem(0, 4445)
AddGoldItem(0, 4449)
AddGoldItem(0, 4453)
AddGoldItem(0, 4457)
AddGoldItem(0, 4461)
AddGoldItem(0, 4465)
AddGoldItem(0, 4469)
end
function duongthan()
for i=514,520 do
AddGoldItem(0, i)
end
end
function hacthan()
for i=3890,3894 do
AddGoldItem(0, i)
end
end
function dongsat()
for i=494,497 do
AddGoldItem(0, i)
end
end
function phoidotim()
dotim()
end


function get_item(nIndex)
local nMaxCount = CalcFreeItemCellCount()
g_AskClientNumberEx(0, nMaxCount, "Xin mêi ®­a vµo nhËn lÊy", {get_item_back, {nIndex}})
end


function get_item_back(nIndex, nCount)
if nCount <= 0 then
return
end
if CalcFreeItemCellCount() < nCount then
Talk(1, "", format("CÇn Ut nhÊt <color=yellow>%d<color> tói kh«ng gian...", nCount))
return
end
local szLogTitle = format("[liguan]get_free_item_%s", %tbFreeItem[nIndex].szName)
tbAwardTemplet:GiveAwardByList(%tbFreeItem[nIndex], szLogTitle, nCount)
end


function get_single_item(nIndex)
local tbItem = %tbFreeItem[nIndex]
if CountFreeRoomByWH(tbItem.nWidth, tbItem.nHeigth) < 1 then
Talk(1, "", format("CÇn Ut nhÊt 1 %dx%d µÄ±³°ü¿O¼ä", tbItem.nWidth, tbItem.nHeigth))
return
end
local szLogTitle = format("[liguan]get_free_item_%s", tbItem.szName)
tbAwardTemplet:GiveAwardByList(tbItem, szLogTitle)
end


function clear_attibute_point()
local tbOpt =
{
{"TÈy ®iÓm kü n¨ng", clear_skill},
{"TÈy ®iÓm tiÒm n¨ng", clear_prop},
{"Trë vÒ", dialog_main},
{"KÕt thóc ®èi tho¹i."},
}
CreateNewSayEx("<npc>Ng­¬i quyOt u muèn tÈy tñy?", tbOpt)
end


function clear_skill()
local tbOpt =
{
{"X¸c nhËn", do_clear_skill},
{"§Ó Ta suy nghÜ l¹i."},
{"Trë vÒ", clear_attibute_point},
}
CreateNewSayEx("<npc>Ng­¬i vÉn quyOt u muèn tÈy tñy?", tbOpt)
end


function do_clear_skill()
local i = HaveMagic(210) -- ÇṦ¸íÝâ²ï×÷
local j = HaveMagic(400) -- ¡°½ï¸»¼·Æ¶¡±¸íÝâ²ï×÷
local n = RollbackSkill() -- Çå³ý¼¼Äܲ¢·µ»ØËùÓм¼ÄÜ?ã£� �°üµ¨ÇṦµÈÌØÊâ¼¼ÄÜ£?
local x = 0
if (i ~= -1) then i = 1; x = x + i end -- Õ⸽¾äÅжÏÊÇÅųý´Óδѧ¹ýÇ á¹¦µÄÈË·µ»Ø-1´Ó¶øµ¼Ö¢µãÊý¼ÆËã´íÎóÇé¿ö
if (j ~= -1) then x = x + j end
local rollback_point = n - x -- °Ñ¼¼Äܵ㵱×ö¿ÕÏеãÊý·µ»¹£ ¬µ«ÏÈ?Û³ýÇṦµ?
if (rollback_point + GetMagicPoint() < 0) then -- Èç¹ûÏ´³É¸Ë¸ºÊý£¬Ôòµ±×÷0£¨� �ªÒԺ󶵴ÎÏ´µã±£?ô£?
rollback_point = -1 * GetMagicPoint()
end
AddMagicPoint(rollback_point)
if (i ~= -1) then AddMagic(210, i) end -- Èç¹ûѧ¹uÇṦÔ?¼Ó»ØÔ­Óеȼ¶
if (j ~= -1) then AddMagic(400, j) end -- Èç¹ûѧ¹u¡°½ï¸»¼Aƶ¡±Ý¬Ñù´¦ µí
Msg2Player("TÈy tñy thµnh c«ng! Ng­¬i ca "..rollback_point.." ®iÓm kü n¨ng ®Ó ph©n phèi l¹i.")
KickOutSelf()
end


function clear_prop()
local tbOpt =
{
{"X¸c nhËn", do_clear_prop},
{"§Ó ta suy nghÜ l¹i."},
{"Trë vÒ", clear_attibute_point},
}
CreateNewSayEx("<npc>Ng­¬i vÉn quyOt u muèn tÈy tñy?", tbOpt)
end


function do_clear_prop()
local base_str = {35,20,25,30,20} -- ÎåÐÐÈËÎïµÄÌìÉúÊôÐÔÖµ
local base_dex = {25,35,25,20,15}
local base_vit = {25,20,25,30,25}
local base_eng = {15,25,25,20,40}
local player_series = GetSeries() + 1


local Utask88 = GetTask(88)
AddStrg(base_str[player_series] - GetStrg(1) + GetByte(Utask88, 1)) -- ½«ÒÑ·ÖÅäDZÄÜÖØÖ·£¨task(88)ÊÇÈ ÎÎñÖÐÖ±½Ó½±µøµÄ¸¦¸¿¡¢Éí·¨ µÈ£©
AddDex(base_dex[player_series] - GetDex(1) + GetByte(Utask88, 2))
AddVit(base_vit[player_series] - GetVit(1) + GetByte(Utask88, 3))
AddEng(base_eng[player_series] - GetEng(1) + GetByte(Utask88, 4))
end


function write_info()
tbInputDialog:InputServer()
end

[cuongvh93]

Các bạn ơi cho mình hỏi trong file level_exp.txt thì các giải số phía sau có ý nghĩa gì vậy? MÌnh cám ơn nhiều.

[Only registered and activated users can see links. ]

[jinmin]

của bạn đây

IncludeLib("SETTING")Include("\\script\\dailogsys\ \dailogsay.lua")
Include("\\script\\lib\\awardtemplet.lua")
Include("\\script\\global\\fuyuan.lua")
Include("\\script\\global\\hotrothem.lua")
Include ("\\script\\class\\ktabfile.lua") --CÇn ¢®Ã“ ch¢¹y TabFile_Load
Include("\\script\\global\\gmrole.lua")


SKILL_180 = {1220,1221,1223,1222,1224,1225,1227,1226,1228,1229 }
local tbFaction =
{
[1] =
{
szShowName = "ThiÕu L©m",
szFaction = "shaolin",
nShortFaction = "sl",
tbSkill = {318, 319, 321, 709, 1055, 1056, 1057},
tbEquip =
{
{
szFaction = "ThiÕu L©m QuyÒn",
nFirstEquipId = 4863,
tbEquipName =
{
" Minh Ph­îng ch©u liªn", " Minh Ph­îng t¨ng m·o", " Minh Ph­îng th­îng giíi", " Minh Ph­îng hé uyÓn", " Minh Ph­îng yªu ®¸i",
" Minh Ph­îng cµ sa ", " Minh Ph­îng triÒn thñ ", " Minh Ph­îng t¨ng hµi ", " Minh Ph­îng yªu trôy ", " Minh Ph­îng h¹ giíi ",
},
},
{
szFaction = "ThiÕu L©m C«n",
nFirstEquipId = 4873,
tbEquipName =
{
"Minh Ph­îng ch©u liªn", "Minh Ph­îng t¨ng m·o", "Minh Ph­îng th­îng giíi", "Minh Ph­îng hé uyÓn", "Minh Ph­îng yªu ®¸i",
"Minh Ph­îng cµ sa", "Minh Ph­îng c«n", "Minh Ph­îng t¨ng hµi", "Minh Ph­îng yªu trôy", "Minh Ph­îng h¹ giíi",
},
},
{
szFaction = "ThiÕu L©m §ao",
nFirstEquipId = 4883,
tbEquipName =
{
"Minh Ph­îng ch©u liªn", "Minh Ph­îng t¨ng m·o", "Minh Ph­îng th­îng giíi", "Minh Ph­îng hé uyÓn", "Minh Ph­îng yªu ®¸i",
"Minh Ph­îng cµ sa", "Minh Ph­îng ®ao", "Minh Ph­îng t¨ng hµi", "Minh Ph­îng yªu trôy", "Minh Ph­îng h¹ giíi",
},
},
},
},
[2] =
{
szShowName = "Thiªn V­¬ng Bang",
szFaction = "tianwang",
nShortFaction = "tw",
tbSkill = {322, 325, 323, 708, 1058, 1059, 1060},
tbEquip =
{
{
szFaction = "Thiªn V­¬ng Chïy",
nFirstEquipId = 4893,
tbEquipName =
{
"Minh Ph­îng ®Þnh quang liªn", "Minh Ph­îng ®Þnh quang kh«i", "Minh Ph­îng ®Þnh quang th­îng giíi", "Minh Ph­îng ®Þnh quang thóc o¶n", "Minh Ph­îng ®Þnh quang yªu ®¸i",
"Minh Ph­îng ®Þnh quang kh¶i", "Minh Ph­îng ®Þnh quang chïy", "Minh Ph­îng ®Þnh quang ngoa", "Minh Ph­îng ®Þnh quang béi", "Minh Ph­îng ®Þnh quang h¹ giíi",
},
},
{
szFaction = "Thiªn V­¬ng Th­¬ng",
nFirstEquipId = 4903,
tbEquipName =
{
"Minh Ph­îng ngù phong liªn", "Minh Ph­îng ngù phong kh«i", "Minh Ph­îng ngù phong th­îng giíi", "Minh Ph­îng ngù phong thóc o¶n", "Minh Ph­îng ngù phong yªu ®¸i",
"Minh Ph­îng ngù phong kh¶i", "Minh Ph­îng ngù phong th­¬ng", "Minh Ph­îng ngù phong ngoa", "Minh Ph­îng ngù phong béi", "Minh Ph­îng ngù phong h¹ giíi",
},
},
{
szFaction = "Thiªn V­¬ng §ao",
nFirstEquipId = 4913,
tbEquipName =
{
"Minh Ph­îng biÓu phong liªn", "Minh Ph­îng biÓu phong kh«i", "Minh Ph­îng biÓu phong th­îng giíi", "Minh Ph­îng biÓu phong thóc o¶n", "Minh Ph­îng biÓu phong yªu ®¸i",
"Minh Ph­îng biÓu phong kh¶i", "Minh Ph­îng biÓu phong ®ao", "Minh Ph­îng biÓu phong ngoa", "Minh Ph­îng biÓu phong béi", "Minh Ph­îng biÓu phong h¹ giíi",
},
},
},
},
[3] =
{
szShowName = "§­êng M«n",
szFaction = "tangmen",
nShortFaction = "tm",
tbSkill = {339, 302, 342, 710, 1069, 1070, 1071},
tbEquip =
{
{
szFaction = "Phi §ao §­êng M«n",
nFirstEquipId = 4983,
tbEquipName =
{
"Minh Ph­îng nÆc ¶nh h¹ng liªn", "Minh Ph­îng nÆc ¶nh qu¸n", "Minh Ph­îng nÆc ¶nh th­îng giíi", "Minh Ph­îng nÆc ¶nh hé uyÓn", "Minh Ph­îng nÆc ¶nh triÒn yªu",
"Minh Ph­îng nÆc ¶nh gi¸p", "Minh Ph­îng nÆc ¶nh phi ®ao", "Minh Ph­îng nÆc ¶nh ngoa", "Minh Ph­îng nÆc ¶nh yªu trôy", "Minh Ph­îng nÆc ¶nh h¹ giíi",
},
},
{
szFaction = "Ná §­êng M«n",
nFirstEquipId = 4993,
tbEquipName =
{
"Minh Ph­îng cùc quang h¹ng liªn", "Minh Ph­îng cùc quang qu¸n", "Minh Ph­îng cùc quang th­îng giíi", "Minh Ph­îng cùc quang hé uyÓn", "Minh Ph­îng cùc quang triÒn yªu",
"Minh Ph­îng cùc quang gi¸p", "Minh Ph­îng cùc quang ná ", "Minh Ph­îng cùc quang ngoa ", "Minh Ph­îng cùc quang yªu trôy ", "Minh Ph­îng cùc quang h¹ giíi ",
},
},
{
szFaction = "Phi Tiªu §­êng M«n",
nFirstEquipId = 5003,
tbEquipName =
{
" Minh Ph­îng th­íc kim h¹ng liªn ", " Minh Ph­îng th­íc kim qu¸n ", " Minh Ph­îng th­íc kim th­îng giíi ", " Minh Ph­îng th­íc kim hé uyÓn ", " Minh Ph­îng th­íc kim triÒn yªu ",
" Minh Ph­îng th­íc kim gi¸p ", " Minh Ph­îng th­íc kim phi tiªu ", " Minh Ph­îng th­íc kim ngoa ", " Minh Ph­îng th­íc kim yªu trôy ", " Minh Ph­îng th­íc kim h¹ giíi ",
},
},
},
},
[4] =
{
szShowName = "Ngò §éc Gi¸o",
szFaction = "wudu",
nShortFaction = "wu",
tbSkill = {353, 355, 711, 1066, 1067},
tbEquip =
{
{
szFaction = "Ngò §éc Ch­ëng",
nFirstEquipId = 4963,
tbEquipName =
{
" Minh Ph­îng ®éc sa h¹ng liªn ", " H¹ch Hæ ®éc sa ph¸t ®¸i ", " Minh Ph­îng ®éc sa th­îng giíi ", " Minh Ph­îng ®éc sa hé uyÓn ", " Minh Ph­îng ®éc sa yªu ®¸i ",
" Minh Ph­îng ®éc sa bÝ trang ", " Minh Ph­îng ®éc sa triÒn thñ ", " Minh Ph­îng ®éc sa ngoa ", " Minh Ph­îng ®éc sa yªu trôy ", " Minh Ph­îng ®éc sa h¹ giíi ",
},
},
{
szFaction = "Ngò §éc §ao",
nFirstEquipId = 4973,
tbEquipName =
{
" Minh Ph­îng u linh h¹ng liªn ", " H¹ch Hæ u linh ph¸t ®¸i ", " Minh Ph­îng u linh th­îng giíi ", " Minh Ph­îng u linh hé uyÓn ", " Minh Ph­îng u linh yªu ®¸i ",
" Minh Ph­îng u linh bÝ trang ", " Minh Ph­îng u linh ®ao ", " Minh Ph­îng u linh ngoa ", " Minh Ph­îng u linh yªu trôy ", " Minh Ph­îng u linh h¹ giíi ",
},
},
},
},
[5] =
{
szShowName = "Nga Mi",
szFaction = "emei",
nShortFaction = "em",
tbSkill = {380, 328, 712, 1061, 1062, 1114},
tbEquip =
{
{
szFaction = "Nga Mi KiÕm",
nFirstEquipId = 4923,
tbEquipName =
{
"Minh Ph­îng l­u v©n ch©u liªn", "Minh Ph­îng l­u v©n ph¸t ®¸i", "Minh Ph­îng l­u v©n th­îng giíi", "Minh Ph­îng l­u v©n hé uyÓn", "Minh Ph­îng l­u v©n yªu ®¸i ",
"Minh Ph­îng l­u v©n sam", "Minh Ph­îng l­u v©n kiÕm", "Minh Ph­îng l­u v©n ngoa", "Minh Ph­îng l­u v©n béi ", "Minh Ph­îng l­u v©n h¹ giíi ",
},
},
{
szFaction = "Nga Mi Ch­ëng",
nFirstEquipId = 4933,
tbEquipName =
{
"Minh Ph­îng hµn ngäc ch©u liªn ", "Minh Ph­îng hµn ngäc ph¸t ®¸i", "Minh Ph­îng hµn ngäc th­îng giíi", "Minh Ph­îng hµn ngäc hé uyÓn", "Minh Ph­îng hµn ngäc yªu ®¸i",
"Minh Ph­îng hµn ngäc sam", "Minh Ph­îng hµn ngäc triÒn thñ ", "Minh Ph­îng hµn ngäc ngoa ", "Minh Ph­îng hµn ngäc béi ", "Minh Ph­îng hµn ngäc h¹ giíi ",
},
},
},
},
[6] =
{
szShowName = "Thóy Yªn",
szFaction = "cuiyan",
nShortFaction = "cy",
tbSkill = {336, 337, 713, 1063, 1065},
tbEquip =
{
{
szFaction = "Thóy Yªn §ao (Ngo¹i)",
nFirstEquipId = 4943,
tbEquipName =
{
"Minh Ph­îng hång nhan ch©u liªn ", "Minh Ph­îng hång nhan ph¸t ®¸i", "Minh Ph­îng hång nhan th­îng giíi", "Minh Ph­îng hång nhan hé uyÓn", "Minh Ph­îng hång nhan yªu ®¸i",
"Minh Ph­îng hång nhan sam", "Minh Ph­îng hång nhan ®ao ", "Minh Ph­îng hång nhan ngoa ", "Minh Ph­îng hång nhan béi ", "Minh Ph­îng hång nhan h¹ giíi ",
},
},
{
szFaction = "Thóy Yªn Song §ao (Néi)",
nFirstEquipId = 4953,
tbEquipName =
{
"Minh Ph­îng ¶o th¸i ch©u liªn ", "Minh Ph­îng ¶o th¸i ph¸t ®¸i", "Minh Ph­îng ¶o th¸i th­îng giíi", "Minh Ph­îng ¶o th¸i hé uyÓn", "Minh Ph­îng ¶o th¸i yªu ®¸i",
"Minh Ph­îng ¶o th¸i sam", "Minh Ph­îng ¶o th¸i ®ao ", "Minh Ph­îng ¶o th¸i ngoa ", "Minh Ph­îng ¶o th¸i béi ", "Minh Ph­îng ¶o th¸i h¹ giíi ",
},
},
},
},
[7] =
{
szShowName = "C¸i Bang",
szFaction = "gaibang",
nShortFaction = "gb",
tbSkill = {357, 359, 714, 1073, 1074},
tbEquip =
{
{
szFaction = "C¸i Bang Ch­ëng",
nFirstEquipId = 5013,
tbEquipName =
{
" Minh Ph­îng hé ph¸p h¹ng liªn", " Minh Ph­îng hé ph¸p ®Çu hoµn", " Minh Ph­îng hé ph¸p th­îng giíi ", " Minh Ph­îng hé ph¸p hé uyÓn ", " Minh Ph­îng hé ph¸p thóc yªu",
" Minh Ph­îng hé ph¸p c¸i y", " Minh Ph­îng hé ph¸p triÒn thñ ", " Minh Ph­îng hé ph¸p ngoa ", "Minh Ph­îng hé ph¸p béi ", " Minh Ph­îng hé ph¸p h¹ giíi ",
},
},
{
szFaction = "C¸i Bang Bæng",
nFirstEquipId = 5023,
tbEquipName =
{
"Minh Ph­îng trõng giíi h¹ng liªn", "Minh Ph­îng trõng giíi ®Çu hoµn", "Minh Ph­îng trõng giíi th­îng giíi ", "Minh Ph­îng trõng giíi hé uyÓn", "Minh Ph­îng trõng giíi thóc yªu",
"Minh Ph­îng trõng giíi c¸i y", "Minh Ph­îng trõng giíi tr­îng", "Minh Ph­îng trõng giíi ngoa", "Minh Ph­îng trõng giíi béi", "Minh Ph­îng trõng giíi h¹ giíi ",
},
},
},
},
[8] =
{
szShowName = "Thiªn NhÉn Gi¸o",
szFaction = "tianren",
nShortFaction = "tr",
tbSkill = {361, 362, 715, 1075, 1076},
tbEquip =
{
{
szFaction = "ChiÕn NhÉn",
nFirstEquipId = 5033,
tbEquipName =
{
"Minh Ph­îng xÝch minh h¹ng liªn", "H¹ch Hæ xÝch minh kh«i", "Minh Ph­îng xÝch minh th­îng giíi", "Minh Ph­îng xÝch minh hé o¶n", "Minh Ph­îng xÝch minh yªu ®¸i",
"Minh Ph­îng xÝch minh gi¸p", "Minh Ph­îng xÝch minh th­¬ng", "Minh Ph­îng xÝch minh ngoa", "Minh Ph­îng xÝch minh béi", "Minh Ph­îng xÝch minh h¹ giíi",
},
},
{
szFaction = "Ma NhÉn",
nFirstEquipId = 5043,
tbEquipName =
{
"Minh Ph­îng s¸t viªm h¹ng liªn", "H¹ch Hæ s¸t viªm kh«i", "Minh Ph­îng s¸t viªm th­îng giíi", "Minh Ph­îng s¸t viªm hé o¶n", "Minh Ph­îng s¸t viªm yªu ®¸i",
"Minh Ph­îng s¸t viªm gi¸p", "Minh Ph­îng s¸t viªm ®ao", "Minh Ph­îng s¸t viªm ngoa", "Minh Ph­îng s¸t viªm béi", "Minh Ph­îng s¸t viªm h¹ giíi",
},
},
},
},
[9] =
{
szShowName = "Vâ §ang",
szFaction = "wudang",
nShortFaction = "wd",
tbSkill = {365, 368, 716, 1078, 1079},
tbEquip =
{
{
szFaction = "Vâ §ang KhÝ",
nFirstEquipId = 5053,
tbEquipName =
{
" Minh Ph­îng tiªn ©m phï ", " Minh Ph­îng tiªn ©m qu¸n", " Minh Ph­îng tiªn ©m th­îng giíi ", " Minh Ph­îng tiªn ©m tô ", " Minh Ph­îng tiªn ©m ph¸p ®¸i ",
" Minh Ph­îng tiªn ©m ®¹o bµo ", " Minh Ph­îng tiªn ©m kiÕm ", " Minh Ph­îng tiªn ©m ngoa ", " Minh Ph­îng tiªn ©m béi ", " Minh Ph­îng tiªn ©m h¹ giíi ",
},
},
{
szFaction = "Vâ §ang KiÕm",
nFirstEquipId = 5063,
tbEquipName =
{
" Minh Ph­îng ®¹o minh phï ", " Minh Ph­îng ®¹o minh qu¸n ", " Minh Ph­îng ®¹o minh th­îng giíi ", " Minh Ph­îng ®¹o minh tô ", " Minh Ph­îng ®¹o minh ph¸p ®¸i ",
" Minh Ph­îng ®¹o minh ®¹o bµo ", " Minh Ph­îng ®¹o minh kiÕm ", " Minh Ph­îng ®¹o minh ngoa ", " Minh Ph­îng ®¹o minh béi ", " Minh Ph­îng ®¹o minh h¹ giíi ",
},
},
},
},
[10] =
{
szShowName = "C«n L«n",
szFaction = "kunlun",
nShortFaction = "kl",
tbSkill = {372, 375, 717, 1080, 1081},
tbEquip =
{
{
szFaction = "C«n L«n §ao",
nFirstEquipId = 5073,
tbEquipName =
{
"Minh Ph­îng thiªn canh h¹ng liªn ", "Minh Ph­îng thiªn canh ®¹o qu¸n", "Minh Ph­îng thiªn canh th­îng giíi", "Minh Ph­îng thiªn canh hé uyÓn", "Minh Ph­îng thiªn canh ph¸p ®¸i",
"Minh Ph­îng thiªn canh ®¹o bµo", "Minh Ph­îng thiªn canh ®ao", "Minh Ph­îng thiªn canh ngoa", "Minh Ph­îng thiªn canh béi", "Minh Ph­îng thiªn canh h¹ giíi",
},
},
{
szFaction = "C«n L«n KiÕm",
nFirstEquipId = 5083,
tbEquipName =
{
"Minh Ph­îng ng¹o s­¬ng h¹ng liªn ", "Minh Ph­îng ng¹o s­¬ng ®¹o qu¸n", "Minh Ph­îng ng¹o s­¬ng th­îng giíi", "Minh Ph­îng ng¹o s­¬ng hé uyÓn", "Minh Ph­îng ng¹o s­¬ng ph¸p ®¸i",
"Minh Ph­îng ng¹o s­¬ng ®¹o bµo", "Minh Ph­îng ng¹o s­¬ng kiÕm ", "Minh Ph­îng ng¹o s­¬ng ngoa ", "Minh Ph­îng ng¹o s­¬ng béi", "Minh Ph­îng ng¹o s­¬ng h¹ giíi",
},
},
},
},
}
local tbEquipFreeCell =
{
{2, 1}, {2, 2}, {1, 1}, {1, 2}, {2, 1}, --¾±´ø£¬¶¥´÷£¬ÉϽ䣬»¤Ýó£¬Ñ ü´ø
{2, 3}, {2, 4}, {2, 2}, {1, 2}, {1, 1}, --?¢ÎÎäÆ÷£¬Ñ¥×Ó£¬Ñü×¹£¬Ï� �½ä
}


local tbFactionSeries =
{
[1] = {1, 2},
[2] = {3, 4},
[3] = {5, 6},
[4] = {7, 8},
[5] = {9, 10},
}


local tbFreeItem =
{
{szName="Håi Thiªn T¸i T¹o CÈm Nang", tbProp={6,1,1781,1,0,0}, tbParam={60}},
{szName="VËt phÈm kh¸c", tbProp={6,1,298,1,0,0}},
{szName="Qu¶ huy hoµng cao cÊp.", tbProp={6,1,1075,1,0,0}},
{szName="Khiªu chiªn lÔ bao", tbProp={6,1,2006,1,0,0}},
{szName="-ThËp Toµn §¹i Bæ-", tbProp={6,1,1399,1,0,0}},
{szName="Viªm §ª ®å b¶o", tbProp={6,1,2805,1,0,0}},
{szName="Tèng kim qu©n c«ng", tbProp={6,1,1477,1,0,0}},
{szName="§¹i lùc", tbProp={6,1,2517,1,0,0}},
{szName="-H·n HuyÕt Long C©u-", tbProp={0,10,18,1,0,0}, nWidth=2, nHeigth=3},
}


local tbGMAccount = {"Manhga1", "Manhga2", "Manhga3", "Manhga4", "Manhga5"}


function main()
dofile("script/global/·ÈË_Àñ¹Ù.lua");
dialog_main()
end






--================================================== ========================================


Include("\\script\\global\\repute_head.lua")
Include("\\script\\misc\\league_cityinfo.lua")


function dmcreattongtest()
local strTongName = GetTongName()
local tszTitle = "Chµo mong b¹n ®· tham gia hÖ thèng <color=yellow>Bang Héi<color>"
if (strTongName == nil or strTongName == "") then
Say(tszTitle,4," NhËn ®i?u kiÖn t¹o bang héi/dmcreatetong","Gia nhËp bang héi/dmjointong","T¹o bang héi/dmcreateit","KOt thóc ®èi tho¹i")
else
Say(tszTitle,0)
end
end


function dmcreatetong()
if GetCamp() ~= 4 then
SetCamp(4)
SetCurCamp(4)
AddRepute(100000)
AddLeadExp(1000000)
AddLeadExp(1000000)


AddLeadExp(1000000)


AddEventItem(195)
Earn(1000000)
if GetLevel() <= 100 then
for i=1,100 do
AddOwnExp(100000000)
end
end
Msg2Player("<color=yellow>Ng­êi ®· héi ®ñ tÊt c¶ ®iªu kiÖn ®Ó t¹o Bang Héi!<color>")
else
end
end


function dmjointong()
if GetCamp() ~= 4 then


if GetLevel() <= 100 then
for i=1,100 do
AddOwnExp(100000000)
end
end


SetCamp(4)
SetCurCamp(4)
Msg2Player("<color=yellow>Gia nhËp Bang héi thµnh c«ng!<color>")
else
end
end


function dmcreateit()
Tong_name,oper = GetTong()
if (oper == 0) and (GetTask(99) == 1) then
Say("KiOm hiÖp ch­ëng m«n nh©n:Khai s¸ng bang héi, më réng b¸ nghiÖp." ,2,"B¾t ®Çu dùng bang/Direct_CreateTong","§îi ta mét chót/wait_a_moment")
elseif (oper == 0) and (GetCamp() == 4) and (GetLevel() >= 50) and (GetReputeLevel(GetRepute()) >= 6) and (GetLeadLevel() >= 30) and (HaveItem(195) == 1) then
Talk(6,"create_pay", "Ng­êi ch¬i: KiOm hiÖp ch­ëng m«n nh©n, xin hái ta ph¶i lµm nh­ thO nµo míi ca thÓ khai t«ng lËp ph¸i trë thµnh Bang chñ ®©y?", "KiOm hiÖp ch­ëng m«n nh©n: §Çu tiªn ng­¬i ph¶i ca ®ñ n¨ng lùc l·nh ®¹o, ca 16 ng­êi cïng chU h­íng cïng ng­¬i lËp bang, tr¶i qua 3 ngµy Kh¶o NghiÖm Kú ", "Ch­ëng m«n nh©n: NOu trong 3 ngµy ca ng­êi rêi bang th× néi trong 3 ngµy ®a ng­êi ph¶i t×m ng­êi kh¸c thay thO.", "Ch­ëng m«n nh©n: Ng­¬i ph¶i ca ®ñ tµi l·nh ®¹o vµ tin vËt ®a lµ Nh¹c V­¬ng KiOm", "Ng­êi ch¬i: Nh¹c V­¬ng Kiªm ? Ng­êi nai lµ thanh kiªm nµy µ ? ", "Kiªm hiÖp ch­ëng m«n nh©n : Th× ra lµ ng­¬i ®· ca na... Kh«ng tÖ, qu¶ nhiªn tuæi trÎ tµi cao!!! ")
else
i = random(0,1)
if (i == 0) then
Talk(1,"", "Kiªm hiÖp ch­ëng m«n nh©n: Nªu nh­ muèn thµnh lËp bang héi, ng­¬i v× na bá ra 1 l­îng lín thêi gian, søc lùc cïng t©m huyOt, kh«ng thÓ nöa ®­êng hñy bá." )
else
Talk(6,"", "Kiªm hiÖp ch­ëng m«n nh©n: Ng­¬i muèn hái ®iªu kiÖn lËp bang µ? §Ó ta nai cho ng­¬i râ.", "Kiªm hiÖp ch­ëng m«n nh©n: ®Çu tiªn ph¶i xuÊt ; tiªp theo ng­¬i kh«ng thÓ ë bÊt kú bang héi nµo kh¸c ; ng­¬i nhÊt ®inh ph¶i danh väng giang hå ; cuèi cïng lµ tµi l·nh ®¹o ph¶i h¬n 30 cÊp.", "Kiªm hiÖp ch­ëng m«n nh©n: Sau ®a ®i chiªn tr­êng t×m mét thanh Nh¹c V­¬ng Kiªm lµm bang chñ tin vËt lµ ®­îc råi.")
end
end
end


function create_pay()
Say("Kiªm hiÖp ch­ëng m«n nh©n: Ng­¬i cÇn lÖ phi lµ 100 v¹n l­îng b¹c." ,2,"Kh«ng thµnh vÊn ®ª, ta ca ®em 100v l­îng ®©y! /create_pay_yes","H©y dµ, ta kh«ng ®em ®ñ tiªn råi. /create_pay_no")


-- Say("½£ÏµÕÆ·ÅÈË£ºÄÇ·´£¬ÄãÖ»� �ªÓÐ×ã¹»µÄ×ʽðÈ·°ïÅÉÄܹ»Ô� �תÆ𵴾ݿÉÒԸˣ¬±ÈÈç˵ÓÐ� �ö100Ýò¸½¸½×Ó°É¡£" ,2,"·»ÎÊî}£¬?ÒÒѾ­Ó?00Ýò¸½¸½×� �¸Ë/create_pay_yes","Ì«·ÑÇ®?Ë£¬ÉïÒ»µãРв»Ð?create_pay_no")
end
function create_pay_yes()


if (GetCash() >= 1000000) then
Pay(1000000) -- ÊÕ·Ñ
DelItem(195) -- ɾ³ýϵ¹Øµµ¾ß
SetTask(99,1) -- ²¢´òÉϱê¼Ç£¨Ý¬Ê±¶¨ÒåΪ°ïÅ ÉÖеĵóÒ»¸öÈË£¨¼´°ïÖ÷±¾ÈË £©£©
Direct_CreateTong() -- ¿ªÊ¼½¨°ï

else
Talk(1,"", "Kiªm hiÖp ch­ëng m«n nh©n: ViÖc duy tr× bang héi rÊt tèn ti?n, ng­êi ph¶i cè g¾ng cïng mäi ng­êi tUch gap ®Ó bang ®­îc giµu m¹nh. ") end
end




function Direct_CreateTong()
CreateTong(1) -- µ¯³ö½¨°ï¶Ô»°¿ò£¬½áÊø½Å±¾¿ ØÖÆ
end


--================================================== ========================================


function dialog_main()
local szTitle = "<npc>Kiªm hiªp quÇn hïng chiªn nam h¶i, long tranh hæ ®Êu diÖu Cöu ch©u. Ta vèn sø gi¶ ®¹i biÓu t©y s¬n c­ ë chç nµy hoan nghªnh c¸c anh hïng hµo kiÖt... Script LÔ Quan ®­îc ViÖt Haa bëi _khunglongcon_ clbgamesvn.com"
local tbOpt =
{
{"Kh¶o nghiÖm hÖ thèng bang héi.", dmcreattongtest},
{"N©ng ®ªn 190 cÊp", level_up_to190},
{"Ta muèn chuyÓn sinh.", transfer},
{"Vµo ph¸i vµ häc skill 150", choose_faction},
{"LÊy trang bÞ m«n ph¸i", show_faction},
{"Ta muèn lÊy vËt phÈm.", show_item},
{"Ta muèn lÊy mét sè vËt phÈm kh¸c...", moreitem},
{"NhËn ®iÓm", hotro},
{"Trang bÞ hiÕm", fifong},
{"LÊy ngùa", layngua},
{"N÷ TVB", nukim},
{"NhËn Skill 180", nhanskill180},
{"Trang bÞ Cùc PhÈm", cucphkhac},
{"N©ng §ªn 10 cÊp", level1},
{"LÖnh Bµi ADmin", lbadmin},
{"Tho¸t"},
}
local szAccount = GetAccount()
for i=1, getn(%tbGMAccount) do
if szAccount == %tbGMAccount[i] then
tinsert(tbOpt, 1, {"תGMÕ˺Å", gm_function})
tinsert(tbOpt, 1, {"¸ìÈ¡BOSS¸îÅÆ", gm_functionboss})
tinsert(tbOpt, 1, {"ÎÒÒªÉý¼¶µ½190¼¶", level_up_to190})
tinsert(tbOpt, 1, {"ÎÒÒª¸ìÈ¡ÎïÆ·", show_item})
tinsert(tbOpt, 1, {"ÎÒÒª¸ìÈ¡°×»¢Ì××°", show_faction})
tinsert(tbOpt, 1, {"ÎÒҪϴËè", clear_attibute_point})
break
end
end
CreateNewSayEx(szTitle, tbOpt)
end


function lbadmin()
AddItem(6,1,4369,1,0,0,0,0)--lenh bai adm
end


function nhanskill180()
local nFaction = GetLastFactionNumber() + 1
if nFaction==0 then
Say("Kh«ng cã m«n ph¸i mµ ®åi nhËn skill thÊt truyÒn, ta kh«ng cã thêi gian ®ïa víi ng­¬i", 0)
return
else
for i=1,10 do
if (nFaction==i) then
if (HaveMagic(SKILL_180[i]) == -1) then
AddMagic(SKILL_180[i],20)
Say("B¹n häc ®­îc kü n¨ng cÊp 180 <color=yellow>"..GetSkillName(SKILL_180[i]), 0)
else
Say("Ng­¬i ®· cã kü n¨ng thÊt truyÒn råi, ®õng tham lam", 0)
return
end
end
end
end
end
function cucphkhac()
dohoangkim()
end


function level1()
--AddItem(6,1,4366,0,0,0)---lanh bai adim
--AddItem(6,1,4367,0,0,0,100)---ban long thach
--AddItem(6,1,4368,0,0,0)---cong ky nang
AddItem(6,1,4369,0,0,0)---cong tiem nang
--AddItem(6,1,4370,0,0,0)---phi thien phu
--AddItem(6,1,4371,0,0,0,100)--thien tinh thach
--AddItem(6,1,4372,0,0,0)---tui tien
--AddItem(6,1,4373,0,0,0)---dich diem boss71
--AddItem(0,1,1,10,2,200,10) ----do xanh
--AddItem(0,1,1,10,2,200,10) ----do xanh
--AddItem(0,1,1,10,2,200,10) ----do xanh
--AddItem(0,1,1,10,2,200,10) ----do xanh
end




function bachkim()
local tbOpt =
{
{"ThiÕu l©m", bktl},
{"Thiªn v­¬ng", bktv},
{"®­êng m«n", bkdm},
{"Ngò ®éc", bk5d},
{"Nga mi", bknm},
{"Thuý yªn", bkty},
{"C¸i bang", bkcb},
{"Thiªn nhÉn", bktn},
{"Vâ ®ang", bkvd},
{"C«n l«n", bkcl},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän m«n ph¸i?", tbOpt)
end
function bktl()
AddGoldItem(0, 11)
AddGoldItem(0, 6)
end
function bktv()
AddGoldItem(0, 16)
AddGoldItem(0, 21)
AddGoldItem(0, 26)
end
function bknm()
AddGoldItem(0, 31)
end
function bkty()
AddGoldItem(0, 46)
end
function bk5d()
AddGoldItem(0, 61)
end
function bkdm()
AddGoldItem(0, 71)
AddGoldItem(0, 76)
AddGoldItem(0, 81)
end
function bkcb()
AddGoldItem(0, 96)
end
function bktn()
AddGoldItem(0, 101)
end
function bkvd()
for i=4346,4355 do
AddPlatinaItem(3, i)
end
end
function bkcl()
AddGoldItem(0, 126)
end
function hacthan()
for i=3890,3894 do
AddGoldItem(0, i)
end
end
function matna1()
for i=4493,4523 do
AddGoldItem(0, i)
end
end
function matna2()
for i=4524,4554 do
AddGoldItem(0, i)
end
end
function matna3()
for i=4555,4585 do
AddGoldItem(0, i)
end
end
function matna4()
for i=4586,4616 do
AddGoldItem(0, i)
end
end
function matna5()
for i=4617,4630 do
AddGoldItem(0, i)
end
end
function nukim()
if GetSex() == 1 then
SetSeries(0)
KickOutSelf()
else
Talk(1,"","Ng­¬i lµ Pª §ª µ ?")
end
end
function hotro()
local tbOpt =
{
{"T¨ng kinh nghiÖm", kn},
{"TiÒn", tien},
{"TÈy ®iÓm", clear_attibute_point},
{"Danh väng,Phóc duyªn", danhvongphucduyen},
{"Tµi l·nh ®¹o", lanhdao},
{"§iÓm Kü N¨ng", pointkynang},
{"§iÓm TiÒm N¨ng", pointtiemnang},
{"1 trµn bi moi", dialog},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Anh cÇn g×?", tbOpt)
end
function pointkynang()
AddMagicPoint(100)
CreateNewSayEx("<npc>B¹n nhËn ®­îc 100 ®iÓm kü n¨ng", tbOpt)
KickOutSelf()
end;


function pointtiemnang()
AddProp(1000)
CreateNewSayEx("<npc>B¹n nhËn ®­îc 10000 ®iÓm tiÒm n¨ng", tbOpt)
end;



function lanhdao()
for i=1,20 do
AddLeadExp(10000000)
end
end


function kn()
for i=1,80 do
AddOwnExp(1000000000)
end
end


function tien1()
Earn(1000000)
end




function tien()
Earn(100000000)
end


function danhvongphucduyen()
AddRepute(100000);
FuYuan_Start();
FuYuan_Add(100000);
CreateNewSayEx("<npc>B¹n nhËn ®­îc 10000 ®iÓm", tbOpt)
end
function conghien()
AddContribution(100000)
end


function trungsinh()
AddReBorn(10)
end
function gm_functionboss()
for i =1,10 do
AddItem(6,1,1022,0,0,0)
end
end
function moreitem()
local tab_Content = {
" LÊy 100 tiÒn ®ång /tiendong",
" NhËn trang bÞ Hoa S¬n/itemhs",
" LÊy VK HKMP /bachkim",
" LÊy 1000v l­îng /tienvan",
" LÊy Cùc PhÈm /tbcucph",
" Th«i kh«ng lÊy g× n÷a hOt."
}
Say(" Muèn lÊy thªm c¸i g× nµo ? ", getn(tab_Content), tab_Content);
end;


function tienvan()
Earn(10000000)
end;


function itemhs()
for i=5290,5299 do
AddGoldItem (0,i)
end
end;






function trangbimoi()
for i=4714,4732 do
AddGoldItem (0,i)
end
end;


function nhanskill()
AddMagic(1349,20)
AddMagic(1350,20)
AddMagic(1374,20)
AddMagic(1350,20)
AddMagic(1375,20)
AddMagic(1351,20)
AddMagic(1376,20)
AddMagic(1354,20)
AddMagic(1378,20)
AddMagic(1355,20)
AddMagic(1379,20)
AddMagic(1358,30)
AddMagic(1360,20)
AddMagic(1380,20)
AddMagic(1364,20)
AddMagic(1382,20)
AddMagic(1365,20)
AddMagic(1370,20)
AddMagic(1369,20)
AddMagic(1384,20)
AddMagic(1363,20)-- Thai Nhac Tam Thanh Phong
AddMagic(1366,20) --Lac Nhan Kinh hong
AddMagic(1368,20) --Doc Co Cuu Kiem
AddMagic(1370,20) --Hao nhien chi khi
AddMagic(1381,20) --Kiem khi vo cap
end


function dialog()
Say("Ng¬¬i ph¶i hiÓu r© c¸ch t¨ng ®iÓm", 8,
"céng tiÒm n¨ng/congtn",
"1 söa trang bÞ/congkn",
" 2 toa do/findgoldboss",
"NÐi c«ng/add_prop_eng")
end


-------------------test---------------
-------------------cong ky nang-------------------------------
MapNameTab = "MapNameTabFile"
TabFile_Load("\\settings\\item\\004\\mapname.txt", MapNameTab)
function congkn()
--IdxItem = nItemIdx
dofile("script/item/ib/phithienphu.lua")
local nW, nX, nY = GetWorldPos()
local nRow = nW + 1
local NAMEMAP = TabFile_GetCell(MapNameTab,nRow,"Name")
local IdMapSave,ToaDoXSave,ToaDoYSave = GetItemParam(IdxItem, 1),GetItemParam(IdxItem, 2),GetItemParam(IdxItem, 3)
local NAMEMAP_Save = TabFile_GetCell(MapNameTab,(IdMapSave+1),"Name")
local FightState = GetFightState()
if IdMapSave == 0 or IdMapSave == nil then
ContentDialog = "vÞ trÝ hiÖn t¹i<enter><color=red>B¶n ®å<color>:<color=green>M¸p: <color> "..nW.." <color=red>Täa ®é<color>: "..nX.." - "..nY.."<enter><color=red>HiÖn ch­a cã täa ®é nµo ®­îc l­u.<color>"
local Content = {
"L­u täa ®é hiÖn t¹i/#SaveLoca("..nW..","..nX..","..nY..","..FightState ..")",
"tho¸t/Quit",
}
Say(ContentDialog,getn(Content),Content)
else
ContentDialog = "<enter>vÒ ®iÓm hiÖn t¹i<enter><color=red>B¶n ®å<color>: "..nW..". <color=red>Täa ®é<color>: "..nX.." - "..nY..".<enter>vÒ chç ®· l­u<enter><color=green>B¶n ®å<color>: "..NAMEMAP_Save..". <color=green>Täa ®é<color>: "..ToaDoXSave.." - "..ToaDoYSave.."."
local Content = {
"L­­u täa ®iÓm hiÖn t¹i/#SaveLoca("..nW..","..nX..","..nY..","..FightState ..")",
"DÞch chuyÓn ®Õn ["..NAMEMAP_Save.."-"..ToaDoXSave.."-"..ToaDoYSave.."]/MoveSaveLoca",
"tho¸t/Quit",
}
Say(ContentDialog,getn(Content),Content)
end
return 1
end
function SaveLoca(nW,nX,nY,nFightState)
SetSpecItemParam(IdxItem, 1, nW)
SetSpecItemParam(IdxItem, 2, nX)
SetSpecItemParam(IdxItem, 3, nY)
SetSpecItemParam(IdxItem, 4, nFightState)
SyncItem(IdxItem)
local MapName = TabFile_GetCell(MapNameTab,(nW+1),"Name")
Msg2Player("L­­u vÞ trÝ:<color=green>M¸p: <color><color=yellow>"..nW.."<color> - Täa ®é: <color=pink>"..nX.."<color> / <color=pink>"..nY.."<color> thµnh c«ng.")
end




function MoveSaveLoca()
if GetItemParam(IdxItem, 1) == 0 or GetItemParam(IdxItem, 1) == nil then
Msg2Player("HiÖn ch­a cã täa ®é nµo ®­îc l­u.")
return
end
local MapName = TabFile_GetCell(MapNameTab,(GetItemParam(IdxItem, 1)+1),"Name")
NewWorld(GetItemParam(IdxItem, 1),GetItemParam(IdxItem, 2),GetItemParam(IdxItem, 3))
SetFightState(GetItemParam(IdxItem, 4))
Msg2Player("<enter>DÞch chuyÓn ®Õn vÞ trÝ ®· l­u<enter>: <color=yellow>"..MapName.."<color> - Täa ®é: <color=pink>"..GetItemParam(IdxItem, 2).."<color> / <color=pink>"..GetItemParam(IdxItem, 3).."<color> thµnh c«ng.")
end
function GetDesc(nItemIndex)
local IdMapSave,ToaDoXSave,ToaDoYSave,nFightState = GetItemParam(nItemIndex, 1),GetItemParam(nItemIndex, 2),GetItemParam(nItemIndex, 3),GetItemParam(nItemIndex, 4)
if IdMapSave == 0 then
nTenMap = "Kh«ng cã"
else
nTenMap = TabFile_GetCell(MapNameTab,(IdMapSave+1),"Name")
end
if nFightState == 0 then
nStatus = "<color=green>Phi ChiÕn ®Êu<color>"
else
nStatus = "<color=red>ChiÕn ®Êu<color>"
end
return "VÞ trÝ ®· l­u<enter><color=green>B¶n ®å<color>: "..nTenMap..". <color=green>Täa ®é<color>: "..ToaDoXSave.." - "..ToaDoYSave..".<enter>Tr¢¹ng th¢¸i: "..nStatus
end




------------------cong tiem nang------------------


function congtn()
Say("Ng¬¬i ph¶i hiÓu r© c¸ch t¨ng ®iÓm", 4,
"Søc m¹nh/add_prop_str",
"Th©n ph¸p/add_prop_dex",
"Sinh khÝ/add_prop_vit",
"NÐi c«ng/add_prop_eng")
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 tbcucph()
cucpham()
end;


function tiendong()

AddStackItem(100,4,417,1,1,0,0,0) -- nhan 100 tien dong






end;
function layngua()
local tbOpt =
{
{"Ngùa nhãm 1", vip1},
{"Ngùa nhãm 2", vip2},
{"Ngùa nhãm 3", vip3},
{"Ngùa nhãm 4", vip4},
{"Ngùa b¸ ®¹o", nguabadao},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Anh cÇn g×?", tbOpt)
end
function nguabadao()
AddGoldItem(0, 4480)
AddGoldItem(0, 4366)
for i=5093,5097 do
AddGoldItem(0, i)
end
CreateNewSayEx("<npc>NhËn ®­îc Ngùa b¸ ®¹o", tbOpt)
end
function vip1()
AddItem(0,10,6,10,0,0,0)
AddItem(0,10,7,10,0,0,0)
AddItem(0,10,8,10,0,0,0)
AddItem(0,10,9,10,0,0,0)
AddItem(0,10,10,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end
function vip2()
AddItem(0,10,11,10,0,0,0)
AddItem(0,10,12,10,0,0,0)
AddItem(0,10,13,10,0,0,0)
AddItem(0,10,14,10,0,0,0)
AddItem(0,10,15,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end
function vip3()
AddItem(0,10,16,10,0,0,0)
AddItem(0,10,17,10,0,0,0)
AddItem(0,10,18,10,0,0,0)
AddItem(0,10,19,10,0,0,0)
AddItem(0,10,20,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end
function vip4()
AddItem(0,10,21,10,0,0,0)
AddItem(0,10,22,10,0,0,0)
AddItem(0,10,23,10,0,0,0)
AddItem(0,10,24,10,0,0,0)
AddItem(0,10,25,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end
function gm_function()
local nCurLevel = GetLevel()
if nCurLevel < 150 then
ST_LevelUp(150 - nCurLevel)
end
SetFightState(0)
SetCamp(6)
SetCurCamp(6)
AddMagic(732, 1)--˲ÒÆ
AddMagic(733, 1)--ÒþÉí
if CalcFreeItemCellCount() >= 1 then
local tbItem = {szName="´«ËÝȨÕÈ", tbProp={6,1,2766,1,0,0}, nBindState=-2}
tbAwardTemplet:GiveAwardByList(tbItem, "gmÕ˺ŸìÈ¡µµ¾ß", 1)
end
end
function level_up_to150()
local nCurLevel = GetLevel()
if nCurLevel >= 150 then
if ST_IsTransLife() == 1 then
Talk(1, "", "Ng­¬i ®· ®¹t cÊp 150 råi.")
else
Talk(1, "", "§i chuyÓn sinh tr­íc ®i råi trë l¹i th¨ng cÊp.")
end
return
end
local nAddLevel = 150 - nCurLevel
ST_LevelUp(nAddLevel)
end
function level_up_to190()
local nCurLevel = GetLevel()
if nCurLevel >= 190 then
if ST_IsTransLife() == 1 then
Talk(1, "", "Ng­¬i ®· ®¹t cÊp 190 råi.")
else
Talk(1, "", "§i chuyÓn sinh tr­íc ®i råi trë l¹i th¨ng cÊp.")
end
return
end
local nAddLevel = 190 - nCurLevel
ST_LevelUp(nAddLevel)
end


function transfer()
if GetLevel() < 190 then
Talk(1, "", "CÊp 190 trë lªn míi ca thÓ chuyÓn sinh.")
return
end
if (GetCash() <= 100000000) then
Talk(1, "", "Ph¶i ca ®ñ 10k v¹n míi ca thÓ chuyÓn sinh.")
return
end
Pay(100000000)
ST_DoTransLife()
end


function check_faction()
local szCurFaction = GetFaction()
if szCurFaction ~= nil and szCurFaction ~= "" then
return
end
return 1
end


function choose_faction()
if check_faction() ~= 1 then
Talk(1, "", "Ng­¬i ®· gia nhËp m«n ph¸i.")
return
end
local nSeries = GetSeries() + 1
local tbOpt = {}
for i=1, getn(%tbFactionSeries[nSeries]) do
local nIndex = %tbFactionSeries[nSeries][i]
tinsert(tbOpt, {%tbFaction[nIndex].szShowName, set_faction, {nIndex}})
end
tinsert(tbOpt, {"Trë vª", dialog_main})
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
CreateNewSayEx("<npc>Mét khi gia nhËp m«n ph¸i kh«ng thÓ thay ®æi, h·y suy nghÜ kü.", tbOpt)
end


function set_faction(nIndex)
local szTitle = format("<npc>X¸c nhËn muèn gia nhËp m«n ph¸i ?<color=yellow>%s<color> m«n ph¸i?", %tbFaction[nIndex].szShowName)
local tbOpt =
{
{"X¸c nhËn!", do_set_faction, {nIndex}},
{"Trë vª.", choose_faction},
{"Kªt thóc ®èi tho¹i."},
}
CreateNewSayEx(szTitle, tbOpt)
end


function do_set_faction(nIndex)
if check_faction() ~= 1 then
Talk(1, "", "Ng­¬i ®· gia nhËp m«n ph¸i.")
return
end
local nResult = SetFaction(%tbFaction[nIndex].szFaction)
if nResult == 0 then
return
end
DynamicExecuteByPlayer(PlayerIndex, "\\script\\gmscript.lua", "AddSkills", %tbFaction[nIndex].nShortFaction, 0)
for i=1, getn(%tbFaction[nIndex].tbSkill) do--90£¬120£¬150¼¶¼¼ÄÜ
AddMagic(%tbFaction[nIndex].tbSkill[i], 20)
end
AddMagic(210, 1)--?»¼¶ÇṦ
Talk(1, "KickOutSelf", format("Ng­¬i ®· gia nhËp thµnh c«ng ph¸i %s", %tbFaction[nIndex].szShowName))
end


function show_faction()
if check_faction() == 1 then
Talk(1, "", "Gia nhËp m«n ph¸i míi ca thÓ nhËn trang bÞ")
return
end
local nFactionId = GetLastFactionNumber() + 1
local tbOpt = {}
local tbSubFaction = %tbFaction[nFactionId].tbEquip
for i=1, getn(tbSubFaction) do
tinsert(tbOpt, {tbSubFaction[i].szFaction, show_equip, {nFactionId, i}})
end
tinsert(tbOpt, {"Trë vª.", dialog_main})
-- tinsert(tbOpt, {"
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
CreateNewSayEx("<npc>Xin mêi lùa chän ph¸i.", tbOpt)
end


function show_equip(nFactionId, nSubFactionId)
local tbEquip = %tbFaction[nFactionId]["tbEquip"][nSubFactionId]
local tbEquipName = tbEquip["tbEquipName"]
local nFirstEquipId = tbEquip["nFirstEquipId"]
local tbOpt = {}
for i=1, getn(tbEquipName) do
tinsert(tbOpt, {tbEquipName[i], get_equip, {i, nFirstEquipId + i - 1}})
end
tinsert(tbOpt, {"Trë vª", show_faction})
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
local szTitle = format("<npc>LÊy ®å %s Kim ¤", tbEquip.szFaction)
CreateNewSayEx(szTitle, tbOpt)
end


function get_equip(nIndex, nEquipId)
local nWidth = %tbEquipFreeCell[nIndex][1]
local nHeigth = %tbEquipFreeCell[nIndex][2]
if CountFreeRoomByWH(nWidth, nHeigth) < 1 then
Talk(1, "", format("CÇn Ut nhÊt 1 c¸i %dx%d tói ®eo l­ng", nWidth, nHeigth))
return
end
AddGoldItem(0, nEquipId)
end


function show_item()
local tbOpt = {}
local nCount = getn(%tbFreeItem)
local szOption = ""
for i=1, nCount-1 do
szOption = format("NhËn %s", %tbFreeItem[i].szName)
tinsert(tbOpt, {szOption, get_item, {i}})
end
szOption = format("NhËn %s", %tbFreeItem[nCount].szName)
tinsert(tbOpt, {szOption, get_single_item, {nCount}})
tinsert(tbOpt, {"NhËn cùc phÈm giíi chØ...", get_normal_item})
tinsert(tbOpt, {"Trë vª.", dialog_main})
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
CreateNewSayEx("<npc>l·o phu n¬i nµy ca h¬i thë nham vËt phÈm nh­ng nhËn lÊy", tbOpt)
end




function get_normal_item()
local tbOpt =
{
{"NhËn 5 viªn KNB.", cszb},
{"H­ng Bang Chi Giíi", xb_jz},
{"TrÊn Nh¹c Chi Giíi", zy_jz},
{"Th­îng Ph­¬ng Chi Giíi", sf_jz},
{"Thiªn Hµ Giíi", sh_jz},
{"§O Hoµng Chi Giíi", dh_jz},
{"Thiªn Tö Chi Giíi", tz_jz},
{"ThO Tóc Toµn Giíi", sz_jz},
{"Cµn Kh«n Giíi ChØ (Cùc phÈm)", jz08},
{"L·nh B¸ Nguyªn Méng Chi Giíi (Míi)", jz08x},
{"Trë vÒ.", dialog_main},
{"Kªt thóc ®èi tho¹i."},
}
CreateNewSayEx("<npc>L·o phu ca mét sè man cùc phÈm, ng­êi cÇn thøc g× ?", tbOpt)
end


function fifong()
local tbOpt =
{
{"Phi phong", phiphong},
{"Ên", an},
{"Trang søc", trangsuc1},
{"Vò liÖt", vuliet},
{"Huynh ®Ö", huynhde},
{"Cè s¬n", coson},
{"D­¬ng thÇn", duongthan},
{"VËt PhÈm Kh¸c", huytinh},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän item", tbOpt)
end
function trangsuc()
local tbOpt =
{
{"Trang søc 1", trangsuc1},
{"Trang søc 2", trangsuc2},
{"Trang søc 3", trangsuc3},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän item", tbOpt)
end
function an23()
local tbOpt =
{
{"Ên 1", an1},
{"Ên 2", an2},
{"Ên 3", an3},
{"Ên 4", an4},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän item", tbOpt)
end


function huytinh()
dotim()
end




function matna()
local tbOpt =
{
{"MÆt n¹ 1", matna1},
{"MÆt n¹ 2", matna2},
{"MÆt n¹ 3", matna3},
{"MÆt n¹ 4", matna4},
{"MÆt n¹ 5", matna5},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän item", tbOpt)
end
function trangthai()
local tbOpt =
{
{"ChÝnh ph¸i", mauvang},
{"Tµ ph¸i", mautim},
{"Trung lËp", mauxanh},
{"S¸t Thñ", maudo},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän mµu", tbOpt)
end
function mauvang()
SetCurCamp(1)
SetCamp(1)
CreateNewSayEx("<npc>B¹n ®æi mµu PK ChÝnh Ph¸i thµnh c«ng.", tbOpt)
end
function mautim()
SetCurCamp(2)
SetCamp(2)
CreateNewSayEx("<npc>B¹n ®æi mµu PK Tµ Ph¸i thµnh c«ng.", tbOpt)
end
function mauxanh()
SetCurCamp(3)
SetCamp(3)
CreateNewSayEx("<npc>B¹n ®æi mµu PK Trung LËp thµnh c«ng.", tbOpt)
end
function maudo()
SetCurCamp(4)
SetCamp(4)
CreateNewSayEx("<npc>B¹n ®æi mµu PK S¸t Thñ thµnh c«ng.", tbOpt)
end
function an4()
for i=5161,5197 do
AddGoldItem(0, i)
end
end
function an3()
for i=5131,5161 do
AddGoldItem(0, i)
end
end
function an2()
for i=5098,5130 do
AddGoldItem(0, i)
end
end
function coson()
AddGoldItem(0, 4441)
AddGoldItem(0, 4445)
AddGoldItem(0, 4449)
AddGoldItem(0, 4453)
AddGoldItem(0, 4457)
AddGoldItem(0, 4461)
AddGoldItem(0, 4465)
AddGoldItem(0, 4469)
end
function huynhde()
for i=4436,4437 do
AddGoldItem(0, i)
end
for i=4481,4482 do
AddGoldItem(0, i)
end
end
function vuliet()
for i=5208,5212 do
AddGoldItem(0, i)
end
end
function pro1()
for i=430,441 do
AddGoldItem(0, i)
end
end
function dongsat()
for i=494,497 do
AddGoldItem(0, i)
end
for i=378,379 do
AddGoldItem(0, i)
end
end
function duongthan()
for i=514,520 do
AddGoldItem(0, i)
end
end
function phiphong()
for i=3465,3490 do
AddGoldItem(0, i)
end
end
function an()
for i=3205,3234 do
AddGoldItem(0, i)
end
end
function trangsuc1()
for i=3542,3554 do
AddGoldItem(0, i)
end
for i=3491,3506 do
AddGoldItem(0, i)
end
end
function trangsuc2()
for i=5241,5261 do
AddGoldItem(0, i)
end
end
function trangsuc3()
for i=5262,5289 do
AddGoldItem(0, i)
end
end
function cszb()
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
end
function xb_jz()
AddGoldItem(0, 508)
end
function zy_jz()
AddGoldItem(0, 509)
end
function sf_jz()
AddGoldItem(0, 510)
end
function sh_jz()
AddGoldItem(0, 511)
end
function dh_jz()
AddGoldItem(0, 530)
end
function tz_jz()
AddGoldItem(0, 531)
end
function sz_jz()
AddGoldItem(0, 498)
end
function jz08()
AddGoldItem(0, 3878)
end
function jz08x()
AddGoldItem(0, 3541)
end


function get_item(nIndex)
local nMaxCount = CalcFreeItemCellCount()
g_AskClientNumberEx(0, nMaxCount, "Xin mêi ®­a vµo nhËn lÊy", {get_item_back, {nIndex}})
end


function get_item_back(nIndex, nCount)
if nCount <= 0 then
return
end
if CalcFreeItemCellCount() < nCount then
Talk(1, "", format("CÇn Ut nhÊt <color=yellow>%d<color> tói kh«ng gian...", nCount))
return
end
local szLogTitle = format("[liguan]get_free_item_%s", %tbFreeItem[nIndex].szName)
tbAwardTemplet:GiveAwardByList(%tbFreeItem[nIndex], szLogTitle, nCount)
end


function get_single_item(nIndex)
local tbItem = %tbFreeItem[nIndex]
if CountFreeRoomByWH(tbItem.nWidth, tbItem.nHeigth) < 1 then
Talk(1, "", format("CÇn Ut nhÊt 1 %dx%d µÄ±³°ü¿O¼ä", tbItem.nWidth, tbItem.nHeigth))
return
end
local szLogTitle = format("[liguan]get_free_item_%s", tbItem.szName)
tbAwardTemplet:GiveAwardByList(tbItem, szLogTitle)
end


function clear_attibute_point()
local tbOpt =
{
{"TÈy ®iÓm kü n¨ng", clear_skill},
{"TÈy ®iÓm ti?m n¨ng", clear_prop},
{"Trë v?", dialog_main},
{"KOt thóc ®èi tho¹i."},
}
CreateNewSayEx("<npc>Ng­¬i quyOt u muèn tÈy tñy?", tbOpt)
end


function clear_skill()
local tbOpt =
{
{"X¸c nhËn", do_clear_skill},
{"§Ó ta suy nghÜ l¹i."},
{"Trë v?", clear_attibute_point},
}
CreateNewSayEx("<npc>Ng­¬i vÉn quyOt u muèn tÈy tñy?", tbOpt)
end


function do_clear_skill()
local i = HaveMagic(210) -- ÇṦ¸íÝâ²ï×÷
local j = HaveMagic(400) -- ¡°½ï¸»¼·Æ¶¡±¸íÝâ²ï×÷
local n = RollbackSkill() -- Çå³ý¼¼Äܲ¢·µ»ØËùÓм¼ÄÜ?ã£� �°üµ¨ÇṦµÈÌØÊâ¼¼ÄÜ£?
local x = 0
if (i ~= -1) then i = 1; x = x + i end -- Õ⸽¾äÅжÏÊÇÅųý´Óδѧ¹ýÇ á¹¦µÄÈË·µ»Ø-1´Ó¶øµ¼Ö¢µãÊý¼ÆËã´íÎóÇé¿ö
if (j ~= -1) then x = x + j end
local rollback_point = n - x -- °Ñ¼¼Äܵ㵱×ö¿ÕÏеãÊý·µ»¹£ ¬µ«ÏÈ?Û³ýÇṦµ?
if (rollback_point + GetMagicPoint() < 0) then -- Èç¹ûÏ´³É¸Ë¸ºÊý£¬Ôòµ±×÷0£¨� �ªÒԺ󶵴ÎÏ´µã±£?ô£?
rollback_point = -1 * GetMagicPoint()
end
AddMagicPoint(rollback_point)
if (i ~= -1) then AddMagic(210, i) end -- Èç¹ûѧ¹uÇṦÔ?¼Ó»ØÔ­Óеȼ¶
if (j ~= -1) then AddMagic(400, j) end -- Èç¹ûѧ¹u¡°½ï¸»¼Aƶ¡±Ý¬Ñù´¦ µí
Msg2Player("TÈy tñy thµnh c«ng! Ng­¬i ca "..rollback_point.." ®iÓm kü n¨ng ®Ó ph©n phèi l¹i.")
KickOutSelf()
end


function clear_prop()
local tbOpt =
{
{"X¸c nhËn", do_clear_prop},
{"§Ó ta suy nghÜ l¹i."},
{"Trë v?", clear_attibute_point},
}
CreateNewSayEx("<npc>Ng­¬i vÉn quyOt u muèn tÈy tñy?", tbOpt)
end


function do_clear_prop()
local base_str = {35,20,25,30,20} -- ÎåÐÐÈËÎïµÄÌìÉúÊôÐÔÖµ
local base_dex = {25,35,25,20,15}
local base_vit = {25,20,25,30,25}
local base_eng = {15,25,25,20,40}
local player_series = GetSeries() + 1


local Utask88 = GetTask(88)
AddStrg(base_str[player_series] - GetStrg(1) + GetByte(Utask88, 1)) -- ½«ÒÑ·ÖÅäDZÄÜÖØÖ·£¨task(88)ÊÇÈ ÎÎñÖÐÖ±½Ó½±µøµÄ¸¦¸¿¡¢Éí·¨ µÈ£©
AddDex(base_dex[player_series] - GetDex(1) + GetByte(Utask88, 2))
AddVit(base_vit[player_series] - GetVit(1) + GetByte(Utask88, 3))
AddEng(base_eng[player_series] - GetEng(1) + GetByte(Utask88, 4))
end


function write_info()
tbInputDialog:InputServer()
end

Bạn @VuDuyManh cho mình hỏi, mình dùng code này để add vào lệnh bài admin luôn, nhưng lúc dùng thì chỉ được 1 lần là nó mất, bạn có thể chỉ mình làm sao để có thể dùng nhiều lần mà không mất được không.
Tks bạn nhiều.

[bil4i3n]

Các bạn ơi cho mình hỏi trong file level_exp.txt thì các giải số phía sau có ý nghĩa gì vậy? MÌnh cám ơn nhiều.

Mấy cái đó hình như là mình trùng sinh thì lượng kinh nghiệm để lên Level tiếp theo đc cộng vào nhiu đó

Bạn @VuDuyManh cho mình hỏi, mình dùng code này để add vào lệnh bài admin luôn, nhưng lúc dùng thì chỉ được 1 lần là nó mất, bạn có thể chỉ mình làm sao để có thể dùng nhiều lần mà không mất được không.
Tks bạn nhiều.

Ở cuối function main() bạn thêm dòng return 1 là hết nha

[cuongvh93]

Mấy cái đó hình như là mình trùng sinh thì lượng kinh nghiệm để lên Level tiếp theo đc cộng vào nhiu đó

Tks bạn.. Fix lại chứ đánh nhanh lên lv cũng chán

[ngocht]

của bạn đây

IncludeLib("SETTING")Include("\\script\\dailogsys\ \dailogsay.lua")
Include("\\script\\lib\\awardtemplet.lua")
Include("\\script\\global\\fuyuan.lua")
Include("\\script\\global\\hotrothem.lua")
Include ("\\script\\class\\ktabfile.lua") --CÇn ¢®Ã“ ch¢¹y TabFile_Load
Include("\\script\\global\\gmrole.lua")


SKILL_180 = {1220,1221,1223,1222,1224,1225,1227,1226,1228,1229 }
local tbFaction =
{
[1] =
{
szShowName = "ThiÕu L©m",
szFaction = "shaolin",
nShortFaction = "sl",
tbSkill = {318, 319, 321, 709, 1055, 1056, 1057},
tbEquip =
{
{
szFaction = "ThiÕu L©m QuyÒn",
nFirstEquipId = 4863,
tbEquipName =
{
" Minh Ph­îng ch©u liªn", " Minh Ph­îng t¨ng m·o", " Minh Ph­îng th­îng giíi", " Minh Ph­îng hé uyÓn", " Minh Ph­îng yªu ®¸i",
" Minh Ph­îng cµ sa ", " Minh Ph­îng triÒn thñ ", " Minh Ph­îng t¨ng hµi ", " Minh Ph­îng yªu trôy ", " Minh Ph­îng h¹ giíi ",
},
},
{
szFaction = "ThiÕu L©m C«n",
nFirstEquipId = 4873,
tbEquipName =
{
"Minh Ph­îng ch©u liªn", "Minh Ph­îng t¨ng m·o", "Minh Ph­îng th­îng giíi", "Minh Ph­îng hé uyÓn", "Minh Ph­îng yªu ®¸i",
"Minh Ph­îng cµ sa", "Minh Ph­îng c«n", "Minh Ph­îng t¨ng hµi", "Minh Ph­îng yªu trôy", "Minh Ph­îng h¹ giíi",
},
},
{
szFaction = "ThiÕu L©m §ao",
nFirstEquipId = 4883,
tbEquipName =
{
"Minh Ph­îng ch©u liªn", "Minh Ph­îng t¨ng m·o", "Minh Ph­îng th­îng giíi", "Minh Ph­îng hé uyÓn", "Minh Ph­îng yªu ®¸i",
"Minh Ph­îng cµ sa", "Minh Ph­îng ®ao", "Minh Ph­îng t¨ng hµi", "Minh Ph­îng yªu trôy", "Minh Ph­îng h¹ giíi",
},
},
},
},
[2] =
{
szShowName = "Thiªn V­¬ng Bang",
szFaction = "tianwang",
nShortFaction = "tw",
tbSkill = {322, 325, 323, 708, 1058, 1059, 1060},
tbEquip =
{
{
szFaction = "Thiªn V­¬ng Chïy",
nFirstEquipId = 4893,
tbEquipName =
{
"Minh Ph­îng ®Þnh quang liªn", "Minh Ph­îng ®Þnh quang kh«i", "Minh Ph­îng ®Þnh quang th­îng giíi", "Minh Ph­îng ®Þnh quang thóc o¶n", "Minh Ph­îng ®Þnh quang yªu ®¸i",
"Minh Ph­îng ®Þnh quang kh¶i", "Minh Ph­îng ®Þnh quang chïy", "Minh Ph­îng ®Þnh quang ngoa", "Minh Ph­îng ®Þnh quang béi", "Minh Ph­îng ®Þnh quang h¹ giíi",
},
},
{
szFaction = "Thiªn V­¬ng Th­¬ng",
nFirstEquipId = 4903,
tbEquipName =
{
"Minh Ph­îng ngù phong liªn", "Minh Ph­îng ngù phong kh«i", "Minh Ph­îng ngù phong th­îng giíi", "Minh Ph­îng ngù phong thóc o¶n", "Minh Ph­îng ngù phong yªu ®¸i",
"Minh Ph­îng ngù phong kh¶i", "Minh Ph­îng ngù phong th­¬ng", "Minh Ph­îng ngù phong ngoa", "Minh Ph­îng ngù phong béi", "Minh Ph­îng ngù phong h¹ giíi",
},
},
{
szFaction = "Thiªn V­¬ng §ao",
nFirstEquipId = 4913,
tbEquipName =
{
"Minh Ph­îng biÓu phong liªn", "Minh Ph­îng biÓu phong kh«i", "Minh Ph­îng biÓu phong th­îng giíi", "Minh Ph­îng biÓu phong thóc o¶n", "Minh Ph­îng biÓu phong yªu ®¸i",
"Minh Ph­îng biÓu phong kh¶i", "Minh Ph­îng biÓu phong ®ao", "Minh Ph­îng biÓu phong ngoa", "Minh Ph­îng biÓu phong béi", "Minh Ph­îng biÓu phong h¹ giíi",
},
},
},
},
[3] =
{
szShowName = "§­êng M«n",
szFaction = "tangmen",
nShortFaction = "tm",
tbSkill = {339, 302, 342, 710, 1069, 1070, 1071},
tbEquip =
{
{
szFaction = "Phi §ao §­êng M«n",
nFirstEquipId = 4983,
tbEquipName =
{
"Minh Ph­îng nÆc ¶nh h¹ng liªn", "Minh Ph­îng nÆc ¶nh qu¸n", "Minh Ph­îng nÆc ¶nh th­îng giíi", "Minh Ph­îng nÆc ¶nh hé uyÓn", "Minh Ph­îng nÆc ¶nh triÒn yªu",
"Minh Ph­îng nÆc ¶nh gi¸p", "Minh Ph­îng nÆc ¶nh phi ®ao", "Minh Ph­îng nÆc ¶nh ngoa", "Minh Ph­îng nÆc ¶nh yªu trôy", "Minh Ph­îng nÆc ¶nh h¹ giíi",
},
},
{
szFaction = "Ná §­êng M«n",
nFirstEquipId = 4993,
tbEquipName =
{
"Minh Ph­îng cùc quang h¹ng liªn", "Minh Ph­îng cùc quang qu¸n", "Minh Ph­îng cùc quang th­îng giíi", "Minh Ph­îng cùc quang hé uyÓn", "Minh Ph­îng cùc quang triÒn yªu",
"Minh Ph­îng cùc quang gi¸p", "Minh Ph­îng cùc quang ná ", "Minh Ph­îng cùc quang ngoa ", "Minh Ph­îng cùc quang yªu trôy ", "Minh Ph­îng cùc quang h¹ giíi ",
},
},
{
szFaction = "Phi Tiªu §­êng M«n",
nFirstEquipId = 5003,
tbEquipName =
{
" Minh Ph­îng th­íc kim h¹ng liªn ", " Minh Ph­îng th­íc kim qu¸n ", " Minh Ph­îng th­íc kim th­îng giíi ", " Minh Ph­îng th­íc kim hé uyÓn ", " Minh Ph­îng th­íc kim triÒn yªu ",
" Minh Ph­îng th­íc kim gi¸p ", " Minh Ph­îng th­íc kim phi tiªu ", " Minh Ph­îng th­íc kim ngoa ", " Minh Ph­îng th­íc kim yªu trôy ", " Minh Ph­îng th­íc kim h¹ giíi ",
},
},
},
},
[4] =
{
szShowName = "Ngò §éc Gi¸o",
szFaction = "wudu",
nShortFaction = "wu",
tbSkill = {353, 355, 711, 1066, 1067},
tbEquip =
{
{
szFaction = "Ngò §éc Ch­ëng",
nFirstEquipId = 4963,
tbEquipName =
{
" Minh Ph­îng ®éc sa h¹ng liªn ", " H¹ch Hæ ®éc sa ph¸t ®¸i ", " Minh Ph­îng ®éc sa th­îng giíi ", " Minh Ph­îng ®éc sa hé uyÓn ", " Minh Ph­îng ®éc sa yªu ®¸i ",
" Minh Ph­îng ®éc sa bÝ trang ", " Minh Ph­îng ®éc sa triÒn thñ ", " Minh Ph­îng ®éc sa ngoa ", " Minh Ph­îng ®éc sa yªu trôy ", " Minh Ph­îng ®éc sa h¹ giíi ",
},
},
{
szFaction = "Ngò §éc §ao",
nFirstEquipId = 4973,
tbEquipName =
{
" Minh Ph­îng u linh h¹ng liªn ", " H¹ch Hæ u linh ph¸t ®¸i ", " Minh Ph­îng u linh th­îng giíi ", " Minh Ph­îng u linh hé uyÓn ", " Minh Ph­îng u linh yªu ®¸i ",
" Minh Ph­îng u linh bÝ trang ", " Minh Ph­îng u linh ®ao ", " Minh Ph­îng u linh ngoa ", " Minh Ph­îng u linh yªu trôy ", " Minh Ph­îng u linh h¹ giíi ",
},
},
},
},
[5] =
{
szShowName = "Nga Mi",
szFaction = "emei",
nShortFaction = "em",
tbSkill = {380, 328, 712, 1061, 1062, 1114},
tbEquip =
{
{
szFaction = "Nga Mi KiÕm",
nFirstEquipId = 4923,
tbEquipName =
{
"Minh Ph­îng l­u v©n ch©u liªn", "Minh Ph­îng l­u v©n ph¸t ®¸i", "Minh Ph­îng l­u v©n th­îng giíi", "Minh Ph­îng l­u v©n hé uyÓn", "Minh Ph­îng l­u v©n yªu ®¸i ",
"Minh Ph­îng l­u v©n sam", "Minh Ph­îng l­u v©n kiÕm", "Minh Ph­îng l­u v©n ngoa", "Minh Ph­îng l­u v©n béi ", "Minh Ph­îng l­u v©n h¹ giíi ",
},
},
{
szFaction = "Nga Mi Ch­ëng",
nFirstEquipId = 4933,
tbEquipName =
{
"Minh Ph­îng hµn ngäc ch©u liªn ", "Minh Ph­îng hµn ngäc ph¸t ®¸i", "Minh Ph­îng hµn ngäc th­îng giíi", "Minh Ph­îng hµn ngäc hé uyÓn", "Minh Ph­îng hµn ngäc yªu ®¸i",
"Minh Ph­îng hµn ngäc sam", "Minh Ph­îng hµn ngäc triÒn thñ ", "Minh Ph­îng hµn ngäc ngoa ", "Minh Ph­îng hµn ngäc béi ", "Minh Ph­îng hµn ngäc h¹ giíi ",
},
},
},
},
[6] =
{
szShowName = "Thóy Yªn",
szFaction = "cuiyan",
nShortFaction = "cy",
tbSkill = {336, 337, 713, 1063, 1065},
tbEquip =
{
{
szFaction = "Thóy Yªn §ao (Ngo¹i)",
nFirstEquipId = 4943,
tbEquipName =
{
"Minh Ph­îng hång nhan ch©u liªn ", "Minh Ph­îng hång nhan ph¸t ®¸i", "Minh Ph­îng hång nhan th­îng giíi", "Minh Ph­îng hång nhan hé uyÓn", "Minh Ph­îng hång nhan yªu ®¸i",
"Minh Ph­îng hång nhan sam", "Minh Ph­îng hång nhan ®ao ", "Minh Ph­îng hång nhan ngoa ", "Minh Ph­îng hång nhan béi ", "Minh Ph­îng hång nhan h¹ giíi ",
},
},
{
szFaction = "Thóy Yªn Song §ao (Néi)",
nFirstEquipId = 4953,
tbEquipName =
{
"Minh Ph­îng ¶o th¸i ch©u liªn ", "Minh Ph­îng ¶o th¸i ph¸t ®¸i", "Minh Ph­îng ¶o th¸i th­îng giíi", "Minh Ph­îng ¶o th¸i hé uyÓn", "Minh Ph­îng ¶o th¸i yªu ®¸i",
"Minh Ph­îng ¶o th¸i sam", "Minh Ph­îng ¶o th¸i ®ao ", "Minh Ph­îng ¶o th¸i ngoa ", "Minh Ph­îng ¶o th¸i béi ", "Minh Ph­îng ¶o th¸i h¹ giíi ",
},
},
},
},
[7] =
{
szShowName = "C¸i Bang",
szFaction = "gaibang",
nShortFaction = "gb",
tbSkill = {357, 359, 714, 1073, 1074},
tbEquip =
{
{
szFaction = "C¸i Bang Ch­ëng",
nFirstEquipId = 5013,
tbEquipName =
{
" Minh Ph­îng hé ph¸p h¹ng liªn", " Minh Ph­îng hé ph¸p ®Çu hoµn", " Minh Ph­îng hé ph¸p th­îng giíi ", " Minh Ph­îng hé ph¸p hé uyÓn ", " Minh Ph­îng hé ph¸p thóc yªu",
" Minh Ph­îng hé ph¸p c¸i y", " Minh Ph­îng hé ph¸p triÒn thñ ", " Minh Ph­îng hé ph¸p ngoa ", "Minh Ph­îng hé ph¸p béi ", " Minh Ph­îng hé ph¸p h¹ giíi ",
},
},
{
szFaction = "C¸i Bang Bæng",
nFirstEquipId = 5023,
tbEquipName =
{
"Minh Ph­îng trõng giíi h¹ng liªn", "Minh Ph­îng trõng giíi ®Çu hoµn", "Minh Ph­îng trõng giíi th­îng giíi ", "Minh Ph­îng trõng giíi hé uyÓn", "Minh Ph­îng trõng giíi thóc yªu",
"Minh Ph­îng trõng giíi c¸i y", "Minh Ph­îng trõng giíi tr­îng", "Minh Ph­îng trõng giíi ngoa", "Minh Ph­îng trõng giíi béi", "Minh Ph­îng trõng giíi h¹ giíi ",
},
},
},
},
[8] =
{
szShowName = "Thiªn NhÉn Gi¸o",
szFaction = "tianren",
nShortFaction = "tr",
tbSkill = {361, 362, 715, 1075, 1076},
tbEquip =
{
{
szFaction = "ChiÕn NhÉn",
nFirstEquipId = 5033,
tbEquipName =
{
"Minh Ph­îng xÝch minh h¹ng liªn", "H¹ch Hæ xÝch minh kh«i", "Minh Ph­îng xÝch minh th­îng giíi", "Minh Ph­îng xÝch minh hé o¶n", "Minh Ph­îng xÝch minh yªu ®¸i",
"Minh Ph­îng xÝch minh gi¸p", "Minh Ph­îng xÝch minh th­¬ng", "Minh Ph­îng xÝch minh ngoa", "Minh Ph­îng xÝch minh béi", "Minh Ph­îng xÝch minh h¹ giíi",
},
},
{
szFaction = "Ma NhÉn",
nFirstEquipId = 5043,
tbEquipName =
{
"Minh Ph­îng s¸t viªm h¹ng liªn", "H¹ch Hæ s¸t viªm kh«i", "Minh Ph­îng s¸t viªm th­îng giíi", "Minh Ph­îng s¸t viªm hé o¶n", "Minh Ph­îng s¸t viªm yªu ®¸i",
"Minh Ph­îng s¸t viªm gi¸p", "Minh Ph­îng s¸t viªm ®ao", "Minh Ph­îng s¸t viªm ngoa", "Minh Ph­îng s¸t viªm béi", "Minh Ph­îng s¸t viªm h¹ giíi",
},
},
},
},
[9] =
{
szShowName = "Vâ §ang",
szFaction = "wudang",
nShortFaction = "wd",
tbSkill = {365, 368, 716, 1078, 1079},
tbEquip =
{
{
szFaction = "Vâ §ang KhÝ",
nFirstEquipId = 5053,
tbEquipName =
{
" Minh Ph­îng tiªn ©m phï ", " Minh Ph­îng tiªn ©m qu¸n", " Minh Ph­îng tiªn ©m th­îng giíi ", " Minh Ph­îng tiªn ©m tô ", " Minh Ph­îng tiªn ©m ph¸p ®¸i ",
" Minh Ph­îng tiªn ©m ®¹o bµo ", " Minh Ph­îng tiªn ©m kiÕm ", " Minh Ph­îng tiªn ©m ngoa ", " Minh Ph­îng tiªn ©m béi ", " Minh Ph­îng tiªn ©m h¹ giíi ",
},
},
{
szFaction = "Vâ §ang KiÕm",
nFirstEquipId = 5063,
tbEquipName =
{
" Minh Ph­îng ®¹o minh phï ", " Minh Ph­îng ®¹o minh qu¸n ", " Minh Ph­îng ®¹o minh th­îng giíi ", " Minh Ph­îng ®¹o minh tô ", " Minh Ph­îng ®¹o minh ph¸p ®¸i ",
" Minh Ph­îng ®¹o minh ®¹o bµo ", " Minh Ph­îng ®¹o minh kiÕm ", " Minh Ph­îng ®¹o minh ngoa ", " Minh Ph­îng ®¹o minh béi ", " Minh Ph­îng ®¹o minh h¹ giíi ",
},
},
},
},
[10] =
{
szShowName = "C«n L«n",
szFaction = "kunlun",
nShortFaction = "kl",
tbSkill = {372, 375, 717, 1080, 1081},
tbEquip =
{
{
szFaction = "C«n L«n §ao",
nFirstEquipId = 5073,
tbEquipName =
{
"Minh Ph­îng thiªn canh h¹ng liªn ", "Minh Ph­îng thiªn canh ®¹o qu¸n", "Minh Ph­îng thiªn canh th­îng giíi", "Minh Ph­îng thiªn canh hé uyÓn", "Minh Ph­îng thiªn canh ph¸p ®¸i",
"Minh Ph­îng thiªn canh ®¹o bµo", "Minh Ph­îng thiªn canh ®ao", "Minh Ph­îng thiªn canh ngoa", "Minh Ph­îng thiªn canh béi", "Minh Ph­îng thiªn canh h¹ giíi",
},
},
{
szFaction = "C«n L«n KiÕm",
nFirstEquipId = 5083,
tbEquipName =
{
"Minh Ph­îng ng¹o s­¬ng h¹ng liªn ", "Minh Ph­îng ng¹o s­¬ng ®¹o qu¸n", "Minh Ph­îng ng¹o s­¬ng th­îng giíi", "Minh Ph­îng ng¹o s­¬ng hé uyÓn", "Minh Ph­îng ng¹o s­¬ng ph¸p ®¸i",
"Minh Ph­îng ng¹o s­¬ng ®¹o bµo", "Minh Ph­îng ng¹o s­¬ng kiÕm ", "Minh Ph­îng ng¹o s­¬ng ngoa ", "Minh Ph­îng ng¹o s­¬ng béi", "Minh Ph­îng ng¹o s­¬ng h¹ giíi",
},
},
},
},
}
local tbEquipFreeCell =
{
{2, 1}, {2, 2}, {1, 1}, {1, 2}, {2, 1}, --¾±´ø£¬¶¥´÷£¬ÉϽ䣬»¤Ýó£¬Ñ ü´ø
{2, 3}, {2, 4}, {2, 2}, {1, 2}, {1, 1}, --?¢ÎÎäÆ÷£¬Ñ¥×Ó£¬Ñü×¹£¬Ï� �½ä
}


local tbFactionSeries =
{
[1] = {1, 2},
[2] = {3, 4},
[3] = {5, 6},
[4] = {7, 8},
[5] = {9, 10},
}


local tbFreeItem =
{
{szName="Håi Thiªn T¸i T¹o CÈm Nang", tbProp={6,1,1781,1,0,0}, tbParam={60}},
{szName="VËt phÈm kh¸c", tbProp={6,1,298,1,0,0}},
{szName="Qu¶ huy hoµng cao cÊp.", tbProp={6,1,1075,1,0,0}},
{szName="Khiªu chiªn lÔ bao", tbProp={6,1,2006,1,0,0}},
{szName="-ThËp Toµn §¹i Bæ-", tbProp={6,1,1399,1,0,0}},
{szName="Viªm §ª ®å b¶o", tbProp={6,1,2805,1,0,0}},
{szName="Tèng kim qu©n c«ng", tbProp={6,1,1477,1,0,0}},
{szName="§¹i lùc", tbProp={6,1,2517,1,0,0}},
{szName="-H·n HuyÕt Long C©u-", tbProp={0,10,18,1,0,0}, nWidth=2, nHeigth=3},
}


local tbGMAccount = {"Manhga1", "Manhga2", "Manhga3", "Manhga4", "Manhga5"}


function main()
dofile("script/global/·ÈË_Àñ¹Ù.lua");
dialog_main()
end






--================================================== ========================================


Include("\\script\\global\\repute_head.lua")
Include("\\script\\misc\\league_cityinfo.lua")


function dmcreattongtest()
local strTongName = GetTongName()
local tszTitle = "Chµo mong b¹n ®· tham gia hÖ thèng <color=yellow>Bang Héi<color>"
if (strTongName == nil or strTongName == "") then
Say(tszTitle,4," NhËn ®i?u kiÖn t¹o bang héi/dmcreatetong","Gia nhËp bang héi/dmjointong","T¹o bang héi/dmcreateit","KOt thóc ®èi tho¹i")
else
Say(tszTitle,0)
end
end


function dmcreatetong()
if GetCamp() ~= 4 then
SetCamp(4)
SetCurCamp(4)
AddRepute(100000)
AddLeadExp(1000000)
AddLeadExp(1000000)


AddLeadExp(1000000)


AddEventItem(195)
Earn(1000000)
if GetLevel() <= 100 then
for i=1,100 do
AddOwnExp(100000000)
end
end
Msg2Player("<color=yellow>Ng­êi ®· héi ®ñ tÊt c¶ ®iªu kiÖn ®Ó t¹o Bang Héi!<color>")
else
end
end


function dmjointong()
if GetCamp() ~= 4 then


if GetLevel() <= 100 then
for i=1,100 do
AddOwnExp(100000000)
end
end


SetCamp(4)
SetCurCamp(4)
Msg2Player("<color=yellow>Gia nhËp Bang héi thµnh c«ng!<color>")
else
end
end


function dmcreateit()
Tong_name,oper = GetTong()
if (oper == 0) and (GetTask(99) == 1) then
Say("KiOm hiÖp ch­ëng m«n nh©n:Khai s¸ng bang héi, më réng b¸ nghiÖp." ,2,"B¾t ®Çu dùng bang/Direct_CreateTong","§îi ta mét chót/wait_a_moment")
elseif (oper == 0) and (GetCamp() == 4) and (GetLevel() >= 50) and (GetReputeLevel(GetRepute()) >= 6) and (GetLeadLevel() >= 30) and (HaveItem(195) == 1) then
Talk(6,"create_pay", "Ng­êi ch¬i: KiOm hiÖp ch­ëng m«n nh©n, xin hái ta ph¶i lµm nh­ thO nµo míi ca thÓ khai t«ng lËp ph¸i trë thµnh Bang chñ ®©y?", "KiOm hiÖp ch­ëng m«n nh©n: §Çu tiªn ng­¬i ph¶i ca ®ñ n¨ng lùc l·nh ®¹o, ca 16 ng­êi cïng chU h­íng cïng ng­¬i lËp bang, tr¶i qua 3 ngµy Kh¶o NghiÖm Kú ", "Ch­ëng m«n nh©n: NOu trong 3 ngµy ca ng­êi rêi bang th× néi trong 3 ngµy ®a ng­êi ph¶i t×m ng­êi kh¸c thay thO.", "Ch­ëng m«n nh©n: Ng­¬i ph¶i ca ®ñ tµi l·nh ®¹o vµ tin vËt ®a lµ Nh¹c V­¬ng KiOm", "Ng­êi ch¬i: Nh¹c V­¬ng Kiªm ? Ng­êi nai lµ thanh kiªm nµy µ ? ", "Kiªm hiÖp ch­ëng m«n nh©n : Th× ra lµ ng­¬i ®· ca na... Kh«ng tÖ, qu¶ nhiªn tuæi trÎ tµi cao!!! ")
else
i = random(0,1)
if (i == 0) then
Talk(1,"", "Kiªm hiÖp ch­ëng m«n nh©n: Nªu nh­ muèn thµnh lËp bang héi, ng­¬i v× na bá ra 1 l­îng lín thêi gian, søc lùc cïng t©m huyOt, kh«ng thÓ nöa ®­êng hñy bá." )
else
Talk(6,"", "Kiªm hiÖp ch­ëng m«n nh©n: Ng­¬i muèn hái ®iªu kiÖn lËp bang µ? §Ó ta nai cho ng­¬i râ.", "Kiªm hiÖp ch­ëng m«n nh©n: ®Çu tiªn ph¶i xuÊt ; tiªp theo ng­¬i kh«ng thÓ ë bÊt kú bang héi nµo kh¸c ; ng­¬i nhÊt ®inh ph¶i danh väng giang hå ; cuèi cïng lµ tµi l·nh ®¹o ph¶i h¬n 30 cÊp.", "Kiªm hiÖp ch­ëng m«n nh©n: Sau ®a ®i chiªn tr­êng t×m mét thanh Nh¹c V­¬ng Kiªm lµm bang chñ tin vËt lµ ®­îc råi.")
end
end
end


function create_pay()
Say("Kiªm hiÖp ch­ëng m«n nh©n: Ng­¬i cÇn lÖ phi lµ 100 v¹n l­îng b¹c." ,2,"Kh«ng thµnh vÊn ®ª, ta ca ®em 100v l­îng ®©y! /create_pay_yes","H©y dµ, ta kh«ng ®em ®ñ tiªn råi. /create_pay_no")


-- Say("½£ÏµÕÆ·ÅÈË£ºÄÇ·´£¬ÄãÖ»� �ªÓÐ×ã¹»µÄ×ʽðÈ·°ïÅÉÄܹ»Ô� �תÆ𵴾ݿÉÒԸˣ¬±ÈÈç˵ÓÐ� �ö100Ýò¸½¸½×Ó°É¡£" ,2,"·»ÎÊî}£¬?ÒÒѾ­Ó?00Ýò¸½¸½×� �¸Ë/create_pay_yes","Ì«·ÑÇ®?Ë£¬ÉïÒ»µãРв»Ð?create_pay_no")
end
function create_pay_yes()


if (GetCash() >= 1000000) then
Pay(1000000) -- ÊÕ·Ñ
DelItem(195) -- ɾ³ýϵ¹Øµµ¾ß
SetTask(99,1) -- ²¢´òÉϱê¼Ç£¨Ý¬Ê±¶¨ÒåΪ°ïÅ ÉÖеĵóÒ»¸öÈË£¨¼´°ïÖ÷±¾ÈË £©£©
Direct_CreateTong() -- ¿ªÊ¼½¨°ï

else
Talk(1,"", "Kiªm hiÖp ch­ëng m«n nh©n: ViÖc duy tr× bang héi rÊt tèn ti?n, ng­êi ph¶i cè g¾ng cïng mäi ng­êi tUch gap ®Ó bang ®­îc giµu m¹nh. ") end
end




function Direct_CreateTong()
CreateTong(1) -- µ¯³ö½¨°ï¶Ô»°¿ò£¬½áÊø½Å±¾¿ ØÖÆ
end


--================================================== ========================================


function dialog_main()
local szTitle = "<npc>Kiªm hiªp quÇn hïng chiªn nam h¶i, long tranh hæ ®Êu diÖu Cöu ch©u. Ta vèn sø gi¶ ®¹i biÓu t©y s¬n c­ ë chç nµy hoan nghªnh c¸c anh hïng hµo kiÖt... Script LÔ Quan ®­îc ViÖt Haa bëi _khunglongcon_ clbgamesvn.com"
local tbOpt =
{
{"Kh¶o nghiÖm hÖ thèng bang héi.", dmcreattongtest},
{"N©ng ®ªn 190 cÊp", level_up_to190},
{"Ta muèn chuyÓn sinh.", transfer},
{"Vµo ph¸i vµ häc skill 150", choose_faction},
{"LÊy trang bÞ m«n ph¸i", show_faction},
{"Ta muèn lÊy vËt phÈm.", show_item},
{"Ta muèn lÊy mét sè vËt phÈm kh¸c...", moreitem},
{"NhËn ®iÓm", hotro},
{"Trang bÞ hiÕm", fifong},
{"LÊy ngùa", layngua},
{"N÷ TVB", nukim},
{"NhËn Skill 180", nhanskill180},
{"Trang bÞ Cùc PhÈm", cucphkhac},
{"N©ng §ªn 10 cÊp", level1},
{"LÖnh Bµi ADmin", lbadmin},
{"Tho¸t"},
}
local szAccount = GetAccount()
for i=1, getn(%tbGMAccount) do
if szAccount == %tbGMAccount[i] then
tinsert(tbOpt, 1, {"תGMÕ˺Å", gm_function})
tinsert(tbOpt, 1, {"¸ìÈ¡BOSS¸îÅÆ", gm_functionboss})
tinsert(tbOpt, 1, {"ÎÒÒªÉý¼¶µ½190¼¶", level_up_to190})
tinsert(tbOpt, 1, {"ÎÒÒª¸ìÈ¡ÎïÆ·", show_item})
tinsert(tbOpt, 1, {"ÎÒÒª¸ìÈ¡°×»¢Ì××°", show_faction})
tinsert(tbOpt, 1, {"ÎÒҪϴËè", clear_attibute_point})
break
end
end
CreateNewSayEx(szTitle, tbOpt)
end


function lbadmin()
AddItem(6,1,4369,1,0,0,0,0)--lenh bai adm
end


function nhanskill180()
local nFaction = GetLastFactionNumber() + 1
if nFaction==0 then
Say("Kh«ng cã m«n ph¸i mµ ®åi nhËn skill thÊt truyÒn, ta kh«ng cã thêi gian ®ïa víi ng­¬i", 0)
return
else
for i=1,10 do
if (nFaction==i) then
if (HaveMagic(SKILL_180[i]) == -1) then
AddMagic(SKILL_180[i],20)
Say("B¹n häc ®­îc kü n¨ng cÊp 180 <color=yellow>"..GetSkillName(SKILL_180[i]), 0)
else
Say("Ng­¬i ®· cã kü n¨ng thÊt truyÒn råi, ®õng tham lam", 0)
return
end
end
end
end
end
function cucphkhac()
dohoangkim()
end


function level1()
--AddItem(6,1,4366,0,0,0)---lanh bai adim
--AddItem(6,1,4367,0,0,0,100)---ban long thach
--AddItem(6,1,4368,0,0,0)---cong ky nang
AddItem(6,1,4369,0,0,0)---cong tiem nang
--AddItem(6,1,4370,0,0,0)---phi thien phu
--AddItem(6,1,4371,0,0,0,100)--thien tinh thach
--AddItem(6,1,4372,0,0,0)---tui tien
--AddItem(6,1,4373,0,0,0)---dich diem boss71
--AddItem(0,1,1,10,2,200,10) ----do xanh
--AddItem(0,1,1,10,2,200,10) ----do xanh
--AddItem(0,1,1,10,2,200,10) ----do xanh
--AddItem(0,1,1,10,2,200,10) ----do xanh
end




function bachkim()
local tbOpt =
{
{"ThiÕu l©m", bktl},
{"Thiªn v­¬ng", bktv},
{"®­êng m«n", bkdm},
{"Ngò ®éc", bk5d},
{"Nga mi", bknm},
{"Thuý yªn", bkty},
{"C¸i bang", bkcb},
{"Thiªn nhÉn", bktn},
{"Vâ ®ang", bkvd},
{"C«n l«n", bkcl},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän m«n ph¸i?", tbOpt)
end
function bktl()
AddGoldItem(0, 11)
AddGoldItem(0, 6)
end
function bktv()
AddGoldItem(0, 16)
AddGoldItem(0, 21)
AddGoldItem(0, 26)
end
function bknm()
AddGoldItem(0, 31)
end
function bkty()
AddGoldItem(0, 46)
end
function bk5d()
AddGoldItem(0, 61)
end
function bkdm()
AddGoldItem(0, 71)
AddGoldItem(0, 76)
AddGoldItem(0, 81)
end
function bkcb()
AddGoldItem(0, 96)
end
function bktn()
AddGoldItem(0, 101)
end
function bkvd()
for i=4346,4355 do
AddPlatinaItem(3, i)
end
end
function bkcl()
AddGoldItem(0, 126)
end
function hacthan()
for i=3890,3894 do
AddGoldItem(0, i)
end
end
function matna1()
for i=4493,4523 do
AddGoldItem(0, i)
end
end
function matna2()
for i=4524,4554 do
AddGoldItem(0, i)
end
end
function matna3()
for i=4555,4585 do
AddGoldItem(0, i)
end
end
function matna4()
for i=4586,4616 do
AddGoldItem(0, i)
end
end
function matna5()
for i=4617,4630 do
AddGoldItem(0, i)
end
end
function nukim()
if GetSex() == 1 then
SetSeries(0)
KickOutSelf()
else
Talk(1,"","Ng­¬i lµ Pª §ª µ ?")
end
end
function hotro()
local tbOpt =
{
{"T¨ng kinh nghiÖm", kn},
{"TiÒn", tien},
{"TÈy ®iÓm", clear_attibute_point},
{"Danh väng,Phóc duyªn", danhvongphucduyen},
{"Tµi l·nh ®¹o", lanhdao},
{"§iÓm Kü N¨ng", pointkynang},
{"§iÓm TiÒm N¨ng", pointtiemnang},
{"1 trµn bi moi", dialog},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Anh cÇn g×?", tbOpt)
end
function pointkynang()
AddMagicPoint(100)
CreateNewSayEx("<npc>B¹n nhËn ®­îc 100 ®iÓm kü n¨ng", tbOpt)
KickOutSelf()
end;


function pointtiemnang()
AddProp(1000)
CreateNewSayEx("<npc>B¹n nhËn ®­îc 10000 ®iÓm tiÒm n¨ng", tbOpt)
end;



function lanhdao()
for i=1,20 do
AddLeadExp(10000000)
end
end


function kn()
for i=1,80 do
AddOwnExp(1000000000)
end
end


function tien1()
Earn(1000000)
end




function tien()
Earn(100000000)
end


function danhvongphucduyen()
AddRepute(100000);
FuYuan_Start();
FuYuan_Add(100000);
CreateNewSayEx("<npc>B¹n nhËn ®­îc 10000 ®iÓm", tbOpt)
end
function conghien()
AddContribution(100000)
end


function trungsinh()
AddReBorn(10)
end
function gm_functionboss()
for i =1,10 do
AddItem(6,1,1022,0,0,0)
end
end
function moreitem()
local tab_Content = {
" LÊy 100 tiÒn ®ång /tiendong",
" NhËn trang bÞ Hoa S¬n/itemhs",
" LÊy VK HKMP /bachkim",
" LÊy 1000v l­îng /tienvan",
" LÊy Cùc PhÈm /tbcucph",
" Th«i kh«ng lÊy g× n÷a hOt."
}
Say(" Muèn lÊy thªm c¸i g× nµo ? ", getn(tab_Content), tab_Content);
end;


function tienvan()
Earn(10000000)
end;


function itemhs()
for i=5290,5299 do
AddGoldItem (0,i)
end
end;






function trangbimoi()
for i=4714,4732 do
AddGoldItem (0,i)
end
end;


function nhanskill()
AddMagic(1349,20)
AddMagic(1350,20)
AddMagic(1374,20)
AddMagic(1350,20)
AddMagic(1375,20)
AddMagic(1351,20)
AddMagic(1376,20)
AddMagic(1354,20)
AddMagic(1378,20)
AddMagic(1355,20)
AddMagic(1379,20)
AddMagic(1358,30)
AddMagic(1360,20)
AddMagic(1380,20)
AddMagic(1364,20)
AddMagic(1382,20)
AddMagic(1365,20)
AddMagic(1370,20)
AddMagic(1369,20)
AddMagic(1384,20)
AddMagic(1363,20)-- Thai Nhac Tam Thanh Phong
AddMagic(1366,20) --Lac Nhan Kinh hong
AddMagic(1368,20) --Doc Co Cuu Kiem
AddMagic(1370,20) --Hao nhien chi khi
AddMagic(1381,20) --Kiem khi vo cap
end


function dialog()
Say("Ng¬¬i ph¶i hiÓu r© c¸ch t¨ng ®iÓm", 8,
"céng tiÒm n¨ng/congtn",
"1 söa trang bÞ/congkn",
" 2 toa do/findgoldboss",
"NÐi c«ng/add_prop_eng")
end


-------------------test---------------
-------------------cong ky nang-------------------------------
MapNameTab = "MapNameTabFile"
TabFile_Load("\\settings\\item\\004\\mapname.txt", MapNameTab)
function congkn()
--IdxItem = nItemIdx
dofile("script/item/ib/phithienphu.lua")
local nW, nX, nY = GetWorldPos()
local nRow = nW + 1
local NAMEMAP = TabFile_GetCell(MapNameTab,nRow,"Name")
local IdMapSave,ToaDoXSave,ToaDoYSave = GetItemParam(IdxItem, 1),GetItemParam(IdxItem, 2),GetItemParam(IdxItem, 3)
local NAMEMAP_Save = TabFile_GetCell(MapNameTab,(IdMapSave+1),"Name")
local FightState = GetFightState()
if IdMapSave == 0 or IdMapSave == nil then
ContentDialog = "vÞ trÝ hiÖn t¹i<enter><color=red>B¶n ®å<color>:<color=green>M¸p: <color> "..nW.." <color=red>Täa ®é<color>: "..nX.." - "..nY.."<enter><color=red>HiÖn ch­a cã täa ®é nµo ®­îc l­u.<color>"
local Content = {
"L­u täa ®é hiÖn t¹i/#SaveLoca("..nW..","..nX..","..nY..","..FightState ..")",
"tho¸t/Quit",
}
Say(ContentDialog,getn(Content),Content)
else
ContentDialog = "<enter>vÒ ®iÓm hiÖn t¹i<enter><color=red>B¶n ®å<color>: "..nW..". <color=red>Täa ®é<color>: "..nX.." - "..nY..".<enter>vÒ chç ®· l­u<enter><color=green>B¶n ®å<color>: "..NAMEMAP_Save..". <color=green>Täa ®é<color>: "..ToaDoXSave.." - "..ToaDoYSave.."."
local Content = {
"L­­u täa ®iÓm hiÖn t¹i/#SaveLoca("..nW..","..nX..","..nY..","..FightState ..")",
"DÞch chuyÓn ®Õn ["..NAMEMAP_Save.."-"..ToaDoXSave.."-"..ToaDoYSave.."]/MoveSaveLoca",
"tho¸t/Quit",
}
Say(ContentDialog,getn(Content),Content)
end
return 1
end
function SaveLoca(nW,nX,nY,nFightState)
SetSpecItemParam(IdxItem, 1, nW)
SetSpecItemParam(IdxItem, 2, nX)
SetSpecItemParam(IdxItem, 3, nY)
SetSpecItemParam(IdxItem, 4, nFightState)
SyncItem(IdxItem)
local MapName = TabFile_GetCell(MapNameTab,(nW+1),"Name")
Msg2Player("L­­u vÞ trÝ:<color=green>M¸p: <color><color=yellow>"..nW.."<color> - Täa ®é: <color=pink>"..nX.."<color> / <color=pink>"..nY.."<color> thµnh c«ng.")
end




function MoveSaveLoca()
if GetItemParam(IdxItem, 1) == 0 or GetItemParam(IdxItem, 1) == nil then
Msg2Player("HiÖn ch­a cã täa ®é nµo ®­îc l­u.")
return
end
local MapName = TabFile_GetCell(MapNameTab,(GetItemParam(IdxItem, 1)+1),"Name")
NewWorld(GetItemParam(IdxItem, 1),GetItemParam(IdxItem, 2),GetItemParam(IdxItem, 3))
SetFightState(GetItemParam(IdxItem, 4))
Msg2Player("<enter>DÞch chuyÓn ®Õn vÞ trÝ ®· l­u<enter>: <color=yellow>"..MapName.."<color> - Täa ®é: <color=pink>"..GetItemParam(IdxItem, 2).."<color> / <color=pink>"..GetItemParam(IdxItem, 3).."<color> thµnh c«ng.")
end
function GetDesc(nItemIndex)
local IdMapSave,ToaDoXSave,ToaDoYSave,nFightState = GetItemParam(nItemIndex, 1),GetItemParam(nItemIndex, 2),GetItemParam(nItemIndex, 3),GetItemParam(nItemIndex, 4)
if IdMapSave == 0 then
nTenMap = "Kh«ng cã"
else
nTenMap = TabFile_GetCell(MapNameTab,(IdMapSave+1),"Name")
end
if nFightState == 0 then
nStatus = "<color=green>Phi ChiÕn ®Êu<color>"
else
nStatus = "<color=red>ChiÕn ®Êu<color>"
end
return "VÞ trÝ ®· l­u<enter><color=green>B¶n ®å<color>: "..nTenMap..". <color=green>Täa ®é<color>: "..ToaDoXSave.." - "..ToaDoYSave..".<enter>Tr¢¹ng th¢¸i: "..nStatus
end




------------------cong tiem nang------------------


function congtn()
Say("Ng¬¬i ph¶i hiÓu r© c¸ch t¨ng ®iÓm", 4,
"Søc m¹nh/add_prop_str",
"Th©n ph¸p/add_prop_dex",
"Sinh khÝ/add_prop_vit",
"NÐi c«ng/add_prop_eng")
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 tbcucph()
cucpham()
end;


function tiendong()

AddStackItem(100,4,417,1,1,0,0,0) -- nhan 100 tien dong






end;
function layngua()
local tbOpt =
{
{"Ngùa nhãm 1", vip1},
{"Ngùa nhãm 2", vip2},
{"Ngùa nhãm 3", vip3},
{"Ngùa nhãm 4", vip4},
{"Ngùa b¸ ®¹o", nguabadao},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Anh cÇn g×?", tbOpt)
end
function nguabadao()
AddGoldItem(0, 4480)
AddGoldItem(0, 4366)
for i=5093,5097 do
AddGoldItem(0, i)
end
CreateNewSayEx("<npc>NhËn ®­îc Ngùa b¸ ®¹o", tbOpt)
end
function vip1()
AddItem(0,10,6,10,0,0,0)
AddItem(0,10,7,10,0,0,0)
AddItem(0,10,8,10,0,0,0)
AddItem(0,10,9,10,0,0,0)
AddItem(0,10,10,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end
function vip2()
AddItem(0,10,11,10,0,0,0)
AddItem(0,10,12,10,0,0,0)
AddItem(0,10,13,10,0,0,0)
AddItem(0,10,14,10,0,0,0)
AddItem(0,10,15,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end
function vip3()
AddItem(0,10,16,10,0,0,0)
AddItem(0,10,17,10,0,0,0)
AddItem(0,10,18,10,0,0,0)
AddItem(0,10,19,10,0,0,0)
AddItem(0,10,20,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end
function vip4()
AddItem(0,10,21,10,0,0,0)
AddItem(0,10,22,10,0,0,0)
AddItem(0,10,23,10,0,0,0)
AddItem(0,10,24,10,0,0,0)
AddItem(0,10,25,10,0,0,0)
CreateNewSayEx("<npc>NhËn ®­îc Ngùa", tbOpt)
end
function gm_function()
local nCurLevel = GetLevel()
if nCurLevel < 150 then
ST_LevelUp(150 - nCurLevel)
end
SetFightState(0)
SetCamp(6)
SetCurCamp(6)
AddMagic(732, 1)--˲ÒÆ
AddMagic(733, 1)--ÒþÉí
if CalcFreeItemCellCount() >= 1 then
local tbItem = {szName="´«ËÝȨÕÈ", tbProp={6,1,2766,1,0,0}, nBindState=-2}
tbAwardTemplet:GiveAwardByList(tbItem, "gmÕ˺ŸìÈ¡µµ¾ß", 1)
end
end
function level_up_to150()
local nCurLevel = GetLevel()
if nCurLevel >= 150 then
if ST_IsTransLife() == 1 then
Talk(1, "", "Ng­¬i ®· ®¹t cÊp 150 råi.")
else
Talk(1, "", "§i chuyÓn sinh tr­íc ®i råi trë l¹i th¨ng cÊp.")
end
return
end
local nAddLevel = 150 - nCurLevel
ST_LevelUp(nAddLevel)
end
function level_up_to190()
local nCurLevel = GetLevel()
if nCurLevel >= 190 then
if ST_IsTransLife() == 1 then
Talk(1, "", "Ng­¬i ®· ®¹t cÊp 190 råi.")
else
Talk(1, "", "§i chuyÓn sinh tr­íc ®i råi trë l¹i th¨ng cÊp.")
end
return
end
local nAddLevel = 190 - nCurLevel
ST_LevelUp(nAddLevel)
end


function transfer()
if GetLevel() < 190 then
Talk(1, "", "CÊp 190 trë lªn míi ca thÓ chuyÓn sinh.")
return
end
if (GetCash() <= 100000000) then
Talk(1, "", "Ph¶i ca ®ñ 10k v¹n míi ca thÓ chuyÓn sinh.")
return
end
Pay(100000000)
ST_DoTransLife()
end


function check_faction()
local szCurFaction = GetFaction()
if szCurFaction ~= nil and szCurFaction ~= "" then
return
end
return 1
end


function choose_faction()
if check_faction() ~= 1 then
Talk(1, "", "Ng­¬i ®· gia nhËp m«n ph¸i.")
return
end
local nSeries = GetSeries() + 1
local tbOpt = {}
for i=1, getn(%tbFactionSeries[nSeries]) do
local nIndex = %tbFactionSeries[nSeries][i]
tinsert(tbOpt, {%tbFaction[nIndex].szShowName, set_faction, {nIndex}})
end
tinsert(tbOpt, {"Trë vª", dialog_main})
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
CreateNewSayEx("<npc>Mét khi gia nhËp m«n ph¸i kh«ng thÓ thay ®æi, h·y suy nghÜ kü.", tbOpt)
end


function set_faction(nIndex)
local szTitle = format("<npc>X¸c nhËn muèn gia nhËp m«n ph¸i ?<color=yellow>%s<color> m«n ph¸i?", %tbFaction[nIndex].szShowName)
local tbOpt =
{
{"X¸c nhËn!", do_set_faction, {nIndex}},
{"Trë vª.", choose_faction},
{"Kªt thóc ®èi tho¹i."},
}
CreateNewSayEx(szTitle, tbOpt)
end


function do_set_faction(nIndex)
if check_faction() ~= 1 then
Talk(1, "", "Ng­¬i ®· gia nhËp m«n ph¸i.")
return
end
local nResult = SetFaction(%tbFaction[nIndex].szFaction)
if nResult == 0 then
return
end
DynamicExecuteByPlayer(PlayerIndex, "\\script\\gmscript.lua", "AddSkills", %tbFaction[nIndex].nShortFaction, 0)
for i=1, getn(%tbFaction[nIndex].tbSkill) do--90£¬120£¬150¼¶¼¼ÄÜ
AddMagic(%tbFaction[nIndex].tbSkill[i], 20)
end
AddMagic(210, 1)--?»¼¶ÇṦ
Talk(1, "KickOutSelf", format("Ng­¬i ®· gia nhËp thµnh c«ng ph¸i %s", %tbFaction[nIndex].szShowName))
end


function show_faction()
if check_faction() == 1 then
Talk(1, "", "Gia nhËp m«n ph¸i míi ca thÓ nhËn trang bÞ")
return
end
local nFactionId = GetLastFactionNumber() + 1
local tbOpt = {}
local tbSubFaction = %tbFaction[nFactionId].tbEquip
for i=1, getn(tbSubFaction) do
tinsert(tbOpt, {tbSubFaction[i].szFaction, show_equip, {nFactionId, i}})
end
tinsert(tbOpt, {"Trë vª.", dialog_main})
-- tinsert(tbOpt, {"
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
CreateNewSayEx("<npc>Xin mêi lùa chän ph¸i.", tbOpt)
end


function show_equip(nFactionId, nSubFactionId)
local tbEquip = %tbFaction[nFactionId]["tbEquip"][nSubFactionId]
local tbEquipName = tbEquip["tbEquipName"]
local nFirstEquipId = tbEquip["nFirstEquipId"]
local tbOpt = {}
for i=1, getn(tbEquipName) do
tinsert(tbOpt, {tbEquipName[i], get_equip, {i, nFirstEquipId + i - 1}})
end
tinsert(tbOpt, {"Trë vª", show_faction})
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
local szTitle = format("<npc>LÊy ®å %s Kim ¤", tbEquip.szFaction)
CreateNewSayEx(szTitle, tbOpt)
end


function get_equip(nIndex, nEquipId)
local nWidth = %tbEquipFreeCell[nIndex][1]
local nHeigth = %tbEquipFreeCell[nIndex][2]
if CountFreeRoomByWH(nWidth, nHeigth) < 1 then
Talk(1, "", format("CÇn Ut nhÊt 1 c¸i %dx%d tói ®eo l­ng", nWidth, nHeigth))
return
end
AddGoldItem(0, nEquipId)
end


function show_item()
local tbOpt = {}
local nCount = getn(%tbFreeItem)
local szOption = ""
for i=1, nCount-1 do
szOption = format("NhËn %s", %tbFreeItem[i].szName)
tinsert(tbOpt, {szOption, get_item, {i}})
end
szOption = format("NhËn %s", %tbFreeItem[nCount].szName)
tinsert(tbOpt, {szOption, get_single_item, {nCount}})
tinsert(tbOpt, {"NhËn cùc phÈm giíi chØ...", get_normal_item})
tinsert(tbOpt, {"Trë vª.", dialog_main})
tinsert(tbOpt, {"Kªt thóc ®èi tho¹i."})
CreateNewSayEx("<npc>l·o phu n¬i nµy ca h¬i thë nham vËt phÈm nh­ng nhËn lÊy", tbOpt)
end




function get_normal_item()
local tbOpt =
{
{"NhËn 5 viªn KNB.", cszb},
{"H­ng Bang Chi Giíi", xb_jz},
{"TrÊn Nh¹c Chi Giíi", zy_jz},
{"Th­îng Ph­¬ng Chi Giíi", sf_jz},
{"Thiªn Hµ Giíi", sh_jz},
{"§O Hoµng Chi Giíi", dh_jz},
{"Thiªn Tö Chi Giíi", tz_jz},
{"ThO Tóc Toµn Giíi", sz_jz},
{"Cµn Kh«n Giíi ChØ (Cùc phÈm)", jz08},
{"L·nh B¸ Nguyªn Méng Chi Giíi (Míi)", jz08x},
{"Trë vÒ.", dialog_main},
{"Kªt thóc ®èi tho¹i."},
}
CreateNewSayEx("<npc>L·o phu ca mét sè man cùc phÈm, ng­êi cÇn thøc g× ?", tbOpt)
end


function fifong()
local tbOpt =
{
{"Phi phong", phiphong},
{"Ên", an},
{"Trang søc", trangsuc1},
{"Vò liÖt", vuliet},
{"Huynh ®Ö", huynhde},
{"Cè s¬n", coson},
{"D­¬ng thÇn", duongthan},
{"VËt PhÈm Kh¸c", huytinh},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän item", tbOpt)
end
function trangsuc()
local tbOpt =
{
{"Trang søc 1", trangsuc1},
{"Trang søc 2", trangsuc2},
{"Trang søc 3", trangsuc3},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän item", tbOpt)
end
function an23()
local tbOpt =
{
{"Ên 1", an1},
{"Ên 2", an2},
{"Ên 3", an3},
{"Ên 4", an4},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän item", tbOpt)
end


function huytinh()
dotim()
end




function matna()
local tbOpt =
{
{"MÆt n¹ 1", matna1},
{"MÆt n¹ 2", matna2},
{"MÆt n¹ 3", matna3},
{"MÆt n¹ 4", matna4},
{"MÆt n¹ 5", matna5},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän item", tbOpt)
end
function trangthai()
local tbOpt =
{
{"ChÝnh ph¸i", mauvang},
{"Tµ ph¸i", mautim},
{"Trung lËp", mauxanh},
{"S¸t Thñ", maudo},
{"Trë l¹i", dialog_main},
{"Tho¸t"},
}
CreateNewSayEx("<npc>Chän mµu", tbOpt)
end
function mauvang()
SetCurCamp(1)
SetCamp(1)
CreateNewSayEx("<npc>B¹n ®æi mµu PK ChÝnh Ph¸i thµnh c«ng.", tbOpt)
end
function mautim()
SetCurCamp(2)
SetCamp(2)
CreateNewSayEx("<npc>B¹n ®æi mµu PK Tµ Ph¸i thµnh c«ng.", tbOpt)
end
function mauxanh()
SetCurCamp(3)
SetCamp(3)
CreateNewSayEx("<npc>B¹n ®æi mµu PK Trung LËp thµnh c«ng.", tbOpt)
end
function maudo()
SetCurCamp(4)
SetCamp(4)
CreateNewSayEx("<npc>B¹n ®æi mµu PK S¸t Thñ thµnh c«ng.", tbOpt)
end
function an4()
for i=5161,5197 do
AddGoldItem(0, i)
end
end
function an3()
for i=5131,5161 do
AddGoldItem(0, i)
end
end
function an2()
for i=5098,5130 do
AddGoldItem(0, i)
end
end
function coson()
AddGoldItem(0, 4441)
AddGoldItem(0, 4445)
AddGoldItem(0, 4449)
AddGoldItem(0, 4453)
AddGoldItem(0, 4457)
AddGoldItem(0, 4461)
AddGoldItem(0, 4465)
AddGoldItem(0, 4469)
end
function huynhde()
for i=4436,4437 do
AddGoldItem(0, i)
end
for i=4481,4482 do
AddGoldItem(0, i)
end
end
function vuliet()
for i=5208,5212 do
AddGoldItem(0, i)
end
end
function pro1()
for i=430,441 do
AddGoldItem(0, i)
end
end
function dongsat()
for i=494,497 do
AddGoldItem(0, i)
end
for i=378,379 do
AddGoldItem(0, i)
end
end
function duongthan()
for i=514,520 do
AddGoldItem(0, i)
end
end
function phiphong()
for i=3465,3490 do
AddGoldItem(0, i)
end
end
function an()
for i=3205,3234 do
AddGoldItem(0, i)
end
end
function trangsuc1()
for i=3542,3554 do
AddGoldItem(0, i)
end
for i=3491,3506 do
AddGoldItem(0, i)
end
end
function trangsuc2()
for i=5241,5261 do
AddGoldItem(0, i)
end
end
function trangsuc3()
for i=5262,5289 do
AddGoldItem(0, i)
end
end
function cszb()
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
AddEventItem(343)
end
function xb_jz()
AddGoldItem(0, 508)
end
function zy_jz()
AddGoldItem(0, 509)
end
function sf_jz()
AddGoldItem(0, 510)
end
function sh_jz()
AddGoldItem(0, 511)
end
function dh_jz()
AddGoldItem(0, 530)
end
function tz_jz()
AddGoldItem(0, 531)
end
function sz_jz()
AddGoldItem(0, 498)
end
function jz08()
AddGoldItem(0, 3878)
end
function jz08x()
AddGoldItem(0, 3541)
end


function get_item(nIndex)
local nMaxCount = CalcFreeItemCellCount()
g_AskClientNumberEx(0, nMaxCount, "Xin mêi ®­a vµo nhËn lÊy", {get_item_back, {nIndex}})
end


function get_item_back(nIndex, nCount)
if nCount <= 0 then
return
end
if CalcFreeItemCellCount() < nCount then
Talk(1, "", format("CÇn Ut nhÊt <color=yellow>%d<color> tói kh«ng gian...", nCount))
return
end
local szLogTitle = format("[liguan]get_free_item_%s", %tbFreeItem[nIndex].szName)
tbAwardTemplet:GiveAwardByList(%tbFreeItem[nIndex], szLogTitle, nCount)
end


function get_single_item(nIndex)
local tbItem = %tbFreeItem[nIndex]
if CountFreeRoomByWH(tbItem.nWidth, tbItem.nHeigth) < 1 then
Talk(1, "", format("CÇn Ut nhÊt 1 %dx%d µÄ±³°ü¿O¼ä", tbItem.nWidth, tbItem.nHeigth))
return
end
local szLogTitle = format("[liguan]get_free_item_%s", tbItem.szName)
tbAwardTemplet:GiveAwardByList(tbItem, szLogTitle)
end


function clear_attibute_point()
local tbOpt =
{
{"TÈy ®iÓm kü n¨ng", clear_skill},
{"TÈy ®iÓm ti?m n¨ng", clear_prop},
{"Trë v?", dialog_main},
{"KOt thóc ®èi tho¹i."},
}
CreateNewSayEx("<npc>Ng­¬i quyOt u muèn tÈy tñy?", tbOpt)
end


function clear_skill()
local tbOpt =
{
{"X¸c nhËn", do_clear_skill},
{"§Ó ta suy nghÜ l¹i."},
{"Trë v?", clear_attibute_point},
}
CreateNewSayEx("<npc>Ng­¬i vÉn quyOt u muèn tÈy tñy?", tbOpt)
end


function do_clear_skill()
local i = HaveMagic(210) -- ÇṦ¸íÝâ²ï×÷
local j = HaveMagic(400) -- ¡°½ï¸»¼·Æ¶¡±¸íÝâ²ï×÷
local n = RollbackSkill() -- Çå³ý¼¼Äܲ¢·µ»ØËùÓм¼ÄÜ?ã£� �°üµ¨ÇṦµÈÌØÊâ¼¼ÄÜ£?
local x = 0
if (i ~= -1) then i = 1; x = x + i end -- Õ⸽¾äÅжÏÊÇÅųý´Óδѧ¹ýÇ á¹¦µÄÈË·µ»Ø-1´Ó¶øµ¼Ö¢µãÊý¼ÆËã´íÎóÇé¿ö
if (j ~= -1) then x = x + j end
local rollback_point = n - x -- °Ñ¼¼Äܵ㵱×ö¿ÕÏеãÊý·µ»¹£ ¬µ«ÏÈ?Û³ýÇṦµ?
if (rollback_point + GetMagicPoint() < 0) then -- Èç¹ûÏ´³É¸Ë¸ºÊý£¬Ôòµ±×÷0£¨� �ªÒԺ󶵴ÎÏ´µã±£?ô£?
rollback_point = -1 * GetMagicPoint()
end
AddMagicPoint(rollback_point)
if (i ~= -1) then AddMagic(210, i) end -- Èç¹ûѧ¹uÇṦÔ?¼Ó»ØÔ­Óеȼ¶
if (j ~= -1) then AddMagic(400, j) end -- Èç¹ûѧ¹u¡°½ï¸»¼Aƶ¡±Ý¬Ñù´¦ µí
Msg2Player("TÈy tñy thµnh c«ng! Ng­¬i ca "..rollback_point.." ®iÓm kü n¨ng ®Ó ph©n phèi l¹i.")
KickOutSelf()
end


function clear_prop()
local tbOpt =
{
{"X¸c nhËn", do_clear_prop},
{"§Ó ta suy nghÜ l¹i."},
{"Trë v?", clear_attibute_point},
}
CreateNewSayEx("<npc>Ng­¬i vÉn quyOt u muèn tÈy tñy?", tbOpt)
end


function do_clear_prop()
local base_str = {35,20,25,30,20} -- ÎåÐÐÈËÎïµÄÌìÉúÊôÐÔÖµ
local base_dex = {25,35,25,20,15}
local base_vit = {25,20,25,30,25}
local base_eng = {15,25,25,20,40}
local player_series = GetSeries() + 1


local Utask88 = GetTask(88)
AddStrg(base_str[player_series] - GetStrg(1) + GetByte(Utask88, 1)) -- ½«ÒÑ·ÖÅäDZÄÜÖØÖ·£¨task(88)ÊÇÈ ÎÎñÖÐÖ±½Ó½±µøµÄ¸¦¸¿¡¢Éí·¨ µÈ£©
AddDex(base_dex[player_series] - GetDex(1) + GetByte(Utask88, 2))
AddVit(base_vit[player_series] - GetVit(1) + GetByte(Utask88, 3))
AddEng(base_eng[player_series] - GetEng(1) + GetByte(Utask88, 4))
end


function write_info()
tbInputDialog:InputServer()
end

Hahaa. Dài quá. Cám ơn bác nha. Để xem 1 lượt rồi cop vào lễ quan test thử xem. Thằng lễ quan của mình nát bét rồi giờ thay mới hoàn toàn !!!