Home
JAQForum Ver 24.01
Log In or Join  
Active Topics
Local Time 08:58 01 Aug 2025 Privacy Policy
Jump to

Notice. New forum software under development. It's going to miss a few functions and look a bit ugly for a while, but I'm working on it full time now as the old forum was too unstable. Couple days, all good. If you notice any issues, please contact me.

Forum Index : Microcontroller and PC projects : An Old BASIC Benchmark

Author Message
chris
Regular Member

Joined: 24/08/2020
Location: United Kingdom
Posts: 56
Posted: 08:47pm 14 Oct 2020
Copy link to clipboard 
Print this post

Somebody recently pointed me in the direction of this benchmark:

http://oldcomputer.info/8bit/benchmarks/index.htm

I'm away from computer so haven't had time to try it out, but I wonder how CMM1 and CMM2 would do?
 
CircuitGizmos

Guru

Joined: 08/09/2011
Location: United States
Posts: 1427
Posted: 08:59pm 14 Oct 2020
Copy link to clipboard 
Print this post



  Quote  S=0

TIMER=0

FOR N=1 TO 100
 A=N
 
FOR I=1 TO 10
   A=
SQR(A)
 
NEXT I
 
FOR I=1 TO 10
   A=A*A
 
NEXT I
 S=S+A
NEXT N
PRINT ABS(1010-S/5)

PRINT TIMER




CMM2: 0.014 seconds.
Edited 2020-10-15 06:59 by CircuitGizmos
Micromites and Maximites! - Beginning Maximite
 
vegipete

Guru

Joined: 29/01/2013
Location: Canada
Posts: 1132
Posted: 09:09pm 14 Oct 2020
Copy link to clipboard 
Print this post

For the first example, I get 15.9 seconds .... for 1000 iterations. Drastically faster than anything in the table. The print statement from line 120 doesn't slow it much - 15.7 seconds with no print. Allowing the print to scroll does slow it a little bit.  (400 MHz Waveshare.)

time: 15908.843

> list
t = timer

for many = 1 to 1000
10 S=0
20 FOR N=1 TO 100
30 A=N
40 FOR I=1 TO 10
50 A=SQR(A)
60 NEXT I
70 FOR I=1 TO 10
80 A=A*A
90 NEXT I
100 S=S+A
110 NEXT N
120 PRINT @(100,200) ABS(1010-S/5)
next many
? "time:" timer - t

130 END

Edited 2020-10-15 07:10 by vegipete
Visit Vegipete's *Mite Library for cool programs.
 
SimpleSafeName

Guru

Joined: 28/07/2019
Location: United States
Posts: 351
Posted: 03:15am 15 Oct 2020
Copy link to clipboard 
Print this post

Okay, let's see...

I have TI99/4As,
a ZX Spectrum +2, a +3, and a Harlequin ZX,
Commodore 64s, 128s, and VIC20s,
Mattel Aquariuses (happy to see this oft-maligned computer do so well),
an Acorn Electron and a BBC Micro B.

But where are the MSX computers? I may have to bust out my MSX TurboR and see what it will do. :)
 
Tinine
Guru

Joined: 30/03/2016
Location: United Kingdom
Posts: 1646
Posted: 06:39am 15 Oct 2020
Copy link to clipboard 
Print this post

118ms on my E-100 @100MHz

So in this case, the 400MHz CMM2 is ~7.5X the speed of the PIC32MX470
 
PeteCotton

Guru

Joined: 13/08/2020
Location: Canada
Posts: 543
Posted: 06:05pm 15 Oct 2020
Copy link to clipboard 
Print this post

Just for giggles, I thought I would run it in C# (on a Ryzen 7 2700 desktop).

The print/scrolling command really slows it down. 650 milliseconds for 1,000 iterations as opposed to 16 milliseconds when updating a label without scrolling.

Note: This is just for curiosity. Of course it's an unfair comparison to throw a modern computer against 40 year old tech... and I know C# vs Basic isn't fair either... and I'm only using one of the 16 threads... but all in all 375,000 times faster than a BBC Micro. It boggles the mind how far we have come.
 
vegipete

Guru

Joined: 29/01/2013
Location: Canada
Posts: 1132
Posted: 07:21pm 15 Oct 2020
Copy link to clipboard 
Print this post



Speed, or lack thereof. 4 minutes and 10 seconds.
Perhaps of greater concern is the completely different answer than the CMM2.
Visit Vegipete's *Mite Library for cool programs.
 
twofingers

Guru

Joined: 02/06/2014
Location: Germany
Posts: 1593
Posted: 08:35pm 15 Oct 2020
Copy link to clipboard 
Print this post


My first "laptop" (Tandy 100)!  I loved it!

Michael
causality ≠ correlation ≠ coincidence
 
Volhout
Guru

Joined: 05/03/2018
Location: Netherlands
Posts: 5089
Posted: 05:16pm 16 Oct 2020
Copy link to clipboard 
Print this post

Epson PX8

Don't have it anymore.. awfully slow with it's Z80 running at 780kHz...(CMOS).
PicomiteVGA PETSCII ROBOTS
 
mclout999
Guru

Joined: 05/07/2020
Location: United States
Posts: 490
Posted: 06:30pm 16 Oct 2020
Copy link to clipboard 
Print this post

  twofingers said  
My first "laptop" (Tandy 100)!  I loved it!

Michael

I still have mine!!  It's keyboard has a cold solder joint somewhere. I have to take the time to fix it but it works great except for the column of keys that do not work.
 
SimpleSafeName

Guru

Joined: 28/07/2019
Location: United States
Posts: 351
Posted: 08:33pm 16 Oct 2020
Copy link to clipboard 
Print this post

  mclout999 said  
  twofingers said  
My first "laptop" (Tandy 100)!  I loved it!

Michael

I still have mine!!  It's keyboard has a cold solder joint somewhere. I have to take the time to fix it but it works great except for the column of keys that do not work.


I think that it was either Jan Beta, Adrian's Digital Basement, or Retro Recipes that had a Tandy with the exact same problem. It might have been a TRS 80 though. But "SepTandy" is the month where many of the retro guys dig up their Tandys and spruce them up.
 
Print this page


To reply to this topic, you need to log in.

The Back Shed's forum code is written, and hosted, in Australia.
© JAQ Software 2025