行番号を指定する場所は、極力ラベルを使う まあ、ラベルが使えない場所なんて、ERLぐらいだけどな 0236ナイコンさん2008/09/13(土) 19:34:24 そうか! BASICは英語圏の人にとっては ぴゅうたの日本語BASICみたいなもんだったんだ 0237ナイコンさん2008/12/01(月) 17:23:38 地に足付く、絶対番地の安心感 それに対して… 0238ナイコンさん2008/12/02(火) 09:31:03 10 for i=0 to 4 20 if (i mod 2)=0 then ?"A"; :next 30 print i; 40 next
このプログラム以下の結果になる N88 A 1 Next without for in 40
M25 A 1 A 3 A 5 Next without for in 40
プログラムとして期待される動作はM25が正しい ブロックif文をサポートしてるためなのか
for i=0 to 4 を for i=5 to 4 にするとどちらも 5 Next without for in 40 になる 飛ばす先はif文の後であっても最初に出てきたnextとみなされる 0239ナイコンさん2008/12/02(火) 20:53:38 >SONYのSMCシリーズに積まれたBASICはそのあたりがよく練られていて良かった。 SMC BASICはどうやっていたの? 0240ナイコンさん2008/12/08(月) 15:48:27>>238 X1のNEW BASICだとN88、dB-BASICだとM25のように。 ちなみにturbo BASICはN88と同じ。 0241ナイコンさん2008/12/08(月) 15:53:48 ついでにX68000のX-BASICだと
run next に対応する for がありません...20行 20 if (i mod 2)=0 then print"A";:next ^ Ok 0242ナイコンさん2008/12/08(月) 15:55:04 ↑ ^がズレたw