Quantum Leaps 03d9cc53a6 5.7.0
2016-09-01 11:57:27 -04:00

130 lines
5.2 KiB
C

/*****************************************************************************
* Product: Calc1 Example
* Last Updated for Version: 5.6.6
* Date of the Last Update: 2016-07-26
*
* Q u a n t u m L e a P s
* ---------------------------
* innovating embedded systems
*
* Copyright (C) 2002-2016 Quantum Leaps, LLC. All rights reserved.
*
* This program is open source software: you can redistribute it and/or
* modify it under the terms of the GNU General Public License as published
* by the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* Alternatively, this program may be distributed and modified under the
* terms of Quantum Leaps commercial licenses, which expressly supersede
* the GNU General Public License and are specifically designed for
* licensees interested in retaining the proprietary status of their code.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*
* Contact information:
* http://www.state-machine.com
* mailto:info@quantum-leaps.com
*****************************************************************************/
#include "qep_port.h"
#include "bsp.h"
#include "calc1.h"
#include <stdio.h>
#include <conio.h>
#include <dos.h>
/*..........................................................................*/
int main() {
Calc_ctor(); /* explicitly instantiate the calculator object */
printf("Calculator example, QEP version: %s\n"
"Press '0' .. '9' to enter a digit\n"
"Press '.' to enter the decimal point\n"
"Press '+' to add\n"
"Press '-' to subtract or negate a number\n"
"Press '*' to multiply\n"
"Press '/' to divide\n"
"Press '=' or <Enter> to get the result\n"
"Press 'c' or 'C' to Cancel\n"
"Press 'e' or 'E' to Cancel Entry\n"
"Press <Esc> to quit.\n\n",
QEP_getVersion());
QMSM_INIT(the_calc, (QEvt *)0); /* trigger initial transition */
for (;;) { /* event loop */
CalcEvt e; /* Calculator event */
BSP_display(); /* show the display */
printf(": ");
fflush(stdout);
e.key_code = (uint8_t)_getche(); /* get a char with echo */
printf(" ");
switch (e.key_code) {
case 'c': /* intentionally fall through */
case 'C': {
((QEvt *)&e)->sig = C_SIG;
break;
}
case 'e': /* intentionally fall through */
case 'E': {
((QEvt *)&e)->sig = CE_SIG;
break;
}
case '0': {
((QEvt *)&e)->sig = DIGIT_0_SIG;
break;
}
case '1': /* intentionally fall through */
case '2': /* intentionally fall through */
case '3': /* intentionally fall through */
case '4': /* intentionally fall through */
case '5': /* intentionally fall through */
case '6': /* intentionally fall through */
case '7': /* intentionally fall through */
case '8': /* intentionally fall through */
case '9': {
((QEvt *)&e)->sig = DIGIT_1_9_SIG;
break;
}
case '.': {
((QEvt *)&e)->sig = POINT_SIG;
break;
}
case '+': /* intentionally fall through */
case '-': /* intentionally fall through */
case '*': /* intentionally fall through */
case '/': {
((QEvt *)&e)->sig = OPER_SIG;
break;
}
case '=': /* intentionally fall through */
case '\r': { /* Enter key */
((QEvt *)&e)->sig = EQUALS_SIG;
break;
}
case '\33': { /* ESC key */
((QEvt *)&e)->sig = OFF_SIG;
break;
}
default: {
((QEvt *)&e)->sig = 0; /* invalid event */
break;
}
}
if (((QEvt *)&e)->sig != 0) { /* valid event generated? */
QMSM_DISPATCH(the_calc, (QEvt *)&e); /* dispatch event */
}
}
return 0;
}