14 lines
299 B
Text
14 lines
299 B
Text
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
|