mirror of
https://github.com/cc65/cc65.git
synced 2024-08-18 10:29:06 +00:00
96 lines
2.3 KiB
C
96 lines
2.3 KiB
C
#include <time.h>
|
|
#include <conio.h>
|
|
#include <ctype.h>
|
|
|
|
|
|
/* Number of elements in the progress bar. Use a power of 2 to avoid the
|
|
* multiplication (which is about to be tested).
|
|
*/
|
|
#define BAR_ELEMENTS 32U
|
|
|
|
/* Screen coordinates for the progress meter */
|
|
static unsigned char Width, Height;
|
|
static unsigned char X, Y;
|
|
|
|
static void ProgressMeter (unsigned Val)
|
|
/* Print the progress bar */
|
|
{
|
|
cclearxy (X, Y, Width);
|
|
gotoxy (X, Y);
|
|
cprintf ("% 6lu/65536", (unsigned long) Val);
|
|
}
|
|
|
|
|
|
|
|
int main(void)
|
|
{
|
|
char C;
|
|
|
|
/* Clock variable */
|
|
clock_t Ticks;
|
|
unsigned Sec;
|
|
unsigned Milli;
|
|
|
|
/* Actual test variables */
|
|
register unsigned lhs = 0;
|
|
register unsigned rhs = 0;
|
|
register unsigned res;
|
|
|
|
/* Clear the screen and output an informational message */
|
|
clrscr ();
|
|
screensize (&Width, &Height);
|
|
cprintf ("This program does an exhaustive test of\r\n"
|
|
"the multiplication routine. It runs\r\n"
|
|
"several days, so please wait very\r\n"
|
|
"patiently (or speedup your emulator)\r\n"
|
|
"\r\n"
|
|
"Progress:\r\n");
|
|
|
|
/* Remember the current position for the progress bar */
|
|
X = wherex ();
|
|
Y = wherey ();
|
|
|
|
|
|
/* Read the clock */
|
|
Ticks = clock();
|
|
|
|
|
|
do {
|
|
|
|
/* Update the progress bar */
|
|
ProgressMeter (lhs);
|
|
|
|
/* Do one row of tests */
|
|
res = 0;
|
|
do {
|
|
if (lhs * rhs != res) {
|
|
gotoxy (X, Y+1);
|
|
cprintf ("Error on %u * %u: %u != %u\r\n", lhs, rhs, lhs * rhs, res);
|
|
cprintf ("Press a key ..., 'Q' to quit");
|
|
C = toupper (cgetc ());
|
|
cclearxy (X, Y+1, Width);
|
|
cclearxy (X, Y+2, Width);
|
|
if (C == 'Q') {
|
|
goto Done;
|
|
}
|
|
}
|
|
res += lhs;
|
|
} while (++rhs != 0);
|
|
|
|
} while (++lhs != 0);
|
|
|
|
Done:
|
|
/* Calculate the time used */
|
|
Ticks = clock() - Ticks;
|
|
Sec = (unsigned) (Ticks / CLOCKS_PER_SEC);
|
|
Milli = ((Ticks % CLOCKS_PER_SEC) * 1000) / CLOCKS_PER_SEC;
|
|
|
|
/* Print the time used */
|
|
gotoxy (X, Y+1);
|
|
cprintf ("Time used: %u.%03u seconds\n", Sec, Milli);
|
|
|
|
return 0;
|
|
}
|
|
|
|
|