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 | + | local cmd, arg = message:lower():match("^#(a[cn]) ?(.*)")
|
| 3 | - | local __, end__index = message:find("#an")
|
| 3 | + | if(cmd) then |
| 4 | - | local test = GetPlayersInWorld() |
| 4 | + | if(cmd == "ac") then |
| 5 | - | if (end_index) then |
| 5 | + | if(arg == "") then |
| 6 | - | local path = message:sub(end_index+2) |
| 6 | + | player:SendBroadcastMessage("Incorrect syntax. Usage: #"..cmd.." <Account Name>")
|
| 7 | - | if path ~= "" then |
| 7 | + | |
| 8 | - | local account = CharDBQuery("SELECT acct from mailbox_send_query where login = '"..path.."'"):GetColumn(0):GetString()
|
| 8 | + | local Q = CharDBQuery('SELECT a.name, b.login FROM arc_char.characters a, arc_logon.accounts b WHERE b.login like "'..arg..'%" AND a.online <> 0 AND a.acct = b.acct LIMIT 1;')
|
| 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 | + | if(Q) then |
| 10 | - | player:SendBroadcastMessage("|cFF4682B4Account von |r|cffff0000"..path.."|r|cFF4682B4 ist mit dem Character |r|cffff0000"..playeron:GetColumn(0):GetString().."|r|cFF4682B4 online.")
|
| 10 | + | player:SendBroadcastMessage("|cFF4682B4Account von |r|cffff0000"..Q:GetColumn(1):GetString().."|r|cFF4682B4 ist mit dem Character |r|cffff0000"..Q:GetColumn(0):GetString().."|r|cFF4682B4 online.")
|
| 11 | else | |
| 12 | - | player:SendBroadcastMessage(""..path.." nicht gefunden.")
|
| 12 | + | player:SendBroadcastMessage("Keine account mit "..arg.." account name gefunden") -- something something :P
|
| 13 | end | |
| 14 | - | return false |
| 14 | + | |
| 15 | elseif(cmd == "an") then | |
| 16 | - | |
| 16 | + | if(arg == "") then |
| 17 | - | if (end__index) then |
| 17 | + | player:SendBroadcastMessage("Incorrect syntax. Usage: #"..cmd.." <Player Name>")
|
| 18 | - | local pathh = message:sub(end__index+2) |
| 18 | + | |
| 19 | - | if pathh ~= "" then |
| 19 | + | local Q = CharDBQuery('SELECT a.name, b.login FROM arc_char.characters a, arc_logon.accounts b WHERE a.name like "'..arg..'%" AND a.online <> 0 AND a.acct = b.acct LIMIT 1;')
|
| 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"..Q:GetColumn(0):GetString().."|r|cFF4682B4 ist mit einem anderem Character on: |r|cffff0000"..Q:GetColumn(1):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 | end | |
| 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) |
