Cần Góp Ý về Script này vs......

[kid2058]

Mình đang nghiên cứu sever KGame. H có cái hàm thế này ai xem hộ qua dùm mình với
UPdate Sever :[Only registered and activated users can see links. ]
UPdate Patch :[Only registered and activated users can see links. ]
script 132.lua Vật phẩm hỗ trợ của mình...
Ai xem hộ mình Cái mình thêm vào có ổn ko... lúc mình sử dụng dofile lỗi gamesever liền ...mình lại thấy BT

Include("\\script\\source\\sourcejx49.lua")
Include("\\script\\global\\tasklist.lua")
Include("\\script\\global\\chuyensinh.lua")
Include("\\script\\source\\timerserver.lua")
-- Include("\\script\\vuotai\\sugiabalang.lua")
Include("\\Script\\global\\GM.lua")
Include("\\script\\global\\npc\\banghoi\\addnpc.lua")
Include("\\script\\global\\npc\\banghoi\\open.lua")
Include("\\script\\global\\npc\\banghoi\\quyensohuu.lua")
Include("\\script\\global\\npc\\banghoi\\quy.lua")
Include("\\script\\source\\top.lua")
--dofile("script/item/132.lua")

function main()
main20()
end

function main20()
ThongKeLevel() --- Chỗ này có lỗi ko???
w,x,y = GetWorldPos()
play = PlayerIndex
			SayNew("<bclr=red><color=yellow>T¸i XuÊt Giang Hå : <color><bclr>Chµo b¹n<color=yellow> "..GetName().."<color> !!\nID nh©n vËt :  <color=red>"..play.."<color>\n§iÓm online:  <color=red>"..GetTask(92).."<color>\nB¹n cÇn ta gióp ®ì g× - [ADM] Kh«ng cã ë Game cÈn thËnbÞ lõa !",6,11,
			"NhËn m¸u hç trî/nhanmauzz",
			"CËp nh©p th«ng tin nh©n vËt !!!/ThongKeLevel",
			"Xem Top 10 Cao Thñ ChuyÓn Sinh/dsct2",
			"Gi¶i kÑt nh©n vËt/gknv",
			"Thæ §Þa Phï Free/tdpve",
			"Tho¸t/no")	   
end

function ThongKeLevel()
Msg2Player("<color=yellow>[VIP] CËp NhËp th«ng tin nh©n vËt thµnh c«ng")
	dofile("script/source/Top.lua")
	for i = 1, GetPlayerCount() do
		PlayerIndex = i
		if GetName() ~= "" and GetName() ~= nil then
			if GetLevel() ~= nil then
				if GetLevel() >= 90 then
					local check = 0
					for j = 1, getn(Top) do
						if Top[j][2] == GetUUID() then
							check = 1
							Top[j] = {GetName(), GetUUID(), GetLevel(), GetReBorn(), GetTask(TaskTimerOnline)}
							break
						end
					end
					if check == 0 then
						Top[getn(Top) + 1] = {GetName(), GetUUID(), GetLevel(), GetReBorn(), GetTask(TaskTimerOnline)} 
					end
				end
			end
		end
	end
	
	-- sap xep
	if getn(Top) >= 2 then 
		for i = 1, (getn(Top) - 1) do
			for k = i + 1, getn(Top) do
				if Top[i][4] < Top[k][4] then
					local temp = Top[i]
					Top[i] = Top[k]
					Top[k] = temp
				elseif Top[i][4] == Top[k][4] then
					if Top[i][3] < Top[k][3] then
						local temp = Top[i]
						Top[i] = Top[k]
						Top[k] = temp
					end
				end
			end
		end
	end
	
	-- luu file
	local luufile = TaoBang(Top,"Top","")
	SaveData("script/source/top.lua",luufile)
end


function dsct2()
dofile("script/source/top.lua")
  if getn(Top) == 0 then
    Talk(1, "","Míi open server ch­a cËp nhËt danh s¸ch")
    return
  end
  Msg2Player("<color=yellow>[VIP] H¹ng 1 : " .. Top[1][1] .. "<color> - level " .. Top[1][3] .. " - <color=yellow>ChuyÓn sinh : " .. Top[1][4],1)
  Msg2Player("<color=cyan>[VIP] H¹ng 2 : " .. Top[2][1] .. "<color> - level " .. Top[2][3] .. " - <color=cyan>ChuyÓn sinh : " .. Top[2][4],1)
  Msg2Player("<color=green>[VIP] H¹ng 3 : " .. Top[3][1] .. "<color> - level " .. Top[3][3] .. " - <color=green>ChuyÓn sinh : " .. Top[3][4],1)
  Msg2Player("H¹ng 4 : " .. Top[4][1] .. " - level " .. Top[4][3] .. " - ChuyÓn sinh : " .. Top[4][4],1)
  Msg2Player("H¹ng 5 : " .. Top[5][1] .. " - level " .. Top[5][3] .. " - ChuyÓn sinh : " .. Top[5][4],1)
  Msg2Player("H¹ng 6 : " .. Top[6][1] .. " - level " .. Top[6][3] .. " - ChuyÓn sinh : " .. Top[6][4],1)
  Msg2Player("H¹ng 7 : " .. Top[7][1] .. " - level " .. Top[7][3] .. " - ChuyÓn sinh : " .. Top[7][4],1)
  Msg2Player("H¹ng 8 : " .. Top[8][1] .. " - level " .. Top[8][3] .. " - ChuyÓn sinh : " .. Top[8][4],1)
  Msg2Player("H¹ng 9 : " .. Top[9][1] .. " - level " .. Top[9][3] .. " - ChuyÓn sinh : " .. Top[9][4],1)
  Msg2Player("H¹ng 10 : " .. Top[10][1] .. " - level " .. Top[10][3] .. " - ChuyÓn sinh : " .. Top[10][4],1)

