Share Server Rai (Trung Thu)

[Learning]

share bộ spr đi chủ pic. ko cần nhiều :X.

[shidaichi]

cái này mình pack lại xong xóa hết mấy cái kia rồi, các bạn muốn spr trung thu thì unpack file updaterai.pak
patch ko pak mình xóa mất rồi eward ơi

[nonameproviet]

làm sao láy được đồng để ăn event thế bạn mình bấm vào thằng kỳ trân các có 3 dồng


[Only registered and activated users can see links. ]

làm sao day ??? ?????

[gia_muvn]

add thêm KNB vào rồi lấy KNB đổi Tiền xu

[nonameproviet]

add sao bạn giúp mình đi cho mình nick yahoo luôn

[DuongDaiCaJX]

^^ pack từng cái ra quả không dễ dàng tí nào, pack luôn cả thì nó ra thư mục từ 1 đến 6 chẳng hiểu gì, làm từng cái thôi

[Linh_JX]

^^ pack từng cái ra quả không dễ dàng tí nào, pack luôn cả thì nó ra thư mục từ 1 đến 6 chẳng hiểu gì, làm từng cái thôi

[Only registered and activated users can see links. ] đây nek !
đã unpack hết rồi đó k thiếu gì đâu

[gia_muvn]

Copy code này chép đè lên file script/Global/thanbithuongnhan.lua

---------------------------------------------------------------------------
-----Script: Su Dung Binh Thuoc -------------------------------------------
-----Author: Ohishu -------------------------------------------
-----Date: 20/10/2010 -------------------------------------------
---------------------------------------------------------------------------
Include("\\Script\\source\\sourcejx49.lua")

idtasknb = 14
idtaskpd = 12
IDPhucDuyen_Tieu = 106
IDPhucDuyen_Trung = 107
IDPhucDuyen_Dai = 108
IDDanhVongLo = 112
IDLenhBaiNhanDoi_Tieu = 109
IDLenhBaiNhanDoi_Trung = 110
IDLenhBaiNhanDoi_Dai = 111
IDLenhBaiNhanDoi_Vip = 151

function main()
SayEx({"<color=cyan>ThÇn BÝ Th­¬ng Nh©n : <color> Ng­¬i muèn g× ë ta ?",
"Sö dông ®iÓm phóc duyªn/sudungpd",
"Sö dông danh väng/sudungdv",
"KiÓm tra sè ®iÓm/checkpoint",
"Tho¸t/Exit"})
end

function sudungdv()
SayEx({"<color=cyan>ThÇn BÝ Th­¬ng Nh©n : <color> Ng­¬i muèn mua g× ?",
"MËt TÞch TruyÒn ThuyÕt (500 danh väng)/sudungdvcond",
"L«ng Vò Ph­îng Hoµng (500 danh väng)/sudungdvcond",
"§å Phæ O Kim (500 danh väng)/sudungdvcond",
"ThÐp Tinh LuyÖn (500 danh väng)/sudungdvcond",
"ThÐp TruyÒn ThuyÕt (500 danh väng)/sudungdvcond",
"Ngò S¾c B¨ng Tinh (500 danh väng)/sudungdvcond",
"Tho¸t/Exit"})
end

function sudungdvcond(sel)
id = sel + 1
if id == 1 then
cp = 500
item = 3
elseif id == 2 then
cp = 500
item = 14
elseif id == 3 then
cp = 500
item = 16
elseif id == 4 then
cp = 500
item = 43
elseif id == 5 then
cp = 500
item = 126
elseif id == 6 then
cp = 500
item = 191

end
a = GetRepute()
if GetRepute() >= cp then
AddRepute(-cp)
if GetRepute() == a - cp then
AddEventItem(item)
Msg2Player("Giao dÞch thµnh c«ng !")
else
Msg2Player("B¹n kh«ng cã ®ñ "..cp.." danh väng !")
end
else
Msg2Player("B¹n kh«ng cã ®ñ "..cp.." danh väng !")
end
end


function checkpoint()
Talk(1,"","§iÓm phóc duyªn : "..GetTask(idtaskpd).."<enter>§iÓm danh väng : "..GetRepute().."")
end

