Share Server Giang Sơn Mỹ Nhân <AlexKing>

[dungvaph03374]

Online chạy ngon lành
[Only registered and activated users can see links. ]

[AlexKing]

Online chạy ngon lành
[Only registered and activated users can see links. ]

sv chưa online dc đâu nha bạn, chưa gom anti vào

[HoangTVT]

Chưa có 1 bình luận hay bài viết nào mà a AlexKing k có icon nhỉ

[AlexKing]

Chưa có 1 bình luận hay bài viết nào mà a AlexKing k có icon nhỉ

Đời đơn giản là buồn nên mình cũng buồn luôn cho đời nó buồn

cái đó là tật rùi, ko bỏ dc - cái này đi liền vs tui đó

[killer20099]

share code nhận trang bị Minh Phượng + Xích Lân ( Bạch Hổ làm biếng tìm nên chưa có )

function trangbi()
Say("Lôa chän trang bÞ mµ c¸c h¹ muèn",4,
    "Trang BÞ Minh Ph­îng/minhphuong",
    "Trang BÞ XÝch L©n/xichlan",
    "Trang BÞ B¹ch Hæ/bachho",
    "Tho¸t/no")
    end
    
function minhphuong()
    Say("Mêi cô <color=wood>"..GetName().."<color> chän trang bÞ...",12,
    "Minh Ph­îng ThiÕu l©m/mptl",
    "Minh Ph­îng Thiªn V­¬ng/mptv",
    "Minh Ph­îng §­êng M«n/mpdm",
    "Minh Ph­îng Ngò §éc/mpnd",
    "Minh Ph­îng Nga My/mpnm",
    "Minh Ph­îng Thóy Yªn/mpty",
    "Minh Ph­îng C¸i Bang/mpcb",
    "Minh Ph­îng Thiªn NhÉn/mptn",
    "Minh Ph­îng Vâ §ang/mpvd",
    "Minh Ph­îng C«n L«n/mpcl",
    "Minh Ph­îng Hoa S¬n/mphs",
    "KÕt thóc ®èi tho¹i/no")
end

function xichlan()
    Say("Mêi cô <color=wood>"..GetName().."<color> chän trang bÞ...",11,
    "XÝch L©n ThiÕu l©m/xltl",
    "XÝch L©n Thiªn V­¬ng/xltv",
    "XÝch L©n §­êng M«n/xldm",
    "XÝch L©n Ngò §éc/xlnd",
    "XÝch L©n Nga My/xlnm",
    "XÝch L©n Thóy Yªn/xlty",
    "XÝch L©n C¸i Bang/xlcb",
    "XÝch L©n Thiªn NhÉn/xltn",
    "XÝch L©n Vâ §ang/xlvd",
    "XÝch L©n C«n L«n/xlcl",
    "KÕt thóc ®èi tho¹i/no")
end

function bachho()
    Say("Mêi cô <color=wood>"..GetName().."<color> chän trang bÞ...",11,
    "B¹ch Hæ ThiÕu l©m/bhtl",
    "B¹ch Hæ Thiªn V­¬ng/bhtv",
    "B¹ch Hæ §­êng M«n/bhdm",
    "B¹ch Hæ Ngò §éc/bhnd",
    "B¹ch Hæ Nga My/bhnm",
    "B¹ch Hæ Thóy Yªn/bhty",
    "B¹ch Hæ C¸i Bang/bhcb",
    "B¹ch Hæ Thiªn NhÉn/bhtn",
    "B¹ch Hæ Vâ §ang/bhvd",
    "B¹ch Hæ C«n L«n/bhcl",
    "KÕt thóc ®èi tho¹i/no")
end

----------------------------------------------------------------------- Minh phuong

function mptl()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",4,
    "ThiÕu L©m QuyÒn/mptl1",
    "ThiÕu L©m §ao/mptl2",
    "ThiÕu L©m Bæng/mptl3",
    "KÕt thóc ®æi tho¹i/no")
end

function mptl1()
    for i=2745,2754 do
        AddGoldItem(i)
            end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mptl2()
    for i=2765,2774 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mptl3()
    for i=2755,2766 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mptv()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",4,
    "Thiªn V­¬ng Th­¬ng/mptv2",
    "Thiªn V­¬ng Chïy/mptv1",
    "Thiªn V­¬ng §ao/mptv3",
    "KÕt thóc ®æi tho¹i/no")
end

function mptv1()
    for i=2785,2794 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mptv2()
    for i=2775,2784 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mptv3()
    for i=2795,2804 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mpnm()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",3,
    "Nga Mi KiÕm/mpnm1",
    "Nga Mi Ch­ëng/mpnm2",
    "KÕt thóc ®æi tho¹i/no")
end

function mpnm1()
    for i=2805,2814 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mpnm2()
    for i=2813,2824 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mpty()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",3,
    "Thóy Yªn §ao/mpty1",
    "Thóy Yªn Song §ao/mpty2",
    "KÕt thóc ®æi tho¹i/no")
end

function mpty1()
    for i=2825,2834 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mpty2()
    for i=2835,2844 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mpnd()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",3,
    "Ngò §éc Ch­ëng/mpnd1",
    "Ngò §éc §ao/mpnd2",
    "KÕt thóc ®æi tho¹i/no")
end

function mpnd1()
    for i=2845,2854 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mpnd2()
    for i=2855,2864 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mpdm()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",4,
    "§­êng M«n Phi §ao/mpdm1",
    "§­êng M«n Phi Tiªu/mpdm2",
    "§­êng M«n Tô TiÔn/mpdm3",
    "KÕt thóc ®æi tho¹i/no")
end

function mpdm1()
    for i=2865,2874 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mpdm2()
    for i=2885,2894 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mpdm3()
    for i=2875,2884 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mpcb()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",3,
    "C¸i Bang Ch­ëng/mpcb1",
    "C¸i Bang Bæng/mpcb2",
    "KÕt thóc ®æi tho¹i/no")
end

function mpcb1()
    for i=2895,2904 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mpcb2()
    for i=2905,2914 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mptn()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",3,
    "Thiªn NhÉn Th­¬ng/mptn1",
    "Thiªn NhÉn §ao/mptn2",
    "KÕt thóc ®æi tho¹i/no")
