init_arr %a (1) 55 150
init_arr %a (2) 106 210
init_arr %a (3) 200 85

set #r 0
set #last 0

while 1 = 1
    while #last = #r
        set #r 1 + random(size(%a))
    end_while
    set #last #r   
    log %a [#r 1] %a[#r  2]     // вместо log left
    wait 300
end_while