最後に再生ルーチンの「VIDEO」の修正。 22行目のFOR文を「FOR J=0 TO (DOT/4)-1」 24行目「I*DOT+J」を「I*DOT/4+J」に。 最後にに画像が正しくないのはコンバート時に4文字ずつパックしているのを逆向きに展開しなければいけないので「FOR k=0 TO 3」は「FOR k=3 TO 0 STEP -1」にすることで4ドットずつの並びが修正されました。 何もかもまとめて書こうとせずに少しずつ切り出して間違いがないかプリントしながら書いた方が混乱しないと思います。