function sudungpd()
SayEx({"<color=cyan>ThÇn BÝ Th­¬ng Nh©n : <color> Ng­¬i muèn mua g× ?",
"1 bé thñy tinh (200 ®iÓm)/paytt",
"TÝnh hång b¶o th¹ch (60 ®iÓm)/paythbt",
"BÝ kÝp 120 (2000 ®iÓm)/pay120nb",
"Kim nguyªn b¶o (2000 ®iÓm)/knb",
"S¸t thñ gi¶n (200 ®iÓm)/paylbva",
"Tho¸t/Exit"})
end

function knb()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 2000 then
SetTask(idtaskpd,GetTask(idtaskpd)-2000)
if GetTask(idtaskpd) == a - 2000 then
AddEventItem(219)
Msg2Player("NhËn ®­îc Kim Nguyªn B¶o")
else
Msg2Player("Kh«ng cã 20000 ®iÓm phóc duyªn")
end
else
Msg2Player("Kh«ng cã 2000 ®iÓm phóc duyªn")
end
end

function paylbva()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 200 then
SetTask(idtaskpd,GetTask(idtaskpd)-200)
if GetTask(idtaskpd) == a - 200 then
AddEventItem(131)
Msg2Player("NhËn ®­îc S¸t thñ gi¶n")
else
Msg2Player("Kh«ng cã 200 ®iÓm phóc duyªn")
end
else
Msg2Player("Kh«ng cã 200 ®iÓm phóc duyªn")
end
end

function paytt()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 200 then
SetTask(idtaskpd,GetTask(idtaskpd)-200)
if GetTask(idtaskpd) == a - 200 then
AddEventItem(28)
AddEventItem(30)
AddEventItem(29)
Msg2Player("NhËn ®­îc 1 bé thñy tinh !")
else
Msg2Player("Kh«ng cã 200 ®iÓm phóc duyªn")
end
else
Msg2Player("Kh«ng cã 200 ®iÓm phóc duyªn")
end
end

function paythbt()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 60 then
SetTask(idtaskpd,GetTask(idtaskpd)-60)
if GetTask(idtaskpd) == a - 60 then
AddEventItem(31)
Msg2Player("NhËn ®­îc 1 tÝnh hång b¶o th¹ch")
else
Msg2Player("Kh«ng cã 60 ®iÓm phóc duyªn")
end
else
Msg2Player("Kh«ng cã 60 ®iÓm phóc duyªn")
end
end

function pay120nb()
SayEx({"<color="..colorS()..">phóc duyªn §¹i Ca<color>: H·y lùa chän bk 120 !",
"ThiÕu l©m/nb120tl",
"Thiªn v­¬ng/nb120tv",
"§­êng m«n/nb120dm",
"Ngò ®éc/nb120nd",
"Nga my/nb120nm",
"Thóy yªn/nb120ty",
"C¸i bang/nb120cb",
"Thiªn nhÉn/nb120tn",
"Vâ ®ang/nb120vd",
"C«n l«n/nb120cl",
"Tho¸t/Exit"})
end

function nb120tl()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 2000 then
SetTask(idtaskpd,GetTask(idtaskpd)-2000)
if GetTask(idtaskpd) == a - 2000 then
AddEventItem(163)
Msg2Player("NhËn ®­îc bÝ kÝp 120 thiÕu l©m")
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
end

function nb120tv()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 2000 then
SetTask(idtaskpd,GetTask(idtaskpd)-2000)
if GetTask(idtaskpd) == a - 2000 then
AddEventItem(169)
Msg2Player("NhËn ®­îc bÝ kÝp 120 thiªn v­¬ng")
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
end

function nb120dm()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 2000 then
SetTask(idtaskpd,GetTask(idtaskpd)-2000)
if GetTask(idtaskpd) == a - 2000 then
AddEventItem(166)
Msg2Player("NhËn ®­îc bÝ kÝp 120 ®­êng m«n")
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
end

function nb120nd()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 2000 then
SetTask(idtaskpd,GetTask(idtaskpd)-2000)
if GetTask(idtaskpd) == a - 2000 then
AddEventItem(162)
Msg2Player("NhËn ®­îc bÝ kÝp 120 ngò ®éc")
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
end

function nb120nm()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 2000 then
SetTask(idtaskpd,GetTask(idtaskpd)-2000)
if GetTask(idtaskpd) == a - 2000 then
AddEventItem(161)
Msg2Player("NhËn ®­îc bÝ kÝp 120 nga my")
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
end

