Benchmarks SBC6502.

Part3.

Dnes som si prečítal tento článok a teda tým sa mi nejako s tými benchmarkami roztrhlo vrece:

https://diit.cz/clanek/recenze-speccy2010-poradne-moderni-retro

Pretože sa v texte spomínaného článku nachádza aj benchmarkový test tak som si povedal - skúsim ho spustiť aj na SBC6502 (prečo nie) - a tak vznikol tento kratučký článok a zase vychádzajú na povrch celkom zaujímavé čísla:

SPECCY 2010, rýchlosť = pôvodný stroj ZX Spectrum - TIME: 77.6 secs

SBC6502 - originál test  - TIME: 36.21 secs (ver.1)

SBC6502 - test odstránené LET - TIME: 35.76 secs (ver.2)

Len pripomeniem že ver.1 je originálny program, ver.2 má odstránené LET premenná =, pretože SBC6502 takýto zápis  nevyžaduje.

Ver.1:

10 LET W=250: DIM F(W):LET P=1:LET A=3
20 LET F(P)=A:LET P=P+1:IF P>W THEN STOP
30 LET A=A+2:LET X=1
40 LET S=A/F(X):IF S=INT(S) THEN GOTO 30
50 LET X=X+1:IF X>=P THEN GOTO 60
51 IF F(X)*F(X)<=A THEN GOTO 40
60 GOTO 20   

Ver.2:
10 W=250: DIM F(W):P=1:A=3
20 F(P)=A:P=P+1:IF P>W THEN STOP
30 A=A+2:X=1
40 S=A/F(X):IF S=INT(S) THEN GOTO 30
50 X=X+1:IF X>=P THEN GOTO 60
51 IF F(X)*F(X)<=A THEN GOTO 40
60 GOTO 20

__________

Skúste si ten test aj na svoju mašinku, možno večer zaspíte zo spokojným úsmevom ...

_____________________________________________________

Vaše hodnotenie, Rate post: