こんなプログラムを実行すると、スロット 1 に一行ごとのデータ文ができあがります。 prgedit 1 prgdel -1 for y=0 to wy-1 'wy は縦幅 var s$="" for x=0 to wx-1 'wx は横幅 s$=s$+(逆変換した文字) next prgset format$("data %s%s%s", chr$(34), s$, chr$(34)) next