My math is fuzzy beyond VERY basic Calculus and I've never been an electrician. Can anybody tell me how to convert intervals retrieved from the TIMER function (startTime@, elapsedTime@) and executed lines per second into a hz rate through a parallel port?
I'm using PBCC 4.04 trying to benchmark the WinIo driver. The program generates this output (extraneous digits removed):
InstallWinIoDriver() = 1
InitializeWinIo() = 1
ShutdownWinIo() = 1
RemoveWinIoDriver = 1
Elapsed time = 1.08 for 2400 iterations.
Lines per second = 11131.7
How does that translate into hz?
Thanks,
Stan
I'm using PBCC 4.04 trying to benchmark the WinIo driver. The program generates this output (extraneous digits removed):
InstallWinIoDriver() = 1
InitializeWinIo() = 1
ShutdownWinIo() = 1
RemoveWinIoDriver = 1
Elapsed time = 1.08 for 2400 iterations.
Lines per second = 11131.7
How does that translate into hz?
Code:
#COMPILE EXE #DIM ALL #INCLUDE "f:\PBWin80\WinIO\WinIO.bas" FUNCTION PBMAIN () AS LONG LOCAL lResult AS LONG LOCAL startTime AS DOUBLE LOCAL elapsedTime AS DOUBLE LOCAL tempStr AS STRING LOCAL iteration AS LONG LOCAL PortAddr% LOCAL PortVal& LOCAL bSize? LOCAL PhysAddr& LOCAL PhysSize& LOCAL PhysMemHandle& LOCAL PhysVal& LOCAL LinAddr& lResult = InstallWinIoDriver("f:\PBCC40\My Source Code\", 0) PRINT "InstallWinIoDriver() = " lResult lResult = InitializeWinIo() PRINT "InitializeWinIo() = " lResult tempStr = WAITKEY$ startTime = TIMER FOR iteration = 1 TO 2400 lResult = GetPortVal(PortAddr%, PortVal&, bSize?) lResult = MapPhysToLin(PhysAddr&, PhysSize&, PhysMemHandle&) lResult = GetPortVal(PortAddr%, PortVal&, bSize?) lResult = GetPhysLong(PhysAddr&, PhysVal&) lResult = UnmapPhysicalMemory(PhysMemHandle&, LinAddr&) NEXT interation elapsedTime = TIMER - startTime linesPerSecond = 2400 * 5 / elapsedTime lResult = ShutdownWinIo() PRINT "ShutdownWinIo() = " lResult RemoveWinIoDriver() PRINT "RemoveWinIoDriver = " lResult PRINT "Elapsed time = " elapsedTime " for 2400 iterations." PRINT "Lines per second = " linesPerSecond tempStr = WAITKEY$ END FUNCTION
Stan
Comment