Script Ủy Thác Rời Mạng

[Mr.Rezo™]

Đây là Script Ủy Thác gốc của Mướp ... nhưng sài khó khăn mình fix lại dùm anh em :">

+ Ủy thác tối đa 1 tiếng sau đó nhận kinh nghiệm
+ Phí nhận kinh nghiệm tích lũy ủy thác : 50.000 vạn lượng
+ ủy thác có thể rời mạng . tích lũy điểm thoải mái sau đó đem đổi.
+ kinh nghiệm ủy thác nhận được phân theo đẳng cấp.
+ Nếu đã đăng ký VIP thì điểm exp nhận được gấp đôi.

★- Dùng tốt cho Server của Rezo
★- Chép vào 1 NPC bật kỳ để sử dụng



Include("\\Script\\global\\sourcejx49.lua");
function main()
uythac()
end;

function uythac()
SayEx({"<color=yellow>Uy Thac:<color> Uy Thac co the doi mang, hoac o tren mang van nhan duoc thoi gian tich luy uy thac.",
"Bat dau Uy Thac./bdut",
"Dung Uy Thac./dut",
"Nhan kinh nghiem uy thac./dkndut",
"Kiem tra thoi gian tich luy Uy Thac./kttgtlut",
"Thoat./no"})
end;

function bdut()
x = {
{1,{0}},
{2,{0,31}},
{3,{0,31,29}},
{4,{0,31,29,31}},
{5,{0,31,29,31,30}},
{6,{0,31,29,31,30,31}},
{7,{0,31,29,31,30,31,30}},
{8,{0,31,29,31,30,31,30,31}},
{9,{0,31,29,31,30,31,30,31,31}},
{10,{0,31,29,31,30,31,30,31,31,30}},
{11,{0,31,29,31,30,31,30,31,31,30,31}},
{12,{0,31,29,31,30,31,30,31,31,30,31,30}},
}
if (GetTask(60) == 0) then
SetTask(60,100000)
ngay = tonumber(date("%d"))
thang = tonumber(date("%m"))
gio = tonumber(date("%H"))
phut = tonumber(date("%M"))
y = 0
for i=1,thang do
y =(x[thang][2][i] * 24 * 60) + y
end
batdau = phut + (gio * 60) + (ngay * 24 * 60) + y
SetTask(61,batdau)
MsgEx("Ban da bat dau thoi gian Uy Thac.")
else
MsgEx("Ban dang trong trang thai <color=yellow>Uy Thac<color>, khong the lua chon bat dau uy thac.",1)
end
end;

function dut()
x = {
{1,{0}},
{2,{0,31}},
{3,{0,31,29}},
{4,{0,31,29,31}},
{5,{0,31,29,31,30}},
{6,{0,31,29,31,30,31}},
{7,{0,31,29,31,30,31,30}},
{8,{0,31,29,31,30,31,30,31}},
{9,{0,31,29,31,30,31,30,31,31}},
{10,{0,31,29,31,30,31,30,31,31,30}},
{11,{0,31,29,31,30,31,30,31,31,30,31}},
{12,{0,31,29,31,30,31,30,31,31,30,31,30}},
}
if (GetTask(60) == 100000) then
SetTask(60,0)
ngay = tonumber(date("%d"))
thang = tonumber(date("%m"))
gio = tonumber(date("%H"))
phut = tonumber(date("%M"))
y = 0
for i=1,thang do
y = (x[thang][2][i] * 24 * 60) + y
end
batdau = GetTask(61)
ketthuc = phut + (gio * 60) + (ngay * 24 * 60) + y
tgtlut = ketthuc - batdau
SetTask(62,GetTask(62)+tgtlut)
SetTask(61,0)
MsgEx("Ban da ket thuc thoi gian Uy Thac.")
else
MsgEx("Ban khong o trong trang thai <color=yellow>Uy Thac<color>, khong the chon dung Uy Thac.",1)
end
end;

function no()
end;

function kttgtlut()
tgtlut = GetTask(62)
MsgEx("Thoi gian Uy Thac tich luy Uy Thac cua ban hien gio la "..tgtlut.." phut")
end;

