[HELP] AI Resource and Camera Zoom Error

I see 1 function, 1 for-loop and 3 if-blocks, but only 4 end.

   -- My Stuff: ------------------------------------------------------------------

   for p = 1, World_GetPlayerCount() do -- iterate over all the players

      local player = World_GetPlayerAt(p) -- get more information about this player

      if (AI_IsAIPlayer(player)) then

         if (AI_GetDifficulty(player)==AD_Hard) then

            Modify_PlayerResourceRate(player,RT_Manpower,0.67,MUT_Multiplication)

            Modify_PlayerResourceRate(player,RT_Munition,0.67,MUT_Multiplication)

            Modify_PlayerResourceRate(player,RT_Fuel,0.67,MUT_Multiplication)

         end

         if (AI_GetDifficulty(player)==AD_Hardest) then

            Modify_PlayerResourceRate(player,RT_Manpower,0.5,MUT_Multiplication)

            Modify_PlayerResourceRate(player,RT_Munition,0.5,MUT_Multiplication)

            Modify_PlayerResourceRate(player,RT_Fuel,0.5,MUT_Multiplication)

         end

      end -- loop over all the players

   -- End of My Stuff. ----------------------------------------------------------

local function WinCondition_Init()

   for p = 1, World_GetPlayerCount() 

   do -- iterate over all the players

		local player = World_GetPlayerAt(p) -- get more information about this player

		

		if (AI_IsAIPlayer(player)) then

	end

	  

         if (AI_GetDifficulty(player)==AD_Hard) then

            Modify_PlayerResourceRate(player,RT_Manpower,0.67,MUT_Multiplication)

            Modify_PlayerResourceRate(player,RT_Munition,0.67,MUT_Multiplication)

            Modify_PlayerResourceRate(player,RT_Fuel,0.67,MUT_Multiplication)

         end

		 

         if (AI_GetDifficulty(player)==AD_Hardest) then

            Modify_PlayerResourceRate(player,RT_Manpower,0.5,MUT_Multiplication)

            Modify_PlayerResourceRate(player,RT_Munition,0.5,MUT_Multiplication)

            Modify_PlayerResourceRate(player,RT_Fuel,0.5,MUT_Multiplication)

         end

    end -- loop over all the players



	local distMin = 3;

	local distMax = 75;



	Camera_SetTuningValue(TV_DistMin, 3);

	Camera_SetTuningValue(TV_DistMax, distMax);

	Camera_SetZoomDist(50);

	

	Rule_AddInterval(WinCondition_Check, 3)

end



Scar_AddInit(WinCondition_Init)