6 lines
103 B
Text
6 lines
103 B
Text
DEF VAR ii AS INTEGER FORMAT "->>>>>>>>9" NO-UNDO.
|
|
|
|
DO WHILE TRUE:
|
|
ii = ii + 1.
|
|
DISPLAY ii.
|
|
END.
|