end


function maumana100()
SayEx({"Hæ Trî NhËn Thuèc MiÔn PhÝ D­íi Level 150 <",
	"NhËn M¸u/nhanmanaz",
	"NhËn Mana/nhanmauz",
	"Tho¸t/no"})
	end

	
function nhanmauz()
if GetLevel() < 120 then
for i=1,15 do AddItem(1,2,0,4,0,0,0) end
else
Msg2Player("Ng­¬i ®· v­¬i qu¸ giíi h¹n 150")
end
	end	

function nhanmanaz()
if GetLevel() < 120 then
for i=1,15 do AddItem(1,2,0,3,0,0,0) end
else
Msg2Player("Ng­¬i ®· v­¬i qu¸ giíi h¹n 150")
end
	end

function tdpve()
	w,x,y = GetWorldPos()
	if w == 44 or w == 42 or w == 43 or w == 35 or w == 89 or w == 73 or w == 74 or w == 91 or w == 92 or w == 93 or w == 30 or w == 31 or w == 94 then
		Talk(1,"","Kh«ng thæ ®Þa phï ë ®©y!")
		-- capnhatxephang() --- cap nhat xep hang
		return
	end
	if GetFightState() == 1 then
		UseTownPortal()
		-- capnhatxephang() --- cap nhat xep hang
	else
		Talk(1, "", "Kh«ng thÓ phï trong thµnh.")
	end
end;

function gknv()
w,x,y = GetWorldPos()
	if w == 30 or w == 31 or w == 73 or w == 74 or w == 94 then
	Talk(1,"","Kh«ng thæ gi¶i kÑt account ë ®©y!")
	else 
if (GetFightState() == 0) then
nl = GetCash()
if (nl >= 0) then
SetTask(23,0)
SetTask(24,0)
SetTask(25,0)
SetTask(26,0)
SetPunish(1)
SetTask(27,0)
SetTask(28,0)
SetRank(GetTask(29))
SetTask(29,0)
SetTask(30,0)
SetPKState(0,0)
Pay(0)
if (GetCash() == (nl-0)) then
SetRevPos(19)
SetFightState(0)
NewWorld(1, 1596, 3199)
Msg2Player("§· gi¶i kÑt nh©n vËt thµnh c«ng !")
KickOutSelf()	
else
Msg2Player("Hack µ !")	
end
else
Talk(1,"no","Kh«ng cã ®ñ <color=red>1 l­îng<color>, kh«ng thÓ gi¶i kÑt")
end
else
Talk(1,"no","Nh©n vËt <color=red>kh«ng bÞ kÑt<color>, kh«ng thÓ gi¶i kÑt")
end
end
end

----------------------------------------------------------------------------------------------------------------------

function maumana120()
SayEx({"Hæ Trî NhËn Thuèc MiÔn PhÝ D­íi Level 120 <",
	"NhËn M¸u/nhanmana",
	"NhËn Mana/nhanmau",
	"Tho¸t/no"})
	end

	
function nhanmauzz()
if GetLevel() < 150 then
for i=1,20 do AddItem(1,2,0,3,0,0) end
else
Msg2Player("Ng­¬i ®· v­¬i qu¸ giíi h¹n 150")
end
	end	

function nhanmana()
if GetLevel() < 120 then
for i=1,20 do AddItem(1,2,0,3,0,0,0) end
else
Msg2Player("Ng­¬i ®· v­¬i qu¸ giíi h¹n 120")
end
end

Mình đang cần ai pro Script hộ mình với........

[bthhhz]

Bạn thêm 1 dòng
"Thống kê Level/ThongKeLevel",
vào SayNew . và thử xóa chữ ThongKeLevel() trong Function Main xem .
vì cách khai báo của bạn là nó sẽ thực hiện 2 nhiệm vụ 1 lượt . mình cũng chưa thử cách đó nên ko hiểu lắm

[hoivegame]

Không rõ lắm câu hỏi bạn muốn hỏi là gì. Cái function ThongKeLevel() bạn gọi sau main20() ko có lỗi đâu trừ khi cái function ThongKeLevel() bạn code lỗi.