function cmd_raport(plr, cmd, id, ...)
  if (not id) then
    outputChatBox("U?yj: /raport <id/nick> <powod>", plr)
    return
  end
  local target=getElementByID("id"..id)
  local target=exports["czaty"]:findPlayer(plr,id)
  if (not target) then
    outputChatBox("Nie odnaleziono gracza o podanym ID.", plr)
    return
  end
  local opis=table.concat(arg, " ")
  opis = getPlayerName(target) .. "/"..getElementData(target,"id").. " - " .. opis
  
  opis = opis .. "-- "..getPlayerName(plr).."/"..getElementData(plr,"id")
  
  
  reportView_add(opis,getElementData(target,"id"))
  outputChatBox("Zg?oszenie zosta?o wys?ane." , plr)
end

addCommandHandler("raport", cmd_raport, false,false)
addCommandHandler("report", cmd_raport, false,false)

function cmd_cl(plr,cmd,id,...)
  if (not id) then
    outputChatBox("U?yj: /cl <id/nick> <powod>", plr)
    return
  end


  local powod=table.concat(arg, " ")
  if (string.len(powod)<2) then
    outputChatBox("U?yj: /cl <id/nick> <powod>", plr)
    return
  end

  local target=exports["czaty"]:findPlayer(plr,id)
  local opis="?"
  if (target) then
    id=getElementData(target,"id")
    opis=getPlayerName(target)
  end

  reportView_remove(tonumber(id))
  local supportLogin=getElementData(plr, "auth:login")
  msgToSupport(supportLogin .. " usun??/??a raport na " .. opis .. "/".. id .. ": " .. powod)
end
addCommandHandler("cl", cmd_cl, true, false)