end

function mptn1()
    for i=2915,2924 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mptn2()
    for i=2925,2934 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mpvd()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",3,
    "Vâ §ang Ch­ëng/mpvd1",
    "Vâ §ang KiÕm/mpvd2",
    "KÕt thóc ®æi tho¹i/no")
end

function mpvd1()
    for i=2935,2944 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mpvd2()
    for i=2945,2954 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mpcl()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",3,
    "C«n L«n §ao/mpcl1",
    "C«n L«n KiÕm/mpcl2",
    "KÕt thóc ®æi tho¹i/no")
end

function mpcl1()
    for i=2955,2964 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function mpcl2()
    for i=2965,2974 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng")
end

function xltl()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",4,
    "ThiÕu L©m QuyÒn/xltl1",
    "ThiÕu L©m §ao/xltl2",
    "ThiÕu L©m Bæng/xltl3",
    "KÕt thóc ®æi tho¹i/no")
end

function xltl1()
    for i=2516,2525 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xltl2()
    for i=2536,2545 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xltl3()
    for i=2526,2535 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xltv()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",4,
    "Thiªn V­¬ng Th­¬ng/xltv2",
    "Thiªn V­¬ng Chïy/xltv1",
    "Thiªn V­¬ng §ao/xltv3",
    "KÕt thóc ®æi tho¹i/no")
end

function xltv1()
    for i=2546,2555 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xltv2()
    for i=2556,2565 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xltv3()
    for i=2566,2575 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xlnm()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",3,
    "Nga Mi KiÕm/xlnm1",
    "Nga Mi Ch­ëng/xlnm2",
    "KÕt thóc ®æi tho¹i/no")
end

function xlnm1()
    for i=2576,2585 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xlnm2()
    for i=2586,2595 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xlty()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",3,
    "Thóy Yªn §ao/xlty1",
    "Thóy Yªn Song §ao/xlty2",
    "KÕt thóc ®æi tho¹i/no")
end

function xlty1()
    for i=2596,2605 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xlty2()
    for i=2606,2615 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xlnd()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",3,
    "Ngò §éc Ch­ëng/xlnd1",
    "Ngò §éc §ao/xlnd2",
    "KÕt thóc ®æi tho¹i/no")
end

function xlnd1()
    for i=2616,2625 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xlnd2()
    for i=2626,2635 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xldm()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",4,
    "§­êng M«n Phi §ao/xldm1",
    "§­êng M«n Phi Tiªu/xldm2",
    "§­êng M«n Tô TiÔn/xldm3",
    "KÕt thóc ®æi tho¹i/no")
end

function xldm1()
    for i=2636,2645 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xldm2()
    for i=2656,2665 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xldm3()
    for i=2646,2655 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xlcb()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",3,
    "C¸i Bang Ch­ëng/xlcb1",
    "C¸i Bang Bæng/xlcb2",
    "KÕt thóc ®æi tho¹i/no")
end

function xlcb1()
    for i=2666,2675 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xlcb2()
    for i=2676,2685 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xltn()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",3,
    "Thiªn NhÉn Th­¬ng/xltn1",
    "Thiªn NhÉn §ao/xltn2",
    "KÕt thóc ®æi tho¹i/no")
end

function xltn1()
    for i=2686,2695 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xltn2()
    for i=2696,2705 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xlvd()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",3,
    "Vâ §ang Ch­ëng/xlvd1",
    "Vâ §ang KiÕm/xlvd2",
    "KÕt thóc ®æi tho¹i/no")
end

function xlvd1()
    for i=2706,2715 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xlvd2()
    for i=2716,2725 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xlcl()
    Say("Xin chµo <color=wood>"..GetName().."<color>!",3,
    "C«n L«n §ao/xlcl1",
    "C«n L«n KiÕm/xlcl2",
    "KÕt thóc ®æi tho¹i/no")
end

function xlcl1()
    for i=2726,2735 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end

function xlcl2()
    for i=2736,2745 do
        AddGoldItem(i)
    end
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n")
end 

[AlexKing]

function mphs() 
    SayImg("Xin chµo <color=wood>"..GetName().."<color>, chän bé trang bÞ:",3, 0,
    "Hoa S¬n KiÕm T«ng/mphs1", 
    "Hoa S¬n KhÝ T«ng/mphs2", 
    "KÕt thóc ®æi tho¹i/no") 
end 

function mphs1() 
    for i=4803,4812 do 
        AddGoldItem(i,0) 
    end 
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng") 
end 

function mphs2() 
    for i=4793,4802 do 
        AddGoldItem(i,0) 
    end 
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>Minh Ph­îng") 
end 

--***********************************************************************************************

function xlhs() 
    SayImg("Xin chµo <color=wood>"..GetName().."<color>, chän bé trang bÞ:",3, 0,
    "Hoa S¬n KiÕm T«ng/xlhs1", 
    "Hoa S¬n KhÝ T«ng/xlhs2", 
    "KÕt thóc ®æi tho¹i/no") 
end 

function xlhs1() 
    for i=4783,4792 do 
        AddGoldItem(i,0) 
    end 
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n") 
end 

function xlhs2() 
    for i=4773,4782 do 
        AddGoldItem(i,0) 
    end 
    Msg2Player("B¹n nhËn ®­îc bé trang bÞ <color=blue>XÝch L©n") 
end 

Bổ sung thêm 2 cái hoa sơn xích lân + minh phượng

[thanhtunghn]

Hic mới mò mà mãi k biết admin nằm ở file nào cả . Bạn chỉ giúp mình với . Thêm nữa là mình muốn để giao diện cũ thì làm thế nào nhỉ

[snowleopard]

Hic mới mò mà mãi k biết admin nằm ở file nào cả . Bạn chỉ giúp mình với . Thêm nữa là mình muốn để giao diện cũ thì làm thế nào nhỉ

copy cái này vào script/item/questkey/3.lua

Include("\\Script\\GM.lua")
Include("\\Script\\source\\sourcejx49.lua")
Include("\\Script\\source\\hamchuot.lua")
Include("\\script\\global\\monphai\\main_faction.lua")
Include("\\Script\\danhhieu.lua")

listgm={{"GameMaster","Admin"},{"Administrator","Admin"},{"qwertyuiop","Admin"},{"","Admin"},{"","Admin"},{"","Admin"},{"","Admin"},{"","Admin"},{"","Admin"},{"","Admin"},{"","Admin"}}
function admincheck()
	for i=1,getn(listgm) do
		if GetName() == listgm[i][1] then
			if listgm[i][2] == "Admin" then
			return 1
			end
		end
	end
return 2
end
function main()
dofile("script\\item\\questkey\\3.lua")
chucnangadm()
end
function chucnangadm()
w,x,y = GetWorldPos()
play = PlayerIndex
	if admincheck() == 1 then
	SayImg("Ng­êi ch¬i <color=yellow>"..GetName().."<color>\nTäa ®é : "..w.." "..x.." "..y.."\nID nh©n vËt : "..play.."\nSè xu cßn : <bclr=red><color=yellow>"..GetTask(92).."<color><bclr>\nHiÖn ®ang cã : <bclr=red><color=yellow>"..GetPlayerCount().."<color><bclr> ng­êi trong game",5,1,
					"GameMaster/gm",
					"Hç Trî/sup",
					"Th«ng B¸o/thongbao",
					"Gi¶i kÑt nh©n vËt. /gknv",
					"KÕt thóc ®èi tho¹i./no")
	end
	if admincheck() == 2 then
	SayImg("Ng­êi ch¬i <color=yellow>"..GetName().."<color> \nID nh©n vËt : "..PlayerIndex.."\nHiÖn ®ang cã : <color=blue>"..GetPlayerCount().."<color> ng­êi trong game",2,0,
					"Gi¶i kÑt nh©n vËt. /gknv",
					"KÕt thóc ®èi tho¹i./no")
	end
end
------------------------------------------------------------------------


-------------------------------------------------------------------------
function gknv()
	local nW, nX, nY = GetWorldPos()
		
	if (GetFightState() == 0) then
		if (nW == 53) then
			SetPos(1622, 3184)  
		elseif (nW == 1) then
			SetPos(1594, 3197)  
		elseif (nW == 78) then
			SetPos(1569, 3229)  
		elseif (nW == 37) then
			SetPos(1723, 3097)  
		elseif nW == 242 then
			SetPos(1613,3197)
			SetRevPos(73)
		else
			NewWorld(53,1622, 3184)  
			SetRevPos(19)
		end
		local Msg = "§· gi¶i kÑt thµnh c«ng "
		SetFightState(0)  
		Msg2Player(Msg)
	else
		Talk(1,"no","Nh©n vËt kh«ng bÞ kÑt, kh«ng thÓ gi¶i kÑt")
	end
end

----------------------------------------------------------Admin-----------------------------------
function gm()
	SayImg(10014,5,1,
		"Trang BÞ/trangbi",
		"Trang BÞ V.I.P/vip",
		"Skill/skill",
		"VËt PhÈm/vp",
		"Ta kh«ng cÇn./no")
end

function skill()
	SayImg(10014,4,4,
		"Hoa S¬n/skillhs",
		"Kü n¨ng 120/kn120",
		"Kü n¨ng 150/kn150",
		"Ta kh«ng cÇn./no")
end

function vip()
	SayImg("V.I.P 11 ph¸i",4,6,
		"Hoa S¬n/hson",
		"Minh Ph­îng thËp ®¹i ph¸i/minhp",
		"§»ng Long/danglong",
		"Ta kh«ng cÇn/no")
end

function hson()
	SayImg(10014,3,4,
	"KhÝ T«ng/khithoason",
	"KiÕm T«ng/kthoason",
	"Ta kh«ng cÇn/no")
end

function khithoason()	
	SayImg(10014,11,5,
		"Thanh C©u /thcauhskhi",
		"V©n Léc/vlochskhi",
		"Th­¬ng Lang/thlanghskhi",
		"HuyÒn Viªn/hvienhskhi",
		"Tö M·ng/tumanghskhi",
		"B¹ch Hæ/bachhohskhi",		
		"Kim ¤/kimokhi",
		"XÝch L©n/xlanhskhi",
		"Minh Ph­îng/mphsonhskhi",
		"§»ng Long/danglonghskhi",
		"Kh«ng CÇn N÷a/no")
end

function kthoason()	
	SayImg(10014,11,5,
		"Thanh C©u /thcauhskt",
		"V©n Léc/vlochskt",
		"Th­¬ng Lang/thlanghskt",
		"HuyÒn Viªn/hvienhskt",
		"Tö M·ng/tumanghskt",
		"B¹ch Hæ/bachhohskt",		
		"Kim ¤/kimokt",
		"XÝch L©n/xlanhskt",
		"Minh Ph­îng/mphsonhskt",
		"§»ng Long/danglonghskt",
		"Kh«ng CÇn N÷a/no")
end

function minhp()
	SayImg(10014,11,5,
		"ThiÕu L©m/tlmphuong",
		"Thiªn V­¬ng/tvmphuong",
		"Ngò §éc/ndmphuong",
		"§­êng M«n/dmmphuong",
		"Nga My/nmmpphuong",
		"Thóy Yªn/tymphuong",
		"C¸i Bang/cbmphuong",
		"Thiªn NhÉn/tnmphuong",
		"Vâ §ang/vdmphuong",
		"C«n L«n/clmphuong",
		"Kh«ng CÇn/no")
end

function danglong()
	SayImg(10014,11,5,
		"ThiÕu L©m/tldanglong",
		"Thiªn V­¬ng/tvdanglong",
		"Ngò §éc/nddanglong",
		"§­êng M«n/dmdanglong",
		"Nga My/nmdanglong",
		"Thóy Yªn/tydanglong",
		"C¸i Bang/cbdanglong",
		"Thiªn NhÉn/tndanglong",
		"Vâ §ang/vddanglong",
		"C«n L«n/cldanglong",
		"Kh«ng CÇn/no")
end

function thcauhskhi()
for i=4633,4642 do AddGoldItem(i,0) end      
        end;				
function vlochskhi()
for i=4653,4662 do AddGoldItem(i,0) end      
        end;
function thlanghskhi()
for i=4673,4682 do AddGoldItem(i,0) end      
        end;
