home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1998 May
/
Pcwk5b98.iso
/
Borland
/
Cplus45
/
BC45
/
CLASSSRC.PAK
/
TIMER.CPP
< prev
next >
Wrap
C/C++ Source or Header
|
1995-08-29
|
3KB
|
111 lines
/*------------------------------------------------------------------------*/
/* */
/* TIMER.CPP */
/* */
/* Copyright (c) 1991, 1994 Borland International */
/* All Rights Reserved */
/* */
/*------------------------------------------------------------------------*/
#if !defined( __DOS_H )
#include <dos.h>
#endif
#define BUILDBIDSTIMER
#if !defined( CLASSLIB_TIMER_H )
#include <classlib/timer.h>
#endif
const unsigned long far * const dosTime =
(const unsigned long far * const)MK_FP( 0x40, 0x6C );
unsigned TTimer::Adjust = Calibrate();
TTimer::TTimer() : Time_(0), Running(0)
{
}
void TTimer::Start()
{
if( !Running )
{
outportb( 0x43, 0x34 );
asm jmp __1;
__1:
outportb( 0x40, 0 );
asm jmp __2;
__2:
outportb( 0x40, 0 );
StartTime.DosCount = *dosTime;
StartTime.TimerCount = 0;
Running = 1;
}
}
void TTimer::Stop()
{
outportb( 0x43, 0 );
unsigned char temp = inportb( 0x40 );
TIME stopTime;
stopTime.TimerCount = (inportb( 0x40 ) << 8) + temp;
stopTime.DosCount = *dosTime;
TIME elapsedTime;
elapsedTime.DosCount = stopTime.DosCount - StartTime.DosCount;
elapsedTime.TimerCount = -( stopTime.TimerCount - Adjust );
const double fudge = 83810.0/100000.0;
Time_ += ((elapsedTime.DosCount << 16) + elapsedTime.TimerCount)*fudge;
Running = 0;
}
void TTimer::Reset()
{
Time_ = 0;
if( Running )
Start();
}
unsigned TTimer::Calibrate()
{
Adjust = 0;
unsigned long sum = 0;
TTimer w;
for( int i = 0; i < 100; i++ )
{
w.Start();
w.Stop();
sum += w.Time();
w.Reset();
}
return (unsigned)((sum+5)/100);
}
#if defined( TEST_TIMER )
#include <iostream.h>
#include <stdio.h>
int main( void )
{
delay( 0 );
cout << "Resolution: " << Timer::Resolution() << endl;
TTimer w;
for( unsigned del = 0; del < 10; del++ )
{
unsigned d1 = del*100;
w.Start();
delay( d1 );
w.Stop();
printf( "%4u ms., actual time = %6f seconds.\n", d1, w.Time() );
w.Reset();
}
return 0;
}
#endif