function onPlayerJoin(event)
    SendChunked(
        "---player-join---\n" ..
        ("%d:%s"):format(event.player_index,game.players[event.player_index].name)
    )
end

function onPlayerLeave(event)
    SendChunked(
        "---player-leave---\n" ..
        ("%d:%s"):format(event.player_index,game.players[event.player_index].name)
    )
end

function onPlayerDiedDeathCause(event)
    if event.cause and event.cause.name then
    storage.playerDeathCause[event.player_index] =
        storage.playerDeathCause[event.player_index] or {}

    storage.playerDeathCause[event.player_index][event.cause.name] =
        (storage.playerDeathCause[event.player_index][event.cause.name] or 0) + 1
    log(("Player %s died from type %s"):format(game.players[event.player_index].name, event.cause.name))
    end

  --Log player death count
  storage.playerDeathCount[event.player_index] = (storage.playerDeathCount[event.player_index] or 0) + 1
end

function onPlayerKilledPlayer(event)
    --Log player cause by player
    if event.cause and event.cause.type == "character" then
    local killer = event.cause.player
    if killer then
      local killer_index = killer.index
      local victim_index = event.player_index
      local killerName = killer.name
      local victimName = game.players[victim_index].name
      log(("Player ID %d:%s killed player ID %d:%s"):format(killer_index, killerName, victim_index, victimName))

      storage.playerKillCount[killer_index] =
          storage.playerKillCount[killer_index] or {}

      storage.playerKillCount[killer_index][victim_index] =
          (storage.playerKillCount[killer_index][victim_index] or 0) + 1
    end
  end
end