Cpp.zip_量子_量子框架_量子计算

///////////////////////////////////////////////////////////////////// // Quantum Calculator example (C++ version) // Copyright (c) 2002 Miro Samek, Palo Alto, CA. // All Rights Reserved. ///////////////////////////////////////////////////////////////////// #include "qassert.h" #include "calc1.h" #include "resource.h" #include <string.h> #include <commctrl.h> #include <stdio.h> DEFINE_THIS_FILE; enum { PRECISION = 14 }; static HINSTANCE locHinst; // this instance static HWND locHwnd; // window handle //------------------------------------------------------------------- void Calc1::clear() { myDisplay[0] = ' '; myDisplay[1] = '0'; myDisplay[2] = '\0'; myIns = &myDisplay[1]; SetDlgItemText(myHwnd, IDC_DISPLAY, myDisplay); } //................................................................... void Calc1::insert(int keyId) { if (myIns < &myDisplay[PRECISION - 1]) { *myIns++ = (keyId == IDC_POINT) ? '.' : keyId - IDC_0+'0'; *myIns = '\0'; SetDlgItemText(myHwnd, IDC_DISPLAY, myDisplay); } } //................................................................... void Calc1::negate() { myDisplay[0] = '-'; SetDlgItemText(myHwnd, IDC_DISPLAY, myDisplay); } //................................................................... void Calc1::eval() { double r; switch (myOperator) { case IDC_PLUS: r = myOperand1 + myOperand2; break; case IDC_MINUS: r = myOperand1 - myOperand2; break; case IDC_MULT: r = myOperand1 * myOperand2; break; case IDC_DIVIDE: if (myOperand2 != 0.0) { r = myOperand1 / myOperand2; } else { MessageBox(myHwnd, "Cannot Divide by 0", "Calculator", MB_OK); r = 0.0; } break; default: ASSERT(0); } if (-1.0e10 < r && r < 1.0e10) { sprintf(myDisplay, "%24.11g", r); } else { MessageBox(myHwnd, "Result out of range", "Calculator", MB_OK); clear(); } SetDlgItemText(myHwnd, IDC_DISPLAY, myDisplay); } //................................................................... void Calc1::dispState(char const *s) { SetDlgItemText(myHwnd, IDC_STATE, s); } // HSM definition --------------------------------------------------- void Calc1::initial(QEvent const *) { Q_INIT(&Calc1::calc); } //................................................................... QSTATE Calc1::final(QEvent const *e) { switch (e->sig) { case Q_ENTRY_SIG: EndDialog(myHwnd, 0); return 0; } return (QSTATE)&Calc1::top; } //................................................................... QSTATE Calc1::calc(QEvent const *e) { switch (e->sig) { case Q_ENTRY_SIG: dispState("calc"); return 0; case Q_INIT_SIG: clear(); Q_INIT(&Calc1::ready); return 0; case IDC_C: clear(); Q_TRAN(&Calc1::calc); return 0; case TERMINATE: Q_TRAN(&Calc1::final); return 0; } if (e->sig >= Q_USER_SIG) { isHandled = FALSE; } return (QSTATE)&Calc1::top; } //................................................................... QSTATE Calc1::ready(QEvent const *e) { switch (e->sig) { case Q_ENTRY_SIG: dispState("ready"); return 0; case Q_INIT_SIG: Q_INIT(&Calc1::begin); return 0; case IDC_0: clear(); Q_TRAN(&Calc1::zero1); return 0; case IDC_1_9: clear(); insert(((CalcEvt *)e)->keyId); Q_TRAN(&Calc1::int1); return 0; case IDC_POINT: clear(); insert(IDC_0); insert(((CalcEvt *)e)->keyId); Q_TRAN(&Calc1::frac1); return 0; case IDC_OPER: sscanf(myDisplay, "%lf", &myOperand1); myOperator = ((CalcEvt *)e)->keyId; Q_TRAN(&Calc1::opEntered); return 0; } return (QSTATE)&Calc1::calc; } //................................................................... QSTATE Calc1::result(QEvent const *e) { switch (e->sig) { case Q_ENTRY_SIG: dispState("result"); eval(); return 0; } return (QSTATE)&Calc1::ready; } //................................................................... QSTATE Calc1::begin(QEvent const *e) { switch (e->sig) { case Q_ENTRY_SIG: dispState("begin"); return 0; case IDC_OPER: if (((CalcEvt *)e)->keyId == IDC_MINUS) { Q_TRAN(&Calc1::negated1); return 0; // event handled } else if (((CalcEvt *)e)->keyId == IDC_PLUS) { // unary "+" return 0; // event handled } break; // event unhandled! } return (QSTATE)&Calc1::ready; } //................................................................... QSTATE Calc1::negated1(QEvent const *e) { switch (e->sig) { case Q_ENTRY_SIG: dispState("negated1"); negate(); return 0; case IDC_CE: clear(); Q_TRAN(&Calc1::begin); return 0; case IDC_0: insert(((CalcEvt *)e)->keyId); Q_TRAN(&Calc1::zero1); return 0; case IDC_1_9: insert(((CalcEvt *)e)->keyId); Q_TRAN(&Calc1::int1); return 0; case IDC_POINT: insert(((CalcEvt *)e)->keyId); Q_TRAN(&Calc1::frac1); return 0; } return (QSTATE)&Calc1::calc; } //................................................................... QSTATE Calc1::negated2(QEvent const *e) { switch (e->sig) { case Q_ENTRY_SIG: dispState("negated2"); negate(); return 0; case IDC_CE: Q_TRAN(&Calc1::opEntered); return 0; case IDC_0: Q_TRAN(&Calc1::zero2); return 0; case IDC_1_9: insert(((CalcEvt *)e)->keyId); Q_TRAN(&Calc1::int2); return 0; case IDC_POINT: insert(((CalcEvt *)e)->keyId); Q_TRAN(&Calc1::frac2); return 0; } return (QSTATE)&Calc1::calc; } //................................................................... QSTATE Calc1::operand1(QEvent const *e) { switch (e->sig) { case Q_ENTRY_SIG: dispState("operand1"); return 0; case IDC_CE: clear(); Q_TRAN(&Calc1::begin); return 0; case IDC_OPER: sscanf(myDisplay, "%lf", &myOperand1); myOperator = ((CalcEvt *)e)->keyId; Q_TRAN(&Calc1::opEntered); return 0; } return (QSTATE)&Calc1::calc; } //................................................................... QSTATE Calc1::zero1(QEvent const *e) { switch (e->sig) { case Q_ENTRY_SIG: dispState("zero1"); return 0; case IDC_1_9: insert(((CalcEvt *)e)->keyId); Q_TRAN(&Calc1::int1); return 0; case IDC_POINT: insert(((CalcEvt *)e)->keyId); Q_TRAN(&Calc1::frac1); return 0; } return (QSTATE)&Calc1::operand1; } //................................................................... QSTATE Calc1::int1(QEvent const *e) { switch (e->sig) { case Q_ENTRY_SIG: dispState("int1"); return 0; case IDC_0: case IDC_1_9: insert(((CalcEvt *)e)->keyId); return 0; case IDC_POINT: insert(((CalcEvt *)e)->keyId); Q_TRAN(&Calc1::frac1); return 0; } return (QSTATE)&Calc1::operand1; } //................................................................... QSTATE Calc1::frac1(QEvent const *e) { switch (e->sig) { case Q_ENTRY_SIG: dispState("frac1"); return 0; case IDC_0: case IDC_1_9: insert(((CalcEvt *)e)->keyId); return 0; } return (QSTATE)&Calc1::operand1;