これくらいだったら、DATA文ではなくて、LOCATE文とPRINT文で良いかと思います。(画面の左上なら、LOCATE文は不要) そうすれば、下のFOR～NEXTはいらなくなるので、行が節約できます。