9 lines
127 B
Text
9 lines
127 B
Text
get "libhdr"
|
|
|
|
let start() be
|
|
$( let x = 0
|
|
$( writeo(x)
|
|
wrch('*N')
|
|
x := x + 1
|
|
$) repeatuntil x = 0
|
|
$)
|