FreeCalypso > hg > fc-magnetite
annotate src/aci2/bmi/AUITextEntry.c @ 82:e3768114db59
armio.c: 2nd cleaning: removed some (CHIPSET != 12) noise
| author | Mychaela Falconia <falcon@freecalypso.org> | 
|---|---|
| date | Sun, 02 Oct 2016 07:16:15 +0000 | 
| parents | 93999a60b835 | 
| children | 
| rev | line source | 
|---|---|
| 3 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 1 /******************************************************************************* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 2 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 3 CONDAT (UK) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 4 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 5 ******************************************************************************** | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 6 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 7 This software product is the property of Condat (UK) Ltd and may not be | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 8 disclosed to any third party without the express permission of the owner. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 9 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 10 ******************************************************************************** | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 11 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 12 $Project name: Basic MMI | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 13 $Project code: BMI (6349) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 14 $Module: MMI | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 15 $File: AUITextEntry.c | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 16 $Revision: 1.0 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 17 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 18 $Author: Condat(UK) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 19 $Date: 22/02/01 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 20 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 21 ******************************************************************************** | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 22 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 23 Description: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 24 Multi-tap and other text entry methods for AUI Editor. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 25 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 26 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 27 ******************************************************************************** | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 28 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 29 $History: AUITextEntry.c | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 30 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 31 31/01/02 Original Condat(UK) BMI version. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 32 $End | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 33 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 34 *******************************************************************************/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 35 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 36 #define ENTITY_MFW | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 37 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 38 /* includes */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 39 #include <string.h> | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 40 #include <stdio.h> | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 41 #include <stdlib.h> | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 42 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 43 #if defined (NEW_FRAME) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 44 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 45 #include "typedefs.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 46 #include "vsi.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 47 #include "pei.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 48 #include "custom.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 49 #include "gsm.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 50 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 51 #else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 52 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 53 #include "STDDEFS.H" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 54 #include "custom.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 55 #include "gsm.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 56 #include "vsi.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 57 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 58 #endif | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 59 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 60 #include "mfw_mfw.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 61 #include "mfw_win.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 62 #include "mfw_kbd.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 63 #include "mfw_tim.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 64 #include "mfw_phb.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 65 #include "mfw_sms.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 66 #include "mfw_ss.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 67 #include "mfw_icn.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 68 #include "mfw_mnu.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 69 #include "mfw_lng.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 70 #include "mfw_sat.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 71 #include "mfw_kbd.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 72 #include "mfw_nm.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 73 #include "mfw_cm.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 74 #include "mfw_edt.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 75 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 76 #include "dspl.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 77 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 78 #include "ksd.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 79 #include "psa.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 80 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 81 #include "MmiDummy.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 82 #include "MmiMmi.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 83 #include "MmiDialogs.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 84 #include "MmiMain.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 85 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 86 #include "cus_aci.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 87 #include "prim.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 88 #ifndef PCM_2_FFS | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 89 #include "pcm.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 90 #endif | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 91 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 92 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 93 #include "ATBCommon.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 94 #include "ATBDisplay.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 95 #include "ATBEditor.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 96 #include "AUITextEntry.h" | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 97 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 98 /******************************************************************************* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 99 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 100 STATIC DATA | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 101 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 102 ********************************************************************************/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 103 /*SPR 2175, increased KEY_PAD_MAX and changed tables to allow entry of some | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 104 accented characters*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 105 #define KEY_PAD_MAX 6 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 106 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 107 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 108 /* API - 01/09/03 - SPR2371 - Move the new character to the end of the multitap sequence */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 109 /* Alpha mode characters for multi-tap - lower case */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 110 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 111 static UBYTE editAlpha [12][KEY_PAD_MAX] = | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 112 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 113 {'.', ',', '+', '-', '=', '0'}, /*Key 0*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 114 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 115 {' ' ,'?', '!', ';', ':', '1'}, /*Key 1*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 116 /* a grave a umlaut*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 117 {'a', 'b', 'c', '2', '\x85', '\x84'}, /*Key 2*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 118 /* e-grave e-acute*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 119 {'d', 'e', 'f', '3', '\x8a', '\x83'}, /*Key 3*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 120 /* i-grave*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 121 {'g', 'h', 'i', '4', '\x8d', '@'}, /*Key 4*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 122 /**/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 123 {'j', 'k', 'l', '5', '&', '*'}, /*Key 5*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 124 /* o-grave o-umlaut*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 125 {'m', 'n', 'o', '6', '\x95', '\x94'}, /*Key 6*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 126 /* SS*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 127 {'p', 'q', 'r', 's', '7', '\xe1'}, /*Key 7*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 128 /* u-grave u-umlaut*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 129 {'t', 'u', 'v', '8', '\x97', '\x82'}, /*Key 8*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 130 /**/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 131 {'w', 'x', 'y', 'z', '9', '#'}, /*Key 9*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 132 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 133 {'*', '*', '*', '*', '*', '*'}, /*Key star, not actually used for multitap*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 134 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 135 {'#', '#', '#', '#', '#', '#'} /*Key hash, not actually used for multitap*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 136 }; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 137 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 138 /* Alpha mode characters for multi-tap - upper case */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 139 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 140 static UBYTE editAlphaU [12][KEY_PAD_MAX] = | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 141 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 142 {'.', ',', '+', '-', '=', '0'}, /*Key 0*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 143 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 144 {' ', '?', '!', ';', ':', '1'}, /*Key 1*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 145 /* A-umlaut cedilla*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 146 {'A', 'B', 'C', '2', '\x8e', '\x81'}, /*Key 2*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 147 /* E-acute*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 148 {'D', 'E', 'F', '3', '\x90', ' '}, /*Key 3*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 149 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 150 {'G', 'H', 'I', '4', '@', ' '}, /*Key 4*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 151 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 152 {'J', 'K', 'L', '5', '&', '*'}, /*Key 5*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 153 /* O-umlaut */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 154 {'M', 'N', 'O', '6', '\x99', ' '}, /*Key 6*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 155 /* SS*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 156 {'P', 'Q', 'R', 'S', '7', '\xe1'}, /*Key 7*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 157 /* U-umlaut*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 158 {'T', 'U', 'V', '8', '\x9A', ' '}, /*Key 8*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 159 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 160 {'W', 'X', 'Y', 'Z', '9', '#'}, /*Key 9*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 161 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 162 {'*', '*', '*' ,'*', '*', '*'}, /*Key star, not actually used for multitap*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 163 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 164 {'#', '#', '#', '#', '#', '#'} /*Key hash, not actually used for multitap*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 165 }; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 166 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 167 /* API - 01/09/03 - SPR2371 - END*/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 168 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 169 static void *MMIdata; /* Temporary storage for MMI pointer */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 170 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 171 /******************************************************************************* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 172 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 173 LOCAL FUNCTION PROTOTYPES | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 174 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 175 ********************************************************************************/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 176 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 177 static int AUI_entry_Timer (MfwEvt event, MfwTim *timer); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 178 static USHORT AUI_entry_Keypress(T_AUI_ENTRY_DATA *entry_data, MfwEvt event, MfwKbd *key); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 179 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 180 /******************************************************************************* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 181 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 182 $Function: AUI_entry_Create | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 183 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 184 $Description: Initialises the text entry data. Allocates memory. Creates the timer. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 185 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 186 $Returns: Pointer to the data. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 187 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 188 $Arguments: win - The window in which the editor is displayed | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 189 editor - The editor | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 190 update - The event to be sent to the window in order to update it | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 191 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 192 *******************************************************************************/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 193 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 194 T_AUI_ENTRY_DATA *AUI_entry_Create(T_MFW_HND win, T_ED_DATA *editor, U32 update) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 195 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 196 T_AUI_ENTRY_DATA *entry_data = (T_AUI_ENTRY_DATA *)mfwAlloc(sizeof(T_AUI_ENTRY_DATA)); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 197 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 198 entry_data->win = win; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 199 entry_data->update = update; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 200 entry_data->editor = editor; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 201 /* SPR#1597 - SH - Always create this timer */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 202 entry_data->editTim = tim_create(win, 1000, (MfwCb) AUI_entry_Timer); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 203 entry_data->Level = KEY_PAD_MAX-1; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 204 entry_data->Key = KCD_MAX; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 205 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 206 return entry_data; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 207 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 208 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 209 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 210 /******************************************************************************* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 211 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 212 $Function: AUI_entry_Destroy | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 213 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 214 $Description: Frees memory associated with text entry. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 215 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 216 $Returns: none. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 217 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 218 $Arguments: entry_data - The text entry data | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 219 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 220 *******************************************************************************/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 221 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 222 void AUI_entry_Destroy(T_AUI_ENTRY_DATA *entry_data) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 223 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 224 if (entry_data->editTim) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 225 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 226 timDelete(entry_data->editTim); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 227 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 228 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 229 mfwFree((void *)entry_data, sizeof(T_AUI_ENTRY_DATA)); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 230 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 231 return; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 232 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 233 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 234 /******************************************************************************* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 235 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 236 $Function: AUI_entry_EditChar | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 237 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 238 $Description: Sends a character to the text editor. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 239 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 240 $Returns: None. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 241 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 242 $Arguments: data - The editor data | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 243 alphachar - Character to be inserted, or NULL if key tables are to | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 244 be used | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 245 multitap - TRUE if multitap is in progress | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 246 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 247 *******************************************************************************/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 248 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 249 USHORT AUI_entry_EditChar (T_AUI_ENTRY_DATA *entry_data, USHORT alphachar, BOOL multitap) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 250 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 251 T_ED_DATA *editor = entry_data->editor; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 252 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 253 TRACE_FUNCTION("AUITextEntry: AUI_entry_EditChar()"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 254 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 255 /* If character is not provided, get it from the key table */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 256 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 257 if (alphachar==NULL) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 258 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 259 alphachar = AUI_entry_GetKeyChar(entry_data, ATB_edit_GetCasePref(editor)); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 260 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 261 if (!(ATB_edit_Mode(entry_data->editor, ED_MODE_ALPHA) && entry_data->Key!=KCD_MAX)) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 262 alphachar = UNICODE_SPACE; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 263 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 264 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 265 ATB_edit_MultiTap(editor, alphachar, multitap); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 266 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 267 return alphachar; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 268 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 269 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 270 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 271 /******************************************************************************* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 272 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 273 $Function: AUI_entry_EditDigit | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 274 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 275 $Description: Sends a numeric digit/symbol to the editor | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 276 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 277 $Returns: None. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 278 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 279 $Arguments: data - The editor data | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 280 code - The key code of the digit to be inserted | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 281 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 282 *******************************************************************************/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 283 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 284 USHORT AUI_entry_EditDigit (T_AUI_ENTRY_DATA *entry_data, UBYTE code) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 285 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 286 T_ED_DATA *editor = entry_data->editor; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 287 USHORT alphachar; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 288 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 289 TRACE_FUNCTION("AUITextEntry: AUI_entry_EditDigit()"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 290 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 291 alphachar = ATB_char_Unicode(editControls[code]); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 292 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 293 ATB_edit_MultiTap(editor, alphachar, FALSE); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 294 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 295 return alphachar; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 296 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 297 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 298 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 299 /******************************************************************************* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 300 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 301 $Function: AUI_entry_Timer | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 302 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 303 $Description: executes the timer event from the edit component | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 304 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 305 $Returns: none. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 306 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 307 $Arguments: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 308 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 309 *******************************************************************************/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 310 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 311 static int AUI_entry_Timer (MfwEvt event, MfwTim *timer) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 312 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 313 T_AUI_ENTRY_DATA *entry_data = (T_AUI_ENTRY_DATA *)MMIdata; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 314 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 315 TRACE_FUNCTION("AUIEditor: AUI_entry_Timer()"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 316 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 317 /* SPR#2174 - SH - Only display character if we're still in multi-tap */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 318 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 319 if (entry_data->editor->multitap) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 320 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 321 if (ATB_edit_Mode(entry_data->editor, ED_MODE_ALPHA)) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 322 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 323 AUI_entry_EditChar(entry_data, NULL, FALSE); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 324 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 325 entry_data->Level = KEY_PAD_MAX-1; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 326 entry_data->Key = KCD_MAX; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 327 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 328 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 329 SEND_EVENT(entry_data->win, entry_data->update,0,0); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 330 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 331 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 332 return 1; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 333 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 334 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 335 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 336 /******************************************************************************* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 337 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 338 $Function: AUI_entry_StopMultitap | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 339 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 340 $Description: Stops a multitap operation going on, cancelling the timer | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 341 SPR#2174 - SH - Added | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 342 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 343 $Returns: none. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 344 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 345 $Arguments: entry_data - The entry data | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 346 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 347 *******************************************************************************/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 348 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 349 void AUI_entry_StopMultitap(T_AUI_ENTRY_DATA *entry_data) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 350 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 351 TRACE_FUNCTION("AUIEditor: AUI_entry_StopMultitap()"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 352 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 353 timStop(entry_data->editTim); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 354 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 355 entry_data->editor->multitap = FALSE; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 356 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 357 entry_data->Level = KEY_PAD_MAX-1; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 358 entry_data->Key = KCD_MAX; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 359 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 360 return; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 361 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 362 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 363 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 364 /******************************************************************************* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 365 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 366 $Function: AUI_entry_EventKey | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 367 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 368 $Description: Process a keypress event. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 369 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 370 $Returns: The character that is entered, or NULL. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 371 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 372 $Arguments: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 373 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 374 *******************************************************************************/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 375 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 376 USHORT AUI_entry_EventKey (T_AUI_ENTRY_DATA *entry_data, MfwEvt event, MfwKbd *key) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 377 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 378 T_ED_DATA *editor = entry_data->editor; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 379 USHORT alphachar; // The character entered | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 380 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 381 TRACE_FUNCTION("AUIEditor: AUI_entry_EventKey"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 382 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 383 alphachar = AUI_entry_Keypress(entry_data, event, key); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 384 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 385 ATB_edit_Refresh(editor); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 386 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 387 return alphachar; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 388 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 389 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 390 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 391 /******************************************************************************* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 392 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 393 $Function: AUI_entry_Keypress | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 394 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 395 $Description: Process a keypress event | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 396 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 397 $Returns: The character that is entered, or NULL. | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 398 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 399 $Arguments: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 400 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 401 *******************************************************************************/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 402 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 403 static USHORT AUI_entry_Keypress(T_AUI_ENTRY_DATA *entry_data, MfwEvt event, MfwKbd *key) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 404 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 405 T_ED_DATA *editor = entry_data->editor; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 406 USHORT alphachar; /* Current multi-tap character */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 407 T_ED_CASE_PREF casePref; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 408 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 409 TRACE_FUNCTION("AUIEditor: AUI_entry_KeypressFormat()"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 410 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 411 alphachar = NULL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 412 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 413 if (key->code!=KCD_HUP && editor->cursor.pos<(editor->attr->size-1)) /* SPR#1995 - SH */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 414 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 415 /* Multi-tap: The user presses a different key, meaning the previous character must be entered */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 416 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 417 if (entry_data->Key != KCD_MAX && entry_data->Key != key->code) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 418 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 419 timStop(entry_data->editTim); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 420 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 421 AUI_entry_EditChar(entry_data, alphachar, FALSE); // Show character, not multi-tap | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 422 entry_data->Level = KEY_PAD_MAX-1; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 423 entry_data->Key = KCD_MAX; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 424 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 425 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 426 casePref = ATB_edit_GetCasePref(editor); /* Work out the format character that will govern the format of this keypress */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 427 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 428 if (editor->cursor.pos < (editor->attr->size-1) && casePref!=ED_CASEPREF_NONE) /* SPR#1995 - SH */ // Make sure we can still show a character | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 429 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 430 if (key->code <= KCD_HASH) /* SPR#1788 - SH - Now accept 0-9, * and # */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 431 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 432 entry_data->Key = key->code; // Store the key pressed | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 433 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 434 /* Numeric */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 435 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 436 if (casePref==ED_CASEPREF_NUM) // A numeric digit is expected | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 437 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 438 alphachar = AUI_entry_GetKeyChar(entry_data, casePref); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 439 entry_data->Level = KEY_PAD_MAX-1; // Reset multi-tap settings | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 440 entry_data->Key = KCD_MAX; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 441 AUI_entry_EditChar(entry_data, alphachar, FALSE); // Show character, not multi-tap# | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 442 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 443 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 444 /* Multi-tap alphanumeric */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 445 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 446 else // Valid format codes | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 447 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 448 alphachar = NULL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 449 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 450 entry_data->Level++; // Increment through list of symbols | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 451 if (entry_data->Level > (KEY_PAD_MAX-1)) // List wraps round | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 452 entry_data->Level = 0; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 453 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 454 alphachar = AUI_entry_GetKeyChar(entry_data, casePref); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 455 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 456 if (alphachar!=NULL) // If we've found a character, and string isn't max size | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 457 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 458 AUI_entry_EditChar(entry_data, alphachar, TRUE); // Add character, multi-tap | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 459 /* Need to store this handle, so timer can get access to | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 460 * entry_data on callback */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 461 MMIdata = (void *)entry_data; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 462 timStart(entry_data->editTim); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 463 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 464 else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 465 entry_data->Key = KEY_MAX; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 466 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 467 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 468 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 469 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 470 return alphachar; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 471 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 472 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 473 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 474 /******************************************************************************* | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 475 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 476 $Function: AUI_entry_GetKeyChar | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 477 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 478 $Description: Return the character to be entered, based on the keypress | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 479 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 480 $Returns: the unicode character to be entered into the text | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 481 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 482 $Arguments: case - the preference for the case of the output | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 483 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 484 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 485 *******************************************************************************/ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 486 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 487 USHORT AUI_entry_GetKeyChar(T_AUI_ENTRY_DATA *entry_data, T_ED_CASE_PREF casePref) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 488 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 489 T_ED_DATA *editor = entry_data->editor; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 490 USHORT alphachar; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 491 USHORT safetycounter; /* Stops searching forever to find compatible character */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 492 BOOL valid; /* flag to indicate whether character is accepted */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 493 USHORT upper; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 494 USHORT lower; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 495 UBYTE caseSel = ATB_edit_GetCase(editor); /* The case selected by the user */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 496 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 497 TRACE_FUNCTION("AUI_entry_GetKeyChar"); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 498 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 499 if (casePref==ED_CASEPREF_NUM || (casePref==ED_CASEPREF_ALPHANUM && caseSel==ED_CASE_NUM)) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 500 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 501 alphachar = editControls[entry_data->Key]; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 502 if (entry_data->Key<=KCD_HASH) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 503 alphachar = alphachar << 8; // Gives us the ascii in the upper byte of the unicode | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 504 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 505 else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 506 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 507 valid = FALSE; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 508 alphachar = NULL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 509 safetycounter = 0; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 510 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 511 while (!valid && safetycounter<KEY_PAD_MAX) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 512 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 513 upper = (USHORT)editAlphaU[entry_data->Key][entry_data->Level]; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 514 lower = (USHORT)editAlpha[entry_data->Key][entry_data->Level]; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 515 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 516 switch(casePref) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 517 { | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 518 case ED_CASEPREF_ALPHANUM: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 519 if (caseSel==ED_CASE_UPPER || caseSel==ED_CASE_CAPS) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 520 alphachar = upper; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 521 else | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 522 alphachar = lower; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 523 valid = TRUE; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 524 break; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 525 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 526 case ED_CASEPREF_ALPHANUM_UC: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 527 alphachar = upper; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 528 valid = TRUE; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 529 break; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 530 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 531 case ED_CASEPREF_ALPHANUM_LC: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 532 alphachar = lower; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 533 valid = TRUE; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 534 break; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 535 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 536 case ED_CASEPREF_ALPHA_UC: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 537 alphachar = upper; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 538 valid = !ATB_char_IsNumeric(alphachar); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 539 break; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 540 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 541 case ED_CASEPREF_ALPHA_LC: | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 542 alphachar = lower; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 543 valid = !ATB_char_IsNumeric(alphachar); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 544 break; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 545 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 546 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 547 if (!valid) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 548 { // find the next one that is, | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 549 alphachar = NULL; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 550 safetycounter++; // (but don't search forever) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 551 entry_data->Level++; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 552 if (entry_data->Level > (KEY_PAD_MAX-1)) | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 553 entry_data->Level = 0; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 554 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 555 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 556 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 557 alphachar = ATB_char_Unicode(alphachar); /* SPR#2342 - SH - Convert from unicode properly */ | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 558 } | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 559 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 560 TRACE_EVENT_P1(">>> alphachar = %d", alphachar); | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 561 | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 562 return alphachar; | 
| 
93999a60b835
src/aci2, src/condat2: import of g23m/condat source pieces from TCS211
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 563 } | 
