Problem Statement

Produce a sequential count in octal,   starting at zero,   and using an increment of a one for each consecutive number. Each number should appear on a single line,   and the program should count until terminated,   or until the maximum value of the numeric type in use is reached.

Let's start with the solution:

get "libhdr"

let start() be
$(  let x = 0
    $(  writeo(x)
        wrch('*N')
        x := x + 1
    $) repeatuntil x = 0
$)