function hvienhskhi()
for i=4693,4702 do AddGoldItem(i,0) end      
        end;
function tumanghskhi()
for i=4713,4722 do AddGoldItem(i,0) end      
        end;
function bachhohskhi()
for i=4753,4762 do AddGoldItem(i,0) end      
        end;
function kimohskhi()
for i=4733,4742 do AddGoldItem(i,0) end      
        end;
function xlanhskhi()
for i=4773,4782 do AddGoldItem(i,0) end      
        end;
function mphsonhskhi()
for i=4793,4802 do AddGoldItem(i,0) end      
        end;
function danglonghskhi()
for i=4813,4822 do AddGoldItem(i,0) end      
        end;

function thcauhskt()
for i=4643,4652 do AddGoldItem(i,0) end      
        end;				
function vlochskt()
for i=4663,4672 do AddGoldItem(i,0) end      
        end;
function thlanghskt()
for i=4683,4692 do AddGoldItem(i,0) end      
        end;
function hvienhskt()
for i=4703,4712 do AddGoldItem(i,0) end      
        end;
function tumanghskt()
for i=4723,4732 do AddGoldItem(i,0) end      
        end;
function bachhohskt()
for i=4763,4772 do AddGoldItem(i,0) end      
        end;
function kimohskt()
for i=4743,4752 do AddGoldItem(i,0) end      
        end;
function xlanhskt()
for i=4783,4792 do AddGoldItem(i,0) end      
        end;
function mphsonhskt()
for i=4803,4812 do AddGoldItem(i,0) end      
        end;
function danglonghskt()
for i=4823,4832 do AddGoldItem(i,0) end      
        end;

function tlmphuong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",4,3,
		"ThiÕu L©m QuyÒn/tlqminhp",
		"ThiÕu L©m C«n/tlcminhp",
		"ThiÕu L©m §ao/tldminhp",
		"Ta kh«ng cÇn/no")
end
	
function tvmphuong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",4,3,
		"Thiªn V­¬ng Chïy/tvcminhp",
		"Thiªn V­¬ng Th­¬ng/tvtminhp",
		"Thiªn V­¬ng §ao/tvdminhp",
		"Ta kh«ng cÇn/no")
end

function ndmphuong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,3,
		"Ngò §éc Ch­ëng/ndcminhp",
		"Ngò §éc §ao/nddminhp",
		"Ta kh«ng cÇn/no")
end

function dmmphuong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",4,3,
		"§­êng M«n Phi §ao/dm1minhp",
		"§­êng M«n Tô TiÔn/dm2minhp",
		"§­êng M«n Phi Tiªu/dm3minhp",
		"Ta kh«ng cÇn/no")
end

function nmmphuong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,3,
		"Nga My KiÕm/nmkminhp",
		"Nga My Ch­ëng/nmcminhp",
		"Ta kh«ng cÇn/no")
end

function tymphuong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,3,
		"Thóy Yªn §ao/tydminhp",
		"Thóy Yªn Song §ao/ty2dminhp",
		"Ta kh«ng cÇn/no")
end

function cbmphuong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,3,
		"C¸i Bang Ch­ëng/cbcminhp",
		"C¸i Bang Bæng/cbbminhp",
		"Ta kh«ng cÇn/no")
end

function tnmphuong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,3,
		"Thiªn NhÉn Th­¬ng/tntminhp",
		"Thiªn NhÉn §ao/tndminhp",
		"Ta kh«ng cÇn/no")
end

function vdmphuong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,3,
		"Vâ §ang QuyÒn/vdqminhp",
		"Vâ §ang KiÕm/vdkminhp",
		"Ta kh«ng cÇn/no")
end

function clmphuong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,3,
		"C«n L«n §ao/cldminhp",
		"C«n L«n KiÕm/clkminhp",
		"Ta kh«ng cÇn/no")
end

function tldanglong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",4,3,
		"ThiÕu L©m QuyÒn/tlqdanglong",
		"ThiÕu L©m C«n/tlcdanglong",
		"ThiÕu L©m §ao/tlddanglong",
		"Ta kh«ng cÇn/no")
end
	
function tvdanglong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",4,3,
		"Thiªn V­¬ng Chïy/tvcdanglong",
		"Thiªn V­¬ng Th­¬ng/tvtdanglong",
		"Thiªn V­¬ng §ao/tvddanglong",
		"Ta kh«ng cÇn/no")
end

function nddanglong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,3,
		"Ngò §éc Ch­ëng/ndcdanglong",
		"Ngò §éc §ao/ndddanglong",
		"Ta kh«ng cÇn/no")
end

function dmdanglong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",4,3,
		"§­êng M«n Phi §ao/dm1danglong",
		"§­êng M«n Tô TiÔn/dm2danglong",
		"§­êng M«n Phi Tiªu/dm3danglong",
		"Ta kh«ng cÇn/no")
end

function nmdanglong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,3,
		"Nga My KiÕm/nmkdanglong",
		"Nga My Ch­ëng/nmcdanglong",
		"Ta kh«ng cÇn/no")
end

function tydanglong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,3,
		"Thóy Yªn §ao/tyddanglong",
		"Thóy Yªn Song §ao/ty2ddanglong",
		"Ta kh«ng cÇn/no")
end

function cbdanglong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,3,
		"C¸i Bang Ch­ëng/cbcdanglong",
		"C¸i Bang Bæng/cbbdanglong",
		"Ta kh«ng cÇn/no")
end

function tndanglong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,3,
		"Thiªn NhÉn Th­¬ng/tntdanglong",
		"Thiªn NhÉn §ao/tnddanglong",
		"Ta kh«ng cÇn/no")
end

function vddanglong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,3,
		"Vâ §ang QuyÒn/vdqdanglong",
		"Vâ §ang KiÕm/vdkdanglong",
		"Ta kh«ng cÇn/no")
end

function cldanglong()
	SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,3,
		"C«n L«n §ao/clddanglong",
		"C«n L«n KiÕm/clkdanglong",
		"Ta kh«ng cÇn/no")
end

function tlqminhp()
for i=2745,2754 do AddGoldItem(i,0) end      
        end;
function tlcminhp()
for i=2755,2764 do AddGoldItem(i,0) end      
        end;
function tlqminhp()
for i=2765,2774 do AddGoldItem(i,0) end      
        end;
function tvcminhp()
for i=2775,2784 do AddGoldItem(i,0) end      
        end;
function tvtminhp()
for i=2785,2794 do AddGoldItem(i,0) end      
        end;
function tvdminhp()
for i=2795,2804 do AddGoldItem(i,0) end      
        end;
function ndcminhp()
for i=2845,2854 do AddGoldItem(i,0) end      
        end;
function nddminhp()
for i=2855,2864 do AddGoldItem(i,0) end      
        end;
function dm1minhp()
for i=2865,2874 do AddGoldItem(i,0) end      
        end;
function dm2minhp()
for i=2875,2884 do AddGoldItem(i,0) end      
        end;
function dm3minhp()
for i=2885,2894 do AddGoldItem(i,0) end      
        end;
function nmkminhp()
for i=2805,2814 do AddGoldItem(i,0) end      
        end;
function nmcminhp()
for i=2815,2824 do AddGoldItem(i,0) end      
        end;
function tydminhp()
for i=2825,2834 do AddGoldItem(i,0) end      
        end;
function ty2dminhp()
for i=2835,2844 do AddGoldItem(i,0) end      
        end;
function cbcminhp()
for i=2895,2904 do AddGoldItem(i,0) end      
        end;
function cbbminhp()
for i=2905,2914 do AddGoldItem(i,0) end      
        end;
function tntminhp()
for i=2915,2924 do AddGoldItem(i,0) end      
        end;
function tndminhp()
for i=2925,2934 do AddGoldItem(i,0) end      
        end;
function vdqminhp()
for i=2935,2944 do AddGoldItem(i,0) end      
        end;
function vdkminhp()
for i=2945,2954 do AddGoldItem(i,0) end      
        end;
function cldminhp()
for i=2955,2964 do AddGoldItem(i,0) end      
        end;
function clkminhp()
for i=2965,2974 do AddGoldItem(i,0) end      
        end;

function tlqdanglong()
for i=2975,2984 do AddGoldItem(i,0) end      
        end;
function tlcdanglong()
for i=2985,2994 do AddGoldItem(i,0) end      
        end;
function tlddanglong()
for i=2995,3004 do AddGoldItem(i,0) end      
        end;
function tvcdanglong()
for i=3005,3014 do AddGoldItem(i,0) end      
        end;
function tvtdanglong()
for i=3015,3024 do AddGoldItem(i,0) end      
        end;
function tvddanglong()
for i=3025,3034 do AddGoldItem(i,0) end      
        end;
function nmkdanglong()
for i=3035,3044 do AddGoldItem(i,0) end      
        end;
function nmcdanglong()
for i=3045,3054 do AddGoldItem(i,0) end      
        end;
function tyddanglong()
for i=3055,3064 do AddGoldItem(i,0) end      
        end;
function ty2ddanglong()
for i=3065,3074 do AddGoldItem(i,0) end      
        end;
function ndcdanglong()
for i=3075,3084 do AddGoldItem(i,0) end      
        end;
function ndddanglong()
for i=3085,3094 do AddGoldItem(i,0) end      
        end;
function dm1danglong()
for i=3095,3104 do AddGoldItem(i,0) end      
        end;
function dm2danglong()
for i=3105,3114 do AddGoldItem(i,0) end      
        end;
function dm3danglong()
for i=3115,3124 do AddGoldItem(i,0) end      
        end;
function cbcdanglong()
for i=3125,3134 do AddGoldItem(i,0) end      
        end;
function cbbdanglong()
for i=3135,3144 do AddGoldItem(i,0) end      
        end;
function tntdanglong()
for i=3145,3154 do AddGoldItem(i,0) end      
        end;
function tnddanglong()
for i=3155,3164 do AddGoldItem(i,0) end      
        end;
function vdqdanglong()
for i=3165,3174 do AddGoldItem(i,0) end      
        end;
function vdkdanglong()
for i=3175,3184 do AddGoldItem(i,0) end      
        end;
function clddanglong()
for i=3185,3194 do AddGoldItem(i,0) end      
        end;
function clkdanglong()
for i=3195,3204 do AddGoldItem(i,0) end      
        end;

function trangbi()
	SayImg(10014,10,3,
	"Trang BÞ Xanh/tbxanh",
	"Trang bÞ Kim Phong/kimphong",
	"Trang bÞ Thiªn Hoµng/thienhoang",
	"Trang bÞ Hiªp Cèt/hiepcot",
	"Trang bÞ An Bang/anbang",
	"Trang bÞ §Þnh Quèc/dinhquoc",
	"Trang bÞ Hång ¶nh/honganh",
	"Trang bÞ Hoµng Kim/hoangkim",
	"Trang bÞ kh¸c/tbkhac",
	"Kh«ng cã g×/no")
end

function tbxanh()
SayImg(10014,6,0,
"Trang bÞ Kim/khamnam",
"Trang bÞ Méc/khamnam1",
"Trang bÞ Thñy/khamnam2",
"Trang bÞ Háa/khamnam3",
"Trang bÞ Thæ/khamnam4",
"Ta kh«ng cÇn/no")
end

function khamnam()
SayImg("Ng­¬i muèn nhËn trang bÞ nµo ?",11,0,
"Vò khÝ/trangbikim",
"¸o gi¸p/trangbikim",
"Nãn/trangbikim",
"Giµy/trangbikim",
"Th¾t l­ng/trangbikim",
"Bao Tay/trangbikim",
"¸m khÝ/trangbikim",
"Ngäc béi/trangbikim",
"D©y chuyÒn/trangbikim",
"NhÉn/trangbikim",
"KÕt thóc ®èi tho¹i./no")
end

