Вывод ответа #1864475984

use ui

class Iter
list; pos
function init(l)
this.list = l;
this.pos = 0
end
function next()
ui.busy();
ui.busy(this.list[this.pos]);
this.pos++;
end
end

i:Iter = Iter(['a', 'b', 'c', 'd', 'e'])
for k=0 to 4 by 1 do
i.next();
sleep(1000)
end
ui.busy()