L=0A$=""FOR I=0TO LEN(B$)-1改行 C=ASC(B$[I])IF C==D[0]THEN L=!L:NEXT P=1C=C-L FOR J=0TO 14A$=A$+STR$(!!(C AND P))P=P*2NEXT A$=A$+STR$(!!(C AND P))NEXT 特殊65536進数から2進数への変換を行う処理 多分初心者には意味不明

2行目以降、改行って書くの忘れたけど気にしないで

どこに反応したんだろう

たぶん初心者には役に立たないだろう。

れいさんのそもそも論で解決した風ですが… 1bitずつ処理するのをやめて4bitまとめて"0101"みたいに変換すればかなり速くなります。図のbin16(x)ってやつ。応用で8bitまとめればもっと速いかも。dim bin8$[256]みたいな。 それと長い文字列への追加はコピーが起きてどんどん遅くなるから、(続く)

一文字分ずつ配列E$[]に入れて、最後に二分法的なやり方でがっちんこすれば文字列の加算回数が最小になります。これでさらに速くなるはず。図のA$=CAT(0,LEN(B$)-1)です。

そうか、テーブル化を忘れていたようだ。 けど、このプログラムはoutofmemoryを避けるため文字列変数は減らしたいところ。

かなり早くなった （いまさら気が付いたけど私のプログラムの変換ルーチンは前後が逆になってる）

やっかいなことに化けバグの条件が変化した。 もしかしたら大量の文字列を扱ったせいでプチコンのバグを起こしてる可能性も否定できない

ちなみに8bitのテーブルにしました。