Серый форум — AHK: Random без повтора последних трех чисел

Re: AHK: Random без повтора последних трех чисел

null@example.com (ypppu) — Mon, 02 Jan 2017 10:20:10 +0000

Ещё раз проверил - с отрицательными работает. Главное чтоб min было меньше max.

Re: AHK: Random без повтора последних трех чисел

null@example.com (teadrinker) — Mon, 02 Jan 2017 10:01:42 +0000

А с отрицательными не работает разве?

Re: AHK: Random без повтора последних трех чисел

null@example.com (ypppu) — Mon, 02 Jan 2017 08:07:26 +0000

Работает с положительными целыми числами.

Re: AHK: Random без повтора последних трех чисел

null@example.com (belyankin12) — Mon, 02 Jan 2017 06:28:46 +0000

Проблема решена, спасибо.

Re: AHK: Random без повтора последних трех чисел

null@example.com (teadrinker) — Sun, 01 Jan 2017 20:24:34 +0000

Как-то так:

min := 1, max := 10
randArray := CreateRandArray(min, max)

F11:: MsgBox % MyRandom(randArray, 3)

MyRandom(randArray, exclude)  {
   static i := 0
   Random, rand, 1 + (i < exclude ? i++ : i), randArray.MaxIndex()
   n := randArray.RemoveAt(rand), randArray.InsertAt(1, n)
   Return n
}
      
CreateRandArray(min, max)  {
   array := []
   while min < max + 1
      array.Push(min++)
   Return array
}

AHK: Random без повтора последних трех чисел

null@example.com (belyankin12) — Sun, 01 Jan 2017 18:05:27 +0000

Здравствуйте, есть следующий код:

 Random, var, 1, 10

Как мне сделать так, чтобы при срабатывании, функция "вспоминала" последние три числа, что она генерировала ранее и не отправляла их соответственно. Ну если это сложно слишком, то хотя бы последнее не отправляла. Заранее спасибо.