}{0TT@6bI4Всё-таки я ничего не понял из вашей задачи, ну да ладно. Мой код проходит все k существ (при этом i) не нужно и генерит случайный индекс k до тех пор, пока он есть в массиве индексов. Как только выходит — работает с существом со сгенерированным индексом k

Почему нужна такая проверка с циклом — потому что простой рандом (как у вас) может выдать повторяющиеся значения, а как я понял, так не должно быть. Возможно, неправильно понял.

И вообще, очень странно, что у вас такое не работает и генерит в двух местах. Я запустил холостые принты для k=100 и он нагенерил кучу значений, все разные (ну, я, впрочем, не скроллил все).

function RespawnUnitsByLuck()
    if ( GetDate(WEEK) == 2 ) and ( GetDate(DAY_OF_WEEK) == random(6) + 1 ) then
        local WR_luck = GetHeroStat(WR, STAT_LUCK)
	local respawns_types = { CREATURE_AIR_ELEMENTAL, CREATURE_PHOENIX, CREATURE_AIR_ELEMENTAL, CREATURE_PHOENIX }
	local respawns_quantities = { 100 * diff, 10 * diff, 100 * diff, 4 * diff }
	local respawns_mood = {3, 1, 3, 0} 
	local respawns_courage = {1, 2, 1, 0}
	local respawns_num = 0
	local previous_pos = {}
        local respawns_id = 0

--Памятка по сложностям чтоб посчитать множители от сложностей: diff = 0.5(easy), 2(normal), 4(veteran), 6(heroic), 10(hardcore)
        local CanRespawnUnitsByLuck = random(100) + ((10*(WR_luck+1)) * mod((WR_luck+1),diff))
        if CanRespawnUnitsByLuck >= mod(70,(WR_luck+2)) + (60+diff) then
           print("<color=blue>Рандом выдал число <color=yellow>"..CanRespawnUnitsByLuck, "<color=blue>, которое выше или равно порогу. <color=yellow>Респавним юнитов...")
        elseif CanRespawnUnitsByLuck < mod(70,(WR_luck+2)) + (60+diff) then     --( 50 + (10+diff) ) then
           print("<color=blue>Рандом выдал число <color=red>"..CanRespawnUnitsByLuck, "<color=blue>, которое ниже порога. <color=red>Никого не спавним, выходим из функции...")
           return 
        end
	
	for i = 1, 20 + diff do
                local n = random(length(creatures_positions))+1
                local x = creatures_positions[n].x
                local y = creatures_positions[n].y
		local floor = 0;
		local badpos = 0;

                if IsObjectExists("m"..n) or IsObjectExists("respawns"..n) then  
                   badpos = 1
                end
                		
		if ( badpos == 0 ) and ( IsTilePassable( x, y, floor ) ) then
                        respawns_num = respawns_num + 1
                        if respawns_num == 20 + diff then
                              print("<color=yellow>Наспавнено максимальное количество юнитов. Выходим из респавнера.")
                              return --если наспавнили больше 20+сложность юнитов то выходим, иначе дичайший переспавн
                        end

			local type = random( 3 ) + 1
                              if ( WR_luck < 3 ) and ( type == 4 ) then
                                    type = random( 2 ) + 1
                              end
                              if ( WR_luck >= 5 ) then 
                                    respawns_quantities = { 200 * diff, 4 * diff, 200 * diff, 4 * diff }
                                    respawns_courage = {1, 0, 1, 0}
                                    type = random( 2 ) + 2
                              end
			local creaturetype = respawns_types[ type ]
			local quantity = respawns_quantities[ type ]
                        local mood = respawns_mood[ type ]
                        local courage = respawns_courage[ type ]
			local respawnsname = 'respawns' .. n; 
			CreateMonster( respawnsname, creaturetype, quantity, x, y, floor, mood, courage, random( 360 ) );
		        end;
	          end;
           if respawns_num == 0 then
              print("<color=brown>Ни одно существо не было заспавнено. Вероятно, все точки спавна заняты.")
           else
              print("<color=blue>Респавн завершен. Заспавнено существ: <color=yellow>"..respawns_num)
           end;
     end;
end;