function nb120ty()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 2000 then
SetTask(idtaskpd,GetTask(idtaskpd)-2000)
if GetTask(idtaskpd) == a - 2000 then
AddEventItem(165)
Msg2Player("NhËn ®­îc bÝ kÝp 120 thóy yªn")
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
end

function nb120cb()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 2000 then
SetTask(idtaskpd,GetTask(idtaskpd)-2000)
if GetTask(idtaskpd) == a - 2000 then
AddEventItem(164)
Msg2Player("NhËn ®­îc bÝ kÝp 120 c¸i bang")
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
end

function nb120tn()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 2000 then
SetTask(idtaskpd,GetTask(idtaskpd)-2000)
if GetTask(idtaskpd) == a - 2000 then
AddEventItem(168)
Msg2Player("NhËn ®­îc bÝ kÝp 120 thiªn nhÉn")
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
end

function nb120vd()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 2000 then
SetTask(idtaskpd,GetTask(idtaskpd)-2000)
if GetTask(idtaskpd) == a - 2000 then
AddEventItem(170)
Msg2Player("NhËn ®­îc bÝ kÝp 120 vâ ®ang")
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
end

function nb120cl()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 2000 then
SetTask(idtaskpd,GetTask(idtaskpd)-2000)
if GetTask(idtaskpd) == a - 2000 then
AddEventItem(167)
Msg2Player("NhËn ®­îc bÝ kÝp 120 c«n l«n")
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
else
Msg2Player("B¹n kh«ng cã 2000 ®iÓm phóc duyªn")
end
end

function payruounb()
SayEx({"<color="..colorS()..">phóc duyªn §¹i Ca<color>: Xin mêi chän ?",
"HuÕ tuyªn töu (20 ®iÓm)/payruou1nb",
"Kim lang xu©n (80 ®iÓm)/payruou2nb",
"B¸ch hoa nh­¬ng (120 ®iÓm)/payruou3nb",
"Danh Väng Lé (200 ®iÓm)/payruou4nb",
"Tho¸t/Exit"})
end

function payruou1nb()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 20 then
SetTask(idtaskpd,GetTask(idtaskpd)-20)
if GetTask(idtaskpd) == a - 20 then
AddEventItem(109)
Msg2Player("Giao dÞch thµnh c«ng !")
else
Msg2Player("B¹n kh«ng cã 20 ®iÓm phóc duyªn.")
end
else
Msg2Player("B¹n kh«ng cã 20 ®iÓm phóc duyªn.")
end
end

function payruou2nb()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 80 then
SetTask(idtaskpd,GetTask(idtaskpd)-80)
if GetTask(idtaskpd) == a - 80 then
AddEventItem(110)
Msg2Player("Giao dÞch thµnh c«ng !")
else
Msg2Player("B¹n kh«ng cã 80 ®iÓm phóc duyªn.")
end
else
Msg2Player("B¹n kh«ng cã 80 ®iÓm phóc duyªn.")
end
end

function payruou3nb()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 120 then
SetTask(idtaskpd,GetTask(idtaskpd)-120)
if GetTask(idtaskpd) == a - 120 then
AddEventItem(111)
Msg2Player("Giao dÞch thµnh c«ng !")
else
Msg2Player("B¹n kh«ng cã 120 ®iÓm phóc duyªn.")
end
else
Msg2Player("B¹n kh«ng cã 120 ®iÓm phóc duyªn.")
end
end

function payruou4nb()
a = GetTask(idtaskpd)
if GetTask(idtaskpd) >= 200 then
SetTask(idtaskpd,GetTask(idtaskpd)-200)
if GetTask(idtaskpd) == a - 200 then
AddEventItem(151)
Msg2Player("Giao dÞch thµnh c«ng !")
else
Msg2Player("B¹n kh«ng cã 200 ®iÓm phóc duyªn.")
end
else
Msg2Player("B¹n kh«ng cã 200 ®iÓm phóc duyªn.")
end
end



function Exit()
end;

[vipbk]

đề nghị bạn gia_muvn cho nội dung vào thẻ SPOILER, nhìn phát choáng @@

[runkissbig]

đề nghị bạn gia_muvn cho nội dung vào thẻ SPOILER, nhìn phát choáng @@

hinh nhu vipbk la admin cua kiemkhach.g4vn.com phai ko?
neu ko phai thi sorry hi`