Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

System Speed

Status
Not open for further replies.

Guest_imported

New member
Jan 1, 1970
0
Does anyone know how to determine the actual system speed ? My intention ist to make my progs run at equal speed on every machine ( if achievable ) . Thanx in Advance.
The.Snyder@gmx.net

you can check to see which progs I mean
 
if you are talking about Qbasic, I am not really sure that is possible. Might need something a little lower level. or a least determine the kind of slowdown, and hardcode them into an option menu or something similar to that. [sig]<p>Karl<br><a href=mailto:kb244@kb244.com>kb244@kb244.com</a><br><a href= </a><br>Experienced in : C++(both VC++ and Borland),VB1(dos) thru VB6, Delphi 3 pro, HTML, Visual InterDev 6(ASP(WebProgramming/Vbscript)<br>
[/sig]
 
you can use many loop to check the speed with the timer:

REM put this a the begining of the program
CLS
TEST1 = TIMER
PRINT &quot;wait while i test the speed of your computer...&quot;;
FOR i = 1 TO 10000
NEXT
TEST2 = TIMER: slowdown = 2500 / (TEST2 - TEST1)

to adjust the speed change the 2500 to another until you have your speed and when you want to slow down a animation or a loop then you have to type:

FOR slow = 1 TO slowdown : NEXT

it should now run at equal speed on every computer.

hope it can help [sig]<p>miguel<br><a href=mailto:migoul@hotmail.com>migoul@hotmail.com</a><br><a href= page (not been updated recently)</a><br> [/sig]
 
miguel, I'm sure he could do that for his own computer, but I think he want the program to automatically adjust it's own speed, on whatever computer it's on. [sig]<p>Karl<br><a href=mailto:kb244@kb244.com>kb244@kb244.com</a><br><a href= </a><br>Experienced in : C++(both VC++ and Borland),VB1(dos) thru VB6, Delphi 3 pro, HTML, Visual InterDev 6(ASP(WebProgramming/Vbscript)<br>
[/sig]
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top