set %a [1] 123
set %a [2] 456
set %a [3] 789
set %a [4] abc
set %a [5] def
set $a //очищаем строку
for #i 1 size(%a)
set $a $a %a[#i] //создаём строку из всех элементов массива
end_for
set $b "prompt ($a ())"
set %b [1] "#a"
eval (set %b[1] $b) //выводим prompt
log #a //результат выбора
set %a [1] Дядя Вася
set %a [2] 'Раз ковбой'
set %a [3] "Два ковбой"
set $a //очищаем строку
for #i 1 size(%a)
set $a $a %a[#i] //создаём строку из всех элементов массива
end_for
set $b "prompt ($a ())"
set %b [1] "#a"
eval (set %b[1] $b) //выводим prompt
log #a //результат выбора