function dkndut()
SayEx({"De doi kinh nghiem, diem tu thoi gian <color=yellow>Tich Luy Uy Thac<color> ban can co <Green=yellow>50.000 van luong<color>.",
"Dong Y./lbutt",
"Thoat./no"})
end;

function lbutt()
if (GetLevel() >= 50) then
if (GetTask(62) >= 60) then
if (GetCash() >= 50000000) then
SetTask(62,GetTask(62) - 60)
Pay(50000000)
exp = ExpUyThac()/100*GetVipUT()
for i=1,exp do
AddOwnExp(100)
end
SetTask(62,GetTask(62)-60)
MsgEx("Ban da nhan duoc diem kinh nghiem uy thac.")
else
MsgEx("Ban khong mang theo <color=yellow>50.000 van luong<color>.",1)
end
else
MsgEx("phai co it nhat <color=blue>1 gio Tich Luy Uy Thac<color> moi co the doi.",1)
end
else
MsgEx("Dang cap cua ban chua dat den <color=red>50<color>.",1)
end
end

function ExpUyThac()
if (GetLevel() > 50) and (GetLevel() <= 60) then
return 300000
elseif (GetLevel() > 60) and (GetLevel() <= 80) then
return 600000
elseif (GetLevel() > 80) and (GetLevel() <= 100) then
return 800000
elseif (GetLevel() > 100) and (GetLevel() <= 120) then
return 1000000
elseif (GetLevel() > 120) and (GetLevel() <= 150) then
return 2400000
elseif (GetLevel() > 150) and (GetLevel() <= 160) then
return 3600000
elseif (GetLevel() > 160) and (GetLevel() <= 180) then
return 4500000
elseif (GetLevel() > 180) and (GetLevel() <= 200) then
return 6000000
end
end

function GetVipUT()
if GetTask(TaskVIP) == nil then
return 1
elseif GetTask(TaskVIP) >= 1 then
return 2
elseif GetTask(TaskVIP) == 0 then
return 1
end
end;

[tungpro102]

póc tem mà cái này hình như có rồi mà

[Mr.Rezo™]

tất nhiên ngay câu đầu đã nói gốc Mướp nhưng không dành cho người không biết sài :)

script này fix lại rất nhiều ... thềm luôn 2 chức năng :



+ exp ủy thác nhận phân theo cấp .

+ đăng ký VIP thì exp nhận được gấp đôi.


Thêm nữa của Mướp là đủ 8h ủy thác mới đ.c ra rút exp .

Script này fix xuống còn 1h là nhận được ... còn lại thừa giờ thì bù thêm vào lần sau.

[kinkina2009]

tui có code theo của Mướp cái sCript như VNG . Ủy Thác + Kỹ Năng và EXP :D

[Mr.Rezo™]

ờ thế làm được cái Chuyển sinh xong nó tự động xếp TOP người đứng đầu rồi thông báo không ?

[notfile]

tốt đây dù ta rất ghét ngươi nhưng cũng thanks ngươi !!!!!

[kinkina2009]

ờ thế làm được cái Chuyển sinh xong nó tự động xếp TOP người đứng đầu rồi thông báo không ?

nó khó lắm à :-??
P.S: Tài mi đừng có quá tự cao nữa, ta nói thật lòng đó

[thaihoa91]

<b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>

[Mr.Rezo™]

xin lỗi chẳng phải tự cao mà đẳng cấp của tôi nó khác cậu . hiểu chứ kinkina ?

nghe GM nói Server Online cậu hay bị tự don't send gameserver nhỉ :))

[notfile]

xin lỗi chẳng phải tự cao mà đẳng cấp của tôi nó khác cậu . hiểu chứ kinkina ?

nghe GM nói Server Online cậu hay bị tự don't send gameserver nhỉ :))

Tên Rezo này quá tự cao !!! chết sớm thôi em àh =))=))

[thaihoa91]

Đẳng cấp ko phải tự mình nói ra mình là đẳng cấp !

Đẳng cấp là những điều dc đánh giá từ những ng` xung wanh :D

[kinkina2009]

xin lỗi chẳng phải tự cao mà đẳng cấp của tôi nó khác cậu . Hiểu chứ kinkina ?

Nghe gm nói server online cậu hay bị tự don't send gameserver nhỉ :))
. :-??

[Mr.Rezo™]

à GM của tớ mới đưa tin cậu hay kêu than GameServer tự dưng don't send :))

tớ ko hiểu cậu code kiểu gì nữa :))

@Thái Hòa : kể cả cậu luôn Hòa ạ ;)

[thaihoa91]

à GM của tớ mới đưa tin cậu hay kêu than GameServer tự dưng don't send :))

tớ ko hiểu cậu code kiểu gì nữa :))

@Thái Hòa : kể cả cậu luôn Hòa ạ ;)

Tui đã nói thế thì bao gồm cả tui lun đấy, tự member sẽ nhận xét, ko cần phải tự nói rằng, ta là người có đẳng cấp, như thế giống như tự sơn lại nhà mình cho thêm mới và tự khen nhà mình đẹp wá, còn riêng những ng` khác nhìn vào nhận xét nhà mình ra sao thì mặc !

Làm thế mình nghĩ giống cái trò con nít chơi siêu nhân : Con nít thường ưa nói "ta là siêu nhân đây !"

[Mr.Rezo™]

ờ thế chuẩn bị lại có bình nhưỡng với triều tiên à =))

@notfile : cái Server mày chưa ngỏm mày chưa chừa à ?

[thaihoa91]

<b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>

[kinkina2009]

à GM của tớ mới đưa tin cậu hay kêu than GameServer tự dưng don't send :))

tớ ko hiểu cậu code kiểu gì nữa :))

@Thái Hòa : kể cả cậu luôn Hòa ạ ;)

nói thật script tui code chưa bị do'n sent =)) lần nào :-|. Còn GS bị chẳng qua là do lão Mướp chỉ tui kia RollBack = Skill mới ra cơ sự . Nhưng nó chả ăn nhằm gì hết, hiểu chứ;)

[zonjkut3]

<b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>

Bình nhưỡng vs triều tiên đang có chiến tranh
Ý bác tài bảo sắp có war :D

[Mr.Rezo™]

vậy cậu có tin GameServer cậu sẽ don't send bất kỳ lúc nào tôi muốn không ?

[kinkina2009]

học được vài trò thì hống hách. Cứ thích tỏ ra là mình nguy hiểm trong khi cũng được người khác giúp đỡ như ai . Ông phải nghĩ lại cái ngày trước SV của ông đó
xem kĩ nhé
mấy người như : thái + KS + Saint + votinh có ngạo mạn như ông không . Chưa tới đâu mà thích lên mặt .

[Mr.Rezo™]

vậy thử hỏi những thằng như mày xem kinkina ? làm được gì mà vênh với a thế =.="

thử hỏi xem cái Website TTK nếu thằng Tài này không nể tình đồng ý cho GM sang làm

thì có lẽ giờ này chịu trận với vài trăm IP ddos chú em ạ :">

Có muốn biết nhằm nhò hay không thì nó đơn giản vô cùng.

[kinkina2009]

trước giờ tui có làm TTK nữa đâu :-??
mà nói thật thằng này vênh cái gì . Lập 1 topic sừa lỗi thì bị gọi là vênh sao =))

[thaihoa91]

Tui nhớ ko lầm thì Rezo đã lập hẳn 1 topic về việc làm giáo viên dạy cho newbie lẫn member thì phải ! Thế lo tới đâu rùi mà sao thấy thảnh thơi đi tán gẫu nhìu vậy, học phí cao ko ??? Dc bao nhiu ng` đăng ký và đang theo học ???

[kinkina2009]

vậy thử hỏi những thằng như mày xem kinkina ? làm được gì mà vênh với a thế =.="

thử hỏi xem cái Website TTK nếu thằng Tài này không nể tình đồng ý cho GM sang làm

thì có lẽ giờ này chịu trận với vài trăm IP ddos chú em ạ :">

Có muốn biết nhằm nhò hay không thì nó đơn giản vô cùng.

ủa mà GM sang là ku sangpronhat akb-(

[Mr.Rezo™]

tốt nhất là im lặng sớm đi :) kẻo đến cái website cũng không còn đâu.

à còn cậu Hòa hỏi vụ dạy JX thì tôi đang soạn giáo án riêng .

Học phí ước lượng tầm 10k/buổi ... 1 tuần học 2 buổi.