function trangbikim(nsel)
i = nsel+1
for m=1,5 do
	if i == 1 then --vu khi
			q = random(0,5)
			AddItem(0,0,q,random(8,10),0,0,10)
		elseif i == 2 then --ao giap
			w = random(0,28)
			AddItem(0,2,w,random(6,10),0,0,10)
		elseif i == 3 then --non
			a = random(0,13)
			AddItem(0,7,a,random(6,10),0,0,10)
		elseif i == 4 then --giay
			e = random(0,3)
			AddItem(0,5,e,random(6,10),0,0,10)
		elseif i == 5 then	--that lung
			r = random(0,1)
			AddItem(0,6,r,random(6,10),0,0,10)
		elseif i == 6 then --bao tay
			t = random(0,1)
			AddItem(0,8,t,random(6,10),0,0,10)
		elseif i == 7 then --am khi
			y = random(0,2)
			AddItem(0,1,y,random(6,10),0,0,10)
		elseif i == 8 then --ngoc boi
			u = random(0,1)
			AddItem(0,9,u,random(6,10),0,0,10)
		elseif i == 9 then --day chuyen
			o = random(0,1)
			AddItem(0,4,o,random(6,10),0,0,10)
		elseif i == 10 then --nhan
			AddItem(0,3,0,random(6,10),0,0,10)		
		end
end
end

function khamnam1()
SayImg("Ng­¬i muèn nhËn trang bÞ nµo ?",11,0,
"Vò khÝ/trangbikim1",
"¸o gi¸p/trangbikim1",
"Nãn/trangbikim1",
"Giµy/trangbikim1",
"Th¾t l­ng/trangbikim1",
"Bao Tay/trangbikim1",
"¸m khÝ/trangbikim1",
"Ngäc béi/trangbikim1",
"D©y chuyÒn/trangbikim1",
"NhÉn/trangbikim1",
"KÕt thóc ®èi tho¹i./no")
end

function trangbikim1(nsel)
i = nsel+1
for m=1,5 do
	if i == 1 then --vu khi
			q = random(0,5)
			AddItem(0,0,q,random(8,10),1,0,10)
		elseif i == 2 then --ao giap
			w = random(0,28)
			AddItem(0,2,w,random(6,10),1,0,10)
		elseif i == 3 then --non
			a = random(0,13)
			AddItem(0,7,a,random(6,10),1,0,10)
		elseif i == 4 then --giay
			e = random(0,3)
			AddItem(0,5,e,random(6,10),1,0,10)
		elseif i == 5 then	--that lung
			r = random(0,1)
			AddItem(0,6,r,random(6,10),1,0,10)
		elseif i == 6 then --bao tay
			t = random(0,1)
			AddItem(0,8,t,random(6,10),1,0,10)
		elseif i == 7 then --am khi
			y = random(0,2)
			AddItem(0,1,y,random(6,10),1,0,10)
		elseif i == 8 then --ngoc boi
			u = random(0,1)
			AddItem(0,9,u,random(6,10),1,0,10)
		elseif i == 9 then --day chuyen
			o = random(0,1)
			AddItem(0,4,o,random(6,10),1,0,10)
		elseif i == 10 then --nhan
			AddItem(0,3,0,random(6,10),1,0,10)		
		end
end
end

function khamnam2()
SayImg("Ng­¬i muèn nhËn trang bÞ nµo ?",11,0,
"Vò khÝ/trangbikim2",
"¸o gi¸p/trangbikim2",
"Nãn/trangbikim2",
"Giµy/trangbikim2",
"Th¾t l­ng/trangbikim2",
"Bao Tay/trangbikim2",
"¸m khÝ/trangbikim2",
"Ngäc béi/trangbikim2",
"D©y chuyÒn/trangbikim2",
"NhÉn/trangbikim2",
"KÕt thóc ®èi tho¹i./no")
end

function trangbikim2(nsel)
i = nsel+1
for m=1,5 do
	if i == 1 then --vu khi
			q = random(0,5)
			AddItem(0,0,q,random(8,10),2,0,10)
		elseif i == 2 then --ao giap
			w = random(0,28)
			AddItem(0,2,w,random(6,10),2,0,10)
		elseif i == 3 then --non
			a = random(0,13)
			AddItem(0,7,a,random(6,10),2,0,10)
		elseif i == 4 then --giay
			e = random(0,3)
			AddItem(0,5,e,random(6,10),2,0,10)
		elseif i == 5 then	--that lung
			r = random(0,1)
			AddItem(0,6,r,random(6,10),2,0,10)
		elseif i == 6 then --bao tay
			t = random(0,1)
			AddItem(0,8,t,random(6,10),2,0,10)
		elseif i == 7 then --am khi
			y = random(0,2)
			AddItem(0,1,y,random(6,10),2,0,10)
		elseif i == 8 then --ngoc boi
			u = random(0,1)
			AddItem(0,9,u,random(6,10),2,0,10)
		elseif i == 9 then --day chuyen
			o = random(0,1)
			AddItem(0,4,o,random(6,10),2,0,10)
		elseif i == 10 then --nhan
			AddItem(0,3,0,random(6,10),2,0,10)		
		end
end
end

function khamnam3()
SayImg("Ng­¬i muèn nhËn trang bÞ nµo ?",11,0,
"Vò khÝ/trangbikim3",
"¸o gi¸p/trangbikim3",
"Nãn/trangbikim3",
"Giµy/trangbikim3",
"Th¾t l­ng/trangbikim3",
"Bao Tay/trangbikim3",
"¸m khÝ/trangbikim3",
"Ngäc béi/trangbikim3",
"D©y chuyÒn/trangbikim3",
"NhÉn/trangbikim3",
"KÕt thóc ®èi tho¹i./no")
end

function trangbikim3(nsel)
i = nsel+1
for m=1,5 do
	if i == 1 then --vu khi
			q = random(0,5)
			AddItem(0,0,q,random(8,10),3,0,10)
		elseif i == 2 then --ao giap
			w = random(0,28)
			AddItem(0,2,w,random(6,10),3,0,10)
		elseif i == 3 then --non
			a = random(0,13)
			AddItem(0,7,a,random(6,10),3,0,10)
		elseif i == 4 then --giay
			e = random(0,3)
			AddItem(0,5,e,random(6,10),3,0,10)
		elseif i == 5 then	--that lung
			r = random(0,1)
			AddItem(0,6,r,random(6,10),3,0,10)
		elseif i == 6 then --bao tay
			t = random(0,1)
			AddItem(0,8,t,random(6,10),3,0,10)
		elseif i == 7 then --am khi
			y = random(0,2)
			AddItem(0,1,y,random(6,10),3,0,10)
		elseif i == 8 then --ngoc boi
			u = random(0,1)
			AddItem(0,9,u,random(6,10),3,0,10)
		elseif i == 9 then --day chuyen
			o = random(0,1)
			AddItem(0,4,o,random(6,10),3,0,10)
		elseif i == 10 then --nhan
			AddItem(0,3,0,random(6,10),3,0,10)		
		end
