property pNewGameId, pMsecAtNextState, pGameId, pOwnPlayerTeamId, pScoreIndexByName, pScoreIndex, pScoreIndexByRoomIndex

on deconstruct me 
  pState = 0
  return(me.ancestor.deconstruct())
end

on Initialize me 
  pGameId = "JoinedGame!"
  me.pListItemContainerClass = ["IG ItemContainer Base Class", "IG GameInstanceData Class"]
  pState = 0
  pNewGameId = void()
  return(me.registerForIGComponentUpdates("GameList"))
end

on handleUpdate me, tUpdateId, tSenderId 
  if (tSenderId = "GameList") then
    tService = me.getIGComponent("GameList")
    if (tService = 0) then
      return FALSE
    end if
    tGameRef = tService.getObservedGame()
    if (tGameRef = 0) then
      return FALSE
    end if
    if voidp(pNewGameId) then
      pNewGameId = tService.getObservedGameId()
      tTeamData = tGameRef.getAllTeamData()
      repeat while tSenderId <= tSenderId
        tTeam = getAt(tSenderId, tUpdateId)
        tPlayers = tTeam.getaProp(#players)
        repeat while tSenderId <= tSenderId
          tPlayer = getAt(tSenderId, tUpdateId)
          me.displayPlayerRejoined(tPlayer)
        end repeat
      end repeat
    end if
  end if
  return TRUE
end

on displayEvent me, ttype, tParam 
  if (ttype = #after_game) then
    return(me.displayAfterGame(tParam))
  else
    if (ttype = #user_left_game) then
      return(me.displayPlayerLeft(tParam))
    else
      if (ttype = #user_joined_game) then
        return(me.displayPlayerRejoined(tParam))
      else
        if (ttype = #time_to_next_state) then
          return(me.displayTimeLeft(tParam))
        end if
      end if
    end if
  end if
  return FALSE
end

on getMsecAtNextState me 
  return(pMsecAtNextState)
end

on getScoreData me 
  return(me.getListEntry(pGameId))
end

on displayAfterGame me, tdata 
  me.getComponent().setSystemState(#after_game)
  pNewGameId = void()
  if not listp(tdata) then
    return FALSE
  end if
  me.storePlayerIndex(tdata)
  tdata.setaProp(#id, pGameId)
  me.updateEntry(tdata)
  pMsecAtNextState = (the milliSeconds + (tdata.getaProp(#time_to_next_state) * 1000))
  pState = 1
  tRenderObj = me.getRenderer()
  if objectp(tRenderObj) then
    tRenderObj.pGameOverShown = 0
  end if
  executeMessage(#show_ig, "AfterGame")
  me.displayWinningTeam(tdata)
  return TRUE
end

on displayPlayerLeft me, tUserID 
  tService = me.getIGComponent("GameList")
  if (tService = 0) then
    return FALSE
  end if
  if (tUserID = -1) then
    return FALSE
  end if
  tPlayerInfo = me.getPlayerInfo(tUserID)
  if (tPlayerInfo = 0) then
    return FALSE
  end if
  tPlayerInfo.setaProp(#disconnected, 1)
  tTeamId = tPlayerInfo.getaProp(#team_id)
  tName = tPlayerInfo.getaProp(#name)
  tText = replaceChunks(getText("ig_bubble_ag_userleft"), "\\x", tName)
  executeMessage(#showCustomMessage, [#class:"IG Chat Bubble Info", #message:tText, #loc:point(450, 500), #color:me.getTeamColorDark(tTeamId)])
  tRenderObj = me.getRenderer()
  if (tRenderObj = 0) then
    return FALSE
  end if
  tRenderObj.displayPlayerLeft(tPlayerInfo.getaProp(#team_pos), tPlayerInfo.getaProp(#pos))
  return TRUE
end

on displayPlayerRejoined me, tdata 
  tUserID = tdata.getaProp(#id)
  tPlayerInfo = me.getPlayerInfoByName(tdata.getaProp(#name))
  if (tPlayerInfo = 0) then
    return FALSE
  end if
  tPlayerInfo.setaProp(#rejoined, 1)
  tTeamId = tdata.getaProp(#team_id)
  tName = tdata.getaProp(#name)
  tText = replaceChunks(getText("ig_bubble_ag_userrejoined"), "\\x", tName)
  executeMessage(#showCustomMessage, [#class:"IG Chat Bubble Info", #message:tText, #loc:point(450, 500), #color:me.getTeamColorDark(tTeamId)])
  tRenderObj = me.getRenderer()
  if (tRenderObj = 0) then
    return FALSE
  end if
  tRenderObj.displayPlayerRejoined(tPlayerInfo.getaProp(#team_pos), tPlayerInfo.getaProp(#pos))
  return TRUE
end

on displayWinningTeam me, tdata 
  tTeams = tdata.getaProp(#teams)
  if not listp(tTeams) then
    return FALSE
  end if
  tWinningTeam = tTeams.getAt(1)
  tTeamId = tWinningTeam.getaProp(#id)
  tText = getText("ig_bubble_ag_winner_" & tTeamId)
  executeMessage(#showCustomMessage, [#class:"IG Chat Bubble Info", #message:tText, #loc:point(450, 500), #color:me.getTeamColorDark(tTeamId)])
  if (tTeamId = pOwnPlayerTeamId) then
    playSound("ig-winning")
  else
    playSound("ig-losing")
  end if
  return TRUE
end

on displayTimeLeft me, tTime 
  tRenderObj = me.getRenderer()
  if (tRenderObj = 0) then
    return FALSE
  end if
  return(tRenderObj.displayTimeLeft(tTime))
end

on getTeamColorDark me, tTeamIndex 
  if (tTeamIndex = 1) then
    return(rgb("#c64000"))
  else
    if (tTeamIndex = 2) then
      return(rgb("#1971c3"))
    else
      if (tTeamIndex = 3) then
        return(rgb("#659217"))
      else
        if (tTeamIndex = 4) then
          return(rgb("#e19f00"))
        end if
      end if
    end if
  end if
end

on storePlayerIndex me, tdata 
  pScoreIndex = [:]
  pScoreIndexByRoomIndex = [:]
  pScoreIndexByName = [:]
  tTeams = tdata.getaProp(#teams)
  tOwnName = me.getOwnPlayerName()
  repeat while tTeams <= undefined
    tTeam = getAt(undefined, tdata)
    tTeamPos = tTeam.getaProp(#pos)
    tPlayers = tTeam.getaProp(#players)
    repeat while tTeams <= undefined
      tPlayer = getAt(undefined, tdata)
      if (tOwnName = tPlayer.getaProp(#name)) then
        pOwnPlayerTeamId = tPlayer.getaProp(#team_id)
      end if
      tName = tPlayer.getaProp(#name)
      pScoreIndexByName.setaProp(tName, tPlayer)
      tID = tPlayer.getaProp(#id)
      pScoreIndex.setaProp(tID, tPlayer)
      tRoomIndex = tPlayer.getaProp(#room_index)
      pScoreIndexByRoomIndex.setaProp(tRoomIndex, tPlayer)
    end repeat
  end repeat
  return TRUE
end

on getPlayerInfoByRoomIndex me, tRoomIndex 
  return(pScoreIndexByRoomIndex.getaProp(tRoomIndex))
end

on getPlayerInfo me, tID 
  return(pScoreIndex.getaProp(tID))
end

on getPlayerInfoByName me, tName 
  return(pScoreIndexByName.getaProp(tName))
end