Script ủy thác rời mạng.

[hongtu1]

Đại ka cho em xin yahoo được không, em muốn hỏi cái Liên đấu của đại ka chút.

Đung đó Manhtuyen cho xin yahoo đi,mình cũng đang muốn dung cai Bang hôi_CTC của cậu mà vẫn chưa dc,muốn hỏi chút

[thachlong78]

Mấy lệnh spit mình chỉ biết vài lệnh cơ bản thôi ai có lệnh nào hay cho mình với càng nhiều càng tốt. Có mấy lệnh ngoài mấy sever TQ viết càng tốt nhé, hi`.

[ngoaho]

tuyệt vời, các bạn giỏi thật đấy, thế có ai có hứng viết nhiệm vụ thiên môn trận giống võ lâm 2 không

[errorxviii]

Thiên môn trận ở VL 2 cũng tương đương chuỗi nhiệm vụ hoàng kim ở VL 1 rồi còn gì. Muốn làm thì phải đầu tư thời gian tìm hiểu kịch bản tiếp diễn ra sao thôi.

[huongphieubat]

Spit ủy thác rời mạng:



function main(sel)
Say("<color=green>Uy Thac<color> co the doi mang, hoac o tren mang van nhan duoc <color=yellow>Thoi Gian Tich Luy Uy Thac.",5,"1.Bat dau Uy Thac/bdut","2.Dung Uy Thac/dut","3.Kiem tra thoi gian tich luy Uy Thac/kttgtlut","4.Doi kinh nghiem, diem uy thac/dkndut","Ta chi ghe tham thoi/no")


end
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)

Msg2Player("Ban da bat dau thoi gian Uy Thac")
else
Talk(1,"","Ban dang trong trang thai <color=red>Uy Thac<color>, khong the lua chon bat dau uy thac")
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)
Msg2Player("Ban da ket thuc thoi gian Uy Thac")
else
Talk(1,"","Ban khong o trong trang thai <color=red>Uy Thac<color>, khong the chon dung Uy Thac")
end
end;

function no()
end;
function kttgtlut()
tgtlut = GetTask(62)
Msg2Player("Thoi gian Uy Thac tich luy Uy Thac cua ban hien gio la "..tgtlut.." phut")
end;
function dkndut()
Say("De doi kinh nghiem, diem tu thoi gian <color=green>Tich Luy Uy Thac<color> ban can co <color= yellow>Lenh Bai Uy Thac<color>, tuy lenh bai se nhan duoc kinh nghiem, diem khac nhau",3,"Lenh Bai Uy Thac Thuong/lbutt","Lenh Bai Uy Thac Sieu Cap/lbutsc","Ta chi ghe tham thoi/no")
end;
function lbutsc()
Say("<color=green>Lenh Bai Uy Thac Sieu Cap<color> ban <color=yellow>Intem",1,"Ta biet roi/no")
end;
function lbutt()
Say("Su dung moi <color=green>Lenh Bai Uy Thac Thuong<color>, ban co the doi duoc 8 gio tich luy uy thac ra diem, kinh nghiem, nguoi <color=yellow>Mua Intem cua sever<color> se nhan duoc kinh nghiem, diem gap 1,5 lan",2,"Su dung lenh bai/sdlb1","Ta chi ghe tham thoi/no")
end;
function sdlb1()
lvknnd = {
{60,300000},
{80,600000},
{100,800000},
{120,1000000},
{150,2400000},
{160,3600000},
{180,4500000},
{200,6000000},
}
if (GetLevel() >= 50) then
if (GetTask(62) >= 480) then
if (HaveItem(235) == 1) then
if (GetTask(237) == 100000) then
utit = 3/2
else
utit = 1
end
if (GetLevel() <= lvknnd[1][1]) then
SetTask(62,GetTask(62) - 480)
DelItem(235)
knyt = lvknnd[1][2] * utit
for i=1,480 do
AddOwnExp(knyt)
end
elseif (GetLevel() <= lvknnd[2][1]) then
SetTask(62,GetTask(62) - 480)
DelItem(235)
knyt = lvknnd[2][2] * utit
for i=1,480 do
AddOwnExp(knyt)
end
elseif (GetLevel() <= lvknnd[3][1]) then
SetTask(62,GetTask(62) - 480)
DelItem(235)
knyt = lvknnd[3][2] * utit
for i=1,480 do
AddOwnExp(knyt)
end
elseif (GetLevel() <= lvknnd[4][1]) then
SetTask(62,GetTask(62) - 480)
DelItem(235)
knyt = lvknnd[4][2] * utit
for i=1,480 do
AddOwnExp(knyt)
end
elseif (GetLevel() <= lvknnd[5][1]) then
SetTask(62,GetTask(62) - 480)
DelItem(235)
knyt = lvknnd[5][2] * utit
for i=1,480 do
AddOwnExp(knyt)
end
elseif (GetLevel() <= lvknnd[6][1]) then
SetTask(62,GetTask(62) - 480)
DelItem(235)
knyt = lvknnd[6][2] * utit
for i=1,480 do
AddOwnExp(knyt)
end
elseif (GetLevel() <= lvknnd[7][1]) then
SetTask(62,GetTask(62) - 480)
DelItem(235)
knyt = lvknnd[7][2] * utit
for i=1,480 do
AddOwnExp(knyt)
end
elseif (GetLevel() <= lvknnd[8][1]) then
SetTask(62,GetTask(62) - 480)
DelItem(235)
knyt = lvknnd[8][2] * utit
for i=1,480 do
AddOwnExp(knyt)
end
end
else
Talk(1,"","Ban khong co <color=red>Lenh Bai Uy Thac Thuong<color>")
end
else
Talk(1,"","Ban khong du <color=red>8 gio Tich Luy Uy Thac<color>")
end
else
Talk(1,"","Ban khong du <color=red>dang cap 50<color>")
end



end;



Mấy cái vật phẩm Lệnh Bài các bạn add ra là được, cho vào 1 con NPC bán lệnh bài luôn.
Mình viết cái này chỉ ủy thác trong năm thôi còn nếu thích ủy thác qua năm khác thì viết thêm năm nữa là ok thôi (cái này nếu để NV ủy thác qua gia thừa là lỗi ngay đó)

cái lỗi trên có thể khắc phục bằng hàm time và difftime của lua. Chỉ cách sử dụng lun nhé:
ban đầu
function bdut()
if (GetTask(60) == 0) then
SetTask(60,100000)
t1 = time() -- sẽ trả về thời gian hiện tại của hệ thống tính bằng giây so với thời gian gốc ban đầu (hình như là năm 1970)

....
end;
function dut()
if (GetTask(60) == 100000) then
SetTask(60,0)
Khoang_tg=difftime(time(),t1) -- sẽ trả về độ chênh lệch giữa 2 tgian (tính bằng giây)

Test thử xem nhé HPB ko có server để test nên hok bit đúng hay sai , cách này sẽ giúp bạn ko cần care là đang ở thời điểm nào, dù qua năm mới đi chăng nữa hay là năm nhuận cũng vẫn bình thường.
Quên mất, cú pháp của 2 hàm trên là
time(year=Y, month=m, day=d, hour=H,min=M, sec=s)
trong đó Y là fullyear ví dụ 2009
m là month từ 01-12
d là day 01-31
H là hour (24) 01-24
M là minute 00-59
s là second 00-59
và isdst là dạng boolean trả về true nếu có daylight saving
difftime(t1, t2)
t1, t2 là 2 thời gian dc đem so sánh, được lấy chủ yếu nhờ hàm time
ví dụ

[thachlong78]

Ok, như vậy sẽ ngắn hơn được 1 đoạn hà. Còn cái lệnh nèo mới hem share nên nèo cho mọi người dùng thử chút (ha` ha` trong dó có ta).

[vuthaitrung]

Cái này phải load 6 link sv mới tính là ủy thác hả mọi người

[DaDuyTeo]

Sao em gắn sciprt này vô NPC rồi nhưng khi vào game click vô NPC đó thì kô có phản ứng gì hết vậy anh . Trong khi em đã khởi động NPC goày

[Iron_man]

script này sử dụng sao vậy mấy bạn , tới con NPC thì kiểm tra lúc nào cũng còn 0h ,làm sao nạp giờ để ủy thác

[dzi1206]

ai biết cách làm như nào chỉ giúp tôi với . tôi mới chơi chưa biết cách cho vào như nào và sử dụng như nào . xin pr0 chỉ giúp . cám ơn !