Hỏi về chức năng tranh VLMC

[MinYeuVy]

Các pro cho hỏi không biết file dưới bị lỗi gì mà mình đăng kí tranh đoạt, nó báo còn 10 phút nữa bắt đầu thi đấu. Mình đợi hết 10 phút thì k có gì xảy ra :|, xem lại file TimerTask thì đúng đường dẫn + ID rồi, xin các pro giúp đỡ :(


Include("\\script\\source\\sourcejx49.lua")
Include("\\dulieu\\minhchu_bd.lua")
Include("\\dulieu\\minhchu_hd.lua")
Include("\\dulieu\\minhchu_ld.lua")
Include("\\dulieu\\tranhvlmc_bd.lua")
Include("\\dulieu\\tranhvlmc_hd.lua")
Include("\\dulieu\\tranhvlmc_ld.lua")

function main()
if GetTask(42) == 1 then
lanhdia = "Bach Dao"
lanlap = thi_dau_bd
elseif GetTask(42) == 2 then
lanhdia = "Hac Dao"
lanlap = thi_dau_hd
elseif GetTask(42) == 3 then
lanhdia = "Luong Dao"
lanlap = thi_dau_ld
end
gio = tonumber(date("%H"))
phut = tonumber(date("%M"))
if gio == 19 and phut >= 20 and phut < 30 then
for i=1,getn(lanlap) do
if GetUUID() == (lanlap[i][7]) then
SayEx({"<color=cyan>Loi Dai Ty Vo:<color> Hien Dang Trong Giai Doan Tranh Ngoi Vo Lam Minh Chu Cua <color=red>"..lanhdia.."<color> Nguoi La Tuyen Thu Muon Vao Dau Truong ?",
"Vang ! Ta Muon Vao/godautruong",
"Ve Ba Lang Huyen/goblh",
"Tim Hieu Thoi Gian/timhieutime",
"Thoat/Exit"})
else
Talk(1,"goblh","<color=cyan>Loi Dai Ty Vo:<color> Nguoi Chua Dang Ky Tranh Ngoi Vo Lam Minh Chu Xin Ve BLH Gap Vo Lam Chi Ton De Biet Them Thong Tin !")
end
end
else
SayEx({"<color=cyan>Loi Dai Ty Vo:<color> Hien Chua Den Thoi Gian Thi Dau Tranh Ngoi Vo Lam Minh Chu Nguoi Gap Ta De Lam Gi ?",
"Ve Ba Lang Huyen/goblh",
"Tim Hieu Thoi Gian/timhieutime",
"Thoat/Exit"})
end
end

function timhieutime()
Talk(1,"","<color=cyan>Loi Dai Ty Vo:<color> Hoat Dong Tranh Ngoi Vo Lam Minh Chu Bat Dau Sau 10 Phut Ke Tu Khi Ket Thuc Su Kien Bao Danh [ 19h30 ] !")
end

function godautruong()
if GetTask(42) == 1 then
lanhdia = "Bach Dao"
maps = 54
elseif GetTask(42) == 2 then
lanhdia = "Hac Dao"
maps = 55
elseif GetTask(42) == 3 then
lanhdia = "Luong Dao"
maps = 56
end
NewWorld(maps,1576+random(-2,2),random(-2,2)+3216)
phut = tonumber(date("%M"))
giay = tonumber(date("%S"))
thoigiancho = ((30-phut)*60) - giay
SetLogoutRV(1)
SetTimer(thoigiancho*18,11)
SetFightState(0)
SetPunish(0)
Msg2Player("Tran Loi Dai Se Dien Ra Trong Vong "..30-phut.." Phut Nua !")
Msg2SubWorld("Cao Thu "..GetName().." Da Vao Hoi Truong Tranh Vo Lam Minh Chu "..lanhdia.." !")
end


function OnTimer()
phut = tonumber(date("%M"))
gio = tonumber(date("%H"))
if GetTask(42) == 1 then
Idmaps = 54
lanhdia = "Bach Dao"
solanlap = thi_dau_bd
solanlap1 = "thi_dau_bd"
solanlap2 = minhchubachdao
solanlap3 = "minhchubachdao"
solanlap4 = danhsachbachdao
solanlap5 = "danhsachbachdao"
camp = 1
data1 = "dulieu/tranhvlmc_bd.lua"
data2 = "dulieu/minhchu_bd.lua"
data3 = "dulieu/listbachdao.lua"
rank = 17
elseif GetTask(42) == 2 then
Idmaps = 55
lanhdia = "Hac Dao"
solanlap = thi_dau_hd
solanlap1 = "thi_dau_hd"
solanlap2 = minhchuhacdao
solanlap3 = "minhchuhacdao"
solanlap4 = danhsachhacdao
solanlap5 = "danhsachhacdao"
camp = 2
data1 = "dulieu/tranhvlmc_hd.lua"
data2 = "dulieu/minhchu_hd.lua"
data3 = "dulieu/listhacdao.lua"
rank = 24
elseif GetTask(42) == 3 then
Idmaps = 56
lanhdia = "Luong Dao"
solanlap = thi_dau_ld
solanlap1 = "thi_dau_ld"
solanlap2 = minhchuluongdao
solanlap3 = "minhchuluongdao"
solanlap4 = danhsachluongdao
solanlap5 = "danhsachluongdao"
camp = 3
data1 = "dulieu/tranhvlmc_ld.lua"
data2 = "dulieu/minhchu_ld.lua"
data3 = "dulieu/listluongdao.lua"
rank = 31
end
w,x,y = GetWorldPos()
if w == Idmaps and gio == 19 and phut >= 30 and phut < 45 then ---- Xac Dinh De Thuc Thi OnTimer
for i=1,500 do --- Ham Dua Member Khong Tham Gia Tran Dau Ve BLH !
PlayerIndex = i
w,x,y = GetWorldPos()
if w == (Idmaps) then
for i=1,getn(solanlap) do
if GetUUID() ~= (solanlap[i][7]) then
goblh()
end
end
end
end
if CountPlayerInMaps(Idmaps) == 1 then --- Neu Chi Co 1 Nguoi Tham Gia Thi Se Chay Ham Nay !
for i=1,getn(solanlap) do
if GetUUID() == solanlap[i][7] then
danhsach = TaoBang(solanlap2,solanlap3,"")
solanlap2[1][1] = solanlap[i][1]
solanlap2[1][2] = solanlap[i][2]
solanlap2[1][3] = solanlap[i][3]
solanlap2[1][4] = solanlap[i][4]
solanlap2[1][5] = solanlap[i][5]
solanlap2[1][6] = "Minh Chu "..lanhdia..""
solanlap2[1][7] = solanlap[i][7]
SaveData(data2,danhsach)
SetCurCamp(camp);
SetRank(rank)
SetCreateTeam(1);
SetFightState(0);
SetPunish(1)
StopTimer()
goblh()
Earn(500000)
Msg2Player("Ban Nhan Duoc Phan Thuong 500 van !")
AddGlobalCountNews("Ky Tai "..GetName().." Da Gianh Chien Thang Tro Thanh Vo Lam Minh Chu "..lanhdia.."",3)
Msg2Player("Ngoi Vi Vo Lam Minh Chu "..lanhdia.." Da Thuoc Ve Ban !")
end
solanlap[i] = nil --- Xoa All List Member Dang Ky
danhsach = TaoBang(solanlap,solanlap1,"")
SaveData(data1,danhsach)
end
for i=1,getn(solanlap4) do
if GetUUID() == solanlap4[i][7] then
danhsach = TaoBang(solanlap4,solanlap5,"")
solanlap4[i][6] = solanlap2[1][6]
SaveData(data3,danhsach)
end
end
elseif CountPlayerInMaps(Idmaps) > 1 then --- Neu Tren 1 Nguoi Se Thuc Thi Ham Tren !
SetCamp(4)
SetDeathScript("\\script\\global\\lanh_dia\\nguoichet.lua");
SetFightState(1)
LeaveTeam()
SetCreateTeam(0);
StopTimer()
thoigianstop = (15 * 60)
SetTimer(thoigianstop*18,12)
Msg2Player("Tran Dau Bat Dau Xin Hay Giet Het Nhung Doi Thu De Doat Ngoi Vo Lam Minh Chu !")
Msg2Player("Thoi Gian Ket Thuc Tran Dau La 15 Phut !")
end
else
StopTimer()
end
end



function goblh()
NewWorld(53,200*8,200*16)
SetFightState(0)
end

[nguoidaukho]

Các pro cho hỏi không biết file dưới bị lỗi gì mà mình đăng kí tranh đoạt, nó báo còn 10 phút nữa bắt đầu thi đấu. Mình đợi hết 10 phút thì k có gì xảy ra :|, xem lại file TimerTask thì đúng đường dẫn + ID rồi, xin các pro giúp đỡ :(


Include("\\script\\source\\sourcejx49.lua")
Include("\\dulieu\\minhchu_bd.lua")
Include("\\dulieu\\minhchu_hd.lua")
Include("\\dulieu\\minhchu_ld.lua")
Include("\\dulieu\\tranhvlmc_bd.lua")
Include("\\dulieu\\tranhvlmc_hd.lua")
Include("\\dulieu\\tranhvlmc_ld.lua")

function main()
if GetTask(42) == 1 then
lanhdia = "Bach Dao"
lanlap = thi_dau_bd
elseif GetTask(42) == 2 then
lanhdia = "Hac Dao"
lanlap = thi_dau_hd
elseif GetTask(42) == 3 then
lanhdia = "Luong Dao"
lanlap = thi_dau_ld
end
gio = tonumber(date("%H"))
phut = tonumber(date("%M"))
if gio == 19 and phut >= 20 and phut < 30 then
for i=1,getn(lanlap) do
if GetUUID() == (lanlap[i][7]) then
SayEx({"<color=cyan>Loi Dai Ty Vo:<color> Hien Dang Trong Giai Doan Tranh Ngoi Vo Lam Minh Chu Cua <color=red>"..lanhdia.."<color> Nguoi La Tuyen Thu Muon Vao Dau Truong ?",
"Vang ! Ta Muon Vao/godautruong",
"Ve Ba Lang Huyen/goblh",
"Tim Hieu Thoi Gian/timhieutime",
"Thoat/Exit"})
else
Talk(1,"goblh","<color=cyan>Loi Dai Ty Vo:<color> Nguoi Chua Dang Ky Tranh Ngoi Vo Lam Minh Chu Xin Ve BLH Gap Vo Lam Chi Ton De Biet Them Thong Tin !")
end
end
else
SayEx({"<color=cyan>Loi Dai Ty Vo:<color> Hien Chua Den Thoi Gian Thi Dau Tranh Ngoi Vo Lam Minh Chu Nguoi Gap Ta De Lam Gi ?",
"Ve Ba Lang Huyen/goblh",
"Tim Hieu Thoi Gian/timhieutime",
"Thoat/Exit"})
end
end

function timhieutime()
Talk(1,"","<color=cyan>Loi Dai Ty Vo:<color> Hoat Dong Tranh Ngoi Vo Lam Minh Chu Bat Dau Sau 10 Phut Ke Tu Khi Ket Thuc Su Kien Bao Danh [ 19h30 ] !")
end

function godautruong()
if GetTask(42) == 1 then
lanhdia = "Bach Dao"
maps = 54
elseif GetTask(42) == 2 then
lanhdia = "Hac Dao"
maps = 55
elseif GetTask(42) == 3 then
lanhdia = "Luong Dao"
maps = 56
end
NewWorld(maps,1576+random(-2,2),random(-2,2)+3216)
phut = tonumber(date("%M"))
giay = tonumber(date("%S"))
thoigiancho = ((30-phut)*60) - giay
SetLogoutRV(1)
SetTimer(thoigiancho*18,11)
SetFightState(0)
SetPunish(0)
Msg2Player("Tran Loi Dai Se Dien Ra Trong Vong "..30-phut.." Phut Nua !")
Msg2SubWorld("Cao Thu "..GetName().." Da Vao Hoi Truong Tranh Vo Lam Minh Chu "..lanhdia.." !")
end


function OnTimer()
phut = tonumber(date("%M"))
gio = tonumber(date("%H"))
if GetTask(42) == 1 then
Idmaps = 54
lanhdia = "Bach Dao"
solanlap = thi_dau_bd
solanlap1 = "thi_dau_bd"
solanlap2 = minhchubachdao
solanlap3 = "minhchubachdao"
solanlap4 = danhsachbachdao
solanlap5 = "danhsachbachdao"
camp = 1
data1 = "dulieu/tranhvlmc_bd.lua"
data2 = "dulieu/minhchu_bd.lua"
data3 = "dulieu/listbachdao.lua"
rank = 17
elseif GetTask(42) == 2 then
Idmaps = 55
lanhdia = "Hac Dao"
solanlap = thi_dau_hd
solanlap1 = "thi_dau_hd"
solanlap2 = minhchuhacdao
solanlap3 = "minhchuhacdao"
solanlap4 = danhsachhacdao
solanlap5 = "danhsachhacdao"
camp = 2
data1 = "dulieu/tranhvlmc_hd.lua"
data2 = "dulieu/minhchu_hd.lua"
data3 = "dulieu/listhacdao.lua"
rank = 24
elseif GetTask(42) == 3 then
Idmaps = 56
lanhdia = "Luong Dao"
solanlap = thi_dau_ld
solanlap1 = "thi_dau_ld"
solanlap2 = minhchuluongdao
solanlap3 = "minhchuluongdao"
solanlap4 = danhsachluongdao
solanlap5 = "danhsachluongdao"
camp = 3
data1 = "dulieu/tranhvlmc_ld.lua"
data2 = "dulieu/minhchu_ld.lua"
data3 = "dulieu/listluongdao.lua"
rank = 31
end
w,x,y = GetWorldPos()
if w == Idmaps and gio == 19 and phut >= 30 and phut < 45 then ---- Xac Dinh De Thuc Thi OnTimer
for i=1,500 do --- Ham Dua Member Khong Tham Gia Tran Dau Ve BLH !
PlayerIndex = i
w,x,y = GetWorldPos()
if w == (Idmaps) then
for i=1,getn(solanlap) do
if GetUUID() ~= (solanlap[i][7]) then
goblh()
end
end
end
end
if CountPlayerInMaps(Idmaps) == 1 then --- Neu Chi Co 1 Nguoi Tham Gia Thi Se Chay Ham Nay !
for i=1,getn(solanlap) do
if GetUUID() == solanlap[i][7] then
danhsach = TaoBang(solanlap2,solanlap3,"")
solanlap2[1][1] = solanlap[i][1]
solanlap2[1][2] = solanlap[i][2]
solanlap2[1][3] = solanlap[i][3]
solanlap2[1][4] = solanlap[i][4]
solanlap2[1][5] = solanlap[i][5]
solanlap2[1][6] = "Minh Chu "..lanhdia..""
solanlap2[1][7] = solanlap[i][7]
SaveData(data2,danhsach)
SetCurCamp(camp);
SetRank(rank)
SetCreateTeam(1);
SetFightState(0);
SetPunish(1)
StopTimer()
goblh()
Earn(500000)
Msg2Player("Ban Nhan Duoc Phan Thuong 500 van !")
AddGlobalCountNews("Ky Tai "..GetName().." Da Gianh Chien Thang Tro Thanh Vo Lam Minh Chu "..lanhdia.."",3)
Msg2Player("Ngoi Vi Vo Lam Minh Chu "..lanhdia.." Da Thuoc Ve Ban !")
end
solanlap[i] = nil --- Xoa All List Member Dang Ky
danhsach = TaoBang(solanlap,solanlap1,"")
SaveData(data1,danhsach)
end
for i=1,getn(solanlap4) do
if GetUUID() == solanlap4[i][7] then
danhsach = TaoBang(solanlap4,solanlap5,"")
solanlap4[i][6] = solanlap2[1][6]
SaveData(data3,danhsach)
end
end
elseif CountPlayerInMaps(Idmaps) > 1 then --- Neu Tren 1 Nguoi Se Thuc Thi Ham Tren !
SetCamp(4)
SetDeathScript("\\script\\global\\lanh_dia\\nguoichet.lua");
SetFightState(1)
LeaveTeam()
SetCreateTeam(0);
StopTimer()
thoigianstop = (15 * 60)
SetTimer(thoigianstop*18,12)
Msg2Player("Tran Dau Bat Dau Xin Hay Giet Het Nhung Doi Thu De Doat Ngoi Vo Lam Minh Chu !")
Msg2Player("Thoi Gian Ket Thuc Tran Dau La 15 Phut !")
end
else
StopTimer()
end
end



function goblh()
NewWorld(53,200*8,200*16)
SetFightState(0)
end

Bỏ bớt include có nhiều include giống nhau quá
Và coi lại Map nha ban
đúng Map nó mới di chuyển mình vào!!!!!

[MinYeuVy]

Bỏ bớt include có nhiều include giống nhau quá
Và coi lại Map nha ban
đúng Map nó mới di chuyển mình vào!!!!!

- Mình check map rồi, vào trong được nó báo là chờ 10 phút, mình chờ xong không có chuyện gì xảy ra :(
- Không có include nào giống nhau cả.

[nguoidaukho]

- Mình check map rồi, vào trong được nó báo là chờ 10 phút, mình chờ xong không có chuyện gì xảy ra :(
- Không có include nào giống nhau cả.

bạn coi lại include giống nhau quá trời kìa
Cái này hình như bên AWJX nó ko tích thì phải

[MinYeuVy]

bạn coi lại include giống nhau quá trời kìa
Cái này bạn add liên đấu cho nó khỏe!!!

Ban xem kĩ lại 7 cái include của mình không cái nào trùng cả, của 3 lãnh địa Hắc Đạo, Bạch Đạo, Lưỡng Đạo mà. Chức năng liên đấu của lãnh địa cũng bị die không hoạt động luôn, công nhận mấy bản share không bản nào hoàn chỉnh phải tự sửa nhiều thứ.

[Edward_Newgate]

bạn coi lại include giống nhau quá trời kìa
Cái này bạn add liên đấu cho nó khỏe!!!

Đâu có giống nhau đâu.
@MinYeuVi: không chỉ đơn giản là bỏ script từ sv khác qua là được đâu. Chịu khó đọc script rồi tìm các file liên quan, config lại các hàm + maps thì mới được. Đưa 1 file này có mà tài thánh cũng k biết mà sửa =.=!

p/s: nếu hoàn chỉnh thì chỉ có bán chứ k có share đâu, đừng được voi đòi tiên như thế.

[MinYeuVy]

Đâu có giống nhau đâu.
@MinYeuVi: không chỉ đơn giản là bỏ script từ sv khác qua là được đâu. Chịu khó đọc script rồi tìm các file liên quan, config lại các hàm + maps thì mới được. Đưa 1 file này có mà tài thánh cũng k biết mà sửa =.=!

Edward có yahoo không bạn, mình hỏi xíu về cái chức năng VLMC này, nó có hàm OnTimer() đó.

[nguoidaukho]

Ban xem kĩ lại 7 cái include của mình không cái nào trùng cả, của 3 lãnh địa Hắc Đạo, Bạch Đạo, Lưỡng Đạo mà. Chức năng liên đấu của lãnh địa cũng bị die không hoạt động luôn, công nhận mấy bản share không bản nào hoàn chỉnh phải tự sửa nhiều thứ.

Cách tốt nhất bạn dựa theo Script viết lại chứ copy như vậy cũng khó mà fix lắm bạn

[Edward_Newgate]

Edward có yahoo không bạn, mình hỏi xíu về cái chức năng VLMC này, nó có hàm OnTimer() đó.

Yahoo thì có nhưng chẳng support ai đâu, mệt người.
Lúc nào rảnh lên diễn đàn rồi biết cái gì thì trả lời thôi.

[nguoidaukho]

Yahoo thì có nhưng chẳng support ai đâu, mệt người.
Lúc nào rảnh lên diễn đàn rồi biết cái gì thì trả lời thôi.
Giúp người là 1 việc tốt thế là bác này tự kỹ hay sao rồi
Người ta nói cứu 1 người bằng xây 10 cảnh chùa mà =))

[MinYeuVy]

Có ai fix được không, mình trả cafe cho :(