>>580
”ぁ”から順番に表示させてみる

a="":b0=0:b1=0:c=""
a="ぁ"
b0=peek(a,0):b1=peek(a,1) ;全角2バイト文字コード収得 $BBAA　AAが全角　BBが文字　を表す
poke c,0,b0 ;文字バッファ0バイト目に全角コードを入れる
for h,0,90,10
for f,0,10
poke c,1,b1 ;文字バッファ1バイト目にひらがなコードを入れる
mes c
mes b1
b1++ ;文字コード+1
next
pos 50+5*h,0
next
mes "全角コード"+b0
stop

581と内容は同じ
アルファベットみたいな順番では、並んで無いから、配列に文字コード入れるしかないかな・・・
（母音あに揃えて並べても見栄え悪いし・・・）