It is fully possible to use insert mode also in PRINT statements:
10 PRINT"{CLR}";:FOR Y=1TO23
15 GOSUB50:IF Y<23 THEN PRINT"{CRSR RIGHT}";:POKE646,INT(RND(1)*8 )
20 NEXT
25 GOTO 25
50 FORX=1TO21:PRINT"#";:NEXT:PRINT"{CRSR LEFT}{INS}#";:RETURN
The IF statement is to advance cursor to next row or not. Doing that on the last line will cause the line to scroll away. Of course you'd use this technique for something more delicate than filling the screen with one symbol, which is easier done with POKE.
Enlarging VIC characters
Moderator: Moderators