Cyklus REPEAT - UNTIL je p°φkazem vnit°nφho programovacφho jazyka a mß tento tvar:
repeat
p°φkaz; p°φkaz; ... p°φkaz
until v²raz_typu_Boolean
P°i provßd∞nφ tohoto p°φkazu se cyklicky opakuje postupnΘ provedenφ vÜech p°φkaz∙ uveden²ch mezi repeat
a until
a vyhodnocenφ v²razu typu Boolean, kter² tvo°φ podmφnku ukonΦenφ cyklu. Mß-li tento v²raz hodnotu TRUE, pak provßd∞nφ cyklu konΦφ, jinak se provedenφ vÜech p°φkaz∙ a vyhodnocenφ v²razu opakuje.
P°φkazy obsa₧enΘ v cyklu se tedy p°i provßd∞nφ cyklu REPEAT - UNTIL provedou nejmΘn∞ jednou.
P°φklad:
View_open("*POHL1");
repeat Peek_message until not View_state("*POHL1");
Viz takΘ: