Fixed length records: Difference between revisions
Content added Content deleted
(→{{header|M2000 Interpreter}}: include task for Forth Blocks) |
m (→Forth Blocks) |
||
| Line 689: | Line 689: | ||
Event Header New Disp() |
Event Header New Disp() |
||
For i=1 to Block`Number-1 |
For i=1 to Block`Number-1 |
||
Call DisplayBlock(Blocks`File$, i) |
Call DisplayBlock(Blocks`File$, i) |
||
Print "Press any key" |
Print "Press any key" |
||
Push key$ : Drop |
Push key$ : Drop |
||