nguyennhan718
07-05-13, 08:55 AM
Bác nào pro xem giúp mình script Phong Lăng độ này bị lỗi gì mà ko có thời gian kết thúc để đưa các member về Ba Lăng Vậy. Thanks
GioPhongLangDoBatDau = {9, 19}
PhutPhongLangDoBatDau = 5
ThoiGianBaoDanhPLD = 5
PhutBenThuyenChuanBiKhoiHanh = 40
PhutBenThuyenKhoiHanh = 43
PhutBenThuyenCapBen = 45
function phonglangdo()
gio = tonumber(date("%H"))
phut = tonumber(date("%M"))
w,x,y = GetWorldPos()
for i = 1, getn(GioPhongLangDoBatDau) do
if gio == GioPhongLangDoBatDau[i] and phut >= PhutBenThuyenChuanBiKhoiHanh and phut < PhutBenThuyenKhoiHanh then
AddGlobalCountNews("Thuyền đi Phong Lăng Độ sắp khởi hành.",1)
return
end
end
for i = 1, getn(GioPhongLangDoBatDau) do
if gio == GioPhongLangDoBatDau[i] and phut == PhutBenThuyenKhoiHanh then
batdaupld()
elseif gio == GioPhongLangDoBatDau[i] and phut == PhutBenThuyenCapBen then
denbopld()
end
end
end
function batdaupld()
gio = tonumber(date("%H"))
phut = tonumber(date("%M"))
w,x,y = GetWorldPos()
phut1 = PhutBenThuyenCapBen - phut
for g = 1,GetPlayerCount() do
PlayerIndex = g
if (w == 45) then
SetFightState(1)
Msg2SubWorld("Thuyền đã rời bến, còn "..phut1.." phút nữa sẽ cấp bến Phong Lăng Độ")
end
end
end
function denbopld()
w,x,y = GetWorldPos()
for u=1,GetPlayerCount() do
PlayerIndex = u
if w == 45 then
NewWorld(53, 200*8, 200*16);
SetFightState(0)
Msg2SubWorld("Các hạ về ba lăng huyện")
end
end
end
GioPhongLangDoBatDau = {9, 19}
PhutPhongLangDoBatDau = 5
ThoiGianBaoDanhPLD = 5
PhutBenThuyenChuanBiKhoiHanh = 40
PhutBenThuyenKhoiHanh = 43
PhutBenThuyenCapBen = 45
function phonglangdo()
gio = tonumber(date("%H"))
phut = tonumber(date("%M"))
w,x,y = GetWorldPos()
for i = 1, getn(GioPhongLangDoBatDau) do
if gio == GioPhongLangDoBatDau[i] and phut >= PhutBenThuyenChuanBiKhoiHanh and phut < PhutBenThuyenKhoiHanh then
AddGlobalCountNews("Thuyền đi Phong Lăng Độ sắp khởi hành.",1)
return
end
end
for i = 1, getn(GioPhongLangDoBatDau) do
if gio == GioPhongLangDoBatDau[i] and phut == PhutBenThuyenKhoiHanh then
batdaupld()
elseif gio == GioPhongLangDoBatDau[i] and phut == PhutBenThuyenCapBen then
denbopld()
end
end
end
function batdaupld()
gio = tonumber(date("%H"))
phut = tonumber(date("%M"))
w,x,y = GetWorldPos()
phut1 = PhutBenThuyenCapBen - phut
for g = 1,GetPlayerCount() do
PlayerIndex = g
if (w == 45) then
SetFightState(1)
Msg2SubWorld("Thuyền đã rời bến, còn "..phut1.." phút nữa sẽ cấp bến Phong Lăng Độ")
end
end
end
function denbopld()
w,x,y = GetWorldPos()
for u=1,GetPlayerCount() do
PlayerIndex = u
if w == 45 then
NewWorld(53, 200*8, 200*16);
SetFightState(0)
Msg2SubWorld("Các hạ về ba lăng huyện")
end
end
end