BASICマガジンに記事がないことがトラウマでしたが、MSX以前で最安値でBASICプログラミングができることもあり、それなりにはユーザーがいたようです。
BASICプログラム集も、学研から１冊発売されました。
ネットで最初に手に入れたPC、ああ持っていた、なんて記事も見かけるようになりました。
ただ、マシン語でゲームなどを作ってみましたという猛者は見かけたことはありませんが。
そこで、整数BASIC用のベンチマーク・プログラムを考えてみました。
100 'PAI Montecalro
105 CT=0:COLOR 1,14:CLS
110 FOR I=0 TO 10000
120 X=RND(100):Y=RND(100)
130 PR=X*X+Y*Y
140 COLOR 15
150 IF PR<10000 THEN CT=CT+1:COLOR RND(13)+1
160 LOCATE X/5,Y/5:PRINT ”＊”;
170 NEXT
180 LOCATE 1,1:PRINT "PAI*10000";CT*4
200 COLOR 1,4:END
時間は手持ちのSTOP WATCHで測ってみてください。
by off_kawa
| 2013-10-12 23:01
| ＰＣ・ハード
