summaryrefslogtreecommitdiffstats
path: root/dl150s/include
diff options
context:
space:
mode:
authorfishsoupisgood <github@madingley.org>2019-05-27 10:13:10 +0100
committerfishsoupisgood <github@madingley.org>2019-05-27 10:13:10 +0100
commit8110dec1577d9a9002119c15467d71d8a1f51bc8 (patch)
tree80cb75576c1aad9b30af6a8ac97fcc0bb2034cca /dl150s/include
parente070d1885626a365099fac3caf0b537d04f4900e (diff)
downloadwristapps-8110dec1577d9a9002119c15467d71d8a1f51bc8.tar.gz
wristapps-8110dec1577d9a9002119c15467d71d8a1f51bc8.tar.bz2
wristapps-8110dec1577d9a9002119c15467d71d8a1f51bc8.zip
find original wristapp.i, and unmodify code back to it
Diffstat (limited to 'dl150s/include')
-rw-r--r--dl150s/include/wristapp.i1508
1 files changed, 1508 insertions, 0 deletions
diff --git a/dl150s/include/wristapp.i b/dl150s/include/wristapp.i
new file mode 100644
index 0000000..13cac0b
--- /dev/null
+++ b/dl150s/include/wristapp.i
@@ -0,0 +1,1508 @@
+;
+; Wristapp.i - For the Datalink 150s
+; Copyright (c) 1997 by John A. Toebes, VIII. All Rights Reserved.
+;
+DISP_ROW EQU $1d ; Hardware register to select which row of the display is to be written to. You need to
+ ; Combine this with setting DISP_COL to cause the segment to change
+DISP_COL EQU $1e ; Hardware register to select which col of the display is to be written to. You must set
+ ; DISP_ROW first to cause the segment to change
+; It turns out that the segments on the display are readily accessible. You can turn on/off any segment
+; pretty easily.
+;
+; The top and middle lines are a series of segments which can be individually turned on to
+; achieve the different letters. I assign the segments as follows:
+; A
+; _____
+; | |
+; F | |H | B
+; | | |
+; ---G-
+; | | |
+; E | |I | C
+; |_____|
+; D
+;
+; Numbering the digits on the line from left to right we would get
+;
+;
+; 1A 2A 3A 4A 5A 6A
+; _____ _____ _____ _____ _____ _____
+; 1| |1 2| |2 3| |3 4| |4 5| |5 6| |6
+; F| |1 |B F| |2 |B F| |3 |B F| |4 |B F| |5 |B F| |6 |B
+; | |H | | |H | D23 | |H | D34| |H | D45 | |H | | |H |
+; --1G- --2G- --- --3G- -- --4G- --- --5G- --6G-
+; 1| |1 |1 2| |2 |2 3| |3 |3 4| |4 |4 5| |5 |5 6| |6 |6
+; E| |I |C E| |I |C E| |I |C E| |I |C E| |I |C E| |I |C
+; |_____| |_____| . |_____| |_____| . |_____| |_____|
+; 1D 2D P23 3D 4D P45 5D 6D
+;
+; AM PM Remind Night Alarm Note
+;
+;
+; 1A 2A 3A 4A 5A 6A
+; _____ _____ C23 _____ _____ _____ _____
+; 1| |1 2| |2 o 3| |3 4| |4 5| |5 6| |6
+; F| |1 |B F| |2 |B F| |3 |B F| |4 |B F| |5 |B F| |6 |B
+; | |H | | |H | D23 | |H | | |H | D45 | |H | | |H |
+; --1G- --2G- --- --3G- --4G- --- --5G- --6G-
+; 1| |1 |1 2| |2 |2 3| |3 |3 4| |4 |4 5| |5 |5 6| |6 |6
+; E| |I |C E| |I |C o E| |I |C E| |I |C E| |I |C E| |I |C
+; |_____| |_____| . |_____| |_____| . |_____| |_____|
+; 1D 2D P23 3D 4D P45 5D 6D
+;
+; Note the two dashes between segments 2&3 and 4&5. For convenience, I refer to these
+; as D23 and D45 or DASH23 and DASH45 respectively.
+; I prefix all of the items on the first row with a T and those on the middle row with a M.
+;
+; Pixels on the bottom line are addressed a little differently. For these, we have 8 5x5 sets of
+; segments. We can reference them as follows:
+;
+; S1 S2 S3 S4 S5 S6 S7 S8
+; 12345 12345 12345 12345 12345 12345 12345 12345
+; *****A *****A *****A *****A *****A *****A *****A *****A
+; *****B *****B *****B *****B *****B *****B *****B *****B
+; *****C *****C *****C *****C *****C *****C *****C *****C
+; *****D *****D *****D *****D *****D *****D *****D *****D
+; *****E *****E *****E *****E *****E *****E *****E *****E
+;
+; Hence, the lower right pixel is referenced as S8E5
+;
+
+; Value Bit0 Bit1 Bit2 Bit3 Bit4
+; ------ ------ ------ ------ ------ ------
+; 00 <none> <none> <none> <none> <none>
+; 02 S8E1 S8D1 S8A1 S8B1 S8C1
+; 04 S8E2 S8D2 S8A2 S8B2 S8C2
+; 06 S8E3 S8D3 S8A3 S8B3 S8C3
+; 08 S8E4 S8D4 S8A4 S8B4 S8C4
+; 0A S8E5 S8D5 S8A5 S8B5 S8C5
+; 0C <none> <none> <none> <none> <none>
+; 0E T6C T6B M6C M6B Note
+; 10 T6D T6G T6A <none> M6A
+; 12 T6I T6H M6I M6G M6H
+; 14 T6E T6F M6D M6E M6F
+; 16 <none> <none> <none> <none> <none>
+; 18 <none> <none> <none> <none> <none>
+; 1A <none> <none> <none> <none> <none>
+; 1C T5C T5B M5C M5B Alarm
+; 1E T5D T5G T5A <none> M5A
+; 20 T5I T5H M5I M5G M5H
+; 22 T5E T5F M5D M5E M5F
+; 24 TP45 TD45 MP45 MD45 <none>
+; 26 T4C T4B M4C M4B Night
+; 28 T4D T4G T4A <none> M4A
+; 2A T4I T4H M4I M4G M4H
+; 2C T4E T4F M4D M4E M4F
+; 2E T3C T3B M3C M3B TD34
+; 30 T3D T3G T3A <none> M3A
+; 32 T3I T3H M3I M3G M3H
+; 34 T3E T3F M3D M3E M3F
+; 36 TP23 TD23 MP23 MC23 <none>
+; 38 T2C T2B M2C M2B Remind
+; 3A T2D T2G T2A <none> M2A
+; 3C T2I T2H M2I M2G M2H
+; 3E T2E T2F M2D M2E M2F
+; 40 T1C T1B M1C M1B PM
+; 42 T1D T1G T1A <none> M1A
+; 44 T1I T1H M1I M1G M1H
+; 46 T1E T1F M1D M1E M1F
+; 48 <none> <none> <none> <none> AM
+;
+; For the ODD Bits, we have:
+;
+; Value Bit0 Bit1 Bit2 Bit3 Bit4
+; ------ ------ ------ ------ ------ ------
+; 01 S7D5 S7E5 S7A5 S7B5 S7C5
+; 03 S7D4 S7E4 S7A4 S7B4 S7C4
+; 05 S7D3 S7E3 S7A3 S7B3 S7C3
+; 07 S7D2 S7E2 S7A2 S7B2 S7C2
+; 09 S7D1 S7E1 S7A1 S7B1 S7C1
+; 0B S6D5 S6E5 S6A5 S6B5 S6C5
+; 0D S6D4 S6E4 S6A4 S6B4 S6C4
+; 0F S6D3 S6E3 S6A3 S6B3 S6C3
+; 11 S6D2 S6E2 S6A2 S6B2 S6C2
+; 13 S6D1 S6E1 S6A1 S6B1 S6C1
+; 15 S5D5 S5E5 S5A5 S5B5 S5C5
+; 17 S5D4 S5E4 S5A4 S5B4 S5C4
+; 19 S5D3 S5E3 S5A3 S5B3 S5C3
+; 1B S5D2 S5E2 S5A2 S5B2 S5C2
+; 1D S5D1 S5E1 S5A1 S5B1 S5C1
+; 1F S4D5 S4E5 S4A5 S4B5 S4C5
+; 21 S4D4 S4E4 S4A4 S4B4 S4C4
+; 23 S4D3 S4E3 S4A3 S4B3 S4C3
+; 25 S4D2 S4E2 S4A2 S4B2 S4C2
+; 27 S4D1 S4E1 S4A1 S4B1 S4C1
+; 29 <none> <none> <none> <none> <none>
+; 2B S3D5 S3E5 S3A5 S3B5 S3C5
+; 2D S3D4 S3E4 S3A4 S3B4 S3C4
+; 2F S3D3 S3E3 S3A3 S3B3 S3C3
+; 31 S3D2 S3E2 S3A2 S3B2 S3C2
+; 33 S3D1 S3E1 S3A1 S3B1 S3C1
+; 35 S2D5 S2E5 S2A5 S2B5 S2C5
+; 37 S2D4 S2E4 S2A4 S2B4 S2C4
+; 39 S2D3 S2E3 S2A3 S2B3 S2C3
+; 3B S2D2 S2E2 S2A2 S2B2 S2C2
+; 3D S2D1 S2E1 S2A1 S2B1 S2C1
+; 3F S1D5 S1E5 S1A5 S1B5 S1C5
+; 41 S1D4 S1E4 S1A4 S1B4 S1C4
+; 43 S1D3 S1E3 S1A3 S1B3 S1C3
+; 45 S1D2 S1E2 S1A2 S1B2 S1C2
+; 47 S1D1 S1E1 S1A1 S1B1 S1C1
+;
+;
+; Of course if you want to look it from the orientation of the segments on the display,
+; you can use this information. To make it more compact, I used the notation
+; bit:Value
+; where value is what you store in $1D and Bit is which bit to set/clear in $1E to get the effect
+;
+; T1A=2:40 T2A=2:38 T3A=2:2E T4A=2:26 T5A=2:1C T6A=2:0E
+; T1B=1:3E T2B=1:36 T3B=1:2C T4B=1:24 T5B=1:1A T6B=1:0C
+; T1C=0:3E T2C=0:36 T3C=0:2C T4C=0:24 T5C=0:1A T6C=0:0C
+; T1D=0:40 T2D=0:38 T3D=0:2E T4D=0:26 T5D=0:1C T6D=0:0E
+; T1E=0:44 T2E=0:3C T3E=0:32 T4E=0:2A T5E=0:20 T6E=0:12
+; T1F=1:44 T2F=1:3C T3F=1:32 T4F=1:2A T5F=1:20 T6F=1:12
+; T1G=1:40 T2G=1:38 T3G=1:2E T4G=1:26 T5G=1:1C T6G=1:0E
+; T1H=1:42 T2H=1:3A T3H=1:30 T4H=1:28 T5H=1:1E T6H=1:10
+; T1I=0:42 T2I=0:3A T3I=0:30 T4I=0:28 T5I=0:1E T6I=0:10
+;
+; TP23=0:34
+; TD23=1:34
+; TD34=4:2C
+; TD45=1:22
+; TP45=0:22
+;
+; M1A=4:40 M2A=4:38 M3A=4:2E M4A=4:26 M5A=4:1C M6A=4:0E
+; M1B=3:3E M2B=3:36 M3B=3:2C M4B=3:24 M5B=3:1A M6B=3:0C
+; M1C=2:3E M2C=2:36 M3C=2:2C M4C=2:24 M5C=2:1A M6C=2:0C
+; M1D=2:44 M2D=2:3C M3D=2:32 M4D=2:2A M5D=2:20 M6D=2:12
+; M1E=3:44 M2E=3:3C M3E=3:32 M4E=3:2A M5E=3:20 M6E=3:12
+; M1F=4:44 M2F=4:3C M3F=4:32 M4F=4:2A M5F=4:20 M6F=4:12
+; M1G=3:42 M2G=3:3A M3G=3:30 M4G=3:28 M5G=3:1E M6G=3:10
+; M1H=4:42 M2H=4:3A M3H=4:30 M4H=4:28 M5H=4:1E M6H=4:10
+; M1I=2:42 M2I=2:3A M3I=2:30 M4I=2:28 M5I=2:1E M6I=2:10
+;
+; MC23=3:34
+; MP23=2:34
+; MD45=3:22
+; MP45=2:22
+;
+; AM=4:46
+; PM=4:3E
+; Remind=4:36
+; Night=4:24
+; Alarm=4:1A
+; Note=4:0C
+
+COL_T1A EQU 2
+ROW_T1A EQU $40
+COL_T2A EQU 2
+ROW_T2A EQU $38
+COL_T3A EQU 2
+ROW_T3A EQU $2E
+COL_T4A EQU 2
+ROW_T4A EQU $26
+COL_T5A EQU 2
+ROW_T5A EQU $1C
+COL_T6A EQU 2
+ROW_T6A EQU $0E
+;
+COL_T1B EQU 1
+ROW_T1B EQU $3E
+COL_T2B EQU 1
+ROW_T2B EQU $36
+COL_T3B EQU 1
+ROW_T3B EQU $2C
+COL_T4B EQU 1
+ROW_T4B EQU $24
+COL_T5B EQU 1
+ROW_T5B EQU $1A
+COL_T6B EQU 1
+ROW_T6B EQU $0C
+;
+COL_T1C EQU 0
+ROW_T1C EQU $3E
+COL_T2C EQU 0
+ROW_T2C EQU $36
+COL_T3C EQU 0
+ROW_T3C EQU $2C
+COL_T4C EQU 0
+ROW_T4C EQU $24
+COL_T5C EQU 0
+ROW_T5C EQU $1A
+COL_T6C EQU 0
+ROW_T6C EQU $0C
+;
+COL_T1D EQU 0
+ROW_T1D EQU $40
+COL_T2D EQU 0
+ROW_T2D EQU $38
+COL_T3D EQU 0
+ROW_T3D EQU $2E
+COL_T4D EQU 0
+ROW_T4D EQU $26
+COL_T5D EQU 0
+ROW_T5D EQU $1C
+COL_T6D EQU 0
+ROW_T6D EQU $0E
+;
+COL_T1E EQU 0
+ROW_T1E EQU $44
+COL_T2E EQU 0
+ROW_T2E EQU $3C
+COL_T3E EQU 0
+ROW_T3E EQU $32
+COL_T4E EQU 0
+ROW_T4E EQU $2A
+COL_T5E EQU 0
+ROW_T5E EQU $20
+COL_T6E EQU 0
+ROW_T6E EQU $12
+;
+COL_T1F EQU 1
+ROW_T1F EQU $44
+COL_T2F EQU 1
+ROW_T2F EQU $3C
+COL_T3F EQU 1
+ROW_T3F EQU $32
+COL_T4F EQU 1
+ROW_T4F EQU $2A
+COL_T5F EQU 1
+ROW_T5F EQU $20
+COL_T6F EQU 1
+ROW_T6F EQU $12
+;
+COL_T1G EQU 1
+ROW_T1G EQU $40
+COL_T2G EQU 1
+ROW_T2G EQU $38
+COL_T3G EQU 1
+ROW_T3G EQU $2E
+COL_T4G EQU 1
+ROW_T4G EQU $26
+COL_T5G EQU 1
+ROW_T5G EQU $1C
+COL_T6G EQU 1
+ROW_T6G EQU $0E
+;
+COL_T1H EQU 1
+ROW_T1H EQU $42
+COL_T2H EQU 1
+ROW_T2H EQU $3A
+COL_T3H EQU 1
+ROW_T3H EQU $30
+COL_T4H EQU 1
+ROW_T4H EQU $28
+COL_T5H EQU 1
+ROW_T5H EQU $1E
+COL_T6H EQU 1
+ROW_T6H EQU $10
+;
+COL_T1I EQU 0
+ROW_T1I EQU $42
+COL_T2I EQU 0
+ROW_T2I EQU $3A
+COL_T3I EQU 0
+ROW_T3I EQU $30
+COL_T4I EQU 0
+ROW_T4I EQU $28
+COL_T5I EQU 0
+ROW_T5I EQU $1E
+COL_T6I EQU 0
+ROW_T6I EQU $10
+;
+;
+COL_TP23 EQU 0
+ROW_TP23 EQU $34
+;
+COL_TD23 EQU 1
+ROW_TD23 EQU $34
+;
+COL_TD34 EQU 4
+ROW_TD34 EQU $2C
+;
+COL_TD45 EQU 1
+ROW_TD45 EQU $22
+;
+COL_TP45 EQU 0
+ROW_TP45 EQU $22
+;
+;
+COL_M1A EQU 4
+ROW_M1A EQU $40
+COL_M2A EQU 4
+ROW_M2A EQU $38
+COL_M3A EQU 4
+ROW_M3A EQU $2E
+COL_M4A EQU 4
+ROW_M4A EQU $26
+COL_M5A EQU 4
+ROW_M5A EQU $1C
+COL_M6A EQU 4
+ROW_M6A EQU $0E
+;
+COL_M1B EQU 3
+ROW_M1B EQU $3E
+COL_M2B EQU 3
+ROW_M2B EQU $36
+COL_M3B EQU 3
+ROW_M3B EQU $2C
+COL_M4B EQU 3
+ROW_M4B EQU $24
+COL_M5B EQU 3
+ROW_M5B EQU $1A
+COL_M6B EQU 3
+ROW_M6B EQU $0C
+;
+COL_M1C EQU 2
+ROW_M1C EQU $3E
+COL_M2C EQU 2
+ROW_M2C EQU $36
+COL_M3C EQU 2
+ROW_M3C EQU $2C
+COL_M4C EQU 2
+ROW_M4C EQU $24
+COL_M5C EQU 2
+ROW_M5C EQU $1A
+COL_M6C EQU 2
+ROW_M6C EQU $0C
+;
+COL_M1D EQU 2
+ROW_M1D EQU $44
+COL_M2D EQU 2
+ROW_M2D EQU $3C
+COL_M3D EQU 2
+ROW_M3D EQU $32
+COL_M4D EQU 2
+ROW_M4D EQU $2A
+COL_M5D EQU 2
+ROW_M5D EQU $20
+COL_M6D EQU 2
+ROW_M6D EQU $12
+;
+COL_M1E EQU 3
+ROW_M1E EQU $44
+COL_M2E EQU 3
+ROW_M2E EQU $3C
+COL_M3E EQU 3
+ROW_M3E EQU $32
+COL_M4E EQU 3
+ROW_M4E EQU $2A
+COL_M5E EQU 3
+ROW_M5E EQU $20
+COL_M6E EQU 3
+ROW_M6E EQU $12
+;
+COL_M1F EQU 4
+ROW_M1F EQU $44
+COL_M2F EQU 4
+ROW_M2F EQU $3C
+COL_M3F EQU 4
+ROW_M3F EQU $32
+COL_M4F EQU 4
+ROW_M4F EQU $2A
+COL_M5F EQU 4
+ROW_M5F EQU $20
+COL_M6F EQU 4
+ROW_M6F EQU $12
+;
+COL_M1G EQU 3
+ROW_M1G EQU $42
+COL_M2G EQU 3
+ROW_M2G EQU $3A
+COL_M3G EQU 3
+ROW_M3G EQU $30
+COL_M4G EQU 3
+ROW_M4G EQU $28
+COL_M5G EQU 3
+ROW_M5G EQU $1E
+COL_M6G EQU 3
+ROW_M6G EQU $10
+;
+COL_M1H EQU 4
+ROW_M1H EQU $42
+COL_M2H EQU 4
+ROW_M2H EQU $3A
+COL_M3H EQU 4
+ROW_M3H EQU $30
+COL_M4H EQU 4
+ROW_M4H EQU $28
+COL_M5H EQU 4
+ROW_M5H EQU $1E
+COL_M6H EQU 4
+ROW_M6H EQU $10
+;
+COL_M1I EQU 2
+ROW_M1I EQU $42
+COL_M2I EQU 2
+ROW_M2I EQU $3A
+COL_M3I EQU 2
+ROW_M3I EQU $30
+COL_M4I EQU 2
+ROW_M4I EQU $28
+COL_M5I EQU 2
+ROW_M5I EQU $1E
+COL_M6I EQU 2
+ROW_M6I EQU $10
+;
+;
+COL_MC23 EQU 3
+ROW_MC23 EQU $34
+;
+COL_MP23 EQU 2
+ROW_MP23 EQU $34
+;
+COL_MD45 EQU 3
+ROW_MD45 EQU $22
+;
+COL_MP45 EQU 2
+ROW_MP45 EQU $22
+;
+;
+COL_AM EQU 4
+ROW_AM EQU $46
+;
+COL_PM EQU 4
+ROW_PM EQU $3E
+;
+COL_REMIND EQU 4
+ROW_REMIND EQU $36
+;
+COL_NIGHT EQU 4
+ROW_NIGHT EQU $24
+;
+COL_ALARM EQU 4
+ROW_ALARM EQU $1A
+;
+COL_NOTE EQU 4
+ROW_NOTE EQU $0C
+;
+; S1A1=2:47 S1B1=3:47 S1C1=4:47 S1D1=0:47 S1E1=1:47
+; S1A2=2:45 S1B2=3:45 S1C2=4:45 S1D2=0:45 S1E2=1:45
+; S1A3=2:43 S1B3=3:43 S1C3=4:43 S1D3=0:43 S1E3=1:43
+; S1A4=2:41 S1B4=3:41 S1C4=4:41 S1D4=0:41 S1E4=1:41
+; S1A5=2:3F S1B5=3:3F S1C5=4:3F S1D5=0:3F S1E5=1:3F
+;
+; S2A1=2:3D S2B1=3:3D S2C1=4:3D S2D1=0:3D S2E1=1:3D
+; S2A2=2:3B S2B2=3:3B S2C2=4:3B S2D2=0:3B S2E2=1:3B
+; S2A3=2:39 S2B3=3:39 S2C3=4:39 S2D3=0:39 S2E3=1:39
+; S2A4=2:37 S2B4=3:37 S2C4=4:37 S2D4=0:37 S2E4=1:37
+; S2A5=2:35 S2B5=3:35 S2C5=4:35 S2D5=0:35 S2E5=1:35
+;
+; S3A1=2:33 S3B1=3:33 S3C1=4:33 S3D1=0:33 S3E1=1:33
+; S3A2=2:31 S3B2=3:31 S3C2=4:31 S3D2=0:31 S3E2=1:31
+; S3A3=2:2F S3B3=3:2F S3C3=4:2F S3D3=0:2F S3E3=1:2F
+; S3A4=2:2D S3B4=3:2D S3C4=4:2D S3D4=0:2D S3E4=1:2D
+; S3A5=2:2B S3B5=3:2B S3C5=4:2B S3D5=0:2B S3E5=1:2B
+;
+; S4A1=2:27 S4B1=3:27 S4C1=4:27 S4D1=0:27 S4E1=1:27
+; S4A2=2:25 S4B2=3:25 S4C2=4:25 S4D2=0:25 S4E2=1:25
+; S4A3=2:23 S4B3=3:23 S4C3=4:23 S4D3=0:23 S4E3=1:23
+; S4A4=2:21 S4B4=3:21 S4C4=4:21 S4D4=0:21 S4E4=1:21
+; S4A5=2:1F S4B5=3:1F S4C5=4:1F S4D5=0:1F S4E5=1:1F
+;
+; S5A1=2:1D S5B1=3:1D S5C1=4:1D S5D1=0:1D S5E1=1:1D
+; S5A2=2:1B S5B2=3:1B S5C2=4:1B S5D2=0:1B S5E2=1:1B
+; S5A3=2:19 S5B3=3:19 S5C3=4:19 S5D3=0:19 S5E3=1:19
+; S5A4=2:17 S5B4=3:17 S5C4=4:17 S5D4=0:17 S5E4=1:17
+; S5A5=2:15 S5B5=3:15 S5C5=4:15 S5D5=0:15 S5E5=1:15
+;
+; S6A1=2:13 S6B1=3:13 S6C1=4:13 S6D1=0:13 S6E1=1:13
+; S6A2=2:11 S6B2=3:11 S6C2=4:11 S6D2=0:11 S6E2=1:11
+; S6A3=2:0F S6B3=3:0F S6C3=4:0F S6D3=0:0F S6E3=1:0F
+; S6A4=2:0D S6B4=3:0D S6C4=4:0D S6D4=0:0D S6E4=1:0D
+; S6A5=2:0B S6B5=3:0B S6C5=4:0B S6D5=0:0B S6E5=1:0B
+;
+; S7A1=2:09 S7B1=3:09 S7C1=4:09 S7D1=0:09 S7E1=1:09
+; S7A2=2:07 S7B2=3:07 S7C2=4:07 S7D2=0:07 S7E2=1:07
+; S7A3=2:05 S7B3=3:05 S7C3=4:05 S7D3=0:05 S7E3=1:05
+; S7A4=2:03 S7B4=3:03 S7C4=4:03 S7D4=0:03 S7E4=1:03
+; S7A5=2:01 S7B5=3:01 S7C5=4:01 S7D5=0:01 S7E5=1:01
+;
+; S8A1=2:02 S8B1=3:02 S8C1=4:02 S8D1=1:02 S8E1=0:02
+; S8A2=2:04 S8B2=3:04 S8C2=4:04 S8D2=1:04 S8E2=0:04
+; S8A3=2:06 S8B3=3:06 S8C3=4:06 S8D3=1:06 S8E3=0:06
+; S8A4=2:08 S8B4=3:08 S8C4=4:08 S8D4=1:08 S8E4=0:08
+; S8A5=2:0a S8B5=3:0a S8C5=4:0a S8D5=1:0a S8E5=0:0a
+;
+;
+; Character set
+;
+C_0 EQU $00
+C_1 EQU $01
+C_2 EQU $02
+C_3 EQU $03
+C_4 EQU $04
+C_5 EQU $05
+C_6 EQU $06
+C_7 EQU $07
+C_8 EQU $08
+C_9 EQU $09
+C_A EQU $0A
+C_B EQU $0B
+C_C EQU $0C
+C_D EQU $0D
+C_E EQU $0E
+C_F EQU $0F
+C_G EQU $10
+C_H EQU $11
+C_I EQU $12
+C_J EQU $13
+C_K EQU $14
+C_L EQU $15
+C_M EQU $16
+C_N EQU $17
+C_O EQU $18
+C_P EQU $19
+C_Q EQU $1A
+C_R EQU $1B
+C_S EQU $1C
+C_T EQU $1D
+C_U EQU $1E
+C_V EQU $1F
+C_W EQU $20
+C_X EQU $21
+C_Y EQU $22
+C_Z EQU $23
+C_BLANK EQU $24
+C_SPACE EQU $24
+C_EXCLAIM EQU $25
+C_DQUOTE EQU $26
+C_POUND EQU $27
+C_DOLLAR EQU $28
+C_PERCENT EQU $29
+C_AMPERSAND EQU $2A
+C_QUOTE EQU $2B
+C_LPAREN EQU $2C
+C_RPAREN EQU $2D
+C_TIMES EQU $2E
+C_PLUS EQU $2F
+C_COMMA EQU $30
+C_MINUS EQU $31
+C_PERIOD EQU $32
+C_SLASH EQU $33
+C_COLON EQU $34
+C_BACKSLASH EQU $35
+C_DIVIDE EQU $36
+C_EQUAL EQU $37
+C_BELL EQU $38
+C_QUESTION EQU $39
+C_UNDER EQU $3A
+C_CHECK EQU $3B
+C_PREV EQU $3C
+C_LEFTARR EQU $3C ; Symbol for the previous key
+C_NEXT EQU $3D
+C_RIGHTARR EQU $3D ; Symbol for the next key
+C_BLOCK EQU $3E
+C_SEP EQU $3F
+C6_SPACE EQU $1d
+; The basic timex character set is:
+; 0 1 2 3 4 5 6 7 8 9 A B C D E F
+; G H I J K L M N O P Q R S T U V
+; W X Y Z ! " # $ % & ' ( ) * +
+; , - . / : ; < = > ? @ A B C D E
+;
+; We also have the timex6 character set as:
+; 0 1 2 3 4 5 6 7 8 9 A B C D E F
+; G H : L M N P R T U W Y r - +
+;
+
+EVT_NEXT EQU $00 ; Next button pressed (not interested in the up transition)
+EVT_MODE EQU $01 ; Mode button pressed (not interested in the up transition)
+EVT_SET EQU $02 ; Set/Delete button pressed (not interested in the up transition)
+EVT_PREV EQU $03 ; Prev button pressed (not interested in the up transition)
+EVT_GLOW EQU $04 ; Indiglo button pressed (not interested in the up transition)
+EVT_ANY EQU $05 ; Any button pressed (not interested in the up transition)
+EVT_ANY4 EQU $06 ; Any button pressed except indiglo (not interested in the up transition)
+EVT_RESUME EQU $1a ; Called when resuming from a nested app
+EVT_ENTER EQU $1b ; Initial state. The Time value is generally $01 or $84 for a well behaved app
+EVT_NEST EQU $1c ; The state table 1 entry called when a nested application is called. It is the equivalent of
+ ; EVT_ENTER for an interrupt. This only occurs for Wristapps, Timer, and appt apps.
+EVT_END EQU $1d ; End of event table indicator
+EVT_TIMER1 EQU $1e ; Timer event - This is fired for a $83 time request
+EVT_TIMER2 EQU $1f ; Timer event - This is fired for a $82,$84,$01 timer request
+; $20-$36 - UNUSED
+; (I bet that you can have user specified events for these too)
+EVT_USER0 EQU $37
+EVT_USER1 EQU $38
+EVT_USER2 EQU $39
+EVT_USER3 EQU $3a ; User specified events. Queued by calling POSTEVENT ($4E78)
+; $3b-$7f - UNUSED
+EVT_DNNEXT EQU $80 ; Next button pressed
+EVT_DNMODE EQU $81 ; Mode button pressed
+EVT_DNSET EQU $82 ; Set/Delete button pressed
+EVT_DNPREV EQU $83 ; Prev button pressed
+EVT_DNGLOW EQU $84 ; Indiglo button pressed
+EVT_DNANY EQU $85 ; Any of the four buttons Pressed
+EVT_DNANY4 EQU $86 ; Any button pressed except indiglo
+
+; $87-$9F - UNUSED
+EVT_UPNEXT EQU $A0 ; Next button released
+EVT_UPMODE EQU $A1 ; Mode button released
+EVT_UPSET EQU $A2 ; Set/Delete button released
+EVT_UPPREV EQU $A3 ; Prev button released
+EVT_UPGLOW EQU $A4 ; Indiglo button released
+EVT_UPANY EQU $A5 ; Any of the four buttons Released
+EVT_UPANY4 EQU $A6 ; Any button Released except indiglo
+
+ALARM_STATUS EQU $69 ; This is the status flags for the alarms. The low order bit indicates that it is enabled
+ ; The next bit seems to indicate that the alarm is temporarily masked or disabled
+ ; Apparently the next bit can be set, but I haven't seen any use for it.
+; EQU $69 ; Alarm 1 Status
+; EQU $69 ; Alarm 1 Status
+; EQU $6a ; Alarm 2 Status
+; EQU $6b ; Alarm 3 Status
+; EQU $6c ; Alarm 4 Status
+; EQU $6d ; Alarm 5 Status
+
+SCAN_MONTH EQU $7a ; The current SCAN month
+SCAN_DAY EQU $7b ; The current SCAN day
+SCAN_YEAR EQU $7c ; The current SCAN year
+
+MONTH_JAN EQU 1
+MONTH_FEB EQU 2
+MONTH_MAR EQU 3
+MONTH_APR EQU 4
+MONTH_MAY EQU 5
+MONTH_JUN EQU 6
+MONTH_JUL EQU 7
+MONTH_AUG EQU 8
+MONTH_SEP EQU 9
+MONTH_OCT EQU 10
+MONTH_NOV EQU 11
+MONTH_DEC EQU 12
+
+SYSTEMP0 EQU $A0
+SYSTEMP1 EQU $A1
+
+TIM_ONCE EQU $ff ; No time interval. Operation is executed just once
+
+TIM1_TIC EQU $00
+TIM1_2TIC EQU $01
+TIM1_3TIC EQU $02
+TIM1_4TIC EQU $03
+TIM1_HALFSEC EQU $04
+TIM1_SECOND EQU $05
+TIM1_SECHALF EQU $06
+TIM1_TWOSEC EQU $07
+TIM1_TWOSEC1 EQU $08
+TIM1_12SEC EQU $09
+TIM1_18SEC EQU $0a
+;
+; Note that the second part of this table is happen-stance since it is really a rollover
+; of the second table on top of the first one. But it might be useful to someone...
+;
+TIM1_TICA EQU $0b ; This is the typical scroll interval
+TIM1_2TICA EQU $0c
+TIM1_4TICA EQU $0d
+TIM1_8TIC EQU $0e ; This is the normal blink interval
+TIM1_12TIC EQU $0f ; Just over a second
+TIM1_16TIC EQU $10 ; A second and a half
+TIM1_24TIC EQU $11 ; Two and a half seconds
+TIM1_32TIC EQU $12 ; Just over three seconds
+TIM1_40TIC EQU $13 ; Four seconds
+TIM1_48TIC EQU $14 ; Almost five seconds
+TIM1_96TIC EQU $15 ; Almost ten seconds
+
+TIM2_TIC EQU $80 ; This is the typical scroll interval
+TIM2_2TIC EQU $81
+TIM2_4TIC EQU $82
+TIM2_8TIC EQU $83 ; This is the normal blink interval
+TIM2_12TIC EQU $84 ; Just over a second
+TIM2_16TIC EQU $85 ; A second and a half
+TIM2_24TIC EQU $86 ; Two and a half seconds
+TIM2_32TIC EQU $87 ; Just over three seconds
+TIM2_40TIC EQU $88 ; Four seconds
+TIM2_48TIC EQU $89 ; Almost five seconds
+TIM2_96TIC EQU $8a ; Almost ten seconds
+
+TIM_LONG1 EQU $01 ; Long shot time interval - Fires a $1F when the the timer expires
+TIM_03 EQU $03 ; Unknown
+TIM_08 EQU $08 ; Unknown
+
+TIM_SHORT EQU $82 ; Short timer - Fires a $1F event when the timer expires
+TIM_MED EQU $83 ; Medium timer - Fires a $1E event when the timer expires
+TIM_LONG EQU $84 ; Long timer - Fires a $1F event when the timer expires
+TIM_86 EQU $86 ; ?Timer
+;-----------------------------------------------------------------------------------------
+TZ1_HOUR EQU $b0 ; Time zone 1 current hour (0-23)
+TZ1_MINUTE EQU $b1 ; Time zone 1 current minute (0-59)
+TZ1_MONTH EQU $b2 ; Time zone 1 current month of the year (1-12)
+TZ1_DAY EQU $b3 ; Time zone 1 current day of the month (1-31)
+TZ1_YEAR EQU $b4 ; Time zone 1 current year (mod 1900)
+TZ1_NAME EQU $b5 ; Time zone 1 name (3 TIMEX characters)
+; EQU $b6 ; " " " "
+; EQU $b7 ; " " " "
+TZ1_DOW EQU $b8 ; Time zone 1 day of week (0=Monday...6=Sunday)
+;-----------------------------------------------------------------------------------------
+TZ2_HOUR EQU $b9 ; Time zone 2 current hour (0-23) in Timezone 1
+TZ2_MINUTE EQU $ba ; Time zone 2 current minute (0-59)
+TZ2_MONTH EQU $bb ; Time zone 2 current month of the year (1-12)
+TZ2_DAY EQU $bc ; Time zone 2 current day of the month (1-31)
+TZ2_YEAR EQU $bd ; Time zone 2 current year (mod 1900)
+TZ2_NAME EQU $be ; Time zone 2 name (3 TIMEX characters)
+; EQU $bf ; " " " "
+; EQU $c0 ; " " " "
+TZ2_DOW EQU $c1 ; Time zone 2 day of the week (0=Monday..6=Sunday)
+;-----------------------------------------------------------------------------------------
+; Sound Support Values
+TONE_END EQU $00 ; END
+TONE_LOW_C EQU $10 ; Low C
+TONE_HI_C EQU $20 ; High C
+TONE_MID_C EQU $30 ; Middle C
+TONE_VHI_C EQU $40 ; Very high C
+TONE_HI_F EQU $50 ; High F (little bit lower than F)
+TONE_MID_F EQU $60 ; Middle F
+TONE_LO_F EQU $70 ; Low F
+TONE_VHI_GSHARP EQU $80 ; Very High G# (G Sharp)
+TONE_HI_GSHARP EQU $90 ; High G#
+TONE_MID_GSHARP EQU $A0 ; Middle G#
+TONE_LO_GSHARP EQU $B0 ; Low G#
+TONE_HI_D EQU $C0 ; High D
+TONE_MID_D EQU $D0 ; Middle D
+TONE_LO_D EQU $E0 ; Low D
+TONE_PAUSE EQU $F0 ; Pause
+SND_END EQU $80
+;-----------------------------------------------------------------------------------------
+SNDSTART EQU $4E39 ; Start playing the current sound in SYSSOUND
+;--------------------------------------------------------------------------------
+PLAYCONF EQU $4E69 ; Play a confirmation sound
+PLAYBUTTON EQU $4E6F ; Play the button beep sound if no other sound is currently playing
+;--------------------------------------------------------------------------------
+POSTEVENT EQU $4E78 ; Post a event to the internal processing queue
+; Parameters:
+; A - Event to be posted.
+; This posts an event to run through the processing loop for the current applet.
+; Typical user events are in the $30-$3F range.
+;
+;--------------------------------------------------------------------------------
+INDIGLO_OFF EQU $4E7D ; This routine turns off the indiglo light
+;--------------------------------------------------------------------------------
+SNDSTOP EQU $4F29 ; This stops whatever sound is currently playing
+;--------------------------------------------------------------------------------
+CALL_NESTEDAPP EQU $4F3C
+; Purpose:
+; This sets up to call a nested application while the current one is running.
+; Up to 5 apps may be nested (although there are only 3 potential ones defined).
+; If more than 5 have been called the oldest one will be forgotten.
+; When the nested app is called, NESTED_APP will be set to the application number
+; passed in and NESTED_PARM will contain the X parameter passed in
+;
+; Parameters:
+; A - Nested application number. This is one of the three defined apps:
+; 9 = APP2_ALARM - Alarm (while another app is running)
+; 10 = APP2_APPT - Appointment (while another app is running)
+; 11 = APP2_WRIST - Wristapp (while another app is running)
+; X - Parameter to pass to the nested application
+;--------------------------------------------------------------------------------
+SET_INDIGLO EQU $54f3 ; This routine turns on/off the indiglo light
+; Parameters:
+; 0,Sys_9e - Bit indicates request for on or off
+;--------------------------------------------------------------------------------
+PUTSCROLLMSG EQU $5511 ; Make the buffer at MSGBUF visible
+;--------------------------------------------------------------------------------
+SCROLLMSG EQU $5534 ; Start the scrolling cycle for the current message
+; Parameters:
+; MSGBUF - Message to be scroll terminated by a SEPARATOR character
+;--------------------------------------------------------------------------------
+SCROLLMSG_CONT EQU $5538 ; Start the scrolling cycle for the current message, but don't reset the
+ ; scrolling cycle wait count.
+; Parameters:
+; MSGBUF - Message to be scroll terminated by a SEPARATOR character
+; SCROLL_TICS - The current tic count in the cycle
+;--------------------------------------------------------------------------------
+START_BLINKX EQU $55aa ; Establish and call the specified blinking rountine
+; Parameters:
+; X - single byte parameter to the particular blinking function
+; A - Blinking function to be selected
+;--------------------------------------------------------------------------------
+START_BLINKP EQU $55ae ; Establish and call the specified blinking rountine
+; Parameters:
+; X - Address of parameter to the particular blinking function
+; A - Blinking function to be selected
+BLINK_YEAR EQU 0 ; Blink the year in the right place according to the current time format
+BLINK_SECONDS EQU 1 ; Blink two characters point to by UPDATE_PARM on the right two digits of the middle line - Used for the seconds
+BLINK_AMPM EQU 2 ; Blink AM/PM on the right most digits of the middle line (A or P pointed to by UPDATE_PARM)
+BLINK_MONTH EQU 3 ; Blink the month in the right place according to the current time format
+BLINK_HMONTH EQU 4 ; Blink the month in the right place according to the current time format for a half date (no year)
+BLINK_DAY EQU 5 ; Blink the day in the right place according to the current time format
+BLINK_HDAY EQU 6 ; Blink the day in the right place according to the current time format for half dates
+BLINK_MID12 EQU 7 ; Blink the left two blank padded digits on the middle line (value pointed to by UPDATE_PARM)
+BLINK_HOUR EQU 8 ; Blink the Hour (left two segments on the middle line) and AM/PM indicator (hour point to by UPDATE_PARM)
+BLINK_MID34 EQU 9 ; Blink the middle two zero padded digits on the middle line (value pointed to by UPDATE_PARM)
+BLINK_SEGMENT EQU 10 ; Blink a single segment indicated by UPDATE_POS and mask in UPDATE_VAL
+BLINK_DIGIT EQU 11 ; Blink solid black cursor for the digit (UPDATE_POS is the location on the bottom line)
+BLINK_TZONE EQU 12 ; Blink the timezone information (Pointed to by UPDATE_PARM)
+BLINK_TOP34 EQU 13 ; Blink the middle zero padded two digits on the top line (value pointed to by UPDATE_PARM)
+;--------------------------------------------------------------------------------
+PUTLINE3 EQU $59e7 ; Put a single character on the bottom line of the display
+POSL3_1 EQU $50
+POSL3_2 EQU $4f
+POSL3_3 EQU $45
+POSL3_4 EQU $3b
+POSL3_5 EQU $31
+POSL3_6 EQU $1f
+POSL3_7 EQU $15
+POSL3_8 EQU $0b
+; Parameters:
+; A = Position S1 S2 S3 S4 S5 S6 S7 S8
+; [$50] [$4f] [$45] [$3b] [$31] [$1f] [$15] [$0b]
+; [ 80] [ 79] [ 69] [ 59] [ 49] [ 31] [ 21] [ 11]
+; X = Character in Timex Ascii to display
+; Notes:
+; This appears to be an XOR operation. Calling the same function twice in a row would
+; erase the character. Writing on top of an existing character seems to let you generate
+; a non Ascii character.
+
+PUTLINE1 EQU $5a33 ; Put a single character on the top line of the display
+POSL1_1 EQU $44
+POSL1_2 EQU $3c
+POSL1_3 EQU $32
+POSL1_4 EQU $2a
+POSL1_5 EQU $20
+POSL1_6 EQU $12
+; Parameters:
+; A = Position [$44] [$3c] - [$32] [$2a] - [$20] [$12]
+; [ 68] [ 60] [ 50] [ 42] [ 32] [18]
+; X = Character in Timex Ascii to display
+
+PUTLINE2 EQU $5a6b ; Put a single character on the second line of the display
+POSL1_1 EQU $44
+POSL1_2 EQU $3c
+POSL1_3 EQU $32
+POSL1_4 EQU $2a
+POSL1_5 EQU $20
+POSL1_6 EQU $12
+; Parameters:
+; A = Position [$44] [$3c] - [$32] [$2a] - [$20] [$12]
+; [ 68] [ 60] [ 50] [ 42] [ 32] [18]
+; X = Character in Timex Ascii to display
+
+CLEARALL EQU $5aa0 ; Clear the display
+CLEARBOT EQU $5aad ; Clear the bottom line of the display
+CLEARSYM EQU $5acb ; Turns off all the non digit symbols segments (including dots, dashes and colons)
+;-------------------------------------------------------------------------
+START_UPDATEX equ $56c4 ; Establish and call the specified update function (See START_UPDATEP)
+; Parameters:
+; X - single byte parameter to the particular update function
+; A - Update function to be selected
+;-------------------------------------------------------------------------
+START_UPDATEP EQU $56C8 ; This establishes an update function. Update functions are called every 8/10th
+ ; of a second. This function will update a number in an upward or downward
+ ; direction based on the setting of 0,SYSFLAGS
+; Parameters:
+; A - Update function to be selected
+; X - Pointer to parameters for the update function
+UPD_YEAR EQU 0 ; Update the year
+UPD_MONTH EQU 1 ; Update the Month
+UPD_HMONTH EQU 2 ; Update the Month in Half date format
+UPD_DAY EQU 3 ; Update the day
+UPD_HDAY EQU 4 ; Update the day in half date format
+UPD_MID12 EQU 5 ; Update MID12
+UPD_HOUR EQU 6 ; Update the hour
+UPD_MID34 EQU 7 ; Update MID34
+UPD_DIGIT EQU 8 ; Update the digit at UPDATE_POS
+;-------------------------------------------------------------------------
+BANNER8 EQU $5746 ; Display an 8 character string
+; Parameters
+; A = Offset from 0110 for the start of an 8 character timex string
+;
+;-------------------------------------------------------------------------
+PUTMSGXBOT EQU $574a ; Puts a message on the bottom of the screen.
+; Parameters
+; A = Message selector number. Valid values from 0 to 27. They correspond to
+; the same strings passed into PUTMSGBOT scaled down by 8
+;-------------------------------------------------------------------------
+PUTMSGBOT EQU $574d ; Puts a message on the bottom of the screen.
+; Parameters
+; A = Offset into message selector string. Valid values from from $00 to $d8 at
+; 8 Byte offsets. $E0 is the start of the 6 byte top/mid message strings.
+SYS8_MON EQU $00 ; $00 = "MON "
+SYS8_TUE EQU $08 ; $08 = "TUE "
+SYS8_WED EQU $10 ; $10 = "WED "
+SYS8_THU EQU $18 ; $18 = "THU "
+SYS8_FRI EQU $20 ; $20 = "FRI "
+SYS8_SAT EQU $28 ; $28 = "SAT "
+SYS8_SUN EQU $30 ; $30 = "SUN "
+SYS8_VERDATE EQU $38 ; $38 = " 802104 "
+SYS8_VERSION EQU $40 ; $40 = " V2.1 "
+SYS8_MODE EQU $48 ; $48 = " MODE "
+SYS8_SET_MODE EQU $50 ; $50 = "SET MODE"
+SYS8_SET EQU $58 ; $58 = "SET "
+SYS8_TO EQU $60 ; $60 = "TO "
+SYS8_FOR EQU $68 ; $68 = "FOR "
+SYS8_ENTRIES EQU $70 ; $70 = "ENTRIES "
+SYS8_UPCOMING EQU $78 ; $78 = "UPCOMING"
+SYS8_ENTRY EQU $80 ; $80 = " ENTRY "
+SYS8_SCAN EQU $88 ; $88 = " SCAN "
+SYS8_SCAN_RIGHT EQU $90 ; $90 = " SCAN"
+SYS8_SYNCING EQU $98 ; $98 = " SYNCING"
+SYS8_PROGRESS EQU $a0 ; $a0 = "PROGRESS"
+SYS8_DATA_OK EQU $a8 ; $a8 = " DATA OK"
+SYS8_RESEND EQU $b0 ; $b0 = "-RESEND-"
+SYS8_ABORTED EQU $b8 ; $b8 = " ABORTED"
+SYS8_MISMATCH EQU $c0 ; $c0 = "MISMATCH"
+SYS8_SPLIT EQU $c8 ; $c8 = " SPLIT "
+SYS8_START EQU $d0 ; $d0 = ">=START "
+SYS8_STOP EQU $d8 ; $d8 = ">=STOP "
+; $e0 is the start of the message table SYS6_SET
+;
+PUT6TOP EQU $577f
+; Parameters:
+; A = Offset from 0110 for the start of a 6 byte data item to be put on the top
+; line of the screen. This uses a different encoding for characters where:
+; we have 32 different values which correspond to:
+; "0123456789ABCDEFGH:LMNPRTUWYr -+"
+; 0123456789abcdef0123456789abcdef
+; e.g. $12=':', $13='L'.
+; It appears that things wrap when you get to $20
+;
+PUTMSG1 EQU $5783 ; Put up a message on the top line
+; Parameters - Offset into message selector string.
+; Typically you want a multiple of 6 to choose from these below
+;
+SYS6_SET EQU $00 ; 00 = " SET " (This is stored at $5F5F in the roms)
+SYS6_HOLDTO EQU $06 ; 06 = "HOLDTO"
+SYS6_ALARM EQU $0C ; 0C = "ALARM "
+SYS6_ENTER EQU $12 ; 12 = "ENTER "
+SYS6_HR EQU $18 ; 18 = " HR"
+SYS6_SWITCH EQU $1E ; 1E = "SWITCH"
+SYS6_TIME EQU $24 ; 24 = " TIME "
+SYS6_FORMAT EQU $2A ; 2A = "FORMAT"
+SYS6_DAILY EQU $30 ; 30 = "DAILY "
+SYS6_APPT EQU $36 ; 36 = " APPT "
+SYS6_NO EQU $3c ; 3c = " NO "
+SYS6_APPTS EQU $42 ; 42 = "APPTS "
+SYS6_END_OF EQU $48 ; 48 = "END OF"
+SYS6_LIST EQU $4e ; 4e = " LIST "
+SYS6_DELETE EQU $54 ; 54 = "DELETE"
+SYS6_ANN EQU $5a ; 5a = " ANN "
+SYS6_PHONE EQU $60 ; 60 = "PHONE "
+SYS6_DONE EQU $66 ; 66 = " DONE "
+SYS6_PRI EQU $6c ; 6c = "PRI "
+SYS6_COMM EQU $72 ; 72 = " COMM "
+SYS6_READY EQU $78 ; 78 = "READY "
+SYS6_IN EQU $7e ; 7e = " IN "
+SYS6_ERROR EQU $84 ; 84 = "ERROR "
+SYS6_CEASED EQU $8a ; 8a = "CEASED"
+SYS6_PC EQU $90 ; 90 = "PC- "
+SYS6_WATCH EQU $96 ; 96 = "WATCH "
+SYS6_CHRONO EQU $9c ; 9c = "CHRONO"
+SYS6_TIMER EQU $A2 ; A2 = "TIMER "
+SYS6_000000 EQU $a8 ; a8 = "000000"
+; ae = "MTWTFS"
+; B4 = "SOUEHR"
+; BA = "AUG+74"
+; C0 = "P16174"
+; C6 = "P1OY40"
+; CC = "W+0++0"
+; D2 = "251332"
+; D8 = "0321++"
+; DE = "R++ 0+"
+; E4 = "+12+1T"
+; EA = "+0 0+1"
+; F0 = "26+2U+"
+; F6 = "0 C100"
+; FC = "C0GW"
+;
+PUT6MID EQU $57a9
+; Parameters:
+; A = Offset from 0110 for the start of a 6 byte data item to be put on the top
+; line of the screen. This uses a different encoding for characters where:
+; we have 32 different values which correspond to:
+; "0123456789ABCDEFGH:LMNPRTUWYr -+"
+; e.g. $12=':', $13='L'.
+; It appears that things wrap when you get to $20
+;
+; PUT6MIDA was identified wrong...
+PUTMSG2 EQU $57AD ; This functions just the same as PUTMSG1 except it puts things on the middle line
+CLEARTOP EQU $57d3 ; Puts blanks into all 6 top digits (Blanks out the top line)
+; Parameters:
+; None
+CLEARMID EQU $57d9 ; Puts blanks into all 6 Middle digits (Blanks out the middle line)
+; Parameters:
+; None
+;-------------------------------------------------------------------------
+; These next 6 routines take the two bytes in DATDIGIT1 ($A2) and DATDIGIT2($A3) and put them
+; on the display in the appropriate locations. The digits are represented using the TIMEX6
+; character set.
+;
+PUTTOP12 EQU $57e1 ; Puts DATDIGIT1/2 into TOP Digits 1 and 2
+PUTTOP34 EQU $57f1 ; Puts DATDIGIT1/2 into TOP Digits 3 and 4
+PUTTOP56 EQU $5801 ; Puts DATDIGIT1/2 into TOP Digits 5 and 6
+PUTMID12 EQU $5811 ; Puts DATDIGIT1/2 into Middle Digits 1 and 2
+PUTMID34 EQU $5821 ; Puts DATDIGIT1/2 into Middle Digits 3 and 4
+PUTMID56 EQU $5831 ; Puts DATDIGIT1/2 into Middle Digits 5 and 6
+; These 6 routines blank out parts of the display
+CLRTOP12 EQU $57df ; Puts Blanks into TOP Digits 1 and 2
+CLRTOP34 EQU $57ef ; Puts Blanks into TOP Digits 3 and 4
+CLRTOP56 EQU $57ff ; Puts Blanks into TOP Digits 5 and 6
+CLRMID12 EQU $580f ; Puts Blanks into Middle Digits 1 and 2
+CLRMID34 EQU $581f ; Puts Blanks into Middle Digits 3 and 4
+CLRMID56 EQU $582f ; Puts Blanks into Middle Digits 5 and 6
+;
+FMTXLEAD0 EQU $583f ; Formats into DATDIGIT1/2 with leading zeros
+; Parameters:
+; X - value to be formatted. 0-9 results in 0 followed by the digit
+; 10-99 results in number for both digits
+FMTBLANK0 EQU $584e ; Format into DATDIGIT1/2
+; Parameters:
+; X - value to be formatted. 0 results in all blanks.
+; 1-9 results in blank followed by the digit
+; 10-99 results in number for both digits
+FMTX EQU $5852 ; Format into DATDIGIT1/2
+; Parameters:
+; X - value to be formatted. 0-9 results in blank followed by the digit
+; 10-99 results in number for both digits
+
+FMTSPACE EQU $585d ; Format blankes into DATDIGIT1/2
+; Parameters: NONE
+; This routine simply puts spaces into DATDIGIT1 DATDIGIT2
+;
+SAYEOLMSG EQU $587a ; Puts 'END OF LIST' on the display
+PUTBOT678 EQU $5987 ; Puts three digits into the lower corner of the display.
+; Typically this is the time zone information.
+; Parameters:
+; X - Pointer to 3 byte location containing bytes to put on the display
+; (pointed to by x) 3 bytes in TIMEX ascii. Because the X register iss
+; used to index to them, they must be located in the first 256 bytes of
+; memory.
+PUTDATESEP EQU $59ac ; Put either Dashes or periods on the top line
+
+DIGLOCTOP EQU $5e2f ; Locations of digits on the top line
+DIGLOCMID EQU $5e35 ; Locations of digits on the middle line
+DIGLOCBOT EQU $5e3b ; Locations of digits on the bottom line
+
+;-------------------------------------------------------------------------
+PUT_YEARX EQU $67D5 ; Put the leading zero 2 digit year in the appropriate spot on the display based
+ ; on the current time zone date format
+; Parameters:
+; X - Year to be displayed
+;-------------------------------------------------------------------------
+PUT_MONTHX EQU $67D9 ; Put the leading space 2 digit month in the appropriate spot on the display based
+ ; on the current time zone date format
+; Parameters:
+; X - Month to be displayed
+;-------------------------------------------------------------------------
+PUT_DAYX EQU $67DD ; Put the leading zero 2 digit day in the appropriate spot on the display based
+ ; on the current time zone date format
+; Parameters:
+; X - Day to be displayed
+;-------------------------------------------------------------------------
+SAY_HOURX EQU $67E1 ; Puts up the hour on the display along with an AM/PM indicator and a Colon.
+ ; This code respects the current 12/24 hour format.
+; Parameters:
+; X - Hour to be displayed
+;-------------------------------------------------------------------------
+PUT_MINUTEX EQU $682C ; This puts the minute in the middle two digits on the middle line followed by a period
+; Parameters:
+; X - minute (0-59) to be displayed
+;-------------------------------------------------------------------------
+SHOWSEC_TENS EQU $6839 ; Puts the character at SECOND_TENS onto the next to the last digit on the middle line
+; Parameters:
+; SECOND_TENS - Value to be put on the display
+;-------------------------------------------------------------------------
+SHOWSEC_ONES EQU $6841 ; Puts the character at SECOND_ONES onto the last digit on the middle line
+; Parameters:
+; SECOND_ONES - Value to be put on the display
+;-------------------------------------------------------------------------
+CALC_DOW_X EQU $68DE ; Computes the Day of the Week from the Month, Day, Year information
+; Parameters:
+; X - Pointer to Month, Day, Year block
+;-------------------------------------------------------------------------
+ACQUIRE EQU $68F1 ; Disable interrupts for a short piece of code
+RELEASE EQU $68FB ; Reenable interrupts
+;-------------------------------------------------------------------------
+GET_MONTHLEN EQU $6902 ; Computes the number of days in a given month
+; Parameters:
+; PARM_MONTH, PARM_YEAR contain the month and year to look for
+; Returns:
+; A - Number of days in the month
+;-------------------------------------------------------------------------
+SETALL EQU $5a9c ; Turn on all segments on the display
+INCA_WRAPX EQU $6B16 ; Advance to the next value wrapped within a range
+; Parameters:
+; A - Number to be incremented
+; X - Range to hold number within
+;-------------------------------------------------------------------------
+GETBCDHI EQU $6B5b
+; Parameters:
+; X - Hex value to be converted (Range 0-99)
+; Returns:
+; A - High byte of number in timex ascii
+;-------------------------------------------------------------------------
+GETBCDLOW EQU $6B63
+; Parameters:
+; X - Hex value to be converted (Range 0-99)
+; Returns:
+; A - Low byte of number in timex ascii
+;-------------------------------------------------------------------------
+TABHEX2BCD EQU $6b69 ; 100 bytes from 6b69-6bcc
+; This is a 100 byte table of HEX to BCD conversion values. You can take the value you want
+; to convert, load it into the X register and then load TABHEX2BCX,X. To get the high order byte,
+; just shift it right by 4. The low order is just an and with $0f.
+
+SYS_26 EQU $26
+MODE_FLAGS EQU $68 ; FLAGS
+ ; Bit0 = Indicates that we are in alarm set mode (SET=IN SET MODE)
+ ; Bit1 = Indicates that we have a backup mode pending alarm (SET=PENDING)
+ ; Bit2 = Indicates that hourly chimes are to be played (SET=ENABLED)
+ ; Bit3 = Indicates that hourly chimes are temporarily disabled (SET=DISABLED)
+ ; Bit4 = Enables beep for any button pressed (SET=BEEP)
+ ; Bit5 = Indicates that we are in COMM Mode (SET=IN COMM Mode)
+ ; Bit6 = Indicates that ALARM SET MODE is on the display (SET=On Display)
+ ; Bit7 = <UNUSED>
+APP_FLAGS EQU $8f ; System Flags
+ ; Bit0 = Event has been posted (SET=TRUE)
+ ; Bit1 = We want to allow the app to be suspended (SET=ALLOW)
+ ; Bit2 = Run a nested application (SET=TRUE) - only for ALARM,APPT, WRISTAPP
+ ; Bit3 = A button beep has already been played (SET=PLAYED)
+ ; Bit4 = <UNUSED>
+ ; Bit5 = <UNUSED>
+ ; Bit6 = <UNUSED>
+ ; Bit7 = <UNUSED>
+BTNFLAGS EQU $90 ; Flags for the timer. Note that bits 5 and 7 are exclusive because they happen to
+ ; use the same variables to hold their information.
+ ; Bit0 = <UNUSED>
+ ; Bit1 = wristapp wants a 1/10 second timer function called (WRIST_DOTIC) (SET=CALL)
+ ; Bit2 = Indicates a blink routine is pending (SET=PENDING)
+ ; Bit3 = Indicates a scrolling message is pending (SET=PENDING)
+ ; Bit4 = Indicates an update routine is pending (SET=PENDING)
+ ; Bit5 = Indicates a blink routine has been established (SET=ACTIVE)
+ ; Bit6 = Indicates a scrolling message is in progress (SET=ACTIVE)
+ ; Bit7 = Indicates an update routine has been established (SET=ACTIVE)
+BTNSTATE EQU $91 ; Current event/button press
+TIMER_FLAGS EQU $94 ; System Flags
+ ; Bit0 = Indicates that the timer2 timer has been enabled (SET=ENABLED)
+ ; Bit1 = Indicates that the TIC timer has been enabled (SET=ENABLED)
+ ; Bit2 = Indicates that we want to turn off the indiglo automatically (SET=TURN OFF)
+ ; Bit3 = Indicates that they have done something in this applet (SET=done something)
+ ; Bit4 = Request to reset the watch (SET=Reset Watch)
+ ; Bit5 = Request to turn off the INDIGLO at some future time
+ ; Bit6 = <UNUSED>
+ ; Bit7 = ????Related to indicating that sound is currently playing
+MAIN_FLAGS EQU $95 ; Flags to set queue requests to do something in the main loop
+ ; Bit0 = Indicates that a button has changed state (SET=CHANGED)
+ ; Bit1 = Indicates that the current app should be suspended and TIME activated (SET=Suspend)
+ ; Bit2 = Indicates that the TIMER_TICS has been updated (SET=Updated)
+ ; Bit3 = Indicates that the hourly chimes need to be played (SET=Please Play)
+ ; Bit4 = Indicates that the appointments should be checked (SET=Please Check)
+ ; Bit5 = Indicates that the anniversaries need to be checked (SET=Please Check)
+ ; Bit6 = <UNUSED>
+ ; Bit7 = <UNUSED>
+WRISTAPP_FLAGS EQU $96 ; System Flags
+ ; Bit0 = wristapp wants a second timer function called at start of interrupt (WRIST_DOTIC) (SET=CALL)
+ ; Bit1 = wristapp wants a call once a minute when it changes (WRIST_DOTIC) (SET=CALL)
+ ; Bit2 = wristapp wants a call once an hour when it changes (WRIST_DOTIC) (SET=CALL)
+ ; Bit3 = wristapp wants a call once a day when it changes (WRIST_DOTIC) (SET=CALL)
+ ; Bit4 = Play button beep sound on wristapp for any button (SET=ENABLE)
+ ; Bit5 = Play button beep sound on wristapp for mode button (SET=ENABLE)
+ ; Bit6 = Uses system rules for button beep decisions (SET=SYSTEM RULES)
+ ; Bit7 = Wristapp has been loaded (SET=LOADED)
+NEST_PARM EQU $99 ; Holds the parameter passed to the current nested app
+SYSSOUND EQU $9B ; Current sound to be played
+HW_FLAGS EQU $9e ; System Variable
+ ; Bit0 = Request state for Indiglo light (SET=ON)
+ ; Bit1 = Indicates the the SYS_07 hardware has been reset
+ ; Bit2 = <UNUSED>
+ ; Bit3 = Indicates that we want to load some code from the serial port at reset (SET=ON)
+ ; Bit4 = Set but never used. Mimics the state of 0,PORT_C_DATA & 0,PORT_C_DDR
+ ; Bit5 = Set but never used. Mimics the state of 1,PORT_C_DATA & 1,PORT_C_DDR
+ ; Bit6 = Indicates that INST_ADDR is a pointer into the EEPROM (SET=EEPROM Address)
+ ; Bit7 = Interrupts have been disabled (SET=DISABLED)
+SYSFLAGS EQU $9F ; System flags
+ ; Bit0 = Indicates the update direction. (SET=UP)
+ ; Bit1 = Indicates that the screen needs to be cleared (SET=no need to clear)
+ ; Also used as part of a the digit blinking code (SET=Show digits)
+ ; Bit2 = Indicates that the end of a scrolling message has been reached (SET=END)
+ ; Bit3 = User vs system string (SET=User String)
+ ; Bit4 = <UNUSED>
+ ; Bit5 = <UNUSED>
+ ; Bit6 = <UNUSED>
+ ; Bit7 = <UNUSED>
+DATDIGIT1 EQU $A2 ; First digit parameter for PUTMIDnn/PUTTOPnn routines
+DATDIGIT2 EQU $A3 ; Second digit parameter for PUTMIDnn/PUTTOPnn routines
+UPDATE_VAL EQU $a6 ; Temporary value passed to the update/blink routines
+UPDATE_PARM EQU $a7 ; Pointer to the data passed to the update/blink routines
+;
+; The sound in SYSSOUND can be set to one of the following values:
+;
+SND_HOURLY EQU $83 ; HOURLY CHIME
+SND_APPT EQU $85 ; APPOINTMENT BEEP
+SND_ALARM EQU $86 ; ALARM BEEP
+SND_DLOAD EQU $87 ; PROGRAM DOWNLOAD
+SND_EXTRA EQU $88 ; EXTRA
+SND_COMERR EQU $89 ; COMM ERROR
+SND_DONE EQU $8A ; COMM DONE
+SND_BUTTON EQU $c1 ; BUTTON BEEP
+SND_RETURN EQU $c2 ; RETURN TO TIME
+SND_CONF EQU $c4 ; CONFIRMATION
+
+APPT_PROMBASE EQU $0100 ; Address of the first entry for Appointments in the EEPROM
+LIST_PROMBASE EQU $0102 ; Address of the first entry for LISTs in the EEPROM
+PHONE_PROMBASE EQU $0104 ; Address of the first entry for PHONE numbers in the EEPROM
+ANNIV_PROMBASE EQU $0106 ; Address of the first entry for Anniversaries in the EEPROM
+APPT_ENTRIES EQU $0108 ; Number of currently loaded Appointment entries
+LIST_ENTRIES EQU $0109 ; Number of currently loaded LIST entries
+PHONE_ENTRIES EQU $010a ; Number of currently loaded Phone number entries
+ANNIV_ENTRIES EQU $010b ; Number of currently loaded Anniversary entries
+APPT_BASEYEAR EQU $010c ; The year for the first loaded appointment
+APPT_PRETIME EQU $010d ; How many minutes ahead of time to announce an appointment
+COMM_010e EQU $010e ; ????
+; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
+SND_BASEOFF EQU $010f ; Sound base pointer - All sounds are this base relative to SND_BASE (0336)
+WRIST_MAIN EQU $0110 ; This is the primary initialization entry point for a Wristapp
+WRIST_SUSPEND EQU $0113 ; This is the entry point called immediately before suspending the wristapp
+WRIST_DOTIC EQU $0116 ; This is the entry point called for a timer tic in a wristapp
+WRIST_INCOMM EQU $0119 ; This is called when the COMM app is suspending the wristapp which has requests to process timer events
+WRIST_NEWDATA EQU $011c ; This is the wristapp entry point called when new data has been downloaded to the watch
+WRIST_GETSTATE EQU $011f ; Entry to get a wristapp state table entry
+WRIST_JMP_STATE0 EQU $0123 ; Wristapp entry point to call state 0
+
+INST_ADDRHI EQU $0437
+INST_ADDRLO EQU $0438
+USER04a1 EQU $04a1
+NESTED_APP EQU $04a2 ; Nested application (Only to run an application while a different one is running)
+ ; This is used to handle alarms and appointments that go off while you are running something else
+APP2_ALARM EQU 9 ; 9 = Alarm (while another app is running)
+APP2_APPT EQU 10 ; 10 = Appointment (while another app is running)
+APP2_WRIST EQU 11 ; 11 = Wristapp (while another app is running)
+NESTED_PARM EQU $04a4 ; Parameter passed to the nested app call
+USER04c3 EQU $04c3
+BUF_PHONENUM EQU $043a ; 12 byte buffer to hold a decompressed phone number
+EXTRACTBUF EQU $0446 ; 32 byte buffer to hold extracted data from the EEPROM
+UPDATE_POS EQU $04f3 ; Position to update a segment or digit in the blink/refresh routines
+;
+; These two constants appear to be associated with the PUTSCROLLMSG and SCROLLMSG routines
+;
+SEPARATOR EQU $3F ; Indicates the end of a scrolling string
+MSGBUF EQU $04d2 ; Location of the system buffer for a scrolling string
+CURRENT_APP EQU $04c1 ; The current application number (1-8)
+APP_TIME EQU 1 ; 1 = Time of Day
+APP_ALARM EQU 2 ; 2 = Alarm
+APP_APPT EQU 3 ; 3 = Appointment
+APP_ANNIV EQU 4 ; 4 = Anniversary
+APP_PHONE EQU 5 ; 5 = Phone number
+APP_LIST EQU 6 ; 6 = List
+APP_COMM EQU 7 ; 7 = Communication
+APP_WRIST EQU 8 ; 8 = Wristapp (if downloaded)
+BTN_PRESSED EQU $04c3 ; The button currently pressed (For EVT_ANY or EVT_ANY4 events) 0=NEXT 1=MODE 2=SET 3=PREV 4=GLOW
+EFFECTIVE_APP EQU $04c4 ; The efective application
+APP_13 EQU 13 ; Some submode of the TIME application
+APP_TIME_SET EQU 14 ; Submode of the TIME application
+UPDATE_MIN EQU $04f4 ; Minimum value for the update function to generate. At this, it wraps to UPDATE_MAX
+UPDATE_MAX EQU $04f5 ; Maximum value for the update function to generate. At this, it wraps to UPDATE_MIN
+PARM_MONTH EQU $04f9 ; Month parameter
+PARM_YEAR EQU $04fa ; Current year also...
+
+WATCHTIMER EQU $7ff0
+;
+; Other random routines which you might call....
+;
+ALARM_BLINKSEL EQU $40a5
+ALARM_UPDATESEL EQU $40a9
+ALARM_SELMIN EQU $40aD
+ALARM_SELMAX EQU $40b1
+FIND_ANNIV_TODAY EQU $40bc
+FIND_ANNIV_SCAN EQU $40c2
+ANNIV_NEXT_ENTRY EQU $40d0
+ANNIV_PREV_ENTRY EQU $4106
+FIND_ANNIV_ENTRY EQU $414E
+CHECK_ANNIVERSARIES EQU $41EB
+SET_ANNIVTEST_TODAY EQU $4229
+ANNIV_GETMONTHLEN EQU $4259
+TEST_ANNIVERSARY EQU $4277
+ANNIV_COPY_INFO EQU $42F7
+READ_ANNIV_CURRENT EQU $4306
+READ_ANNIV_FIRST EQU $4315
+READ_ANNIV_NEXT EQU $4324
+TEST_SCAN_START EQU $4335
+FIX_SCAN_YEAR EQU $4360
+TEST_SCAN_END EQU $436D
+RESTORE_SCAN_YEAR EQU $439D
+INCREMENT_SCAN_DATE EQU $43A8
+GET_SCAN_MONTHLEN EQU $43CF
+DECREMENT_SCAN_DATE EQU $43E3
+FIND_APPT_NOW EQU $4404
+FIND_APPT_SCAN EQU $440A
+SET_APPTFIND_SCAN EQU $4411
+READ_APPT_NEXT EQU $441B
+APPT_LATCH_ENTRYDATA EQU $4457
+APPT_LATCH_ENTRYONLY EQU $445B
+READ_APPT_PREV EQU $446B
+FIND_APPT_ENTRY EQU $44B5
+APPT_LATCH_ENTDYDATA EQU $4594
+CHECK_APPOINTMENTS EQU $45A8
+SET_APPTFIND_NOW EQU $4619
+READ_APPT_FIRST EQU $4675
+READ_APPT_LAST EQU $468C
+CHECK_APPT_TIME EQU $46A6
+READ_APPT_PACKET1 EQU $4729
+READ_NEXT_APPT_PACKET EQU $4738
+READ_APPT_CURRENT EQU $4749
+PROCESS_EVENTS EQU $4862
+DO_ANYAPP_EVENT EQU $49ae
+DO_NESTAPP_EVENT EQU $49b1
+DO_APP_EVENT EQU $49ed
+DO_NORMAL_STATE EQU $4a24
+TRANSITION_RBUTTON EQU $4b5d
+TRANSITION_LBUTTON EQU $4bac
+QUEUE_INDIGLO_OFF EQU $4bf1
+QUEUE_INDIGLO_OFF EQU $4c38
+NIGHTMODE_INDIGLO_ON EQU $4c45
+INDIGLO_ON EQU $4c4b
+PROCESS_REQUESTS EQU $4C55
+TIMER1_INTERVALS EQU $4c93
+TIMER2_INTERVALS EQU $4c9e
+DO_EVENT EQU $4Cb8
+GETSTATE EQU $4d12
+GETSTATE_TAB EQU $4D22
+CHECK_COMPATIBLE_EVENT EQU $4Daa
+STOP_ALL_SOUND EQU $4E57
+PREPARE_TIMER2_TIMER EQU $4E85
+PLAY_HOURLY EQU $4EA0
+PAUSE_WATCH EQU $4EB6
+RESUME_WATCH EQU $4ECD
+RESUME_UPDATE EQU $4EE5
+ACQUIRE_TIME EQU $4F11
+RELEASE_TIME EQU $4F1D
+PLAY_BUTTON_SAFE EQU $4F35
+PREPARE_NEST_CALL EQU $4F8F
+UNPACK_PHONENUM EQU $4FAE
+PHONE_UNPACK_VAL EQU $4FCF
+UNPACK_STRING EQU $4FDF
+READ_PACKET EQU $502D
+FIND_PACKET EQU $5033
+DO_TRANSFER EQU $504E
+TOGGLE_ENTRYFLAG EQU $5066
+MAKE_INST_LDA EQU $50A3
+MAKE_INST_LDA_X EQU $50A7
+MAKE_INST_STA EQU $50AB
+ADD_INSTADDR EQU $50B6
+SET_INSTADDR_0110 EQU $50C6
+GET_INST_BYTE EQU $50DA
+WRITE_FLAG_BYTE EQU $50F9
+FILL_EXTRACTBUF EQU $512D
+SAVE_EXTRACTBUF EQU $514C
+SYSTEM_RESET EQU $518A
+SND_OFF EQU $5213
+DO_SOUND EQU $5225
+SET_SYS_0f_4d EQU $52c0
+SET_SYS_0f_41 EQU $52C5
+ENABLE_EYE EQU $5367
+SERIAL_DELAY EQU $5375
+DISABLE_EYE EQU $537E
+SET_SYS_07 EQU $5389
+CLEAR_SYS_07 EQU $5390
+RESET_SYS_07 EQU $5396
+INITHW_SYS_07 EQU $539D
+SETHW_07_08_C1 EQU $53B5
+WRITE_ACQUIRE EQU $542b
+WRITE_RELEASE EQU $5437
+MAKE_INST2_LDA_X EQU $5442
+MAKE_INST2_STA_X EQU $5446
+PROM_READ EQU $5451
+PROM_WRITE EQU $5477
+READ_EEPROM_PORT EQU $54BB
+PROM_STARTIO EQU $54C5
+PROM_ACQUIRE EQU $54D1
+PROM_RELEASE EQU $54DB
+PROM_SHOW EQU $54E2
+PROM_HIDE EQU $54E7
+DO_SCROLL EQU $5555
+DO_BLINK EQU $55b7
+PUTDOWTOP EQU $5773
+FMTBLANK0B EQU $5864
+SAYHOLDTODELETE EQU $588b
+PUT_PHONENUM EQU $58a3
+PUTYEARMID EQU $58da
+CLEAR_HMONTH EQU $58f9
+PUT_HMONTHX EQU $58Fe
+CLEAR_HDAY EQU $5912
+PUT_HDAYX EQU $5917
+FIXLEAD0 EQU $592b
+CLEAR_MONTH EQU $5937
+IPUT_MONTHX EQU $593c
+CLEAR_DAY EQU $5950
+IPUT_DAYX EQU $5955
+CLEAR_YEAR EQU $5970
+IPUT_YEARX EQU $5975
+PUTHALFDATESEP EQU $59a1
+PUT_LETTERX EQU $59cf
+PUT_HOURX EQU $59da
+CLEAR_RANGE EQU $5abf
+SYSSYMVALS EQU $5adc
+PHONE_NEXT_ENTRY EQU $6176
+PHONE_PREV_ENTRY EQU $6195
+PHONE_READ_CURRENT EQU $61B0
+PHONE_SHOW_CURRENT EQU $61B9
+PHONE_FIND_SCAN_ENTRY EQU $61FA
+PHONE_READ_ENTRY EQU $6235
+PHONE_READ_NEXT_ENTRY EQU $6246
+PHONE_READ_FIRST_NEXT EQU $625A
+UPDATE_SECONDS EQU $6267
+ADJUST_TZ1TIME EQU $62E0
+ADJUST_TZ2TIME EQU $634C
+UPDATE_TZ1DISP EQU $63B8
+UPDATE_TZ2DISP EQU $63EF
+TIME_SET_BLINKON EQU $6669
+TIME_SET_BLINKOFF EQU $666d
+TIME_SET_GET_TIMEPTR EQU $6684
+TIME_SET_SHOWDISPLAY EQU $6693
+TIME_GET_BLINKPARM EQU $66ee
+SHOW_TIME_DISPLAY EQU $6773
+CLEAR_PM EQU $681E
+CLEAR_AM EQU $6825
+SHOWNIGHT_SYM EQU $6849
+SAY_HOLD_TO EQU $685E
+FIX_TMAPP_DAY EQU $686A
+TMAPP_COPYTZ1 EQU $688A
+TMAPP_COPYTZ2 EQU $6895
+GETTZNAME EQU $68A0
+GET_MONTHDAYX EQU $68A8
+GET_YEAR EQU $68BB
+GET_HOURFORMAT EQU $68C4
+GET_DATEFMT EQU $68D4
+COPY_MDY EQU $68E4
+CHECK_TZ EQU $6917
+CALC_DOW EQU $6925
+TIME_BLINKSEL EQU $69AD
+TIME_UPDATESEL EQU $69B8
+TIME_SELMIN EQU $69c3
+TIME_SELMAX EQU $69ce
+LIST_GO_NEXT EQU $6AA8
+LIST_GO_PREV EQU $6AB6
+LIST_DISPLAY_CURRENT EQU $6AC4
+CLEAR_WRISTAPPMEM EQU $6b28
+DELAY_X EQU $6b3a
+DELAY_X16 EQU $6b4c
+SHOWNOTE_SYM EQU $6C56
+SHOWALARM_SYM EQU $6C6a
+ALARM_CHECK EQU $6c9c
+ALARM_START_BLINK EQU $6Ea6
+ALARM_CALL_BLINK EQU $6EAd
+ALARM_GET_BLINKPARM EQU $6Ec0
+ALARM_DISPLAY_CURRENT EQU $6EFD
+ALARM_SHOW_HOURLYNOTE EQU $6F42
+ALARM_SHOW_ALARMSYM EQU $6F53
+ALARM_SHOW_AMPM EQU $6F64
+ALARM_SHOW_TEXTCHAR EQU $6F85
+ALARM_FIX_HOUR EQU $6F91
+ALARM_GET_DISPLAYHOUR EQU $6FA9
+ALARM_SET_CURRENT EQU $6FC7
+ALARM_SAVE_STATUS EQU $6FDE
+ALARM_GET_TEXTOFFSET EQU $6FE5
+ALARM_GET_DATAOFFSET EQU $6FEE
+MASK_ALARMS EQU $6FFC
+UNMASK_ALARMS EQU $7009
+ANNIV_SHOW_DATE EQU $718D
+ANNIV_SHOW_SCAN_DATE EQU $71A8
+ANNIV_SHOW_CURRENT EQU $71B5
+SHOWREMIND_SYM EQU $71DF
+OFFREMIND_SYM EQU $71F7
+SAY_NO_ANN_ENTRIES EQU $71FE
+APPT_SHOW_TIME EQU $73E0
+APPT_SHOW_DATE EQU $7442
+APPT_SHOW_SCAN EQU $745D
+APPT_SHOW_CURRENT EQU $746A
+APPT_SHOW_UPCOMING EQU $7497
+SAY_NO_APPT_ENTRIES EQU $74C6