[JX] mong giúp đỡ
Hello & Welcome to our community. Is this your first visit? Đăng Ký
Follow us on
Follow us on Facebook Follow us on Twitter Linked In Flickr Watch us on YouTube My Space Blogger
 
Kết quả 1 đến 4 của 4

Chủ đề: mong giúp đỡ

  1. #1
    Thành Viên
    Ngày tham gia
    Dec 2008
    Bài viết
    38
    Thanks
    9
    Thanked 1 Time in 1 Post

    Icon9 mong giúp đỡ

    hiện lễ quan mình đang chạy đoạn code này
    Code:
    IncludeLib("SETTING")Include("\\script\\dailogsys\\dailogsay.lua")
    Include("\\script\\lib\\awardtemplet.lua")
    --Include("\\script\\global\\writeaddressdialog.lua")
    Include("\\script\\vng_feature\\top10\\vngtop10.lua")
    
    
    
    
    local tbFaction =
    {
        [1] =
        {
            szShowName = "ThiƠu L©m Ph¸i",
            szFaction = "shaolin",
            nShortFaction = "sl",
            tbSkill = {318, 319, 321, 709, 1055, 1056, 1057},
            tbEquip =
            {
                {
                    szFaction = "Quỷn ThiƠu L©m",
                    nFirstEquipId = 2285,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
                {
                    szFaction = "C«n ThiƠu L©m",
                    nFirstEquipId = 2295,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
                {
                    szFaction = "§ao ThiƠu L©m",
                    nFirstEquipId = 2305,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
            },
        },
        [2] =
        {
            szShowName = "Thiªn v­¬ng bang",
            szFaction = "tianwang",
            nShortFaction = "tw",
            tbSkill = {322, 325, 323, 708, 1058, 1059, 1060},
            tbEquip =
            {
                {
                    szFaction = "Chïy",
                    nFirstEquipId = 2315,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
                {
                    szFaction = "Th­¬ng",
                    nFirstEquipId = 2325,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
                {
                    szFaction = "§ao",
                    nFirstEquipId = 2335,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
            },
        },
        [3] =
        {
            szShowName = "§­êng m«n",
            szFaction = "tangmen",
            nShortFaction = "tm",
            tbSkill = {339, 302, 342, 710, 1069, 1070, 1071},
            tbEquip =
            {
                {
                    szFaction = "Phi §ao",
                    nFirstEquipId = 56,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
                {
                    szFaction = "B¹o Ṿ",
                    nFirstEquipId = 2415,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
                {
                    szFaction = "BÉy",
                    nFirstEquipId = 2425,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
            },
        },
        [4] =
        {
            szShowName = "Ng̣ §éc gi¸o",
            szFaction = "wudu",
            nShortFaction = "wu",
            tbSkill = {353, 355, 711, 1066, 1067},
            tbEquip =
            {
                {
                    szFaction = "Ng̣ §éc Ch­ëng",
                    nFirstEquipId = 2385,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
                {
                    szFaction = "§ao Ng̣ §éc",
                    nFirstEquipId = 2395,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
            },
        },
        [5] =
        {
            szShowName = "Ph¸i Nga Mi",
            szFaction = "emei",
            nShortFaction = "em",
            tbSkill = {380, 328, 712, 1061, 1062, 1114},
            tbEquip =
            {
                {
                    szFaction = "Nga Mi KiƠm",
                    nFirstEquipId = 2345,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
                {
                    szFaction = "Nga Mi Ch­ëng",
                    nFirstEquipId = 2355,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
            },
        },
        [6] =
        {
            szShowName = "Thóy yªn m«n",
            szFaction = "cuiyan",
            nShortFaction = "cy",
            tbSkill = {336, 337, 713, 1063, 1065},
            tbEquip =
            {
                {
                    szFaction = "§ao Thóy yªn",
                    nFirstEquipId = 2365,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
                {
                    szFaction = "Néi Thóy yªn",
                    nFirstEquipId = 2375,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
            },
        },
        [7] =
        {
            szShowName = "C¸i Bang",
            szFaction = "gaibang",
            nShortFaction = "gb",
            tbSkill = {357, 359, 714, 1073, 1074},
            tbEquip =
            {
                {
                    szFaction = "Ch­ëng C¸i Bang",
                    nFirstEquipId = 2435,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
                {
                    szFaction = "C«n C¸i Bang ",
                    nFirstEquipId = 2445,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
            },
        },
        [8] =
        {
            szShowName = "Thiªn nhÉn gi¸o",
            szFaction = "tianren",
            nShortFaction = "tr",
            tbSkill = {361, 362, 715, 1075, 1076},
            tbEquip =
            {
                {
                    szFaction = "Ngo¹i c«ng",
                    nFirstEquipId = 2455,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
                {
                    szFaction = "Néi c«ng",
                    nFirstEquipId = 2465,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
            },
        },
        [9] =
        {
            szShowName = "Ph¸i Vâ §ang",
            szFaction = "wudang",
            nShortFaction = "wd",
            tbSkill = {365, 368, 716, 1078, 1079},
            tbEquip =
            {
                {
                    szFaction = "Vâ §ang KhƯ",
                    nFirstEquipId = 2475,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
                {
                    szFaction = "KiƠm Vâ §ang",
                    nFirstEquipId = 2485,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
            },
        },
        [10] =
        {
            szShowName = "C«n L«n ph¸i",
            szFaction = "kunlun",
            nShortFaction = "kl",
            tbSkill = {372, 375, 717, 1080, 1081},
            tbEquip =
            {
                {
                    szFaction = "§ao C«n L«n",
                    nFirstEquipId = 2495,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­íi",
                    },
                },
                {
                    szFaction = "KiƠm C«n L«n",
                    nFirstEquipId = 2505,
                    tbEquipName =
                    {
                        "D©y chuỷn´", "Năn", "NhÉn trªn", "Bao tay", "§ai l­ng",
                        "B¹ch hæ ¸o", "Ṿ khƯ", "Giµy", "Ngäc béi", "NhÉn d­í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="CÈm nang t¸i t¹o lÔ bao", tbProp={6,1,1781,1,0,0}, tbParam={60}},
        --{szName="§å phæ Hoµng Kim - U Lung MÆc Thï NhuyÔn Lư ", tbProp={6,1,298,1,0,0}},
        {szName="Hép lÖ vËt [qu¶ Huy Hoµng]", 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="Vâ L©m MËt Th­", tbProp={6,1,1477,1,0,0}},
        --{szName="Lùc m¹nh", tbProp={6,1,2517,1,0,0}},
        {szName="H¹t Thiªn TuƠ", tbProp={6,1,30109,1,0,0}},
        {szName="Vßng Hoa Tù Do", tbProp={6,1,30035,1,0,0}},
        {szName="H·n HuyƠt Long C©u", tbProp={0,10,18,1,0,0}, nWidth=2, nHeigth=3},
    }
    
    
    local tbGMAccount = {"administrator", "", "123456", "123456", ""}
    
    
    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 = "HÖ thèng <color=yellow>Bang Héi<color>"
    if (strTongName == nil or strTongName == "") then
        Say(tszTitle,4,"T¹o ®ỉu kiÖn lËp bang/dmcreatetong","Tham gia bang/dmjointong","T¹o bang/dmcreateit","KƠt 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>Thao t¸c thµnh c«ng<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>Thao t¸c thµnh c«ng<color>")
    else
    end
    end
    
    
    function dmcreateit()
        Tong_name,oper = GetTong()
        if (oper == 0) and (GetTask(99) == 1) then
            Say("TiƠp tôc t¹o bang." ,2,"T¹o bang/Direct_CreateTong","Chß mét phó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: KiƠm hiÖp ch­ëng m«n nh©n, xin hái ta ph¶i lµm nh­ thƠ nµo míi ca thÓ khai t«ng lËp ph¸i trë thµnh Bang chñ ®©y?", "KiƠm 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µ tUn vËt ®a lµ Nh¹c V­¬ng KiOm", "Ng­êi ch¬i: Nh¹c V­¬ng KiOm ? Ng­êi nai lµ thanh kiOm nµy µ ? ", "KiOm 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­ t­ëng thµnh lËp chƯnh ®Ưch bang héi, sÏ v× tha nç lùc ®¹i l­îng thêi gian tinh lùc d÷ t©m huyƠt, thiƠt bÊt kh¶ bá vë nöa chơng")
            else
                Talk(6,"", "KiƠm hiÖp ch­ëng m«n nh©n: ng­¬i vÊn thµnh lËp bang héi h÷u ®ỉu kiÖn g×, ta lai chËm r·i ®Ưch gi¶ng cho ng­¬i nghe", "KiƠm hiÖp ch­ëng m«n nh©n: ®Çu tiªn ng­¬i ph¶i ®· xuÊt s­ ®éc lËp míi b­íc ch©n vµo giang hå; thø nh× ng­¬i kh«ng thÓ t¹i bÊt luËn c¸i g× bang héi trung; lÇn thø hai ng­¬i yƠu că nhÊt ®̃nh ®Ưch giang hå danh väng; tèi hËu cña ng­¬i chØ huy lùc bÊt n¨ng nhá 30 cÊp")
            end
        end
    end
    
    
    function create_pay()
        Say("B¹n că ®ñ tỉn ®Ó tiƠp tôc kh«ng?" ,2,"Kh«ng thµnh vÊn ®̉, ta ®· că 100 v¹n l­îng ®©y råi/create_pay_yes","§¾t qu¸, ta kh«ng tr¶ ®©u/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,"", "Kh«ng ®ñ tỉn ®Ó t¹o bang")    end
    end
    
    
    
    
    function Direct_CreateTong()
        CreateTong(1)                -- µ¯³ö½¨°ï¶Ô»°¿̣£¬½áÊø½Å±¾¿ØÖÆ
    end
    
    
    --==========================================================================================
    function menu_opentest()
        Say("Ta lµ ng­êi phô tr¸ch c¸c sù kiÖn quang träng trong n¨m, că viÖc g× cø ®Ơn t×m ta \n HiÖn nay <color=red>Nam Cung NhÊt Thiªn <color> ®ang cho test c¸c chøc n¨ng cña Server, b¹n h·y chän chøc n¨ng cÇn Test.",30,
        "Trang b̃/zitem",
        "NhËn Bé Kim Phong/nhan_kimphong",
        "NhËn Trang b̃ tƯm/dotim",
        --"Mét sè Trang b̃/moreitem",
        "Tỉn ®ång /nhan_td",
        "LÖnh bµi Boss /gm_functionboss",
        "Mµu PK/trangthai",
        "§æi N÷ Thiªn V­¬ng Bang/nukim",    
        "Mét sè vËt phÈm kh¸c/moreitemvay",
        "NhËn ®iÓm/hotro",
        "Trang b̃ hiƠm/trangbihiem",
        --"LËp bang héi/create_pay_yes",
        "Up Level ®Ơn 190/level_up_to190",
        "Chän m«n ph¸i cÇn gia nhËp/choose_faction",
        --"NhËn TƯn vËt Bang héi/dmcreatetong",
        "KƠt thóc ®èi tho¹i/no")
    end
    
    
    ----------------------------------------------------------------------
    function no()
        Talk(1,"","Chóc b¹n vui vÎ, nƠu ph¸t hiÖn ra bug h·y b¸o ngay víi GM ®Ó nhËn th­ëng vµ cïng x©y dùng Server hoµn thiÖn!")
    end
    
    
    function level_up_to190()
        local nCurLevel = GetLevel()
        Earn(1000000)
        if nCurLevel >= 190 then
            if ST_IsTransLife() == 1 then
                Talk(1, "", "Chóc b¹n test vui vÏ")
            else
                Talk(1, "", "Cïng chung tay x©y dùng mét server hoµn thiÖn!")
            end
            return
        end
        local nAddLevel = 190 - nCurLevel
        ST_LevelUp(nAddLevel)
    end
    
    
    function zitem()
    Say("Xin mêi chän trang b̃ cÇn test",4,"Trang b̃ hoµng kim/golditem","Trang B̃ xanh/item","C¸c lo¹i chiƠn m·/horse","KƠt thóc ®èi tho¹i/no")
    end
    
    
    function item()
        Say("Xin mêi chän trang b̃ cÇn test",7,"MÆt N¹/mask","Năn/helm","Bao tay/cuff","D©y L­ng/belt","Giµy/boot","¸o/armor","KƠt thóc ®èi tho¹i/no")    
    end
    
    
    function armor()
        Say("Xin mêi chän trang b̃ cÇn test",6,"¸o hÖ kim/addarmor","¸o hÖ méc/addarmor","¸o hÖ thñy/addarmor","¸o hÖ háa/addarmor","¸o hÖ thæ/addarmor","KƠt thóc ®èi tho¹i/no")
    end
    
    
    function addarmor(n)
        Sex=GetSex()
        if Sex==0 then
            AddItem(0,2,4,10,n,10,10)
            Msg2Player("b¹n nhËn ®­îc mét §­êng Nghª gi¸p!")
        else
            AddItem(0,2,23,10,n,10,10)
            Msg2Player("b¹n nhËn ®­îc mét Cöu VÜ B¹ch Hå trang")
        end    
    end
    
    
    
    
    
    
    function boot()
        Say("Xin mêi chän trang b̃ cÇn test",6,"Giµy hÖ kim/addboot","Giµy hÖ méc/addboot","Giµy hÖ thñy/addboot","Giµy hÖ háa/addboot","Giµy hÖ thæ/addboot","KƠt thóc ®èi tho¹i/no")
    end
    
    
    function addboot(n)
        Sex=GetSex()
        if Sex==0 then
            AddItem(0,5,0,10,n,10,10)
            Msg2Player("b¹n nhËn ®­îc mét Cöu TiƠt X­¬ng VÜ Ngoa!")
        else
            AddItem(0,5,3,10,n,10,10)
            Msg2Player("b¹n nhËn ®­îc mét Phi Phông Ngoa!")
        end    
    end
    
    
    function belt()
        Say("Xin mêi chän trang b̃ cÇn test",6,"D©y L­ng hÖ kim/addbelt","D©y L­ng hÖ méc/addbelt","D©y L­ng hÖ thñy/addbelt","D©y L­ng hÖ háa/addbelt","D©y L­ng hÖ thæ/addbelt","KƠt thóc ®èi tho¹i/no")
    end
    
    
    function addbelt(n)
        Sex=GetSex()
        AddItem(0,6,0,10,n,10,10)
        Msg2Player("b¹n nhËn ®­îc mét D©y L­ng!!")
    end
    
    
    
    
    function cuff()
        Say("Xin mêi chän trang b̃ cÇn test",6,"Bao tay hÖ kim/addcuff","Bao tay hÖ méc/addcuff","Bao tay hÖ thñy/addcuff","Bao tay hÖ háa/addcuff","Bao tay hÖ thæ/addcuff","KƠt thóc ®èi tho¹i/no")
    end
    
    
    function addcuff(n)
        Sex=GetSex()
        if Sex==0 then
            AddItem(0,8,1,10,n,10,10)
            Msg2Player("b¹n nhËn ®­îc mét bao tay!")
        else
            AddItem(0,8,0,10,n,10,10)
            Msg2Player("b¹n nhËn ®­îc mét bao tay!")
        end    
    end
    
    
    function mask()
        i=random(209,217)
        AddItem(0,11,i,0,0,0,0)
        Msg2Player("b¹n nhËn ®­îc mét mÆt n¹!")
    end
    
    
    function helm()
        Say("Xin mêi chän trang b̃ cÇn test",6,"Năn hÖ kim/addhelm","Năn hÖ méc/addhelm","Năn hÖ thñy/addhelm","Năn hÖ háa/addhelm","Năn hÖ thæ/addhelm","KƠt thóc ®èi tho¹i/no")
    end
    
    
    function addhelm(n)
        Sex=GetSex()
        if Sex==0 then
            AddItem(0,7,2,10,n,10,10)
        else
            AddItem(0,7,10,10,n,10,10)
        end    
    end
    
    
    
    
    
    
    
    
    function horse()
        Say("Xin mêi chän trang b̃ cÇn test",7,"¤ V©n §¹p TuyƠt/addhorse","XƯch Thè/addhorse","TuyÖt ¶nh/addhorse","§Ưch L«/addhorse","ChiƠu D¹ Ngäc S­ Tö/addhorse","B«n Tiªu/addhorse","KƠt thóc ®èi tho¹i/no")
    end
    
    
    function addhorse(n)
        if n == 0 then
            Msg2Player("B¹n nhËn ®­îc ¤ V©n §¹p TuyƠt!")
            AddItem(0,10,5,1,0,0)
        elseif n == 1 then
            AddItem(0,10,5,2,0,0)
            Msg2Player("B¹n nhËn ®­îc XƯch Thè!")
        elseif n == 2 then
            AddItem(0,10,5,3,0,0)
            Msg2Player("B¹n nhËn ®­îc TuyÖt ¶nh")
        elseif n == 3 then
            AddItem(0,10,5,4,0,0)
            Msg2Player("B¹n nhËn ®­îc §Ưch L«")
        elseif n == 4 then
            AddItem(0,10,5,5,0,0)
            Msg2Player("B¹n nhËn ®­îc ChiƠu D¹ Ngäc S­ Tö")
        elseif n == 5 then    
            AddItem(0,10,6,1,0,0)
            Msg2Player("B¹n nhËn ®­îc B«n Tiªu")
        end
    end
    
    
    function golditem()
        Say("Xin mêi chän trang b̃ cÇn test",6,"Ṿ khƯ hoµng kim m«n ph¸i/addgold","Trang b̃ an bang/addgold","Trang b̃ nhu t×nh/addgold","Trang b̃ ®̃nh quèc/addgold","Trang b̃ Hång ¶nh/addgold","KƠt thóc ®èi tho¹i/no")
    end
    
    
    function addgold(n)
        if n==0 then 
            player_Faction = GetFaction()
            if (player_Faction == "emei") then
                AddGoldItem(0,31)
                AddGoldItem(0,39)
                AddGoldItem(0,40)
                AddGoldItem(0,42)
                Msg2Player("NhËn ®­îc ṿ khƯ Hoµng Kim M«n Ph¸i Nga My")
            elseif (player_Faction == "cuiyan") then
                AddGoldItem(0,46)
                AddGoldItem(0,51)
                Msg2Player("NhËn ®­îc ṿ khƯ Hoµng Kim M«n Ph¸i Thóy Yªn")
            elseif (player_Faction == "tangmen") then
                AddGoldItem(0,71)
                AddGoldItem(0,76)
                AddGoldItem(0,87)
                AddGoldItem(0,81)
                Msg2Player("NhËn ®­îc ṿ khƯ Hoµng Kim M«n Ph¸i §­êng M«n")
            elseif (player_Faction == "wudu") then
                AddGoldItem(0,60)
                AddGoldItem(0,61)
                AddGoldItem(0,67)
                Msg2Player("NhËn ®­îc ṿ khƯ Hoµng Kim M«n Ph¸i Ng̣ §éc")
            elseif (player_Faction == "tianwang") then
                AddGoldItem(0,16)
                AddGoldItem(0,21)
                AddGoldItem(0,26)
                Msg2Player("NhËn ®­îc ṿ khƯ Hoµng Kim M«n Ph¸i")
            elseif (player_Faction == "shaolin") then
                AddGoldItem(0,2)
                AddGoldItem(0,6)
                AddGoldItem(0,11)
                Msg2Player("NhËn ®­îc ṿ khƯ Hoµng Kim M«n Ph¸i")
            elseif (player_Faction == "wudang") then
                AddGoldItem(0,119)
                AddGoldItem(0,121)
                AddGoldItem(0,116)
                Msg2Player("NhËn ®­îc ṿ khƯ Hoµng Kim M«n Ph¸i")
            elseif (player_Faction == "kunlun") then
                AddGoldItem(0,126)
                AddGoldItem(0,132)
                AddGoldItem(0,136)
                Msg2Player("NhËn ®­îc ṿ khƯ Hoµng Kim M«n Ph¸i")
            elseif (player_Faction == "tianren") then
                AddGoldItem(0,101)
                AddGoldItem(0,107)
                AddGoldItem(0,115)
                Msg2Player("NhËn ®­îc ṿ khƯ Hoµng Kim M«n Ph¸i Thiªn NhÉn")
            elseif (player_Faction == "gaibang") then
                AddGoldItem(0,94)
                AddGoldItem(0,96)
                Msg2Player("NhËn ®­îc ṿ khƯ Hoµng Kim M«n Ph¸i C¸i Bang")
            else
                Talk(1,"","b¹n cÇn gia nhËp m«n ph¸i míi că thÓ sö dông chøc n¨ng nµy!")
            end
        elseif n==1 then 
            AddGoldItem(0,164)
            AddGoldItem(0,165)
            AddGoldItem(0,166)
            AddGoldItem(0,167)
            Msg2Player("NhËn ®­îc Trang B̃ An Bang!")
        elseif n==2 then 
            AddGoldItem(0,190)
            AddGoldItem(0,191)
            AddGoldItem(0,192)
            AddGoldItem(0,193)
            Msg2Player("NhËn ®­îc Trang B̃ Nhu T×nh")
        elseif n==3 then 
            AddGoldItem(0,159)
            AddGoldItem(0,160)
            AddGoldItem(0,161)
            AddGoldItem(0,162)
            AddGoldItem(0,163)
            Msg2Player("NhËn ®­îc Trang B̃ §̃nh quèc!")
        elseif n==4 then 
            AddGoldItem(0,204)
            AddGoldItem(0,205)
            AddGoldItem(0,206)
            AddGoldItem(0,207)
            Msg2Player("NhËn ®­îc Trang B̃ Hång ¶nh!")
        end
    end
    function goipet()
     PARTNER_SetCallOutSwitch(1)  --cái này t?m h?u là d? th?c thi du?c hàm CallOutCurParner ? du?i là fai d? 1 , 0: là xóa pet.
     local partneridex = PARTNER_AddFightPartner(3,3,4,5,5,5,5,5,5) --dây là lo?i pet ḿnh chua t́m h?u k? m?i coi so so ai mún h?u k? hon cú vào partner folder mà t́m h?u.
      PARTNER_CallOutCurPartner(1) --hàm g?i pet. 1: g?i , 0 : là ko th́ fai
    end
    ---------------------------------------------------------------------------------
    function xoapet()
     PARTNER_SetCallOutSwitch(0)  --cái này t?m h?u là d? th?c thi du?c hàm CallOutCurParner ? du?i là fai d? 1 , 0: là xóa pet.
     local partneridex = PARTNER_AddFightPartner(3,3,4,5,5,5,5,5,5) --dây là lo?i pet ḿnh chua t́m h?u k? m?i coi so so ai mún h?u k? hon cú vào partner folder mà t́m h?u.
      PARTNER_CallOutCurPartner(0) --hàm g?i pet. 1: g?i , 0 : là ko th́ fai
    end
    ---------------------------------
    function Hoasonskill()
    for i=5290,5299 do
    AddGoldItem(0,i)
    AddMagic(1384,15)
    AddMagic(1380,15)
    end
    end
    
    
    ---------------------------
    function dialog_main()
        local szTitle = "<npc>LÔ quan"
        local tbOpt =
        {
             {"Menu chøc n¨ng Thö NghiÖm", menu_opentest},
             {"NhËn LB Admin", lbadmin},
             {"n©ng cÊp b¹ch kim", wantt_upgoldeq},
            {"Qu¶n lư Top", tbTop10.MainDialog, {tbTop10}},    
            -- {"Test Skill Hoa S¬n", Hoasonskill},    
            -- {"Xoa Pet", xoapet},                 
             --{"NhËn §̉n Bï - Hç Trî Trang B̃ Hoµng Kim", tbHotroTrangBiHK2014.GetAward},        
            -- {"NhËn trao gi¶i sù kiÖn §ua Top", tbTraoGiaiTop10.GetAward},        
             --{"NhËn trao gi¶i sù kiÖn §ua Top (M«n Ph¸i)", tbTraoGiaiTop10_MonPhai.GetAward},        
            -- {"NhËn Hç Trî §iÓm Kinh NghiÖm", tbHoTroExp.GetAward},        
            --{"NhËn Hç Trî T©n Thñ ", tbHoTroTanThuThang5.GetAward},        
            --{"NhËn Hç Trî §¹i BCH", tbHoTroTanDenBuDaiBCH.GetAward},
            {"T«i muèn kiÓm tra hÖ thèng Bang Héi", dmcreattongtest},
    --        {"T«i muèn th»ng cÊp lªn 190", level_up_to190},
            {"T«i muèn trïng sinh", transfer},
    --        {"T«i muèn chän m«n ph¸i cïng kÜ n¨ng n¨ng 150", choose_faction},
    --        {"T«i muèn nhËn trang b̃ B¹ch Hæ", show_faction},
            {"T«i muèn mét sè vËt phÈm", show_item},
            {"T«i muèn tÈy tñy", clear_attibute_point},    
            {"Hñy vËt phÈm", DisposeItem},        
            {"KƠt thóc ®èi tho¹i"},
        }
        local szAccount = GetAccount()
        for i=1, getn(%tbGMAccount) do
            if szAccount == %tbGMAccount[i] then
                tinsert(tbOpt, 1, {"ChuyÓn thµnh tµi kho¶n GM", gm_function})
                --tinsert(tbOpt, 1, {"NhËn lÖnh bµi BOSS", gm_functionboss})
                --tinsert(tbOpt, 1, {"T«i muèn th»ng cÊp lªn 190", level_up_to190})
                --tinsert(tbOpt, 1, {"T«i muèn nhËn trang b̃", show_item})
                --tinsert(tbOpt, 1, {"T«i muèn nhËn trang b̃ B¹ch Hæ", show_faction})
                --tinsert(tbOpt, 1, {"T«i muèn tÈy tñy", clear_attibute_point})
                break
            end
        end
        CreateNewSayEx(szTitle, tbOpt)
    end
    
    
    function wantt_upgoldeq()
    GiveItemUI("N©ng CÊp Trang B̃ HKMP "," Thµnh Trang b̃ B¹ch Kim", "doo_upgoldeq_process",1);
    end
    function doo_upgoldeq_process()
    UpgradePlatinaFromGoldItem(GetGiveItemUnit(1)) --> hàm up t? trang b? HKMP thành BK
    for i = 1,10 do -->> nâng c?p th́ trang b? HKMP thành BK s? t? lên +10 , n?u ai k thích mu?n +7 +8 th́ d?i cái s? 10 thành 7 ho?c 8
    UpgradePlatinaItem(GetGiveItemUnit(1)) ---> dây là hàm up trang b? bk lên +10
    end
    end
    
    
    function gm_functionboss()
        for i =1,10 do
            AddItem(6,1,1022,0,0,0)
        end
    end
    
    
    function lbadmin()
    local index = AddItem(6,1,4633,0,0,0,0)
    SetItemBindState(index,-2)
    Msg2Player("B¹n nhËn ®­îc LÖnh Bµi ADMIN.")
    end
    
    
    function wantt_upgoldeq()
    GiveItemUI("N©ng CÊp Trang B̃ HKMP "," Thµnh Trang b̃ B¹ch Kim", "doo_upgoldeq_process",1);
    end
    function doo_upgoldeq_process()
    UpgradePlatinaFromGoldItem(GetGiveItemUnit(1)) --> hàm up t? trang b? HKMP thành BK
    for i = 1,10 do -->> nâng c?p th́ trang b? HKMP thành BK s? t? lên +10 , n?u ai k thích mu?n +7 +8 th́ d?i cái s? 10 thành 7 ho?c 8
    UpgradePlatinaItem(GetGiveItemUnit(1)) ---> dây là hàm up trang b? bk lên +10
    end
    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, "", "B¹n ®· gia nhËp m«n ph¸i rå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ë l¹i trang tr­íc ®ă", dialog_main})
        tinsert(tbOpt, {"KƠt thóc ®èi tho¹i"})
        CreateNewSayEx("<npc>Kh«ng thÓ thay ®æi m«n ph¸i khi ®· gia nhËp, b¹n h·y suy nghÜ kÜ cµng", tbOpt)
    end
    
    
    function set_faction(nIndex)
        local szTitle = format("<npc>X¸c nh¹n muèn gia nhËp <color=yellow>%s<color> ?", %tbFaction[nIndex].szShowName)
        local tbOpt =
        {
            {"X¸c nhËn", do_set_faction, {nIndex}},
            {"Trë l¹i trang tr­íc ®ă", choose_faction},
            {"Ta cÇn suy nghÜ thªm"},
        }
        CreateNewSayEx(szTitle, tbOpt)
    end
    
    
    function do_set_faction(nIndex)
        if check_faction() ~= 1 then
            Talk(1, "", "B¹n ®· gia nhËp m«n ph¸i rå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("Gia nhËp m«n ph¸i %s", %tbFaction[nIndex].szShowName))
    end
    
    
    function show_faction()
        if check_faction() == 1 then
            Talk(1, "", "Ph¶i gia nhËp m«n ph¸i míi că 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ë l¹i trang tr­íc ®ă", dialog_main})
    --    tinsert(tbOpt, {" áÊø¶Ô»?})
        tinsert(tbOpt, {"KƠt thóc ®èi tho¹i"})
        CreateNewSayEx("<npc>Xin mêi lùa chän m«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ë l¹i trang tr­íc ®ă", show_faction})
        tinsert(tbOpt, {"KƠt thóc ®èi tho¹i"})
        local szTitle = format("<npc>LÊy ®å %s B¹ch Hæ", 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 Ưt 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 că h¬i thë nhăm 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},
            {"§Ơ Hoµng Chi Giíi", dh_jz},
            {"Thiªn Tö Chi Giíi", tz_jz},
            {"ThƠ 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 că mét sè măn 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, 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, 428)
    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 Ưt 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 Ưt nhÊt 1 %d .....", 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 t×m n¨ng", clear_prop},
            {"Trë l¹i trang tr­íc ®ă", dialog_main},
            {"KƠt thóc ®èi tho¹i"},
        }
        CreateNewSayEx("<npc>Ng­¬i quyƠt ư muèn tÈy tñy?", tbOpt)
    end
    
    
    function clear_skill()
        local tbOpt =
        {
            {"X¸c nhËn", do_clear_skill},
            {"§Ó ta suy nghÜ thªm"},
            {"Trë l¹i trang tr­íc ®ă", clear_attibute_point},
        }
        CreateNewSayEx("<npc>B¹n că quyƠt ®̃nh tÈy tñy kh«ng?", 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            -- Èç¹ûѧ¹ưÇṦỘ¼Ó»ØÔ­ÓĐµÈ¼¶
        if (j ~= -1) then AddMagic(400, j) end            -- Èç¹ûѧ¹ư¡°½Ù¸»¼Ăƶ¡±Í¬Ñù´¦Àí
        Msg2Player("TÈy tñy thµnh c«ng! Ng­¬i că "..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Ü thªm"},
            {"Trë l¹i trang tr­íc ®ă", clear_attibute_point},
        }
        CreateNewSayEx("<npc>B¹n că quyƠt ®̃nh tÈy ®iÓm t×m n¨ng kh«ng?", 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
    
    
    function nhan_td()
        AddStackItem(100,4,417,1,1,0,0,0)
    end
    function nhan_kimphong()
            AddGoldItem(0,177)
            AddGoldItem(0,178)
            AddGoldItem(0,179)
            AddGoldItem(0,180)
            AddGoldItem(0,181)
            AddGoldItem(0,182)
            AddGoldItem(0,183)
            AddGoldItem(0,184)
            AddGoldItem(0,185)
            Msg2Player("B¹n nhËn ®­îc Bé Kim Phong!")    
    end
    
    
    function dotim()    
    local tab_Content = {
            "Ṿ KhƯ/weapon",
            "Y Phôc/shirt",
            "§Ønh M¹o/hat",
            "Hæ UyÓn/glove",
            "Yªu §¸i/belt",
            "Hµi Tö/shoe",
            "KƠt thóc ®èi tho¹i."
        }
        Say(" Muèn lÊy thªm c¸i g× nµo ? ", getn(tab_Content), tab_Content);
    end;
    
    
    
    
    function weapon()
        local tab_Content = {
            "KiƠm/kiem",
            "§ao/dao",
            "Bæng/bong",
            "Th­¬ng/kick",
            "Chïy/chuy",
            "Song §ao/songdao",
            "Phi Tiªu/phitieu",
            "Phi §ao/phidao",
            "Tô TiÔn/tutien",
            "KƠt thóc ®èi tho¹i."
        }
        Say(" Muèn lÊy thªm c¸i g× nµo ? ", getn(tab_Content), tab_Content);
    end;
    
    
    
    
    function kiem()
            AddQualityItem(2,0,0,0,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,0,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,0,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,0,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,0,10,4,0,-1,-1,-1,-1,-1,-1)    
    end
    
    
    
    
    function dao()
            AddQualityItem(2,0,0,1,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,1,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,1,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,1,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,1,10,4,0,-1,-1,-1,-1,-1,-1)    
    end
    
    
    
    
    function bong()
            AddQualityItem(2,0,0,2,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,2,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,2,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,2,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,2,10,4,0,-1,-1,-1,-1,-1,-1)    
    end
    
    
    
    
    function kick()
            AddQualityItem(2,0,0,3,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,3,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,3,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,3,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,3,10,4,0,-1,-1,-1,-1,-1,-1)    
    end
    
    
    
    
    function chuy()
            AddQualityItem(2,0,0,4,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,4,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,4,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,4,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,4,10,4,0,-1,-1,-1,-1,-1,-1)    
    end
    
    
    
    
    function songdao()
            AddQualityItem(2,0,0,5,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,5,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,5,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,5,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,0,5,10,4,0,-1,-1,-1,-1,-1,-1)    
    end
    
    
    
    
    function phitieu()
            AddQualityItem(2,0,1,0,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,1,0,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,1,0,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,1,0,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,1,0,10,4,0,-1,-1,-1,-1,-1,-1)    
    end
    
    
    
    
    function phidao()
            AddQualityItem(2,0,1,1,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,1,1,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,1,1,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,1,1,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,1,1,10,4,0,-1,-1,-1,-1,-1,-1)    
    end
    
    
    
    
    function tutien()
            AddQualityItem(2,0,1,2,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,1,2,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,1,2,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,1,2,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,1,2,10,4,0,-1,-1,-1,-1,-1,-1)    
    end
    
    
    
    
    function shirt()
        local tab_Content = {
            "ThÊt B¶o Cµ Sa/aothieulam",
            "Ch©n Ṿ Th¸nh Y/aovodang",
            "Thiªn NhÉn MËt Trang/aothiennhan",
            "Gi¸ng Sa Bµo/sabao",
            "§­êng Nghª Gi¸p/dng",
            "V¹n L­u Quy T«ng Y/aocaibang",
            "Tuỷn Long Bµo/longbao",
            "Long Tiªu §¹o Y/daoy",
            "Cöu VÜ B¹ch Hå Trang/hotrang",
            "TrÇm H­¬ng Sam/huongsam",
            "TƯch L̃ch Kim Phông Gi¸p/kimphung",
            "V¹n Chóng T̉ T©m Y/tamy",
            "L­u Tiªn QuÇn/tienquan",
            "KƠt thóc ®èi tho¹i."
        }
        Say(" Muèn lÊy thªm c¸i g× nµo ? ", getn(tab_Content), tab_Content);
    end;
    
    
    
    
    function aothieulam()
            AddQualityItem(2,0,2,0,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,0,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,0,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,0,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,0,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function aovodang()
            AddQualityItem(2,0,2,1,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,1,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,1,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,1,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,1,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function aothiennhan()
            AddQualityItem(2,0,2,2,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,2,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,2,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,2,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,2,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function sabao()
            AddQualityItem(2,0,2,3,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,3,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,3,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,3,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,3,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function dng()
            AddQualityItem(2,0,2,4,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,4,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,4,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,4,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,4,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function aocaibang()
            AddQualityItem(2,0,2,5,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,5,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,5,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,5,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,5,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function longbao()
            AddQualityItem(2,0,2,6,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,6,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,6,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,6,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,6,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function daoy()
            AddQualityItem(2,0,2,8,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,8,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,8,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,8,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,8,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function hotrang()
            AddQualityItem(2,0,2,9,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,9,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,9,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,9,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,9,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function huongsam()
            AddQualityItem(2,0,2,10,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,10,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,10,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,10,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,10,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function kimphung()
            AddQualityItem(2,0,2,11,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,11,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,11,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,11,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,11,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function tamy()
            AddQualityItem(2,0,2,12,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,12,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,12,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,12,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,12,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function tienquan()
            AddQualityItem(2,0,2,13,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,13,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,13,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,13,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,2,13,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function hat()
        local tab_Content = {
            "Tú L« M·o/lomao",
            "Ng̣ L·o Qu¸n/laoquan",
            "Tu La Ph¸t KƠt/phatket",
            "Th«ng Thiªn Ph¸t Qu¸n/phatquan",
            "YÓm NhËt Kh«i/nhatkhoi",
            "TrƯch Tinh Hoµn/tinhhoan",
            "¤ Tµm M·o/tammao",
            "Quan ¢m Ph¸t Qu¸n/quanam",
            "¢m D­¬ng V« Cùc Qu¸n/amduong",
            "Huỷn Tª DiÖn Tr¸o/dientrao",
            "Long HuyƠt §Çu Hoµn/longhuyet",
            "Long L©n Kh«i/lankhoi",
            "Thanh Tinh Thoa/tinhthoa",
            "Kim Phông TriÓn SƯ/triensi",
            "KƠt thóc ®èi tho¹i."
        }
        Say(" Muèn lÊy thªm c¸i g× nµo ? ", getn(tab_Content), tab_Content);
    end;
    
    
    
    
    function lomao()
            AddQualityItem(2,0,7,0,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,0,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,0,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,0,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,0,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function laoquan()
            AddQualityItem(2,0,7,1,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,1,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,1,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,1,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,1,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function phatket()
            AddQualityItem(2,0,7,2,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,2,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,2,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,2,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,2,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function phatquan()
            AddQualityItem(2,0,7,3,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,3,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,3,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,3,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,3,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function nhatkhoi()
            AddQualityItem(2,0,7,4,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,4,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,4,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,4,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,4,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function tinhhoan()
            AddQualityItem(2,0,7,5,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,5,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,5,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,5,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,5,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function tammao()
            AddQualityItem(2,0,7,6,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,6,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,6,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,6,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,6,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function quanam()
            AddQualityItem(2,0,7,7,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,7,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,7,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,7,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,7,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function amduong()
            AddQualityItem(2,0,7,8,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,8,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,8,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,8,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,8,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function dientrao()
            AddQualityItem(2,0,7,9,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,9,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,9,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,9,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,9,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function longhuyet()
            AddQualityItem(2,0,7,10,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,10,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,10,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,10,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,10,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function lankhoi()
            AddQualityItem(2,0,7,11,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,11,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,11,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,11,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,11,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function tinhthoa()
            AddQualityItem(2,0,7,12,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,12,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,12,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,12,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,12,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function triensi()
            AddQualityItem(2,0,7,13,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,13,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,13,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,13,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,7,13,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function glove()
        local tab_Content = {
            "Long Phông HuyƠt Ngäc Tr¹c/ngoctrac",
            "Thiªn Tµm Hé UyÓn/houyen",
            "KƠt thóc ®èi tho¹i."
        }
        Say(" Muèn lÊy thªm c¸i g× nµo ? ", getn(tab_Content), tab_Content);
    end;
    
    
    
    
    function ngoctrac()
            AddQualityItem(2,0,8,0,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,8,0,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,8,0,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,8,0,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,8,0,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function houyen()
            AddQualityItem(2,0,8,1,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,8,1,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,8,1,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,8,1,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,8,1,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function belt()
        local tab_Content = {
            "Thiªn Tµm Yªu §¸i/thientamyeu",
            "B¹ch Kim Yªu §¸i/bachkim",
            "KƠt thóc ®èi tho¹i."
        }
        Say(" Muèn lÊy thªm c¸i g× nµo ? ", getn(tab_Content), tab_Content);
    end;
    
    
    
    
    function thientamyeu()
            AddQualityItem(2,0,6,0,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,6,0,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,6,0,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,6,0,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,6,0,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function bachkim()
            AddQualityItem(2,0,6,1,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,6,1,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,6,1,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,6,1,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,6,1,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function shoe()
        local tab_Content = {
            "Cöu TiƠt X­¬ng VÜ Ngoa/cuutien",
            "Thiªn Tµm Ngoa/thientam",
            "Kim Ḷ Hµi/kimlu",
            "Phi Phông Ngoa/phiphung",
            "KƠt thóc ®èi tho¹i."
        }
        Say(" Muèn lÊy thªm c¸i g× nµo ? ", getn(tab_Content), tab_Content);
    end;
    
    
    
    
    function cuutien()
            AddQualityItem(2,0,5,0,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,0,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,0,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,0,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,0,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function thientam()
            AddQualityItem(2,0,5,1,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,1,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,1,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,1,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,1,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function kimlu()
            AddQualityItem(2,0,5,2,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,2,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,2,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,2,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,2,10,4,0,-1,-1,-1,-1,-1,-1)
    end
    
    
    
    
    function phiphung()
            AddQualityItem(2,0,5,3,10,0,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,3,10,1,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,3,10,2,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,3,10,3,0,-1,-1,-1,-1,-1,-1)
            AddQualityItem(2,0,5,3,10,4,0,-1,-1,-1,-1,-1,-1)
    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 nukim()
    if GetSex() == 1 then
    SetSeries(0)
    KickOutSelf()
        else
        Talk(1,"","Ng­¬i lµ gay µ ?")
    end
    end
    function moreitemvay()
        local tab_Content = {
            " LÊy 100 tỉn ®ång /tiendong",
            " LÊy VK HKMP /bachkim",
            " LÊy 1000v l­îng /tienvan",
            " Th«i kh«ng lÊy g× n÷a "
        }
        Say(" Muèn lÊy thªm c¸i g× nµo ? ", getn(tab_Content), tab_Content);
    end;
    
    
    function tienvan()
        Earn(10000000)    
    end;
    
    
    function tiendong()
        
        AddStackItem(100,4,417,1,1,0,0,0)    -- nhan 100 tien dong
    
    
    
    
    
    
    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 hotro()
        local tbOpt =
        {
            {"T¨ng kinh nghiÖm", kn},
            {"Tỉn", tien},
            {"Danh väng,Phóc duyªn", danhvongphucduyen},
            {"Tµi l·nh ®¹o", lanhdao},
            {"§iÓm Kü N¨ng", pointkynang},
            {"§iÓm Tỉm N¨ng", pointtiemnang},
            {"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(100000)
        CreateNewSayEx("<npc>B¹n nhËn ®­îc 100000 ®iÓm tỉ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 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 trangbihiem()
        local tbOpt =
        {
            --{"Phi phong", phiphong},
            --    {"Ên", an},
            --{"Trang søc", trangsuc},
            {"Trang b̃ §éng S¸t", dongsat},
            {"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 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 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 dongsat()
    for i=494,497 do
    AddGoldItem(0, i)
    end
    for i=378,379 do
    AddGoldItem(0, i)
    end
    end    
    --------------------------------------------
    function moreitem()
        local tab_Content = {
            "Set Hoµng Kim M«n Ph¸i /sethkmp",
            "Set XƯch L©n /setxl",
            --"MÆt N¹ GM /matnagm",
            "Set Minh Ph­îng /setmp",
            --"Set Song Long /setsonglo",
            "Phi Phong /phip",
            ---"Trang Søc /trangs",
            "Kim Ên /kiman",
            "Trang søc/tongh",
            "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 kiman()
            AddGoldItem(0,3214)
            AddGoldItem(0,3224)
            AddGoldItem(0,3234)
    end
    
    
    function tongh()
            AddGoldItem(0,3506)
            AddGoldItem(0,3530)
            AddGoldItem(0,3541)
            AddGoldItem(0,3880)
            AddGoldItem(0,3881)
            AddGoldItem(0,3882)
            AddGoldItem(0,3883)
            AddGoldItem(0,3884)
            AddGoldItem(0,3885)
            AddGoldItem(0,3886)
            AddGoldItem(0,3887)
            AddGoldItem(0,3888)
    end
    
    
    function phip()
            AddGoldItem(0,3466)
            AddGoldItem(0,3467)
            AddGoldItem(0,3468)
            AddGoldItem(0,3469)
            AddGoldItem(0,3470)
            AddGoldItem(0,3471)
            AddGoldItem(0,3472)
            AddGoldItem(0,3473)
            AddGoldItem(0,3474)
            AddGoldItem(0,3475)
            AddGoldItem(0,3476)
            AddGoldItem(0,3477)
            AddGoldItem(0,3478)
            AddGoldItem(0,3479)
            AddGoldItem(0,3480)
            AddGoldItem(0,3481)
            AddGoldItem(0,3482)
            AddGoldItem(0,3483)
            AddGoldItem(0,3484)
            AddGoldItem(0,3485)
            AddGoldItem(0,3486)
            AddGoldItem(0,3487)
            AddGoldItem(0,3488)
            AddGoldItem(0,3489)
            AddGoldItem(0,3490)
    end
    
    
    function trangs()
            AddGoldItem(0,3507)
            AddGoldItem(0,3508)
            AddGoldItem(0,3509)
            AddGoldItem(0,3510)
            AddGoldItem(0,3511)
            AddGoldItem(0,3512)
            AddGoldItem(0,3513)
            AddGoldItem(0,3514)
            AddGoldItem(0,3515)
            AddGoldItem(0,3516)
            AddGoldItem(0,3517)
            AddGoldItem(0,3518)
            AddGoldItem(0,3519)
            AddGoldItem(0,3520)
    end
    
    
    function matnagm()
    --AddItem(0,11,2,1,0,10,10,10,10,10,10,10,gio,day,month,nam)
    AddItem(0,11,0,367,0,10,10,10,10,10,10,10,gio,day,month,nam)
    AddItem(0,11,0,368,0,10,10,10,10,10,10,10,gio,day,month,nam)
    end
    
    
    function setsonglo()
        local tab_Content = {
            "Rêi khái/no",
            "ThiƠu L©m quỷn/#setsonglo1(1)",
            "ThiƠu L©m c«n/#setsonglo1(2)",
            "ThiƠu L©m ®ao/#setsonglo1(3)",
            "Thiªn V­¬ng chïy/#setsonglo1(4)",
            "Thiªn V­¬ng th­¬ng/#setsonglo1(5)",
            "Thiªn V­¬ng ®ao/#setsonglo1(6)",
            "Nga My kiƠm/#setsonglo1(7)",
            "Nga My ch­ëng/#setsonglo1(8)",
            "Nga My buff/#setsonglo1(9)",
            "Thóy Yªn ®ao/#setsonglo1(10)",
            "Thóy Yªn song ®ao/#setsonglo1(11)",
            "Ng̣ §éc ch­ëng/#setsonglo1(12)",
            "Ng̣ §éc ®ao/#setsonglo1(13)",
            "Ng̣ §éc bïa/#setsonglo1(14)",
            "Trang sau/setsonglo2",
            
        }
        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 setsonglo2()
        local tab_Content = {
            "Rêi khái/no",
            "§­êng M«n phi ®ao/#setsonglo1(15)",
            "§­êng M«n tô tiÔn/#setsonglo1(16)",
            "§­êng M«n phi tiªu/#setsonglo1(17)",
            "§­êng M«n bÉy/#setsonglo1(18)",
            "C¸i Bang rång/#setsonglo1(19)",
            "C¸i Bang bæng/#setsonglo1(20)",
            "Thiªn NhÉn kƯch/#setsonglo1(21)",
            "Thiªn NhÉn ®ao/#setsonglo1(22)",
            "Thiªn NhÉn bïa/#setsonglo1(23)",
            "Vâ §ang khƯ /#setsonglo1(24)",
            "Vâ §ang kiƠm/#setsonglo1(25)",
            "C«n L«n ®ao/#setsonglo1(26)",
            "C«n L«n kiƠm/#setsonglo1(27)",
            "C«n L«n bïa/#setsonglo1(28)",
        }
        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 setsonglo1(nId)
    for i=2975,2985 do AddGoldItem(0,10*nId+i-10) end
    end
    
    
    
    
    function sethkmp()
        local tab_Content = {
            "Rêi khái/no",
            "ThiƠu L©m quỷn/#sethkmp1(1)",
            "ThiƠu L©m c«n/#sethkmp1(2)",
            "ThiƠu L©m ®ao/#sethkmp1(3)",
            "Thiªn V­¬ng chïy/#sethkmp1(4)",
            "Thiªn V­¬ng th­¬ng/#sethkmp1(5)",
            "Thiªn V­¬ng ®ao/#sethkmp1(6)",
            "Nga My kiƠm/#sethkmp1(7)",
            "Nga My ch­ëng/#sethkmp1(8)",
            "Nga My buff/#sethkmp1(9)",
            "Thóy Yªn ®ao/#sethkmp1(10)",
            "Thóy Yªn song ®ao/#sethkmp1(11)",
            "Ng̣ §éc ch­ëng/#sethkmp1(12)",
            "Ng̣ §éc ®ao/#sethkmp1(13)",
            "Ng̣ §éc bïa/#sethkmp1(14)",
            "Trang sau/sethkmp2",
            
        }
        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 sethkmp2()
        local tab_Content = {
            "Rêi khái/no",
            "§­êng M«n phi ®ao/#sethkmp1(15)",
            "§­êng M«n tô tiÔn/#sethkmp1(16)",
            "§­êng M«n phi tiªu/#sethkmp1(17)",
            "§­êng M«n bÉy/#sethkmp1(18)",
            "C¸i Bang rång/#sethkmp1(19)",
            "C¸i Bang bæng/#sethkmp1(20)",
            "Thiªn NhÉn kƯch/#sethkmp1(21)",
            "Thiªn NhÉn ®ao/#sethkmp1(22)",
            "Thiªn NhÉn bïa/#sethkmp1(23)",
            "Vâ §ang khƯ /#sethkmp1(24)",
            "Vâ §ang kiƠm/#sethkmp1(25)",
            "C«n L«n ®ao/#sethkmp1(26)",
            "C«n L«n kiƠm/#sethkmp1(27)",
            "C«n L«n bïa/#sethkmp1(28)",
        }
        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 sethkmp1(nId)
        for i=1,5 do AddGoldItem(0,5*nId+i-5) end
    end
    
    
    function setxl()
    local tab_Content = {
    "Roi Khoi/no",
    "Thieu Lam Quyen/#setxl1(1)",
    "Thieu Lam Bong/#setxl1(2)",
    "Thieu Lam Dao/#setxl1(3)",
    "Thien Vuong Chuy/#setxl1(4)",
    "Thien Vuong Thuong/#setxl1(5)",
    "Thien Vuong Dao/#setxl1(6)",
    "Nga My kiem/#setxl1(7)",
    "Nga My ch­uong/#setxl1(8)",
    "Thuy Yen Dao/#setxl1(9)",
    "Thuy yen Song Dao/#setxl1(10)",
    "Ngu Doc Chuong/#setxl1(11)",
    "Ngu Doc Dao/#setxl1(12)",
    "Duong Mon Phi Dao/#setxl1(13)",
    "Duong Mon No/#setxl1(14)",
    "Trang sau/setxl2",
    
    
    }
    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 setxl2()
    local tab_Content = {
    "Roi Khoi/no",
    "Duong Mon Phi Tieu/#setxl1(15)",
    "Cai Bang Rong/#setxl1(16)",
    "Cai Bang Bong/#setxl1(17)",
    "Thien Nhan Kich/#setxl1(18)",
    "Thien Nhan Dao/#setxl1(19)",
    "Vo Dang Kiem/#setxl1(20)",
    "Vo Dang Quyen/#setxl1(21)",
    "Con Lon Dao/#setxl1(22)",
    "Con Lon Kiem/#setxl1(23)",
    
    
    }
    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 setxl1(nId)
    for i=2515,2525 do AddGoldItem(0,10*nId+i-10) end
    end
    
    
    function setmp()
    local tab_Content = {
    "Roi Khoi/no",
    "Thieu Lam Quyen/#setmp1(1)",
    "Thieu Lam Bong/#setmp1(2)",
    "Thieu Lam Dao/#setmp1(3)",
    "Thien Vuong Chuy/#setmp1(4)",
    "Thien Vuong Thuong/#setmp1(5)",
    "Thien Vuong Dao/#setmp1(6)",
    "Nga My kiem/#setmp1(7)",
    "Nga My ch­uong/#setmp1(8)",
    "Thuy Yen Dao/#setmp1(9)",
    "Thuy yen Song Dao/#setmp1(10)",
    "Ngu Doc Chuong/#setmp1(11)",
    "Ngu Doc Dao/#setmp1(12)",
    "Duong Mon Phi Dao/#setmp1(13)",
    "Duong Mon No/#setmp1(14)",
    "Trang sau/setmp2",
    
    
    }
    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 setmp2()
    local tab_Content = {
    "Roi Khoi/no",
    "Duong Mon Phi Tieu/#setmp1(15)",
    "Cai Bang Rong/#setmp1(16)",
    "Cai Bang Bong/#setmp1(17)",
    "Thien Nhan Kich/#setmp1(18)",
    "Thien Nhan Dao/#setmp1(19)",
    "Vo Dang Kiem/#setmp1(20)",
    "Vo Dang Quyen/#setmp1(21)",
    "Con Lon Dao/#setmp1(22)",
    "Con Lon Kiem/#setmp1(23)",
    
    
    }
    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 setmp1(nId)
    for i=2745,2755 do AddGoldItem(0,10*nId+i-10) end
    end
    
    
    function DisposeItem()
        GiveItemUI("Hñy vËt phÈm", "§¹i hiÖp h·y cÈn träng trong viÖc hñy vËt phÈm!", "DisposeConfirm", "onCancel", 1);
    end
    
    
    function DisposeConfirm(nCount)
        for i=1, nCount do
            local nItemIndex = GetGiveItemUnit(i)
            local strItem = GetItemName(nItemIndex)
            RemoveItemByIndex(nItemIndex)
            WriteLog(date("%Y%m%d %H%M%S").."\t".." GM Hñy Item "..GetAccount().."\t"..GetName().."\t".." Huû item "..strItem)
        end--for
        Msg2Player("Thao t¸c hñy vËt phÈm thµnh c«ng")
        Talk(1, "", "Thao t¸c thµnh c«ng, kiÓm tra l¹i!");    
    end
    mình muốn đưa sang npc lão ăn mày để có thể dùng mật khẩu admin mới được hỗ trợ thì làm cách nào hả các bạn ?
    Khách viếng thăm hãy cùng tuanonly xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  2. #2
    Vi phạm quy định
    Ngày tham gia
    Apr 2013
    Bài viết
    1,237
    Thanks
    315
    Thanked 499 Times in 292 Posts

    Ðề: mong giúp đỡ

    Thì bốc hết đoan code bỏ qua bên lão ăn mày.
    Nếu muốn kiểm tra điều kiện mới có thể sử dụng thì lập điều kiện

    if GetName = "tênadmin" then
    hoặc nếu sử dụng mật khẩu thì phải lập điều kiện. mở bảng String lên nhập số vào !!!
    Khách viếng thăm hãy cùng bthhhz xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  3. #3
    Thành Viên
    Ngày tham gia
    Oct 2014
    Bài viết
    227
    Thanks
    159
    Thanked 27 Times in 25 Posts

    Ðề: mong giúp đỡ

    Trích dẫn Gửi bởi bthhhz [Only registered and activated users can see links. ]
    Thì bốc hết đoan code bỏ qua bên lão ăn mày.
    Nếu muốn kiểm tra điều kiện mới có thể sử dụng thì lập điều kiện

    if GetName = "tênadmin" then
    hoặc nếu sử dụng mật khẩu thì phải lập điều kiện. mở bảng String lên nhập số vào !!!

    include cái gì đó

    if GetName() = "tênadmin" then

    -- hàm muốn lấy

    end
    Khách viếng thăm hãy cùng xomnhalalop12 xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

  4. #4
    Thành Viên
    Ngày tham gia
    Dec 2008
    Bài viết
    38
    Thanks
    9
    Thanked 1 Time in 1 Post

    Ðề: mong giúp đỡ

    Trích dẫn Gửi bởi xomnhalalop12 [Only registered and activated users can see links. ]
    include cái gì đó

    if GetName() = "tênadmin" then

    -- hàm muốn lấy

    end
    bạn có thể nói cụ thể hơn được không vì mình thêm hàm đấy thì ấn vào lễ quan không thấy gì nữa
    Khách viếng thăm hãy cùng tuanonly xây dựng diễn đàn CLBGAMESVN vững mạnh nhé!

 

 

Các Chủ đề tương tự

  1. Mong các bác pro help em phát
    Bởi nguyentienvnn1 trong diễn đàn Chinh Đồ
    Trả lời: 1
    Bài viết cuối: 07-02-15, 10:28 PM
  2. [Gunny] Mong mọi người giúp em lỗi như hình
    Bởi gunnyoff trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 3
    Bài viết cuối: 22-12-14, 08:37 PM
  3. [KT] Mong các pro chỉ giáo giúp mình,mình rất cảm ơn!!!
    Bởi daicango00 trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 4
    Bài viết cuối: 21-12-14, 08:02 PM
  4. Hỏi vài thứ, mong được giải đáp ! [Thank]
    Bởi f52512 trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 6
    Bài viết cuối: 24-05-14, 06:05 PM
  5. Mong anh chị giúp đỡ!!!
    Bởi nttrung93 trong diễn đàn Hỏi Đáp/ Yêu Cầu
    Trả lời: 3
    Bài viết cuối: 18-12-11, 03:22 PM

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
  •  
Múi giờ GMT +7. Bây giờ là 10:49 PM.
vBulletin®, Copyright ©2000-2011, Jelsoft Enterprises Ltd.
CLBGamesVN không chịu trách nhiệm về Luật Bản Quyền của các tài liệu, bài viết v.v...được đăng tải trên diễn đàn này.
Diễn đàn phát triển dưới sự đóng góp của tất cả thành viên. BQT chỉ là những người thành lập ra sân chơi, quản lý và duy trì về mặt kỹ thuật, nội dung khi hợp lệ.