RosettaCodeData/Task/Show-ASCII-table/Yabasic/show-ascii-table.basic

10 lines
197 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
for i = 32 to 47
for j = i to i + 80 step 16
2026-04-30 12:34:36 -04:00
s$ = chr$(j)
2023-07-01 11:58:00 -04:00
if j = 32 s$ = "Spc"
if j = 127 s$ = "Del"
2026-04-30 12:34:36 -04:00
print str$(j, "#####"), ": ", s$;
2023-07-01 11:58:00 -04:00
next j
print
next i