I was bored, so I wrote a simple/small cpu benchmark that tests the dual precision floating point performance of your CPU.

I wrote it in Visual Basic 6

If you run it, please post your score as well as your CPU. Keep in mind that it is NOT multithreaded, so having multiple cores will not benefit this benchmark.

here is the download link: http://h1.ripway.com/bsfoltz/simplebench.exe


My desktop:
Athlon 64 3700+ @ 2.4
Score: 1225

My laptop:
Turion 64 X2 @ 1.6
Score: 745

My fileserver
Pentium 3 @ 500mhz
Score: 237

Im interested to see how accurate my benchmark is, as well as to just generally see some scores of CPU's other than my own.

My E4300 topped out at 792.

Wonder what I'd get if I do that mod DaSickNinja reccomended.

That seems odd that a c2d would score lower than my A64..... do you have any demanding apps running in the backround like a game or copying files.... etc?

I've got quite a few things going. Turned off the one program that was maxing out my CPU. Another account running on this computer uses about 5% of the CPU resources at all times, too.

714 is what I'm getting with my normal programs running.

Score: 1249.9627

P4 3.0 Northwood HT Stock

Edit:

And the score fluctuates..

Did get 1258, then 1275, then back to 1249. Not really running hardly that much in the background.

Just a warning about executing programs. I appreciate his effort but I choose not to download and execute the file because I don't know the person who made it and don't have the resources to determine what it does.

1355 +/- a couple points over 5 runs.

Athlon 5000+ with 2 gigs ram.

Interestingly, I ran it with a virus scan going in the backgound and score only dropped to 1351.

Guess this dual core stuff actually works

Just as an aside, why is my computer now dialing a 1-900 number in central America?

And for that matter, I don't remember ever actually visiting any of these port sites that keep popping up on my browser all the time now...


















Just kidding......
PS - It's real simple VB, couple timed loops is all.

You know, I was thinking the exact same thing. Then I figured... what the hell, this is Vista, damnit.

I can assure you, it is not a virus. If it would re-assure you if i posted the source code here, just tell me and I will.

Avast! showed nothing wrong with it, so I also thought WTH..

For those that can compile it I'm sure it would help immensely. For those that can't and don't understand such things, might be fun reading.

Sorry, I hope I didn't come off as accusatory. It was just meant as a reminder that anyone could come here and post up 9 or 10 posts then create a thread that links to a program that benchmarks your computer and also does other things like steal information, etc...

I do think you are sincere and I am in no way trying to cast doubt on your hard work, I just want everyone to be aware that if they want to download executables here that ANYONE posts they should do so with some risk in mind.

I would be interested in the source code. In my spare time, I could go about making the program multithreaded, and that way, my X6800 and QX6700 will pwn you all...

I wrote it in 5 minutes so its nothing special:


[code:1:7bf89a2c03]
' this goes in a module

Public Declare Function GetTickCount Lib "kernel32" () As Long
[/code:1:7bf89a2c03]

[code:1:7bf89a2c03]
'the rest of this goes in form1

Dim i As Long
Dim p As Double
Dim k As Double
Dim l As Double
Dim z As Double
Dim tickc As Long
Dim starttick As Long
Dim brun As Boolean

Private Sub Form_Load()
starttick = GetTickCount

p = 3.14159


brun = True

Do While brun = True

i = i + 1

k = p * (p + i)
l = (k * p)
z = l / k
l = z * (k + p)

tickc = GetTickCount

If tickc >= starttick + 1000 Then
brun = False
MsgBox "Score: " & (i / 10000)
End
End If

Loop

End Sub
[/code:1:7bf89a2c03]

Im open for suggestions if anyone has ideas to improve this one or make a different one

edit:

If you know how to multithread applications with vb6, id very much like to be shown how

i got 1255 for pentium D 930

multithreaded would be good because i saw it using only one core

I'm still learning just like you. But I'll let you know when I get it right.

1667 for E6400@ 3.2ghz.

you are stupid (DaSickNinja) all i said was multithreaded is a good idea. as you said u can help this guy in doing that and you start you stupid ass answer for no reason what wrong with you. read my thread again i didn;t mean to ofened you. lol. chill

I think he was talking to me... as in he doesnt know how to multithread apps in vb6 yet either...

well then i am sorry.