10 I=1:J=1 20 REM 元コメントのトレースを再現するのは大変ですね(^^;) 30 A$="" 40 IF J=2 THEN A$="デバッグサポート機能まであるんだぞ"+CHR$(13)+CHR$(10) 50 PRINT A$;:J=J+1:IF J<=I GOTO 20 ELSE IF I=8 THEN END 60 REM N88-BASICでもIFネストは可能ですが、FOR/NEXTは一対一対応でないと駄目です 70 I=8 80 GOTO 20 90 REM あと、TRONしたときループ内でFOR文の行番号は表示されないっぽい
Re:N88-BASICを馬鹿にするな (スコア:2, 参考になる)
20 REM 元コメントのトレースを再現するのは大変ですね(^^;)
30 A$=""
40 IF J=2 THEN A$="デバッグサポート機能まであるんだぞ"+CHR$(13)+CHR$(10)
50 PRINT A$;:J=J+1:IF J<=I GOTO 20 ELSE IF I=8 THEN END
60 REM N88-BASICでもIFネストは可能ですが、FOR/NEXTは一対一対応でないと駄目です
70 I=8
80 GOTO 20
90 REM あと、TRONしたときループ内でFOR文の行番号は表示されないっぽい