>あいうえお などの文字を変換したいです
つまり、文字コードを2進数に変換したいということですか?
一体どういう目的でそんなことをして、どんなメリットがあるのかよくわかりませんが、
(2進数ではなく16進数ならわかりますが)
こういう感じでどうでしょうか?
a=""
input a,300,30,0
button gosub "2進数化",*bin
stop
*bin
l=strlen(a) : s=""
repeat l
c=peek(a,cnt) : s0=""
repeat 8
if cnt=4 : s0=" "+s0
if c&0x1 : s0="1"+s0 : else : s0="0"+s0
c=c>>1
loop
s=s+s0+"\n"
loop
color 255,255,255 : boxf : color 0,0,0 : pos 0,80
mes s
return