for i = 32 to 47
    for j = i to i + 80 step 16
        select case j
        case 32
            s$ = "Spc"
        case 127
            s$ = "Del"
        case else
            s$ = chr$(j)
        end select
        print right$("  "+str$(j),4); ": "; s$; space$(3);
    next j
    print
next i