Advertisement
Rochet2

Some command thing

May 2nd, 2012
214
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. function account_OnChat(event, player, message, type, language)
  2.     message = message:lower()
  3.     local cmd, arg = message:match("^#(a[cn]) ?(.*)")
  4.     -- local test = GetPlayersInWorld()
  5.     if(cmd) then
  6.         if(arg == "") then
  7.             player:SendBroadcastMessage("Incorrect syntax. Usage: #"..cmd.." <player name>")
  8.         elseif(cmd == "ac") then
  9.             local Q = CharDBQuery("SELECT acct from mailbox_send_query where login = '"..arg.."'")
  10.             if(Q) then
  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.                 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.                 end
  15.             end
  16.         elseif(cmd == "an") then
  17.             local Q = CharDBQuery("SELECT acct from characters where name = '"..arg.."'")
  18.             if(Q) 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.                 if(Q) then
  21.                     player:SendBroadcastMessage("|cFF4682B4Der Player |r|cffff0000"..arg.."|r|cFF4682B4 ist mit einem anderem Character on: |r|cffff0000"..Q:GetColumn(0):GetString().." ")
  22.                 end
  23.             end
  24.         end
  25.         return false
  26.     end
  27.     return true
  28. end
  29. RegisterServerHook(16, account_OnChat)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement