Function AddPlayer(IP, Port)
	Players = New TPlayers
	Players\LastReceived = MilliSecs()
	Players\PfeilObjekt = HUD_CreateImage(Radar_Layer, 0,0,0,0,32,32)
	Players\IP = (IP)
	Players\Port = (Port)
	Players\PlayerImage = HUD_CreateImage(Tank_Layer, 0,0,0,0,64,64) 
	HUD_SetObjectOrigin(Players\PlayerImage, 0,0)
	HUD_SetObjectShadow(Players\PlayerImage, 3, 3.0)	
	Return Players
End Function