View difference between Paste ID: hxjRG3JS and v1cQRnm1
SHOW: | | - or go back to the newest paste.
1
function account_OnChat(event, player, message, type, language)
2-
local _, end_index = message:find("#ac")
2+
	message = message:lower()
3-
local __, end__index = message:find("#an")
3+
	local cmd, arg = message:match("^#(a[cn]) ?(.*)")
4-
local test = GetPlayersInWorld()
4+
	-- local test = GetPlayersInWorld()
5-
	if (end_index) then
5+
	if(cmd) then
6-
		local path = message:sub(end_index+2)
6+
		if(arg == "") then
7-
			if path ~= "" then
7+
			player:SendBroadcastMessage("Incorrect syntax. Usage: #"..cmd.." <player name>")
8-
				local account = CharDBQuery("SELECT acct from mailbox_send_query where login = '"..path.."'"):GetColumn(0):GetString()
8+
		elseif(cmd == "ac") then
9-
				local playeron = CharDBQuery("SELECT a.name from characters a, mailbox_send_query b where a.acct = '"..account.."' and a.online <> 0 and b.login = '"..path.."'")
9+
			local Q = CharDBQuery("SELECT acct from mailbox_send_query where login = '"..arg.."'")
10-
				player:SendBroadcastMessage("|cFF4682B4Account von |r|cffff0000"..path.."|r|cFF4682B4 ist mit dem Character |r|cffff0000"..playeron:GetColumn(0):GetString().."|r|cFF4682B4 online.")
10+
			if(Q) then
11-
			else
11+
				local Q = CharDBQuery("SELECT a.name from characters a, mailbox_send_query b where a.acct = '"..(Q:GetColumn(0):GetString()).."' and a.online <> 0 and b.login = '"..arg.."'")
12-
				player:SendBroadcastMessage(""..path.." nicht gefunden.")
12+
				if(Q) then
13
					player:SendBroadcastMessage("|cFF4682B4Account von |r|cffff0000"..arg.."|r|cFF4682B4 ist mit dem Character |r|cffff0000"..Q:GetColumn(0):GetString().."|r|cFF4682B4 online.")
14-
			return false
14+
				end
15
			end
16-
16+
		elseif(cmd == "an") then
17-
	if (end__index) then
17+
			local Q = CharDBQuery("SELECT acct from characters where name = '"..arg.."'")
18-
		local pathh = message:sub(end__index+2)
18+
			if(Q) then
19-
			if pathh ~= "" then
19+
				local Q = CharDBQuery("SELECT a.name from characters a, mailbox_send_query b where b.acct = '"..(Q:GetColumn(0):GetString()).."' and a.online <> 0")
20-
				local id = CharDBQuery("SELECT acct from characters where name = '"..pathh.."'"):GetColumn(0):GetString()
20+
				if(Q) then
21-
				local acc = CharDBQuery("SELECT a.name from characters a, mailbox_send_query b where b.acct = '"..id.."' and a.online <> 0")
21+
					player:SendBroadcastMessage("|cFF4682B4Der Player |r|cffff0000"..arg.."|r|cFF4682B4 ist mit einem anderem Character on: |r|cffff0000"..Q:GetColumn(0):GetString().." ")
22-
				player:SendBroadcastMessage("|cFF4682B4Der Player |r|cffff0000"..pathh.."|r|cFF4682B4 ist mit einem anderem Character on: |r|cffff0000"..acc:GetColumn(0):GetString().." ")
22+
				end
23-
			else
23+
24-
				player:SendBroadcastMessage(""..path" nicht gefunden.")
24+
		end
25
		return false
26-
			return false
26+
27
	return true
28
end
29
RegisterServerHook(16, account_OnChat)