【プチコン/mkII 両対応】 2012年3月18日 公開
プチコンmkIIは初代プチコンと比べて動作速度が上がっているようなのでそれを確かめるためにベンチマークテストを作ってみました。バージョンに依存する命令は使ってないのですべてのバージョンのプチコンで動作すると思います。
@ST CLS:GCLS:CLEAR VISIBLE 1,1,1,1,1,1:SPPAGE 0 DIM V(50),W(50) DIM X(50),Y(50) LOCATE 10,5:?"プチコン ベンチ" LOCATE 7,9:?"SELECT BENCH MARK" LOCATE 9,12:?"[A] CONSOLE" LOCATE 9,13:?"[B] GRAPHICS" @LOOP B=BUTTON() IF B==16THEN @B1 IF B==32THEN @B2 GOTO @LOOP ' コンソ-ル ベンチ @B1 CLS:LOCATE 9,9:?"CALC" Z=9999 GOSUB @CT:U=T FOR I=0TO 99999 Z=Z+9:Z=Z-9:Z=Z*9:Z=Z/9 NEXT GOSUB @CT:A=T-U CLS:LOCATE 9,9:?"LOOP" GOSUB @CT:U=T FOR I=1TO 500000:NEXT GOSUB @CT:B=T-U GOSUB @CT:U=T FOR I=1 TO 50000 LOCATE 9,9:?I:NEXT GOSUB @CT:C=T-U BEEP 5 CLS ?"CALC ";A ?"LOOP ";B ?"PRINT ";C GOTO @WT ' グラフィック ベンチ @B2 CLS GCLS:GOSUB @CT:U=T FOR I=1TO 99999:GOSUB @RA GLINE X,Y,X+RND(50)+5,Y+RND(30)+5,RND(256) GOSUB @CT:IF T-U==300THEN A=I:I=99999 NEXT GCLS:GOSUB @CT:U=T FOR I=1TO 99999:GOSUB @RA GBOX X,Y,X+RND(50)+5,Y+RND(30)+5,RND(256) GOSUB @CT:IF T-U==300THEN B=I:I=99999 NEXT GCLS:GOSUB @CT:U=T FOR I=1TO 99999:GOSUB @RA GFILL X,Y,X+RND(50)+5,Y+RND(30)+5,RND(256) GOSUB @CT:IF T-U==300THEN C=I:I=99999 NEXT GCLS:GOSUB @CT:U=T FOR I=1TO 99999:GOSUB @RA GCIRCLE X,Y,RND(50)+5,RND(256) GOSUB @CT:IF T-U==300THEN D=I:I=99999 NEXT GCLS FOR I=0 TO 49 V(I)=RND (2)*2-1 W(I)=RND (2)*2-1 X(I)=RND (240):Y(I)=RND (176) SPSET I,156,0,0,0,0 SPANIM I,4,3 NEXT GOSUB @CT:U=T FOR J=0TO 9999 FOR I=0 TO 49 X(I)=X(I)+V(I):Y(I)=Y(I)+W(I) IF X(I)>240OR X(I)<0 THEN X(I)=X(I)-V(I):V(I)=-V(I) IF Y(I)>176OR Y(I)<0 THEN Y(I)=Y(I)-W(I):W(I)=-W(I) SPOFS I,X(I),Y(I) GOSUB @CT:IF T-U==300THEN E=J*50+I+1:I=49:J=9999 NEXT:NEXT SPCLR BEEP 5 ?"GLINE ";A ?"GBOX ";B ?"GFILL ";C ?"GCIRCLE";D ?"SPRITE ";E @WT ? ?"PUSH [START] BUTTON" FOR I=0 TO 1024:I=BUTTON():NEXT GOTO @ST @CT T=MAINCNTL:RETURN @RA X=RND(256):Y=RND(192):RETURN |
プチコン(ver1.2) | プチコンmkII(ver2.0) | 速度比較 | |
コンソールベンチ(実行にかかったフレーム数) | |||
四則演算 | ↑18%アップ | ||
ループ | ↑9%アップ | ||
テキスト表示 | ↑137%アップ | ||
グラフィックベンチ(5秒間に実行された回数) | |||
GLINE | ↑37%アップ | ||
GBOX | ↑32%アップ | ||
GFILL | ↑26%アップ | ||
GCIRCLE | ↓18%ダウン | ||
スプライト | ↑44%アップ | ||
mkII(ver2.0) | mkII(ver2.1) | 速度比較 | |
コンソールベンチ(実行にかかったフレーム数) | |||
四則演算 | ↑0.4%アップ | ||
ループ | ↓0.4%ダウン | ||
テキスト表示 | ↓2.5%ダウン | ||
グラフィックベンチ(5秒間に実行された回数) | |||
GLINE | ↑1.9%アップ | ||
GBOX | ↓1.3%ダウン | ||
GFILL | ↓0.2%ダウン | ||
GCIRCLE | ↑99.2%アップ | ||
スプライト | ↓0.1%ダウン | ||
mkII(ver2.1) | mkII(ver2.0) | 速度比較 | |
半径 10 pixel | ↑2.71倍アップ | ||
半径 20 pixel | ↑2.64倍アップ | ||
半径 30 pixel | ↑2.56倍アップ | ||
半径 40 pixel | ↑2.46倍アップ | ||
半径 50 pixel | ↑2.42倍アップ | ||
半径 60 pixel | ↑2.35倍アップ | ||
半径 70 pixel | ↑2.26倍アップ | ||
半径 80 pixel | ↑2.19倍アップ | ||
半径 90 pixel | ↑2.17倍アップ | ||