10 lines
196 B
Text
10 lines
196 B
Text
|
Local string &CRLF;
|
||
|
|
Local number &LoopNumber;
|
||
|
|
&LoopNumber = 1024;
|
||
|
|
&CRLF = Char(10) | Char(13);
|
||
|
|
|
||
|
|
While &LoopNumber > 0;
|
||
|
|
WinMessage(&LoopNumber | &CRLF);
|
||
|
|
&LoopNumber = &LoopNumber / 2;
|
||
|
|
End-While;
|