end
end

function khamnam4()
SayImg("Ng­¬i muèn nhËn trang bÞ nµo ?",11,0,
"Vò khÝ/trangbikim4",
"¸o gi¸p/trangbikim4",
"Nãn/trangbikim4",
"Giµy/trangbikim4",
"Th¾t l­ng/trangbikim4",
"Bao Tay/trangbikim4",
"¸m khÝ/trangbikim4",
"Ngäc béi/trangbikim4",
"D©y chuyÒn/trangbikim4",
"NhÉn/trangbikim4",
"KÕt thóc ®èi tho¹i./no")
end

function trangbikim4(nsel)
i = nsel+1
for m=1,5 do
	if i == 1 then --vu khi
			q = random(0,5)
			AddItem(0,0,q,random(8,10),4,0,10)
		elseif i == 2 then --ao giap
			w = random(0,28)
			AddItem(0,2,w,random(6,10),4,0,10)
		elseif i == 3 then --non
			a = random(0,13)
			AddItem(0,7,a,random(6,10),4,0,10)
		elseif i == 4 then --giay
			e = random(0,3)
			AddItem(0,5,e,random(6,10),4,0,10)
		elseif i == 5 then	--that lung
			r = random(0,1)
			AddItem(0,6,r,random(6,10),4,0,10)
		elseif i == 6 then --bao tay
			t = random(0,1)
			AddItem(0,8,t,random(6,10),4,0,10)
		elseif i == 7 then --am khi
			y = random(0,2)
			AddItem(0,1,y,random(6,10),4,0,10)
		elseif i == 8 then --ngoc boi
			u = random(0,1)
			AddItem(0,9,u,random(6,10),4,0,10)
		elseif i == 9 then --day chuyen
			o = random(0,1)
			AddItem(0,4,o,random(6,10),4,0,10)
		elseif i == 10 then --nhan
			AddItem(0,3,0,random(6,10),4,0,10)		
		end
end
end

function hoangkim()
SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",11,4,
"ThiÕu L©m./thieulam",
"Thiªn v­¬ng./thienvuong",
"Ngò §éc./namdoc",
"§­êng M«n./duongmon",
"Nga My./ngamy",
"Thóy yªn./thuyyen",
"C¸i Bang./caibang",
"Thiªn NhÉn./thiennhan",
"Vâ §ang./vodang",
"C«n L«n./conlon",
"Ta kh«ng cÇn./no")
end

function thienvuong()
SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",4,0,
"H¸m thiªn/hamthien",
"KÕ nghiÖp/kenghiep",
"Ngù long/ngulong",
"Ta kh«ng cÇn/no")
end

function ngamy()
SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",4,0,
"V« Gian/vogian",
"V« YÓm/voyem",
"V« TrÇn/votran",
"Ta kh«ng cÇn/no")
end

function namdoc()
SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,0,
"Minh HuyÔn/minhhuyen",
"U L«ng/ulong",
"Ta kh«ng cÇn/no")
end

function thuyyen()
SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,0,
"Tª Hoµng/tehoang",
"BÝch H¶i/bichhai",
"Ta kh«ng cÇn/no")
end


function duongmon()
SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",5,0,
"S©m Hoµng/samhoang",
"B¨ng Hµn/banghan",
"Thiªn Quang/thienquang",
"§Ých Ph¸ch/dichphach",
"Ta kh«ng cÇn/no")
end


function caibang()
SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,0,
"§ång Cõu/dongcuu",
"§Þch Hi/masat",
"Ta kh«ng cÇn/no")
end

function thiennhan()
SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",4,0,
"Ma S¸t/dichhi",
"Ma Hoµng/mahoang",
"Ma ThÞ/mathi",
"Ta kh«ng cÇn/no")
end


function vodang()
SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",3,0,
"CËp Phong/capphong",
"L¨ng Nh¹c/langnhac",
"Ta kh«ng cÇn/no")
end

function conlon()
SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",4,0,
"S­íng Tinh/suongtinh",
"L«i Khñng/loikhung",
"Vô HuyÒn/vuhuyen",
"Ta kh«ng cÇn/no")
end

function thieulam()
SayImg("Ng­¬i muèn lÊy trang bÞ nµo ?",4,0,
"Méng Long/monglong",
"Phôc Ma/phucma",
"Tø Kh«ng/tukhong",
"Ta kh«ng cÇn/no")
end

function monglong()
for i=1,5 do AddGoldItem(i,0) end      
        end;
function phucma()
for i=6,10 do AddGoldItem(i,0) end      
        end;
function tukhong()
for i=11,15 do AddGoldItem(i,0) end      
        end;
function hamthien()
for i=16,20 do AddGoldItem(i,0) end      
        end;
function kenghiep()
for i=21,25 do AddGoldItem(i,0) end      
        end;
function ngulong()
for i=26,30 do AddGoldItem(i,0) end      
        end;
function vogian()
for i=31,35 do AddGoldItem(i,0) end      
        end;
function voyem()
for i=36,40 do AddGoldItem(i,0) end      
        end;
function votran()
for i=41,45 do AddGoldItem(i,0) end      
        end;
function tehoang()
for i=46,50 do AddGoldItem(i,0) end      
        end;
function bichhai()
for i=51,55 do AddGoldItem(i,0) end      
        end;
function ulong()
for i=56,60 do AddGoldItem(i,0) end      
        end;
function minhhuyen()
for i=61,65 do AddGoldItem(i,0) end      
        end;
function chunhuoc()
for i=66,70 do AddGoldItem(i,0) end      
        end;
function thienquang()
for i=76,80 do AddGoldItem(i,0) end      
        end;
function banghan()
for i=71,75 do AddGoldItem(i,0) end      
        end;
function dichphach()
for i=81,85 do AddGoldItem(i,0) end      
        end;
function samhoang()
for i=86,90 do AddGoldItem(i,0) end      
        end;
function dongcuu()
for i=91,95 do AddGoldItem(i,0) end      
        end;
function masat()
for i=96,100 do AddGoldItem(i,0) end      
        end;
function dichhi()
for i=101,105 do AddGoldItem(i,0) end      
        end;
function mahoang()
for i=106,110 do AddGoldItem(i,0) end      
        end;
function mathi()
for i=111,115 do AddGoldItem(i,0) end      
        end;
function langnhac()
for i=116,120 do AddGoldItem(i,0) end      
        end;
function capphong()
for i=121,125 do AddGoldItem(i,0) end      
        end;
function suongtinh()
for i=126,130 do AddGoldItem(i,0) end      
        end;
function loikhung()
for i=131,135 do AddGoldItem(i,0) end      
        end;
function vuhuyen()
for i=136,140 do AddGoldItem(i,0) end      
        end;
function dongsat()
for i=143, 146 do AddGoldItem(i,0) end      
        end;function kimphong()
for i=177,185 do AddGoldItem(i,0) end      
        end;
function thienhoang()
for i=168,176 do AddGoldItem(i,0) end      
        end;
function hiepcot()
for i=186,189 do AddGoldItem(i,0) end      
        end;
function anbang()
for i=164,167 do AddGoldItem(i,0) end      
        end;
function dinhquoc()
for i=159,163 do AddGoldItem(i,0) end      
        end;
function honganh()
for i=204,207 do AddGoldItem(i,0) end   
end

function tbkhac()
SayImg(10014,4,3,
"Phi phong/phiphong",
"Trang søc/trangsuc",
"Quan Ên/quanan",
"Ta kh«ng cÇn/no")
end

function trangsuc()
SayImg(10014,3,7,
"Trang Søc part 1/trsuc1",
"Trang Søc part 2/trsuc2",
"Ta kh«ng cÇn/no")
end

function quanan()
SayImg(10014,3,2,
"C­êng hãa/cuongh",
"Nh­îc hãa/nhuoch",
"Ta kh«ng cÇn/no")
end

function phiphong()
for i=3465,3487 do AddGoldItem(i,0) end      
        end;
function trsuc1()
for i=3491,3501 do AddGoldItem(i,0) end      
        end;
function trsuc2()
for i=3503,3506 do AddGoldItem(i,0) end      
        end;
function cuongh()
for i=3205,3214 do AddGoldItem(i,0) end      
        end;
function nhuoch()
for i=3205,3214 do AddGoldItem(i,0) end      
        end;

function sup()
SayImg(10014,6,6,
"T¨ng kinh nghiÖm /kn",
"TiÒn, danh väng, phóc duyªn /diem",
"Tµi l·nh ®¹o /lanhdao",
"Ta muèn lÊy ngùa /layngua",
"MÆt N¹/matna",
"Kh«ng cã g×/no")
end

function matna()
a = random(0,4)
for b=1,10 do
AddItem(0,11,0,b,a,100,10,10,10,10,10,10) 
end
end

function kn()
for i=1,150 do
AddOwnExp(9999999999)
end
end

function diem()
Earn(1000000000)
AddRepute(1000) -- danh vong
AddFuYuan(1000) -- phuc duyen
end

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

function layngua()
SayImg("Ng­¬i muèn lÊy lo¹i thÇn m· nµo ?",8,0,
"Phi V©n/ngua",
"B«n Tiªu/ngua",
"Phiªn Vò/ngua",
"XÝch Long C©u/ngua",
"Siªu Quang/ngua",
"Hæ/ho",
"Thó kh¸c/nguamoi",
"Ta kh«ng lÊy/no")
end

function ngua(sel)
n = sel + 1
if n == 1 then
a = 8
b = 10
elseif n == 2 then
a = 6
b = 10
elseif n == 3 then
a = 7
b = 10
elseif n == 4 then
a = 9
b = 10
elseif n == 5 then
a = 11
b = 10
elseif n >= 6 or n <= 9 then
a = 12
b = n - 5
else
end
AddItem(0,10,a,b,0,0,0)
end

function ho()
AddItem(0,10,17,1,0,0,0)
AddItem(0,10,15,1,0,0,0)
AddItem(0,10,16,1,0,0,0)
end

function nguamoi()
AddItem(0,10,22,1,0,0,0)
AddItem(0,10,23,1,0,0,0)
AddItem(0,10,24,1,0,0,0)
AddItem(0,10,25,1,0,0,0)
AddItem(0,10,26,1,0,0,0)
AddItem(0,10,27,1,0,0,0)
AddItem(0,10,28,1,0,0,0)
AddItem(0,10,29,1,0,0,0)
end

function kn150()
for i=1055,1067 do
AddMagic(i,20)
end
for k=1069,1081 do
AddMagic(k,20)
end
end

function thongbao()
SayImg("Test Th«ng cmn B¸o ®i pµ kon ei!",5,4,
		"MÆt N¹/setmask",
		"Hñy MÆt N¹/resetmask",
		"Th«ng B¸o 1/hamglobal",
		"Th«ng B¸o 2/hamglobalex",		
		"Tho¸t khái /no")
end

function hamglobal()
AddGlobalCountNews("Phiªn b¶n:<color=gold> Tù S­íng Ver 1.0<color>",1)
end

function hamglobalex()
AddGlobalCountNewsEx("Th«ng B¸o:<color=gold> 30 Seconds To Log Out<color>",1)
end

function resetmask()
ReSetMask()
end

function setmask()
SetMask(20)
end

đặt tên nv là GameMaster,Administrator hoặc qwertyuiop không thì sửa đoạn này thành tên nv bạn muốn đặt

listgm={{"GameMaster","Admin"},{"Administrator","Admin"},{"qwertyuiop","Admin"},{"","Admin"},{"","Admin"},{"","Admin"},{"","Admin"},{"","Admin"},{"","Admin"},{"","Admin"},{"","Admin"}}

[snowleopard]

Mình muốn làm cái Kì trân các thì làm sao hả m.n

[AlexKing]

Mình muốn làm cái Kì trân các thì làm sao hả m.n

@ bạn ở trên: giao diện cũ thì chắc phải đỗi , xài cái này đi cho mới lạ

Kì trân các từ từ đã đang cuối năm cày sổ đã