fc-tourmaline: src/ui/bmi/mmiCalculatorMain.c annotate

annotate src/ui/bmi/mmiCalculatorMain.c @ 303:f76436d19a7a default tip

!GPRS config: fix long-standing AT+COPS chance hanging bug There has been a long-standing bug in FreeCalypso going back years: sometimes in the AT command bring-up sequence of an ACI-only MS, the AT+COPS command would produce only a power scan followed by cessation of protocol stack activity (only L1 ADC traces), instead of the expected network search sequence. This behaviour was seen in different FC firmware versions going back to Citrine, and seemed to follow some law of chance, not reliably repeatable. This bug has been tracked down and found to be specific to !GPRS configuration, stemming from our TCS2/TCS3 hybrid and reconstruction of !GPRS support that was bitrotten in TCS3.2/LoCosto version. ACI module psa_mms.c, needed only for !GPRS, was missing in the TCS3 version and had to be pulled from TCS2 - but as it turns out, there is a new field in the MMR_REG_REQ primitive that needs to be set correctly, and that psa_mms.c module is the place where this initialization needed to be added.

author	Mychaela Falconia <falcon@freecalypso.org>
date	Thu, 08 Jun 2023 08:23:37 +0000
parents	f1f29e85f92b
children

rev	line source
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	2
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	3 CONDAT (UK)
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	4
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	5 ********************************************************************************
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	6
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	7 This software product is the property of Condat (UK) Ltd and may not be
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	8 disclosed to any third party without the express permission of the owner.
c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	9
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	10 ********************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	11
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	12 $Project name: Basic MMI
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	13 $Project code: BMI (6349)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	14 $Module: Calculator
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	15 $File: MmiCalculatorMain.c
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	16 $Revision: 1.0
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	17
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	18 $Author: Condat(UK)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	19 $Date: 25/10/00
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	20
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	21 ********************************************************************************
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	22
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	23 Description
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	24
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	25 This provides the main calculator functionality
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	26
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	27
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	28 ********************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	29 $History: MmiCalculatorMain.c
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	30
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	31 25/10/00 Original Condat(UK) BMI version.
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	32
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	33 xrashmic 20 Oct, 2005 MMI-SPR-33845
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	34 To display BACK softkey when no more character are left in the calulator editor
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	35
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	36 Oct 20, 2004 REF: CRR 25755 xnkulkar
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	37 Description: calculator -divide by zero operation is allowed.
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	38 Fix: Display "Not Allowed" message when user tries to divide a number by 0 and do not perform the
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	39 division. Also, show the editor again so that user can enter a number other than 0.
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	40
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	41 $End
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	42
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	43 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	44 #define MAX_CALC_TOTAL 999999999
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	45 #define MIN_CALC_TOTAL -99999999
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	46
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	47 /******************************************************************************
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	48
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	49 Include Files
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	50
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	51 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	52 #define ENTITY_MFW
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	53
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	54 /* includes */
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	55 #include <string.h>
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	56 #include <stdio.h>
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	57 #include <stdlib.h>
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	58
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	59 #if defined (NEW_FRAME)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	60
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	61 #include "typedefs.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	62 #include "vsi.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	63 #include "pei.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	64 #include "custom.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	65 #include "gsm.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	66
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	67 #else
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	68
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	69 #include "STDDEFS.H"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	70 #include "custom.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	71 #include "gsm.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	72 #include "vsi.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	73
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	74 #endif
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	75 #include "message.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	76 #include "prim.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	77 #include "aci_cmh.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	78
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	79
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	80 #include "mfw_mfw.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	81 #include "mfw_win.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	82 /* SPR#1428 - SH - New Editor changes */
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	83 #ifndef NEW_EDITOR
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	84 #include "mfw_edt.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	85 #endif
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	86 #include "mfw_tim.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	87 #include "mfw_phb.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	88 #include "ksd.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	89 #include "psa.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	90 #include "mfw_icn.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	91 #include "mfw_mnu.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	92 #include "mfw_lng.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	93 #include "mfw_sat.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	94 #include "mfw_kbd.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	95 #include "mfw_nm.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	96 #include "mfw_sms.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	97
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	98 #include "dspl.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	99
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	100 #include "MmiMmi.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	101 #include "MmiDummy.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	102 #include "MmiDialogs.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	103 #include "MmiLists.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	104 #include "MmiIdle.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	105 #include "MmiSoftKeys.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	106 #include "Mmiicons.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	107 #include "MmiMenu.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	108 #include "MmiMain.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	109 #include "MmiStart.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	110 #include "MmiPins.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	111 #include "MmiSettings.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	112
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	113 /* SPR#1428 - SH - New Editor changes */
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	114 #ifdef NEW_EDITOR
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	115 #include "ATBCommon.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	116 #include "ATBDisplay.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	117 #include "ATBEditor.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	118 #include "AUIEditor.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	119 #include "AUICalcEditor.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	120 #else
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	121 #include "MmiEditor.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	122 #endif
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	123 #include "MmiBookShared.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	124 #include "mmiSmsMenu.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	125 #include "MmiCalculatorMain.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	126 #include "mmiColours.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	127
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	128 #include "cus_aci.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	129
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	130 #include "pcm.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	131
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	132
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	133 /*******************************************************************************
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	134
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	135 Function Prototypes
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	136
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	137 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	138 static T_MFW_HND calc_create(MfwHnd parent_window);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	139 void calc_destroy(MfwHnd own_window);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	140 static void calcGetNumberCB( T_MFW_HND win, USHORT Identifier, SHORT reason );
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	141 static void calcGetOperandCB( T_MFW_HND win, USHORT Identifier, SHORT reason );
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	142 static void calc_DialogCB( T_MFW_HND win, USHORT event, SHORT identifier, void *parameter);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	143 T_MFW_HND calc_start(T_MFW_HND parent_window);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	144 double calcGetRunningTotal(void);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	145 char operatorSymbol(UBYTE operator);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	146 static void calc_menu_cb(T_MFW_HND parent_win, UBYTE identifier, UBYTE reason);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	147 /*******************************************************************************
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	148
c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	149 Static Global Variable(s)
c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	150
c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	151 *******************************************************************************/
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	152
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	153 static double running_total;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	154
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	155 static T_MFW_HND calculator_win = NULL;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	156
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	157
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	158 // Oct 20, 2004 REF: CRR 25755 xnkulkar
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	159 // Added this flag to detect 'divide by zero' operation
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	160 BOOL divideByZero = FALSE;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	161
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	162 /*******************************************************************************
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	163
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	164 Public Functions
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	165
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	166 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	167 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	168
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	169 $Function: calculator
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	170
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	171 $Description: Starts the calculator function on user selection
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	172
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	173 $Returns: MFW_EVENT_CONSUMED if event handled, otherwise
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	174 MFW_EVENT_PASSED
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	175
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	176 $Arguments: menu, menu item
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	177
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	178 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	179 int calculator(MfwMnu* m, MfwMnuItem* i)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	180 {
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	181 T_MFW_HND parent = mfwParent( mfw_header());
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	182 TRACE_FUNCTION("calculator()");
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	183 calc_start(parent);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	184 return MFW_EVENT_CONSUMED;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	185 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	186
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	187 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	188
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	189 $Function: calcPlus
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	190
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	191 $Description: Handles the selction of the "Plus" option in the calculator menu
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	192
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	193 $Returns: MFW_EVENT_CONSUMED if event handled, otherwise
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	194 MFW_EVENT_PASSED
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	195
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	196 $Arguments: menu, menu item
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	197
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	198 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	199 int calcPlus(MfwMnu* m, MfwMnuItem* i)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	200 {
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	201 T_MFW_WIN* win_data;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	202 tCalcData* data;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	203
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	204 TRACE_FUNCTION("calcPlus()");
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	205 //if new window successfully created
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	206 if (calculator_win NEQ NULL)
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	207 { win_data = ( (T_MFW_HDR *) calculator_win )->data;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	208 data = (tCalcData*)win_data->user;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	209 data->operation = PLUS;//set the arithmetic operation
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	210 SEND_EVENT (calculator_win, CALC_ENTER_OPERAND, 0, 0);
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	211 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	212 return MFW_EVENT_CONSUMED;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	213 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	214
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	215 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	216
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	217 $Function: calcMinus
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	218
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	219 $Description: Handles the selection of the "Minus" option in the calculator menu
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	220
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	221 $Returns: MFW_EVENT_CONSUMED if event handled, otherwise
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	222 MFW_EVENT_PASSED
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	223
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	224 $Arguments: menu, menu item
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	225
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	226 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	227 int calcMinus(MfwMnu* m, MfwMnuItem* i)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	228 {
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	229 T_MFW_WIN* win_data;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	230 tCalcData* data;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	231
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	232 //if new window successfully created
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	233 TRACE_FUNCTION("calcMinus()");
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	234 if (calculator_win NEQ NULL)
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	235 { win_data = ( (T_MFW_HDR *) calculator_win )->data;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	236 data = (tCalcData*)win_data->user;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	237 data->operation = MINUS;//set the arithmetic operation
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	238 SEND_EVENT (calculator_win, CALC_ENTER_OPERAND, 0, 0);
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	239 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	240 return MFW_EVENT_CONSUMED;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	241 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	242
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	243 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	244
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	245 $Function: calcDivide
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	246
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	247 $Description: Handles the selection of the "Divide" option in the calculator menu
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	248
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	249 $Returns: MFW_EVENT_CONSUMED if event handled, otherwise
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	250 MFW_EVENT_PASSED
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	251
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	252 $Arguments: menu, menu item
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	253
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	254 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	255 int calcDivide(MfwMnu* m, MfwMnuItem* i)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	256 {
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	257 T_MFW_WIN* win_data;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	258 tCalcData* data;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	259
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	260 TRACE_FUNCTION("calcDivide()");
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	261 //if new window successfully created
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	262 if (calculator_win NEQ NULL)
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	263 { win_data = ( (T_MFW_HDR *) calculator_win )->data;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	264 data = (tCalcData*)win_data->user;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	265 data->operation = DIVIDE;//set the arithmetic operation
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	266 SEND_EVENT (calculator_win, CALC_ENTER_OPERAND, 0, 0);
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	267 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	268 return MFW_EVENT_CONSUMED;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	269 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	270 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	271
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	272 $Function: calcMultiply
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	273
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	274 $Description: Handles the selection of the "Multiply" option in the calculator menu
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	275
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	276 $Returns: MFW_EVENT_CONSUMED if event handled, otherwise
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	277 MFW_EVENT_PASSED
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	278
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	279 $Arguments: menu, menu item
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	280
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	281 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	282 int calcMultiply(MfwMnu* m, MfwMnuItem* i)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	283 {
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	284 T_MFW_WIN* win_data;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	285 tCalcData* data;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	286
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	287 TRACE_FUNCTION("calcMultiply()");
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	288 //if new window successfully created
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	289 if (calculator_win NEQ NULL)
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	290 { win_data = ( (T_MFW_HDR *) calculator_win )->data;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	291 data = (tCalcData*)win_data->user;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	292 data->operation = MULTIPLY;//set the arithmetic operation
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	293 SEND_EVENT (calculator_win, CALC_ENTER_OPERAND, 0, 0);
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	294 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	295 return MFW_EVENT_CONSUMED;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	296 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	297
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	298 // Oct 20, 2004 REF: CRR 25755 xnkulkar
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	299 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	300
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	301 $Function: info_screen_cb
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	302
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	303 $Description: Callback function for info screen
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	304
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	305 $Returns: nothing
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	306
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	307 $Arguments: Parent Window handle, identifier and reason
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	308
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	309 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	310
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	311 static void info_screen_cb(T_MFW_HND parent_win, UBYTE identifier, UBYTE reason)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	312 {
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	313 // Send CALC_ENTER_OPERAND event tp prompt the user to enter the operand again
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	314 SEND_EVENT (calculator_win, CALC_ENTER_OPERAND, 0, 0);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	315 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	316
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	317 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	318
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	319 $Function: calcEquals
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	320
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	321 $Description: Handles the selection of the "Equals" option in the calculator menu
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	322
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	323 $Returns: MFW_EVENT_CONSUMED if event handled, otherwise
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	324 MFW_EVENT_PASSED
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	325
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	326 $Arguments: menu, menu item
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	327
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	328 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	329 int calcEquals(MfwMnu* m, MfwMnuItem* i)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	330 {
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	331 TRACE_FUNCTION("calcEquals()");
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	332
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	333 // Oct 20, 2004 REF: CRR 25755 xnkulkar
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	334 // if 'divide by zero' operation is attempted
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	335 if(divideByZero == TRUE)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	336 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	337 divideByZero = FALSE; // disable the flag
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	338 info_screen(0, TxtNotAllowed, TxtNull,(T_VOID_FUNC) info_screen_cb); // display "Not Allowed" message
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	339 return MFW_EVENT_CONSUMED; // consume the event
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	340 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	341
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	342 if (calculator_win NEQ NULL)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	343 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	344 SEND_EVENT (calculator_win, CALC_DISPLAY_RESULT, 0, 0);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	345 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	346
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	347 return MFW_EVENT_CONSUMED;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	348 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	349
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	350 /*******************************************************************************
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	351
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	352 Private Functions
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	353
c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	354 *******************************************************************************/
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	355 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	356
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	357 $Function: calcGetRunningTotal
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	358
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	359 $Description: If the calculator's running total value ever needs to be accessed by
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	360 code in another file, then this function ought to be made public to prevent
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	361 to allow safe access;
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	362
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	363 $Returns: Calculator's running total (double)
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	364
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	365 $Arguments: none
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	366
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	367 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	368 double calcGetRunningTotal(void)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	369 {
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	370 TRACE_FUNCTION("calcGetRunningTotal()");
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	371 return running_total;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	372 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	373
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	374 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	375
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	376 $Function: operatorSymbol
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	377
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	378 $Description: returns character corresponding to arithmetic operation
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	379
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	380 $Returns: Operator character
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	381
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	382 $Arguments: Operator enum
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	383
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	384 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	385 char operatorSymbol(UBYTE operator)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	386 {
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	387 TRACE_FUNCTION("operatorSymbol()");
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	388 switch (operator)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	389 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	390 case (PLUS): return '+'; // break; // RAVI
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	391 case (MINUS): return '-'; // break; // RAVI
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	392 case (MULTIPLY): return '*'; // break; // RAVI
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	393 case (DIVIDE): return '/'; // break; // RAVI
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	394 default: return '\0'; // break; // RAVI
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	395 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	396 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	397
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	398
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	399 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	400
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	401 $Function: calc_start
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	402
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	403 $Description: Creates the calculator window and calls for it to be initialised
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	404
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	405 $Returns: Window
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	406
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	407 $Arguments: Parent Window
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	408
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	409 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	410
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	411 T_MFW_HND calc_start(T_MFW_HND parent_window)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	412 {
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	413 T_MFW_HND win = calc_create(parent_window);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	414 TRACE_FUNCTION("calc_start()");
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	415 if (win NEQ NULL)
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	416 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	417 SEND_EVENT (win, CALC_INIT, 0, 0);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	418 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	419
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	420 return win;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	421 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	422
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	423 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	424
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	425 $Function: calc_create
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	426
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	427 $Description: Creates the calculator window and connect the dialog data to it
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	428
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	429 $Returns: Window
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	430
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	431 $Arguments: Parent Window
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	432
c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	433 *******************************************************************************/
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	434 static T_MFW_HND calc_create(MfwHnd parent_window)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	435 {
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	436 tCalcData * data = (tCalcData *)ALLOC_MEMORY (sizeof (tCalcData ));
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	437 T_MFW_WIN * win;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	438
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	439 TRACE_FUNCTION("calc_create()");
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	440 if (data EQ NULL)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	441 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	442 return NULL;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	443 }
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	444
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	445 // Create window handler
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	446 data->win = win_create (parent_window, 0, E_WIN_VISIBLE, NULL);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	447 if (data->win EQ NULL)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	448 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	449 return NULL;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	450 }
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	451 // connect the dialog data to the MFW-window
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	452 data->mmi_control.dialog = (T_DIALOG_FUNC)calc_DialogCB;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	453 data->mmi_control.data = data;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	454 win = ((T_MFW_HDR *)data->win)->data;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	455 win->user = (void *)data;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	456 data->parent_win = parent_window;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	457 calculator_win = data->win;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	458 return data->win;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	459 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	460
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	461 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	462
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	463 $Function: calc_DialogCB
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	464
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	465 $Description: Callback function for the calculator window
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	466
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	467 $Returns: nothing
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	468
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	469 $Arguments: Window, event, identifier (not used), parameter (not used)
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	470
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	471 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	472 static void calc_DialogCB(T_MFW_HND win, USHORT e, SHORT identifier, void *parameter)
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	473 {
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	474 T_MFW_WIN win_data = ( (T_MFW_HDR ) win )->data;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	475 tCalcData* data = (tCalcData *) win_data->user;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	476 char display_buffer[28] = "";
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	477 #ifdef NEW_EDITOR
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	478 // T_AUI_EDITOR_DATA editor_data; /* SPR#1428 - SH - New Editor data */ // RAVI
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	479 #else
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	480 // T_EDITOR_DATA editor_data; // RAVI
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	481 #endif
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	482 char* running_total_out;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	483 // char debug_buffer[50]; // RAVI
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	484 TRACE_FUNCTION("calc_DialogCB()");
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	485
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	486 switch( e )
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	487 { //when window first created
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	488 case CALC_INIT:
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	489 { //set running total to 0 and display in editor
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	490 TRACE_EVENT("CALC-INIT-JGG");
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	491 running_total = 0;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	492 data->menu_options_win = NULL;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	493
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	494 /* SPR#1428 - SH - New editor: calc starts with 0 */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	495 #ifdef NEW_EDITOR
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	496 sprintf(data->buffer, "%s", "0"); /* SH - calc starts off with '0'*/
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	497 #else
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	498 sprintf(data->buffer, "%s", ""); /* SH - calc starts off with nothing*/
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	499 #endif
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	500
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	501 calcSetEditor(win);//set editor with default attribute values
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	502 /* SPR#1428 - SH - New Editor changes: use calc editor */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	503 #ifdef NEW_EDITOR
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	504 AUI_edit_SetEvents(&data->editor_data, 0, TRUE, FOREVER, (T_AUI_EDIT_CB)calcGetNumberCB);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	505 data->editor_win = AUI_calc_Start(win, &data->editor_data);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	506 #else /* NEW_EDITOR */
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	507 data->editor_data.Callback = (T_EDIT_CB)calcGetNumberCB;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	508 data->editor_win = editor_start(win, &(data->editor_data)); /* start the editor */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	509 #endif /* NEW_EDITOR */
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	510 winShow(data->win);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	511 }
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	512 break;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	513
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	514 //when an arithmetic operator has been selected from the calc menu
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	515 case CALC_ENTER_OPERAND:
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	516 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	517 TRACE_EVENT("CALC_ENTER_OPERAND");
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	518 /* This memory alloc seems to fix a problem where running_total_out
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	519 * would become an empty string after sevaral running calculations */
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	520 running_total_out = (char)ALLOC_MEMORY(22sizeof(char)); /* SH - change malloc to ALLOC_MEMORY */
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	521
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	522 running_total_out[0] = '\0';
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	523
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	524 /* Display the first operand and the operator symbol
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	525 * above the operand to be entered */
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	526 if ( (long)calcGetRunningTotal() == calcGetRunningTotal())
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	527 sprintf((char*)running_total_out, "%d", (long)calcGetRunningTotal());
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	528 else
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	529 sprintf((char*)running_total_out, "%f", calcGetRunningTotal());
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	530
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	531 if (running_total_out[8] == '.')
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	532 running_total_out[8] = '\0';
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	533 else
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	534 running_total_out[9] = '\0';
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	535
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	536 sprintf((char*)display_buffer,"%s %c", running_total_out, operatorSymbol(data->operation));
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	537 FREE_MEMORY((void)running_total_out, 22sizeof(char)); /* SH - change free to FREE_MEMORY */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	538
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	539 /* SPR#1428 - SH - Calc now starts off with '0' */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	540 #ifdef NEW_EDITOR
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	541 sprintf(data->buffer, "%s", "0"); /* SH - calc starts off with '0'*/
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	542 #else
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	543 sprintf(data->buffer, "%s", ""); /* SH - calc starts off with nothing*/
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	544 #endif
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	545
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	546 calcSetEditor(win);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	547
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	548 /* SPR#1428 - SH - New Editor changes */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	549 #ifdef NEW_EDITOR
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	550 AUI_edit_SetEvents(&data->editor_data, 0, TRUE, FOREVER, (T_AUI_EDIT_CB)calcGetOperandCB);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	551 AUI_edit_SetTextStr(&data->editor_data, TxtSoftOptions, TxtDelete, TxtCalculator, (UBYTE *)display_buffer);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	552 AUI_edit_SetAltTextStr(&data->editor_data, 1, TxtSoftOptions, TRUE, TxtSoftBack);//x0035544 17-11-2005
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	553 data->input_number_win = AUI_calc_Start(win, &data->editor_data);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	554 #else /* NEW_EDITOR */
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	555 data->editor_data.TextString = display_buffer;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	556 data->editor_data.editor_attr.win.px = 0;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	557 data->editor_data.editor_attr.win.py = Mmi_layout_line(3); //30
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	558 data->editor_data.editor_attr.win.sx = SCREEN_SIZE_X;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	559 data->editor_data.editor_attr.win.sy = numberLineHeight()+2;
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	560
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	561 data->editor_data.Callback = (T_EDIT_CB)calcGetOperandCB;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	562 data->input_number_win = editor_start(win, &(data->editor_data)); /* start the editor */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	563 #endif /* NEW_EDITOR */
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	564
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	565 winShow(data->win);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	566
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	567 /* Marcus: Issue 1039: 05/09/2002: Start */
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	568 if (data->menu_options_win != NULL)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	569 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	570 bookMenuDestroy( data->menu_options_win );
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	571 data->menu_options_win = NULL;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	572 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	573 /* Marcus: Issue 1039: 05/09/2002: End */
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	574 }
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	575 break;
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	576
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	577 //when "Equals" selected from calc menu
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	578 case CALC_DISPLAY_RESULT:
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	579 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	580 //if running total out of display range, set it to 0
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	581 if ((calcGetRunningTotal() > MAX_CALC_TOTAL) \|\| (calcGetRunningTotal() < MIN_CALC_TOTAL))
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	582 running_total =0;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	583 //Convert running total double to string
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	584 //if integer total, don't display any decimal places
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	585 if ( (long)calcGetRunningTotal() == calcGetRunningTotal())
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	586 sprintf(data->buffer, "%d", (long) calcGetRunningTotal());
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	587 else //if a floating-point total, display as many decimal places as will fit
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	588 sprintf(data->buffer, "%f", (double) calcGetRunningTotal());
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	589 //if last number in display is a decimal point
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	590 if (data->buffer[8] == '.')
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	591 data->buffer[8] = '\0';//remove it
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	592 data->buffer[9] = '\0'; //ensure string is properly terminated
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	593 //ensure string is no longer than 9 chars
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	594
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	595 calcSetEditor(win);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	596
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	597 /* SPR#1428 - SH - New Editor changes */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	598 #ifdef NEW_EDITOR
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	599 AUI_edit_SetEvents(&data->editor_data, 0, TRUE, FOREVER, (T_AUI_EDIT_CB)calcGetNumberCB);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	600 AUI_calc_Start(win, &data->editor_data);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	601 #else /* NEW_EDITOR */
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	602 data->editor_data.Callback = (T_EDIT_CB)calcGetNumberCB;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	603 editor_start(win, &(data->editor_data)); /* start the editor */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	604 #endif /* NEW_EDITOR */
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	605
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	606 /* Marcus: Issue 1039: 05/09/2002: Start */
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	607 if (data->menu_options_win != NULL)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	608 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	609 bookMenuDestroy( data->menu_options_win );
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	610 data->menu_options_win = NULL;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	611 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	612 /* Marcus: Issue 1039: 05/09/2002: End */
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	613
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	614 winShow(data->win);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	615 }
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	616 break;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	617 default:
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	618 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	619 TRACE_EVENT("calc_DialogCB(): Unknown Event");
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	620 }
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	621 break;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	622
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	623 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	624 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	625
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	626 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	627
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	628 $Function: calcGetNumberCB
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	629
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	630 $Description: Callback function for the editor window
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	631
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	632 $Returns: nothing
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	633
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	634 $Arguments: Window, identifier (not used), reason (not used)
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	635
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	636 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	637 static void calcGetNumberCB( T_MFW_HND win, USHORT Identifier, SHORT reason)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	638 {
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	639 T_MFW_WIN win_data = ( (T_MFW_HDR ) win )->data;
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	640 tCalcData data = (tCalcData ) win_data->user;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	641 float after_decimal = 0;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	642 int digits_after_point = 0;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	643 int i;
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	644 char* end;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	645 // char debug[40]; // RAVI
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	646
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	647
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	648 TRACE_FUNCTION("calcGetNumberCB()");
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	649
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	650 switch (reason )
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	651 {
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	652 case INFO_KCD_LEFT:
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	653 { TRACE_EVENT("Left button pressed in calculator");
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	654 //get the number entered before the decimal point
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	655 running_total = strtol(data->buffer, &end, 10);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	656 if (strlen(end) != 0)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	657 { //if decimal point entered
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	658 if ((end[0] == '.') && isdigit(end[1]))//get number after decimal point
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	659 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	660 end++;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	661 digits_after_point = strlen(end);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	662 after_decimal = strtol(end, &end, 10);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	663 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	664
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	665 //convert number after decimal point to it's actual fractional value
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	666 for (i=0; i < digits_after_point; i++)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	667 after_decimal = after_decimal/10;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	668 //add whole number and fraction together
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	669 running_total = running_total + after_decimal;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	670 }
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	671 if (data->menu_options_win != NULL)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	672 bookMenuDestroy( data->menu_options_win );
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	673 //start the calculator option menu and kill this window
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	674 data->menu_options_win = bookMenuStart( data->win, calcOptionMenuAttributes(),0);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	675 SEND_EVENT(data->menu_options_win, ADD_CALLBACK, NULL, (void *)calc_menu_cb);
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	676
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	677 }
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	678 break;
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	679
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	680 case INFO_KCD_HUP:
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	681 case INFO_KCD_RIGHT:
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	682 {
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	683 TRACE_EVENT("Right button pressed in calculator");
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	684 calc_destroy(win);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	685 }
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	686 break;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	687
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	688 default:
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	689 {
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	690 /* otherwise no action to be performed
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	691 */
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	692 /calc_destroy(win); / /SH - do not destroy calc for other key /
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	693 break;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	694 }
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	695 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	696 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	697
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	698
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	699 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	700
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	701 $Function: calcGetOperandCB
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	702
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	703 $Description: Callback function for the editor window, when second number in operation
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	704 is entered.
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	705
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	706 $Returns: nothing
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	707
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	708 $Arguments: Window, identifier (not used), reason (not used)
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	709
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	710 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	711
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	712 static void calcGetOperandCB( T_MFW_HND win, USHORT Identifier, SHORT reason)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	713 {
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	714 T_MFW_WIN win_data = ( (T_MFW_HDR ) win )->data;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	715 tCalcData data = (tCalcData ) win_data->user;
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	716 // char* buffer; // RAVI
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	717 float operand = 0;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	718 float after_decimal = 0;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	719 int digits_after_point = 0;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	720 int i;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	721 char* end;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	722 char debug[40];
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	723
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	724 TRACE_FUNCTION("calcGetOperandCB()");
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	725 TRACE_EVENT_P2("ID, reason: %d, %d", Identifier, reason);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	726
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	727 switch (reason )
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	728 {
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	729 case INFO_KCD_LEFT:
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	730 /* SPR#1428 - SH - New Editor: Can use '' or centre button as 'equals', to show result /
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	731 #ifdef NEW_EDITOR
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	732 #ifdef COLOURDISPLAY
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	733 case INFO_KCD_SELECT:
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	734 #endif /* COLOURDISPLAY */
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	735 case INFO_KCD_STAR:
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	736 #endif /* NEW_EDITOR */
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	737 { //Get whole number before decimal point
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	738 operand = strtol(data->buffer, &end, 10);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	739
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	740 //if buffer not pointing at an empty string now
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	741 if (strlen(end) != 0)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	742 { //if decimal point entered
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	743 if ((end[0] == '.') && isdigit(end[1]))//get number after decimal point
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	744 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	745 end++;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	746 digits_after_point = strlen(end);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	747 after_decimal = strtol(end, &end, 10);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	748 sprintf(debug,"Digits after decimal: %f.", after_decimal);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	749 }
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	750 //convert number after decimal point to an appropriate fraction
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	751 for (i=0; i < digits_after_point; i++)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	752 after_decimal = after_decimal/10;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	753 //add whole and fraction together
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	754 operand = operand + after_decimal;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	755 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	756
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	757 //perform the arithmetic function requested
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	758 switch (data->operation)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	759 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	760 case PLUS: running_total = running_total + operand; break;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	761 case MINUS: running_total = running_total - operand;break;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	762 case MULTIPLY: running_total = running_total * operand;break;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	763 case DIVIDE:
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	764 // Oct 20, 2004 REF: CRR 25755 xnkulkar
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	765 // if the attempted division is by zero
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	766 if(operand == 0)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	767 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	768 divideByZero = TRUE; // enable the flag
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	769 }
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	770 else // else perform the division operation
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	771 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	772 running_total = running_total / operand;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	773 }
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	774 break;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	775 default: TRACE_EVENT("Unknown calc operation"); break;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	776 }
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	777
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	778 /* SPR#1428 - SH - New Editor: Can use '' as 'equals', to show result /
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	779 #ifdef NEW_EDITOR
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	780 #ifdef COLOURDISPLAY
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	781 if (reason==INFO_KCD_STAR \|\| reason==INFO_KCD_SELECT)
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	782 #else /* COLOURDISPLAY */
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	783 if (reason==INFO_KCD_STAR)
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	784 #endif /* COLOURDISPLAY */
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	785 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	786 TRACE_EVENT("Star key - show result");
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	787 /* Star didn't destroy window automatically, do it here */
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	788 if (data->menu_options_win != NULL)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	789 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	790 bookMenuDestroy( data->menu_options_win );
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	791 data->menu_options_win = NULL;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	792 }
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	793 if (data->input_number_win)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	794 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	795 AUI_calc_Destroy(data->input_number_win);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	796 data->input_number_win = NULL;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	797 }
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	798 SEND_EVENT(data->win, CALC_DISPLAY_RESULT, 0, 0);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	799 }
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	800 else
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	801 #endif /* NEW_EDITOR */
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	802 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	803 //Show option menu
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	804 if (data->menu_options_win != NULL)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	805 bookMenuDestroy( data->menu_options_win );
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	806 data->menu_options_win = bookMenuStart( data->win, calcOptionMenuAttributes(),0);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	807 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	808 }
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	809 break;
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	810
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	811 case INFO_KCD_HUP:
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	812 case INFO_KCD_RIGHT:
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	813 {
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	814 TRACE_EVENT("Right button pressed in calculator");
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	815
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	816 calc_destroy(win);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	817 }
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	818 break;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	819
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	820 default:
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	821 {
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	822 /* otherwise no action to be performed
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	823 */
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	824 break;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	825 }
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	826 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	827 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	828
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	829
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	830 static void calc_menu_cb(T_MFW_HND parent_win, UBYTE identifier, UBYTE reason)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	831 {
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	832 T_MFW_WIN win_data = ( (T_MFW_HDR ) parent_win )->data;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	833 tCalcData* data = (tCalcData *) win_data->user;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	834
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	835 TRACE_FUNCTION("calc_menu_cb()");
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	836 //set menu window to NULL to prevent any dealloc problems
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	837 data->menu_options_win = NULL;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	838 calc_destroy(parent_win);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	839 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	840
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	841 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	842
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	843 $Function: calcSetEditor
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	844
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	845 $Description: Sets the editor attributes to defaults for the calculator module
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	846
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	847 $Returns: nothing
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	848
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	849 $Arguments: Window
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	850
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	851 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	852 void calcSetEditor(T_MFW_HND win)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	853 {
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	854 T_MFW_WIN win_data = ( (T_MFW_HDR ) win )->data;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	855 tCalcData* data = (tCalcData *) win_data->user;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	856
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	857 TRACE_FUNCTION("calcSetEditor()");
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	858
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	859 /* SPR#1428 - SH - New Editor changes */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	860 #ifdef NEW_EDITOR
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	861 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	862 AUI_edit_SetDefault(&data->editor_data);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	863 AUI_edit_SetDisplay(&data->editor_data, ZONE_FULL_SK_TITLE, COLOUR_EDITOR, EDITOR_FONT);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	864 AUI_edit_SetBuffer(&data->editor_data, ATB_DCS_ASCII, (UBYTE *)data->buffer, 10);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	865 AUI_edit_SetMode(&data->editor_data, 0, ED_CURSOR_NONE);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	866 AUI_edit_SetEvents(&data->editor_data, 0, TRUE, FOREVER, NULL);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	867 AUI_edit_SetTextStr(&data->editor_data, TxtSoftOptions, TxtDelete, TxtCalculator, NULL);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	868 //xrashmic 20 Oct, 2005 MMI-SPR-33845
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	869 //Editor always starts with min one character "0" and
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	870 //alterRight softkey is set to "BACK" here.
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	871 data->editor_data.min_enter=1;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	872 data->editor_data.AltRightSoftKey=TxtSoftBack ;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	873 AUI_edit_SetFormatAttr(&data->editor_data, DS_ALIGN_RIGHT);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	874 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	875 #else /* NEW_EDITOR */
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	876 editor_attr_init(&((data->editor_data).editor_attr), 0, edtCurBar1, 0, data->buffer, 10, COLOUR_EDITOR);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	877 editor_data_init( &data->editor_data, NULL, TxtSoftOptions, TxtDelete, NULL, 1, CALC_MODE, FOREVER);
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	878 data->editor_data.hide = FALSE;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	879 data->editor_data.Identifier = 0xFFFF ;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	880 data->editor_data.destroyEditor = TRUE;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	881 #endif /* NEW_EDITOR */
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	882
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	883 return;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	884 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	885
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	886 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	887
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	888 $Function: calc_destroy
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	889
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	890 $Description: Destroys the calculator editor window and frees up memory
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	891
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	892 $Returns: nothing
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	893
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	894 $Arguments: Window
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	895
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	896 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	897 void calc_destroy(MfwHnd own_window)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	898 {
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	899 T_MFW_WIN * win_data;
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	900 tCalcData * data = NULL;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	901
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	902 TRACE_EVENT ("calc_destroy()");
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	903 if (own_window)
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	904 {
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	905
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	906 win_data = ((T_MFW_HDR *)own_window)->data;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	907 if (win_data != NULL) //PATCH TB
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	908 data = (tCalcData *)win_data->user;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	909
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	910 if (data)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	911 {
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	912
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	913 win_delete (data->win);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	914 /* Marcus: Issue 1039: 05/09/2002: Start */
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	915 if (data->menu_options_win != NULL)
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	916 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	917 bookMenuDestroy( data->menu_options_win );
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	918 data->menu_options_win = NULL;
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	919 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	920 /* Marcus: Issue 1039: 05/09/2002: End */
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	921 // Free Memory
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	922 FREE_MEMORY ((void *)data, sizeof (tCalcData));
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	923
144 f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	924 }
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	925 else
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	926 {
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	927 TRACE_EVENT ("calc_destroy() called twice");
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	928 }
f1f29e85f92b mmiCalculatorMain.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org> parents: 92 diff changeset	929 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	930 }

FreeCalypso > hg > fc-tourmaline

annotate src/ui/bmi/mmiCalculatorMain.c @ 303:f76436d19a7a default tip