そのON GOTOの部分、 GOTO"@F"+STR$(A+1) と略せます! あと、PRINTは「?」で代用出来るので PRINT "A" ↓ ?"A" と、出来ちゃいます!