Перемешивание массива

Описание

Пример, как перемешать массив.

Версия

1.0

Минимальная версия UOPilot

2.31

Скрипт

set linedelay 0             // задержка между строк 0
log clear                   // очистка лога
log mode compact            // компактный лог
// массив
set %arr [1] 10
set %arr [2] 20
set %arr [3] 30
set %arr [4] 40
set %arr [5] 50
set %arr [6] 60
set %arr [7] 70

log Исходный массив
log %arr [1] %arr [2] %arr [3] %arr [4] %arr [5] %arr [6] %arr [7]
log
// перемешивание
for #i 1 10         // 10 раз поменять местами случайные элементы массива
    set #a 1 + random(size(%arr))
    set #b 1 + random(size(%arr))
    set #tmp %arr [#a]
    set %arr [#a] %arr [#b]
    set %arr [#b] #tmp
end_for 

log Перемешанный массив
log %arr [1] %arr [2] %arr [3] %arr [4] %arr [5] %arr [6] %arr [7]
end_script

Смотрите также

Массивы <br>Load_array <br>Save_array <br>Random <br>For