program ascii_table;
    loop for i in [32..47] do
        print(+/[lpad(str j, 3) + ' : ' + rpad(ascii j, 6) : j in [i, i+16..127]]);
    end loop;

    op ascii(n);
        return {[32, 'Spc'], [127, 'Del']}(n) ? (char n);
    end op;
end program;