svoboden, кто говорил что ответ 6 правильный?

Так я ничего не обсуждаю. Просто мне не ясно, по какому принципу автор вопроса считает, что скрипт работает так, как надо? Что-то я сомневаюсь, что ему нужны были повторяющие числа, исходя из вопроса, но вряд ли я это узнаю.

Не знаю, зачем мы это обсуждаем,

Я тоже не знаю зачем мы тут вообще что то обсуждаем.

Наверное кто бы как написал.
Это вот тут (как вы выразились) и "обсасываем".

https://autohotkey.com/boards/viewtopic … p;start=20

Не знаю, зачем мы это обсуждаем, но вариант со sleep я бы написал так:

SetBatchLines -1
SetKeyDelay 0, 0

F1::
For k, v in Mix([1, 2, 3, 4, 5]) {
	Send % v
	Sleep % Rnd(1, 60)
}
Return

Mix(Arr) {
	MixedArr := []
	For k, v in Arr
		MixedArr.Insert(Pos := Rnd(1, k), v)
	Return MixedArr
}

Rnd(min, max) {
	Random, rnd, min, max
	Return rnd
}

неясно, какие числа идут дальше

Те на которые укажет случай. Если имеете ввиду чтобы не было 2 одинаковых вариантов между "сериями" 42135 54132 24513, то это тоже решаемо.

$1::
	Keys := ["a", "b", "c", "d", "f", "e"]
	Loop % Keys.MaxIndex() {
		While (Keys[I := ran(1, Keys.MaxIndex())]) = LastKey
			Continue
		SendInput, % "{" (Key := Keys.RemoveAt(I)) "}", LastKey := ""
		Sleep, % ran(1, 60)
	}
	SendInput, % "{Space}"
	LastKey := Key
	Return

ran(min, max) {
	random, ran, min, max
	Return ran
}

Так очень много повторов одних и тех же клавиш, я так понял ТС повторы не нужны. Недавно такая же тема была и вы там этот же код предлагали.
Думаю надо так:

$F1::
	Keys := [1, 2, 3, 4, 5]
	Loop % Keys.MaxIndex() {
		SendInput, % "{" Keys.RemoveAt(ran(1, Keys.MaxIndex())) "}"
		sleep, % ran(1, 60)
	}
	return

ran(min, max) {
	random, ran, min, max
	return ran
}

stealzy
В варианте с таймером на малых интервалах так сказать "плохие случайности", очень часто выпадает "12345" или группы из 3, 4 цифр идущие по порядку.

Спасибо! Работает так как надо. +