3 lines
72 B
Forth
3 lines
72 B
Forth
|
: TIME CNT@ 100000 BEGIN 1 - DUP 0 = UNTIL DROP CNT@ SWAP - 8000 / . ;
|
||
|
|
|