home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1990-09-04 | 8.9 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Simis (archive/simis)
| ext
| Unsupported |
| 100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 70 20 6c 73 74 20 6f | 66 66 0d 20 74 72 20 6f |.p lst o|ff. tr o|
|00000010| 6e 0d 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |n.******|********|
|00000020| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000030| 2a 2a 0d 2a a0 a0 a0 a0 | a0 a0 a0 a0 a0 a0 a0 a0 |**.*....|........|
|00000040| a0 a0 a0 a0 a0 a0 a0 a0 | a0 a0 a0 a0 a0 a0 a0 a0 |........|........|
|00000050| a0 a0 2a 0d 2a a0 a0 a0 | a0 a0 a0 73 45 54 a0 73 |..*.*...|...sET.s|
|00000060| 4d 41 52 54 57 41 54 43 | 48 31 32 38 a0 a0 a0 a0 |MARTWATC|H128....|
|00000070| a0 a0 a0 2a 0d 2a a0 a0 | a0 a0 a0 a0 a0 a0 a0 a0 |...*.*..|........|
|00000080| 76 45 52 53 49 4f 4e a0 | 32 a0 a0 a0 a0 a0 a0 a0 |vERSION.|2.......|
|00000090| a0 a0 a0 a0 2a 0d 2a a0 | a0 a0 a0 a0 a0 a0 a0 a0 |....*.*.|........|
|000000a0| a0 a0 a0 a0 a0 a0 a0 a0 | a0 a0 a0 a0 a0 a0 a0 a0 |........|........|
|000000b0| a0 a0 a0 a0 a0 2a 0d 2a | a0 a0 a0 a0 a0 a0 a0 65 |.....*.*|.......e|
|000000c0| 52 49 43 a0 63 2e a0 72 | 41 46 41 4e 41 4e a0 a0 |RIC.c..r|AFANAN..|
|000000d0| a0 a0 a0 a0 a0 a0 2a 0d | 2a a0 a0 a0 a0 a0 a0 a0 |......*.|*.......|
|000000e0| 61 55 47 55 53 54 a0 32 | 38 2c a0 31 39 39 30 a0 |aUGUST.2|8,.1990.|
|000000f0| a0 a0 a0 a0 a0 a0 a0 2a | 0d 2a a0 a0 a0 a0 a0 a0 |.......*|.*......|
|00000100| a0 a0 a0 a0 a0 a0 a0 a0 | a0 a0 a0 a0 a0 a0 a0 a0 |........|........|
|00000110| a0 a0 a0 a0 a0 a0 a0 a0 | 2a 0d 2a 2a 2a 2a 2a 2a |........|*.******|
|00000120| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000130| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0d 0d 2a 2a 2a 2a |********|**..****|
|00000140| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000150| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000160| 2a 2a 2a 0d 2a a0 a0 a0 | a0 a0 a0 a0 a0 a0 a0 a0 |***.*...|........|
|00000170| 63 4f 4d 4d 41 4e 44 a0 | 73 59 4e 54 41 58 a0 a0 |cOMMAND.|sYNTAX..|
|00000180| a0 a0 a0 a0 a0 a0 a0 a0 | a0 a0 2a 0d 2a a0 a0 a0 |........|..*.*...|
|00000190| a0 a0 a0 a0 a0 a0 a0 a0 | a0 a0 a0 a0 a0 a0 a0 a0 |........|........|
|000001a0| a0 a0 a0 a0 a0 a0 a0 a0 | a0 a0 a0 a0 a0 a0 a0 a0 |........|........|
|000001b0| a0 a0 2a 0d 2a a0 73 79 | 73 a0 36 30 30 30 2c a0 |..*.*.sy|s.6000,.|
|000001c0| 4d 4f 4e 54 48 2c a0 44 | 41 59 2c a0 59 45 41 52 |MONTH,.D|AY,.YEAR|
|000001d0| 2c a0 57 45 45 4b 44 41 | 59 a0 2a 0d 2a a0 a0 a0 |,.WEEKDA|Y.*.*...|
|000001e0| a0 a0 a0 a0 a0 a0 a0 a0 | a0 a0 a0 a0 a0 a0 a0 a0 |........|........|
|000001f0| a0 a0 a0 a0 a0 a0 a0 a0 | a0 a0 a0 a0 a0 a0 a0 a0 |........|........|
|00000200| a0 a0 2a 0d 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |..*.****|********|
|00000210| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000220| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0d 0d 20 6f 72 |********|***.. or|
|00000230| 67 20 24 31 37 37 30 0d | 0d 20 6a 6d 70 20 6d 61 |g $1770.|. jmp ma|
|00000240| 69 6e 0d 0d 2a 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |in..*===|========|
|00000250| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000260| 3d 3d 3d 3d 0d 2a a0 a0 | a0 a0 a0 a0 a0 a0 a0 a0 |====.*..|........|
|00000270| a0 65 51 55 41 54 45 53 | 0d 2a 3d 3d 3d 3d 3d 3d |.eQUATES|.*======|
|00000280| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000290| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 0d 0d 20 75 73 65 20 |========|=.. use |
|000002a0| 22 53 4d 57 a0 45 51 55 | 41 54 45 53 22 0d 0d 2a |"SMW.EQU|ATES"..*|
|000002b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000002c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 0d |========|=======.|
|000002d0| 2a a0 a0 a0 a0 a0 73 54 | 4f 52 41 47 45 a0 41 4e |*.....sT|ORAGE.AN|
|000002e0| 44 a0 53 55 43 48 2e 2e | 2e 2e 0d 2a 3d 3d 3d 3d |D.SUCH..|...*====|
|000002f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000300| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 0d 0d 2a a0 77 |========|===..*.w|
|00000310| 41 4b 45 2d 55 50 a0 50 | 41 54 54 45 52 4e a0 46 |AKE-UP.P|ATTERN.F|
|00000320| 4f 52 a0 54 48 45 a0 73 | 4d 41 52 54 57 41 54 43 |OR.THE.s|MARTWATC|
|00000330| 48 2e 0d 0d 70 61 74 74 | 65 72 6e 20 68 65 78 20 |H...patt|ern hex |
|00000340| 63 35 2c 33 61 2c 61 33 | 2c 35 63 2c 63 35 2c 33 |c5,3a,a3|,5c,c5,3|
|00000350| 61 2c 61 33 2c 35 63 0d | 0d 2a a0 73 54 4f 52 41 |a,a3,5c.|.*.sTORA|
|00000360| 47 45 a0 54 4f a0 48 4f | 4c 44 a0 44 41 54 41 a0 |GE.TO.HO|LD.DATA.|
|00000370| 46 52 4f 4d a0 73 4d 41 | 52 54 57 41 54 43 48 2e |FROM.sMA|RTWATCH.|
|00000380| 0d 0d 74 65 6e 74 68 73 | 20 64 62 20 30 0d 73 65 |..tenths| db 0.se|
|00000390| 63 6f 6e 64 73 20 64 62 | 20 30 0d 6d 69 6e 75 74 |conds db| 0.minut|
|000003a0| 65 73 20 64 62 20 30 0d | 68 6f 75 72 20 64 62 20 |es db 0.|hour db |
|000003b0| 30 0d 77 65 65 6b 64 61 | 79 20 64 62 20 30 0d 64 |0.weekda|y db 0.d|
|000003c0| 61 79 20 64 62 20 30 0d | 6d 6f 6e 74 68 20 64 62 |ay db 0.|month db|
|000003d0| 20 30 0d 79 65 61 72 20 | 64 62 20 30 0d 0d 2a a0 | 0.year |db 0..*.|
|000003e0| 6f 4c 44 a0 76 41 4c 55 | 45 53 a0 41 4e 44 a0 6d |oLD.vALU|ES.AND.m|
|000003f0| 49 53 43 45 4c 4c 41 4e | 45 4f 55 53 2e 0d 0d 6f |ISCELLAN|EOUS...o|
|00000400| 6c 64 6d 6d 75 20 64 62 | 20 30 20 3b 6f 4c 44 a0 |ldmmu db| 0 ;oLD.|
|00000410| 6d 6d 75 a0 63 4f 4e 46 | 49 47 55 52 41 54 49 4f |mmu.cONF|IGURATIO|
|00000420| 4e 2e 0d 6f 6c 64 64 64 | 72 61 20 64 62 20 30 20 |N..olddd|ra db 0 |
|00000430| 3b 6f 4c 44 a0 63 69 61 | a0 23 31 a0 64 41 54 41 |;oLD.cia|.#1.dATA|
|00000440| a0 64 49 52 45 43 54 49 | 4f 4e a0 72 45 47 49 53 |.dIRECTI|ON.rEGIS|
|00000450| 54 45 52 a0 76 41 4c 55 | 45 2e 0d 6f 6c 64 73 70 |TER.vALU|E..oldsp|
|00000460| 65 65 64 20 64 62 20 30 | 20 3b 6f 4c 44 a0 63 4c |eed db 0| ;oLD.cL|
|00000470| 4f 43 4b a0 73 50 45 45 | 44 2e 0d 6f 6c 64 67 70 |OCK.sPEE|D..oldgp|
|00000480| 20 64 73 20 36 20 3b 6f | 4c 44 a0 56 41 4c 55 45 | ds 6 ;o|LD.VALUE|
|00000490| 53 a0 4f 46 a0 7a 70 a0 | 57 4f 52 4b 53 50 41 43 |S.OF.zp.|WORKSPAC|
|000004a0| 45 2e 0d 0d 2a a0 74 48 | 49 53 a0 54 45 58 54 a0 |E...*.tH|IS.TEXT.|
|000004b0| 57 49 4c 4c a0 42 45 a0 | 45 4d 42 45 44 44 45 44 |WILL.BE.|EMBEDDED|
|000004c0| a0 49 4e 54 4f a0 54 48 | 45 a0 6d 6c a0 43 4f 44 |.INTO.TH|E.ml.COD|
|000004d0| 45 2e 0d 0d 20 74 78 74 | 20 27 63 4f 50 59 52 49 |E... txt| 'cOPYRI|
|000004e0| 47 48 54 a0 31 39 39 30 | a0 2d a0 61 4c 4c a0 72 |GHT.1990|.-.aLL.r|
|000004f0| 49 47 48 54 53 a0 72 45 | 53 45 52 56 45 44 2e 27 |IGHTS.rE|SERVED.'|
|00000500| 0d 20 74 78 74 20 27 6f | 6b a0 54 4f a0 55 53 45 |. txt 'o|k.TO.USE|
|00000510| a0 41 4e 44 a0 44 49 53 | 54 52 49 42 55 54 45 2c |.AND.DIS|TRIBUTE,|
|00000520| a0 4e 4f 54 a0 54 4f a0 | 53 45 4c 4c 2e 27 0d 0d |.NOT.TO.|SELL.'..|
|00000530| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000540| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000550| 0d 2a a0 a0 a0 a0 a0 a0 | a0 a0 a0 6d 41 49 4e a0 |.*......|...mAIN.|
|00000560| 72 4f 55 54 49 4e 45 0d | 2a 2a 2a 2a 2a 2a 2a 2a |rOUTINE.|********|
|00000570| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000580| 2a 2a 2a 2a 2a 2a 2a 2a | 0d 0d 6d 61 69 6e 20 6a |********|..main j|
|00000590| 73 72 20 69 6e 69 74 20 | 3b 69 4e 49 54 49 41 4c |sr init |;iNITIAL|
|000005a0| 49 5a 45 a0 54 48 45 a0 | 73 59 53 54 45 4d 2e 0d |IZE.THE.|sYSTEM..|
|000005b0| 20 6a 73 72 20 77 61 6b | 65 75 70 20 3b 69 4e 49 | jsr wak|eup ;iNI|
|000005c0| 54 49 41 4c 49 5a 45 a0 | 54 48 45 a0 73 4d 41 52 |TIALIZE.|THE.sMAR|
|000005d0| 54 57 41 54 43 48 2e 0d | 20 6a 73 72 20 67 65 74 |TWATCH..| jsr get|
|000005e0| 5f 64 61 74 65 20 3b 67 | 45 54 a0 54 48 45 a0 64 |_date ;g|ET.THE.d|
|000005f0| 41 54 45 2e 0d 20 6a 73 | 72 20 67 65 74 5f 74 69 |ATE.. js|r get_ti|
|00000600| 6d 65 20 3b 67 45 54 a0 | 54 48 45 a0 73 59 53 54 |me ;gET.|THE.sYST|
|00000610| 45 4d a0 74 49 4d 45 2e | 0d 20 6a 73 72 20 73 65 |EM.tIME.|. jsr se|
|00000620| 74 5f 73 6d 77 20 3b 73 | 45 4e 44 a0 54 48 45 a0 |t_smw ;s|END.THE.|
|00000630| 74 49 4d 45 a0 41 4e 44 | a0 64 41 54 45 a0 54 4f |tIME.AND|.dATE.TO|
|00000640| a0 54 48 45 a0 73 4d 41 | 52 54 57 41 54 43 48 2e |.THE.sMA|RTWATCH.|
|00000650| 0d 20 6a 73 72 20 72 65 | 73 74 6f 72 65 20 3b 72 |. jsr re|store ;r|
|00000660| 45 53 54 4f 52 45 a0 54 | 4f a0 4f 52 49 47 49 4e |ESTORE.T|O.ORIGIN|
|00000670| 41 4c a0 45 4e 56 49 52 | 4f 4e 4d 45 4e 54 2e 0d |AL.ENVIR|ONMENT..|
|00000680| 20 72 74 73 20 20 3b 72 | 45 54 55 52 4e a0 54 4f | rts ;r|ETURN.TO|
|00000690| a0 62 61 73 69 63 a0 28 | 4f 52 a0 63 41 4c 4c 49 |.basic.(|OR.cALLI|
|000006a0| 4e 47 a0 72 4f 55 54 49 | 4e 45 29 2e 0d 0d 2a 3d |NG.rOUTI|NE)...*=|
|000006b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000006c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 0d 2a |========|======.*|
|000006d0| a0 a0 a0 a0 69 4e 49 54 | 49 41 4c 49 5a 45 a0 54 |....iNIT|IALIZE.T|
|000006e0| 48 45 a0 70 52 4f 47 52 | 41 4d 0d 2a 3d 3d 3d 3d |HE.pROGR|AM.*====|
|000006f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000700| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 0d 0d 2a a0 69 |========|===..*.i|
|00000710| 4e 54 45 52 52 55 50 54 | 53 a0 41 52 45 a0 44 49 |NTERRUPT|S.ARE.DI|
|00000720| 53 41 42 4c 45 44 a0 42 | 45 43 41 55 53 45 a0 57 |SABLED.B|ECAUSE.W|
|00000730| 45 a0 46 4f 4f 4c a0 41 | 52 4f 55 4e 44 a0 57 49 |E.FOOL.A|ROUND.WI|
|00000740| 54 48 a0 63 69 61 a0 23 | 31 0d 2a a0 57 48 49 43 |TH.cia.#|1.*.WHIC|
|00000750| 48 a0 49 53 a0 55 53 45 | 44 a0 42 59 a0 54 48 45 |H.IS.USE|D.BY.THE|
|00000760| a0 73 59 53 54 45 4d a0 | 54 4f a0 52 45 41 44 a0 |.sYSTEM.|TO.READ.|
|00000770| 54 48 45 a0 4b 45 59 42 | 4f 41 52 44 a0 44 55 52 |THE.KEYB|OARD.DUR|
|00000780| 49 4e 47 0d 2a a0 49 4e | 54 45 52 52 55 50 54 53 |ING.*.IN|TERRUPTS|
|00000790| 2e 0d 0d 69 6e 69 74 20 | 73 65 69 20 3b 64 49 53 |...init |sei ;dIS|
|000007a0| 41 42 4c 45 a0 49 4e 54 | 45 52 52 55 50 54 53 2e |ABLE.INT|ERRUPTS.|
|000007b0| 0d 0d 20 6c 64 78 20 23 | 24 30 35 20 3b 73 41 56 |.. ldx #|$05 ;sAV|
|000007c0| 45 a0 54 48 45 a0 7a 70 | 2d 77 4f 52 4b 53 50 41 |E.THE.zp|-wORKSPA|
|000007d0| 43 45 2e 0d 3a 41 47 41 | 49 4e 20 6c 64 61 20 67 |CE..:AGA|IN lda g|
|000007e0| 70 31 2c 78 0d 20 73 74 | 61 20 6f 6c 64 67 70 2c |p1,x. st|a oldgp,|
|000007f0| 78 0d 20 64 65 78 0d 20 | 62 70 6c 20 3a 41 47 41 |x. dex. |bpl :AGA|
|00000800| 49 4e 0d 0d 20 6c 64 61 | 20 6d 6d 75 63 72 20 3b |IN.. lda| mmucr ;|
|00000810| 73 41 56 45 a0 54 48 45 | a0 4f 4c 44 a0 43 4f 4e |sAVE.THE|.OLD.CON|
|00000820| 46 49 47 55 52 41 54 49 | 4f 4e 2e 0d 20 73 74 61 |FIGURATI|ON.. sta|
|00000830| 20 6f 6c 64 6d 6d 75 0d | 20 6c 64 61 20 23 62 41 | oldmmu.| lda #bA|
|00000840| 4e 4b 31 35 20 3b 63 4f | 4e 46 49 47 55 52 45 a0 |NK15 ;cO|NFIGURE.|
|00000850| 46 4f 52 a0 62 41 4e 4b | a0 31 35 2e 0d 20 73 74 |FOR.bANK|.15.. st|
|00000860| 61 20 6d 6d 75 63 72 0d | 0d 20 6c 64 61 20 64 31 |a mmucr.|. lda d1|
|00000870| 64 64 72 61 20 3b 73 41 | 56 45 a0 54 48 45 a0 4f |ddra ;sA|VE.THE.O|
|00000880| 52 49 47 49 4e 41 4c a0 | 64 64 72 61 a0 56 41 4c |RIGINAL.|ddra.VAL|
|00000890| 55 45 a0 28 4e 4f 52 4d | 41 4c 4c 59 a0 24 66 66 |UE.(NORM|ALLY.$ff|
|000008a0| 29 2e 0d 20 73 74 61 20 | 6f 6c 64 64 64 72 61 0d |).. sta |oldddra.|
|000008b0| 0d 20 6c 64 61 20 63 6c | 6b 72 61 74 65 20 3b 73 |. lda cl|krate ;s|
|000008c0| 41 56 45 a0 54 48 45 a0 | 43 55 52 52 45 4e 54 a0 |AVE.THE.|CURRENT.|
|000008d0| 63 4c 4f 43 4b a0 73 50 | 45 45 44 2e 0d 20 73 74 |cLOCK.sP|EED.. st|
|000008e0| 61 20 6f 6c 64 73 70 65 | 65 64 0d 20 6c 64 61 20 |a oldspe|ed. lda |
|000008f0| 23 73 4c 4f 57 20 3b 62 | 52 49 4e 47 a0 53 50 45 |#sLOW ;b|RING.SPE|
|00000900| 45 44 a0 44 4f 57 4e a0 | 54 4f a0 31 6d 68 5a a0 |ED.DOWN.|TO.1mhZ.|
|00000910| 46 4f 52 a0 69 2f 6f a0 | 4f 50 45 52 41 54 49 4f |FOR.i/o.|OPERATIO|
|00000920| 4e 53 2e 0d 20 73 74 61 | 20 63 6c 6b 72 61 74 65 |NS.. sta| clkrate|
|00000930| 0d 0d 20 72 74 73 0d 0d | 2a 3d 3d 3d 3d 3d 3d 3d |.. rts..|*=======|
|00000940| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000950| 3d 3d 3d 3d 3d 3d 3d 3d | 0d 2a a0 a0 a0 69 4e 49 |========|.*...iNI|
|00000960| 54 49 41 4c 49 5a 45 a0 | 54 48 45 a0 73 4d 41 52 |TIALIZE.|THE.sMAR|
|00000970| 54 57 41 54 43 48 0d 2a | 3d 3d 3d 3d 3d 3d 3d 3d |TWATCH.*|========|
|00000980| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000990| 3d 3d 3d 3d 3d 3d 3d 0d | 0d 2a a0 74 48 49 53 a0 |=======.|.*.tHIS.|
|000009a0| 52 4f 55 54 49 4e 45 a0 | 53 45 4e 44 53 a0 54 48 |ROUTINE.|SENDS.TH|
|000009b0| 45 a0 77 41 4b 45 55 50 | a0 70 41 54 54 45 52 4e |E.wAKEUP|.pATTERN|
|000009c0| a0 54 4f a0 54 48 45 a0 | 73 4d 41 52 54 57 41 54 |.TO.THE.|sMARTWAT|
|000009d0| 43 48 2e 0d 2a a0 63 69 | 61 a0 23 31 a0 70 4f 52 |CH..*.ci|a.#1.pOR|
|000009e0| 54 a0 72 45 47 49 53 54 | 45 52 a0 61 a0 42 49 54 |T.rEGIST|ER.a.BIT|
|000009f0| 53 a0 41 52 45 a0 41 53 | 53 49 47 4e 45 44 a0 41 |S.ARE.AS|SIGNED.A|
|00000a00| 53 a0 46 4f 4c 4c 4f 57 | 53 3a 0d 2a a0 a0 a0 a0 |S.FOLLOW|S:.*....|
|00000a10| 42 49 54 a0 30 a0 2d a0 | 75 53 45 44 a0 54 4f a0 |BIT.0.-.|uSED.TO.|
|00000a20| 53 45 4e 44 a0 41 4e 44 | a0 52 45 43 45 49 56 45 |SEND.AND|.RECEIVE|
|00000a30| a0 53 45 52 49 41 4c a0 | 44 41 54 41 2e 0d 2a a0 |.SERIAL.|DATA..*.|
|00000a40| a0 a0 a0 42 49 54 a0 31 | a0 2d a0 73 45 4c 45 43 |...BIT.1|.-.sELEC|
|00000a50| 54 53 a0 72 45 41 44 a0 | 28 53 45 54 29 a0 4f 52 |TS.rEAD.|(SET).OR|
|00000a60| a0 77 52 49 54 45 a0 28 | 43 4c 45 41 52 29 2e 0d |.wRITE.(|CLEAR)..|
|00000a70| 2a a0 a0 a0 a0 42 49 54 | a0 32 a0 2d a0 73 45 51 |*....BIT|.2.-.sEQ|
|00000a80| 55 45 4e 43 45 52 a0 2d | a0 68 49 47 48 a0 54 4f |UENCER.-|.hIGH.TO|
|00000a90| a0 6c 4f 57 a0 54 52 41 | 4e 53 49 54 49 4f 4e a0 |.lOW.TRA|NSITION.|
|00000aa0| 42 45 47 49 4e 53 0d 2a | a0 a0 a0 a0 a0 a0 a0 a0 |BEGINS.*|........|
|00000ab0| a0 a0 a0 a0 a0 a0 a0 a0 | a0 a0 a0 a0 a0 a0 a0 a0 |........|........|
|00000ac0| 4d 45 4d 4f 52 59 a0 43 | 59 43 4c 45 2e 0d 2a a0 |MEMORY.C|YCLE..*.|
|00000ad0| a0 a0 a0 a0 a0 a0 a0 a0 | a0 a0 a0 a0 a0 a0 a0 a0 |........|........|
|00000ae0| a0 a0 a0 a0 a0 2d a0 6c | 4f 57 a0 54 4f a0 68 49 |.....-.l|OW.TO.hI|
|00000af0| 47 48 a0 54 52 41 4e 53 | 49 54 49 4f 4e a0 45 4e |GH.TRANS|ITION.EN|
|00000b00| 44 53 0d 2a a0 a0 a0 a0 | a0 a0 a0 a0 a0 a0 a0 a0 |DS.*....|........|
|00000b10| a0 a0 a0 a0 a0 a0 a0 a0 | a0 a0 a0 a0 4d 45 4d 4f |........|....MEMO|
|00000b20| 52 59 a0 43 59 43 4c 45 | 2e 0d 0d 2a a0 66 49 52 |RY.CYCLE|...*.fIR|
|00000b30| 53 54 2c a0 53 45 54 a0 | 55 50 a0 54 48 45 a0 69 |ST,.SET.|UP.THE.i|
|00000b40| 2f 6f a0 52 45 47 49 53 | 54 45 52 53 2e 0d 0d 77 |/o.REGIS|TERS...w|
|00000b50| 61 6b 65 75 70 20 6c 64 | 61 20 23 72 65 61 64 20 |akeup ld|a #read |
|00000b60| 3b 73 45 54 a0 69 2f 6f | a0 44 49 52 45 43 54 49 |;sET.i/o|.DIRECTI|
|00000b70| 4f 4e a0 42 49 54 53 a0 | 46 4f 52 a0 52 45 41 44 |ON.BITS.|FOR.READ|
|00000b80| 2e 0d 20 73 74 61 20 64 | 31 64 64 72 61 0d 20 6c |.. sta d|1ddra. l|
|00000b90| 64 61 20 23 72 65 61 64 | 5f 68 69 20 3b 62 52 49 |da #read|_hi ;bRI|
|00000ba0| 4e 47 a0 73 45 51 55 45 | 4e 43 45 52 a0 68 49 47 |NG.sEQUE|NCER.hIG|
|00000bb0| 48 2c a0 73 45 4c 45 43 | 54 a0 72 45 41 44 2e 0d |H,.sELEC|T.rEAD..|
|00000bc0| 20 73 74 61 20 64 31 70 | 72 61 0d 20 6c 64 61 20 | sta d1p|ra. lda |
|00000bd0| 23 72 65 61 64 5f 6c 6f | 20 3b 62 52 49 4e 47 a0 |#read_lo| ;bRING.|
|00000be0| 73 45 51 55 45 4e 43 45 | 52 a0 6c 4f 57 a0 54 4f |sEQUENCE|R.lOW.TO|
|00000bf0| a0 43 4c 45 41 52 a0 49 | 54 2e 0d 20 73 74 61 20 |.CLEAR.I|T.. sta |
|00000c00| 64 31 70 72 61 0d 20 6c | 64 61 20 23 72 65 61 64 |d1pra. l|da #read|
|00000c10| 5f 68 69 20 3b 62 52 49 | 4e 47 a0 73 45 51 55 45 |_hi ;bRI|NG.sEQUE|
|00000c20| 4e 43 45 52 a0 68 49 47 | 48 a0 41 47 41 49 4e 2e |NCER.hIG|H.AGAIN.|
|00000c30| 0d 20 73 74 61 20 64 31 | 70 72 61 0d 20 6c 64 61 |. sta d1|pra. lda|
|00000c40| 20 23 77 72 69 74 65 20 | 3b 73 45 54 a0 69 2f 6f | #write |;sET.i/o|
|00000c50| a0 44 49 52 45 43 54 49 | 4f 4e a0 42 49 54 53 a0 |.DIRECTI|ON.BITS.|
|00000c60| 46 4f 52 a0 57 52 49 54 | 45 2e 0d 20 73 74 61 20 |FOR.WRIT|E.. sta |
|00000c70| 64 31 64 64 72 61 0d 0d | 2a a0 6e 4f 57 2c a0 53 |d1ddra..|*.nOW,.S|
|00000c80| 45 4e 44 a0 4f 55 54 a0 | 54 48 45 a0 50 41 54 54 |END.OUT.|THE.PATT|
|00000c90| 45 52 4e 2e 0d 0d 73 65 | 6e 64 70 61 74 74 20 6c |ERN...se|ndpatt l|
|00000ca0| 64 61 20 23 77 72 69 74 | 65 5f 68 69 20 3b 67 45 |da #writ|e_hi ;gE|
|00000cb0| 54 a0 52 45 41 44 59 a0 | 54 4f a0 77 52 49 54 45 |T.READY.|TO.wRITE|
|00000cc0| a0 54 4f a0 54 48 45 a0 | 73 4d 41 52 54 57 41 54 |.TO.THE.|sMARTWAT|
|00000cd0| 43 48 2e 0d 20 73 74 61 | 20 64 31 70 72 61 0d 0d |CH.. sta| d1pra..|
|00000ce0| 20 6c 64 78 20 23 24 30 | 30 20 3b 69 4e 49 54 49 | ldx #$0|0 ;iNITI|
|00000cf0| 41 4c 49 5a 45 a0 4f 55 | 52 a0 42 59 54 45 a0 43 |ALIZE.OU|R.BYTE.C|
|00000d00| 4f 55 4e 54 45 52 2e 0d | 3a 4e 58 54 42 59 54 45 |OUNTER..|:NXTBYTE|
|00000d10| 20 6c 64 61 20 70 61 74 | 74 65 72 6e 2c 78 20 3b | lda pat|tern,x ;|
|00000d20| 67 45 54 a0 41 a0 42 59 | 54 45 a0 46 52 4f 4d a0 |gET.A.BY|TE.FROM.|
|00000d30| 54 48 45 a0 77 41 4b 45 | 55 50 a0 70 41 54 54 45 |THE.wAKE|UP.pATTE|
|00000d40| 52 4e 2e 0d 20 6a 73 72 | 20 73 65 6e 64 5f 62 79 |RN.. jsr| send_by|
|00000d50| 74 20 3b 73 45 4e 44 a0 | 49 54 a0 54 4f a0 54 48 |t ;sEND.|IT.TO.TH|
|00000d60| 45 a0 73 4d 41 52 54 57 | 41 54 43 48 2e 0d 20 69 |E.sMARTW|ATCH.. i|
|00000d70| 6e 78 20 3b 69 4e 43 52 | 45 4d 45 4e 54 a0 4f 55 |nx ;iNCR|EMENT.OU|
|00000d80| 52 a0 42 59 54 45 a0 50 | 4f 49 4e 54 45 52 2e 0d |R.BYTE.P|OINTER..|
|00000d90| 20 63 70 78 20 23 24 30 | 38 20 3b 73 45 45 a0 49 | cpx #$0|8 ;sEE.I|
|00000da0| 46 a0 57 45 27 56 45 a0 | 44 4f 4e 45 a0 38 a0 42 |F.WE'VE.|DONE.8.B|
|00000db0| 59 54 45 53 2e 0d 20 62 | 6e 65 20 3a 4e 58 54 42 |YTES.. b|ne :NXTB|
|00000dc0| 59 54 45 20 3b 6e 4f 2c | a0 54 48 45 4e a0 44 4f |YTE ;nO,|.THEN.DO|
|00000dd0| a0 54 48 45 a0 4e 45 58 | 54 a0 42 59 54 45 2e 0d |.THE.NEX|T.BYTE..|
|00000de0| 20 72 74 73 20 20 3b 6f | 54 48 45 52 57 49 53 45 | rts ;o|THERWISE|
|00000df0| 2c a0 52 45 54 55 52 4e | 2e 0d 0d 2a 3d 3d 3d 3d |,.RETURN|...*====|
|00000e00| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000e10| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 0d 2a a0 a0 a0 |========|===.*...|
|00000e20| a0 a0 a0 a0 a0 a0 67 45 | 54 a0 54 48 45 a0 64 41 |......gE|T.THE.dA|
|00000e30| 54 45 0d 2a 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |TE.*====|========|
|00000e40| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000e50| 3d 3d 3d 0d 0d 2a a0 64 | 41 54 45 a0 49 53 a0 50 |===..*.d|ATE.IS.P|
|00000e60| 41 53 53 45 44 a0 54 4f | a0 54 48 49 53 a0 52 4f |ASSED.TO|.THIS.RO|
|00000e70| 55 54 49 4e 45 a0 41 53 | a0 73 79 73 a0 50 41 52 |UTINE.AS|.sys.PAR|
|00000e80| 41 4d 45 54 45 52 53 2e | 0d 2a a0 a0 61 a0 28 24 |AMETERS.|.*..a.($|
|00000e90| 30 36 29 a0 2d a0 4d 4f | 4e 54 48 a0 a0 a0 a0 28 |06).-.MO|NTH....(|
|00000ea0| 6a 41 4e 55 41 52 59 a0 | 2d a0 31 a0 2e 2e 2e a0 |jANUARY.|-.1.....|
|00000eb0| 64 45 43 45 4d 42 45 52 | a0 2d a0 31 32 29 0d 2a |dECEMBER|.-.12).*|
|00000ec0| a0 a0 78 a0 28 24 30 37 | 29 a0 2d a0 44 41 59 a0 |..x.($07|).-.DAY.|
|00000ed0| a0 a0 a0 a0 a0 28 31 2e | 2e 2e 33 31 29 0d 2a a0 |.....(1.|..31).*.|
|00000ee0| a0 79 a0 28 24 30 38 29 | a0 2d a0 59 45 41 52 a0 |.y.($08)|.-.YEAR.|
|00000ef0| a0 a0 a0 a0 28 30 2e 2e | 2e 39 39 29 0d 2a a0 a0 |....(0..|.99).*..|
|00000f00| 73 a0 28 24 30 35 29 a0 | 2d a0 57 45 45 4b 44 41 |s.($05).|-.WEEKDA|
|00000f10| 59 a0 a0 28 73 55 4e 44 | 41 59 a0 2d a0 31 a0 2e |Y..(sUND|AY.-.1..|
|00000f20| 2e 2e a0 73 41 54 55 52 | 44 41 59 a0 2d a0 37 29 |...sATUR|DAY.-.7)|
|00000f30| 0d 0d 67 65 74 5f 64 61 | 74 65 20 6c 64 61 20 61 |..get_da|te lda a|
|00000f40| 72 65 67 20 3b 67 45 54 | a0 54 48 45 a0 6d 4f 4e |reg ;gET|.THE.mON|
|00000f50| 54 48 2e 0d 20 73 74 61 | 20 6d 6f 6e 74 68 0d 20 |TH.. sta| month. |
|00000f60| 6c 64 61 20 78 72 65 67 | 20 3b 67 45 54 a0 54 48 |lda xreg| ;gET.TH|
|00000f70| 45 a0 64 41 59 2e 0d 20 | 73 74 61 20 64 61 79 0d |E.dAY.. |sta day.|
|00000f80| 20 6c 64 61 20 79 72 65 | 67 20 3b 67 45 54 a0 54 | lda yre|g ;gET.T|
|00000f90| 48 45 a0 79 45 41 52 2e | 0d 20 73 74 61 20 79 65 |HE.yEAR.|. sta ye|
|00000fa0| 61 72 0d 20 6c 64 61 20 | 73 72 65 67 20 3b 67 45 |ar. lda |sreg ;gE|
|00000fb0| 54 a0 54 48 45 a0 77 45 | 45 4b 44 41 59 2e 0d 20 |T.THE.wE|EKDAY.. |
|00000fc0| 73 74 61 20 77 65 65 6b | 64 61 79 0d 0d 2a a0 6e |sta week|day..*.n|
|00000fd0| 4f 57 a0 43 48 41 4e 47 | 45 a0 54 48 45 a0 64 41 |OW.CHANG|E.THE.dA|
|00000fe0| 54 45 a0 54 4f a0 73 4d | 41 52 54 57 41 54 43 48 |TE.TO.sM|ARTWATCH|
|00000ff0| a0 46 4f 52 4d 41 54 2e | 0d 0d 20 6c 64 79 20 23 |.FORMAT.|.. ldy #|
|00001000| 24 30 33 20 3b 64 4f a0 | 34 a0 42 59 54 45 53 a0 |$03 ;dO.|4.BYTES.|
|00001010| 2d a0 79 45 41 52 2c a0 | 6d 4f 4e 54 48 2c a0 64 |-.yEAR,.|mONTH,.d|
|00001020| 41 59 2c a0 77 45 45 4b | 44 41 59 2e 0d 3a 41 47 |AY,.wEEK|DAY..:AG|
|00001030| 41 49 4e 20 6c 64 61 20 | 77 65 65 6b 64 61 79 2c |AIN lda |weekday,|
|00001040| 79 20 3b 67 45 54 a0 41 | a0 62 49 4e 41 52 59 a0 |y ;gET.A|.bINARY.|
|00001050| 56 41 4c 55 45 2e 0d 20 | 6a 73 72 20 62 69 6e 5f |VALUE.. |jsr bin_|
|00001060| 62 63 64 20 3b 63 4f 4e | 56 45 52 54 a0 49 54 a0 |bcd ;cON|VERT.IT.|
|00001070| 54 4f a0 41 a0 70 41 43 | 4b 45 44 2d 62 63 64 a0 |TO.A.pAC|KED-bcd.|
|00001080| 42 59 54 45 2e 0d 20 73 | 74 61 20 77 65 65 6b 64 |BYTE.. s|ta weekd|
|00001090| 61 79 2c 79 20 3b 73 54 | 4f 52 45 a0 49 54 2e 0d |ay,y ;sT|ORE.IT..|
|000010a0| 20 64 65 79 0d 20 62 70 | 6c 20 3a 41 47 41 49 4e | dey. bp|l :AGAIN|
|000010b0| 20 3b 63 4f 4e 54 49 4e | 55 45 a0 55 4e 54 49 4c | ;cONTIN|UE.UNTIL|
|000010c0| a0 41 4c 4c a0 34 a0 42 | 59 54 45 53 a0 43 4f 4e |.ALL.4.B|YTES.CON|
|000010d0| 56 45 52 54 45 44 2e 0d | 0d 2a a0 74 48 45 a0 77 |VERTED..|.*.tHE.w|
|000010e0| 45 45 4b 44 41 59 a0 42 | 59 54 45 a0 4e 45 45 44 |EEKDAY.B|YTE.NEED|
|000010f0| 53 a0 53 4f 4d 45 a0 53 | 50 45 43 49 41 4c a0 41 |S.SOME.S|PECIAL.A|
|00001100| 54 54 45 4e 54 49 4f 4e | 2e 0d 2a a0 a0 42 49 54 |TTENTION|..*..BIT|
|00001110| 53 a0 30 2d 33 a0 2d a0 | 77 45 45 4b 44 41 59 a0 |S.0-3.-.|wEEKDAY.|
|00001120| 42 49 54 53 2e 0d 2a a0 | a0 42 49 54 a0 34 a0 2d |BITS..*.|.BIT.4.-|
|00001130| a0 63 4f 4e 54 52 4f 4c | 53 a0 72 65 73 65 74 a0 |.cONTROL|S.reset.|
|00001140| 50 49 4e 2e 0d 2a a0 a0 | 42 49 54 a0 35 a0 2d a0 |PIN..*..|BIT.5.-.|
|00001150| 63 4f 4e 54 52 4f 4c 53 | a0 54 48 45 a0 6f 53 43 |cONTROLS|.THE.oSC|
|00001160| 49 4c 4c 41 54 4f 52 2e | 0d 0d 20 6c 64 61 20 23 |ILLATOR.|.. lda #|
|00001170| 24 31 30 20 3b 73 45 54 | a0 42 49 54 a0 34 2e a0 |$10 ;sET|.BIT.4..|
|00001180| 64 49 53 41 42 4c 45 53 | a0 54 48 45 a0 72 65 73 |dISABLES|.THE.res|
|00001190| 65 74 a0 50 49 4e 2e 0d | 20 6f 72 61 20 77 65 65 |et.PIN..| ora wee|
|000011a0| 6b 64 61 79 0d 20 61 6e | 64 20 23 24 64 66 20 3b |kday. an|d #$df ;|
|000011b0| 63 4c 45 41 52 a0 42 49 | 54 a0 35 2e a0 65 4e 41 |cLEAR.BI|T.5..eNA|
|000011c0| 42 4c 45 53 a0 54 48 45 | a0 6f 53 43 49 4c 4c 41 |BLES.THE|.oSCILLA|
|000011d0| 54 4f 52 2e 0d 20 73 74 | 61 20 77 65 65 6b 64 61 |TOR.. st|a weekda|
|000011e0| 79 20 3b 73 41 56 45 a0 | 54 48 45 a0 6d 4f 44 49 |y ;sAVE.|THE.mODI|
|000011f0| 46 49 45 44 a0 77 45 45 | 4b 44 41 59 a0 42 59 54 |FIED.wEE|KDAY.BYT|
|00001200| 45 2e 0d 20 72 74 73 20 | 3b 72 45 54 55 52 4e a0 |E.. rts |;rETURN.|
|00001210| 54 4f a0 63 41 4c 4c 49 | 4e 47 a0 72 4f 55 54 49 |TO.cALLI|NG.rOUTI|
|00001220| 4e 45 2e 0d 0d 2a 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |NE...*--|--------|
|00001230| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001240| 2d 2d 2d 2d 2d 0d 2a a0 | a0 63 4f 4e 56 45 52 54 |-----.*.|.cONVERT|
|00001250| a0 62 49 4e 41 52 59 a0 | 54 4f a0 70 41 43 4b 45 |.bINARY.|TO.pACKE|
|00001260| 44 2d 62 63 64 0d 2a 2d | 2d 2d 2d 2d 2d 2d 2d 2d |D-bcd.*-|--------|
|00001270| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001280| 2d 2d 2d 2d 2d 2d 0d 0d | 2a a0 70 41 52 41 4d 45 |------..|*.pARAME|
|00001290| 54 45 52 53 3a 0d 2a a0 | a0 61 a0 2d a0 43 4f 4e |TERS:.*.|.a.-.CON|
|000012a0| 54 41 49 4e 53 a0 62 49 | 4e 41 52 59 a0 56 41 4c |TAINS.bI|NARY.VAL|
|000012b0| 55 45 a0 54 4f a0 43 4f | 4e 56 45 52 54 2e 0d 2a |UE.TO.CO|NVERT..*|
|000012c0| a0 72 45 54 55 52 4e 53 | 3a 0d 2a a0 a0 61 a0 2d |.rETURNS|:.*..a.-|
|000012d0| a0 52 45 54 55 52 4e 53 | a0 57 49 54 48 a0 70 41 |.RETURNS|.WITH.pA|
|000012e0| 43 4b 45 44 2d 62 63 64 | a0 56 41 4c 55 45 2e 0d |CKED-bcd|.VALUE..|
|000012f0| 0d 2a a0 6e 6f 74 65 a0 | 2d a0 74 48 49 53 a0 52 |.*.note.|-.tHIS.R|
|00001300| 4f 55 54 49 4e 45 a0 57 | 49 4c 4c a0 4f 4e 4c 59 |OUTINE.W|ILL.ONLY|
|00001310| a0 57 4f 52 4b a0 57 49 | 54 48 a0 56 41 4c 55 45 |.WORK.WI|TH.VALUE|
|00001320| 53 a0 4c 45 53 53 0d 2a | a0 a0 a0 a0 a0 a0 a0 a0 |S.LESS.*|........|
|00001330| 54 48 41 4e a0 31 30 30 | a0 28 44 45 43 49 4d 41 |THAN.100|.(DECIMA|
|00001340| 4c 29 2c a0 49 2e 45 2e | a0 31 a0 4f 52 a0 32 a0 |L),.I.E.|.1.OR.2.|
|00001350| 44 49 47 49 54 a0 56 41 | 4c 55 45 53 2e 0d 0d 62 |DIGIT.VA|LUES...b|
|00001360| 69 6e 5f 62 63 64 20 73 | 74 61 20 67 70 31 20 3b |in_bcd s|ta gp1 ;|
|00001370| 73 41 56 45 a0 54 48 45 | a0 62 49 4e 41 52 59 a0 |sAVE.THE|.bINARY.|
|00001380| 56 41 4c 55 45 2e 0d 20 | 6c 64 61 20 23 24 30 30 |VALUE.. |lda #$00|
|00001390| 20 3b 69 4e 49 54 a0 4f | 55 52 a0 6f 4e 45 53 a0 | ;iNIT.O|UR.oNES.|
|000013a0| 42 59 54 45 2e 0d 20 73 | 74 61 20 67 70 32 20 3b |BYTE.. s|ta gp2 ;|
|000013b0| 69 4e 49 54 a0 4f 55 52 | a0 74 45 4e 53 a0 42 59 |iNIT.OUR|.tENS.BY|
|000013c0| 54 45 2e 0d 20 6c 64 78 | 20 23 24 30 38 20 3b 62 |TE.. ldx| #$08 ;b|
|000013d0| 49 54 a0 43 4f 55 4e 54 | 45 52 2e a0 77 45 a0 57 |IT.COUNT|ER..wE.W|
|000013e0| 49 4c 4c a0 4c 4f 4f 50 | a0 38 a0 54 49 4d 45 53 |ILL.LOOP|.8.TIMES|
|000013f0| a0 46 4f 52 a0 38 a0 42 | 49 54 53 2e 0d 0d 3a 41 |.FOR.8.B|ITS...:A|
|00001400| 47 41 49 4e 20 61 73 6c | 20 67 70 31 20 3b 73 48 |GAIN asl| gp1 ;sH|
|00001410| 49 46 54 a0 41 a0 42 49 | 54 a0 4f 55 54 a0 4f 46 |IFT.A.BI|T.OUT.OF|
|00001420| a0 4f 55 52 a0 62 49 4e | 41 52 59 a0 56 41 4c 55 |.OUR.bIN|ARY.VALU|
|00001430| 45 2e 0d 20 72 6f 6c 20 | 3b 73 48 49 46 54 a0 54 |E.. rol |;sHIFT.T|
|00001440| 48 45 a0 42 49 54 a0 49 | 4e 54 4f a0 61 2e 0d 20 |HE.BIT.I|NTO.a.. |
|00001450| 63 6d 70 20 23 24 30 61 | 20 3b 73 45 45 a0 49 46 |cmp #$0a| ;sEE.IF|
|00001460| a0 61 a0 3e 3d a0 31 30 | 2e 0d 20 62 63 63 20 3a |.a.>=.10|.. bcc :|
|00001470| 4e 4f 20 3b 69 46 a0 4e | 4f 54 2c a0 54 48 45 4e |NO ;iF.N|OT,.THEN|
|00001480| a0 42 52 41 4e 43 48 2e | 0d 0d 20 73 65 63 20 3b |.BRANCH.|.. sec ;|
|00001490| 79 45 53 2c a0 54 48 45 | 4e a0 57 45 a0 57 49 4c |yES,.THE|N.WE.WIL|
|000014a0| 4c a0 53 55 42 54 52 41 | 43 54 a0 31 30 a0 46 52 |L.SUBTRA|CT.10.FR|
|000014b0| 4f 4d a0 61 2e 0d 20 73 | 62 63 20 23 24 30 61 0d |OM.a.. s|bc #$0a.|
|000014c0| 20 73 65 63 20 3b 73 45 | 54 a0 54 48 45 a0 63 41 | sec ;sE|T.THE.cA|
|000014d0| 52 52 59 a0 54 4f a0 50 | 55 54 a0 49 4e 54 4f a0 |RRY.TO.P|UT.INTO.|
|000014e0| 54 48 45 a0 74 45 4e 53 | a0 42 59 54 45 2e 0d 0d |THE.tENS|.BYTE...|
|000014f0| 3a 4e 4f 20 72 6f 6c 20 | 67 70 32 20 3b 72 4f 4c |:NO rol |gp2 ;rOL|
|00001500| 4c a0 54 48 45 a0 63 41 | 52 52 59 a0 42 49 54 a0 |L.THE.cA|RRY.BIT.|
|00001510| 49 4e 54 4f a0 4f 55 52 | a0 74 45 4e 53 a0 42 59 |INTO.OUR|.tENS.BY|
|00001520| 54 45 2e 0d 20 64 65 78 | 20 3b 64 45 43 52 45 4d |TE.. dex| ;dECREM|
|00001530| 45 4e 54 a0 4f 55 52 a0 | 43 4f 55 4e 54 45 52 2e |ENT.OUR.|COUNTER.|
|00001540| 0d 20 62 6e 65 20 3a 41 | 47 41 49 4e 20 3b 63 4f |. bne :A|GAIN ;cO|
|00001550| 4e 54 49 4e 55 45 a0 55 | 4e 54 49 4c a0 38 a0 42 |NTINUE.U|NTIL.8.B|
|00001560| 49 54 53 a0 44 4f 4e 45 | 2e 0d 0d 20 61 73 6c 20 |ITS.DONE|... asl |
|00001570| 67 70 32 20 3b 73 48 49 | 46 54 a0 4f 55 52 a0 74 |gp2 ;sHI|FT.OUR.t|
|00001580| 45 4e 53 a0 56 41 4c 55 | 45 a0 49 4e 54 4f a0 54 |ENS.VALU|E.INTO.T|
|00001590| 48 45 a0 68 49 47 48 a0 | 6e 59 42 42 4c 45 2e 0d |HE.hIGH.|nYBBLE..|
|000015a0| 20 61 73 6c 20 67 70 32 | 0d 20 61 73 6c 20 67 70 | asl gp2|. asl gp|
|000015b0| 32 0d 20 61 73 6c 20 67 | 70 32 0d 20 6f 72 61 20 |2. asl g|p2. ora |
|000015c0| 67 70 32 20 3b 6f 72 a0 | 54 48 45 a0 6f 4e 45 53 |gp2 ;or.|THE.oNES|
|000015d0| a0 42 49 54 a0 57 49 54 | 48 a0 49 54 2e 0d 20 72 |.BIT.WIT|H.IT.. r|
|000015e0| 74 73 20 3b 72 45 54 55 | 52 4e a0 57 49 54 48 a0 |ts ;rETU|RN.WITH.|
|000015f0| 54 48 45 a0 70 41 43 4b | 45 44 2d 62 63 64 a0 56 |THE.pACK|ED-bcd.V|
|00001600| 41 4c 55 45 2e 0d 0d 2a | 3d 3d 3d 3d 3d 3d 3d 3d |ALUE...*|========|
|00001610| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001620| 3d 3d 3d 3d 3d 3d 3d 0d | 2a a0 a0 a0 a0 a0 67 45 |=======.|*.....gE|
|00001630| 54 a0 54 48 45 a0 73 59 | 53 54 45 4d a0 74 49 4d |T.THE.sY|STEM.tIM|
|00001640| 45 0d 2a 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |E.*=====|========|
|00001650| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001660| 3d 3d 0d 0d 2a a0 74 69 | 24 a0 49 53 a0 4e 4f 54 |==..*.ti|$.IS.NOT|
|00001670| a0 41 53 a0 41 43 43 55 | 52 41 54 45 a0 41 53 a0 |.AS.ACCU|RATE.AS.|
|00001680| 54 48 45 a0 74 6f 64 a0 | 63 4c 4f 43 4b 53 2c a0 |THE.tod.|cLOCKS,.|
|00001690| 42 55 54 a0 49 54 a0 49 | 53 0d 2a a0 45 41 53 49 |BUT.IT.I|S.*.EASI|
|000016a0| 4c 59 a0 53 45 54 a0 46 | 52 4f 4d a0 62 61 73 69 |LY.SET.F|ROM.basi|
|000016b0| 63 2e a0 a0 72 45 4d 45 | 4d 42 45 52 a0 2d a0 45 |c...rEME|MBER.-.E|
|000016c0| 41 53 45 a0 4f 46 a0 55 | 53 45 a0 49 53 a0 41 53 |ASE.OF.U|SE.IS.AS|
|000016d0| 0d 2a a0 49 4d 50 4f 52 | 54 41 4e 54 a0 41 53 a0 |.*.IMPOR|TANT.AS.|
|000016e0| 46 55 4e 43 54 49 4f 4e | 41 4c 49 54 59 2e 0d 0d |FUNCTION|ALITY...|
|000016f0| 2a a0 77 45 a0 57 49 4c | 4c a0 52 45 41 44 a0 54 |*.wE.WIL|L.READ.T|
|00001700| 48 45 a0 6a 49 46 46 59 | a0 63 4c 4f 43 4b a0 54 |HE.jIFFY|.cLOCK.T|
|00001710| 48 45 4e a0 43 4f 4e 56 | 45 52 54 a0 54 48 41 54 |HEN.CONV|ERT.THAT|
|00001720| a0 49 4e 54 4f a0 74 69 | 24 2e 0d 2a a0 77 45 a0 |.INTO.ti|$..*.wE.|
|00001730| 57 49 4c 4c a0 42 45 a0 | 55 53 49 4e 47 a0 62 61 |WILL.BE.|USING.ba|
|00001740| 73 69 63 a0 72 6f 6d a0 | 52 4f 55 54 49 4e 45 53 |sic.rom.|ROUTINES|
|00001750| a0 54 4f a0 48 41 4e 44 | 4c 45 a0 54 48 49 53 2e |.TO.HAND|LE.THIS.|
|00001760| 0d 2a a0 74 48 45 4e a0 | 57 45 a0 57 49 4c 4c a0 |.*.tHEN.|WE.WILL.|
|00001770| 43 4f 4e 56 45 52 54 a0 | 54 48 45 a0 61 73 63 69 |CONVERT.|THE.asci|
|00001780| 69 a0 53 54 52 49 4e 47 | a0 49 4e 54 4f a0 70 41 |i.STRING|.INTO.pA|
|00001790| 43 4b 45 44 2d 62 63 64 | 2e 0d 0d 67 65 74 5f 74 |CKED-bcd|...get_t|
|000017a0| 69 6d 65 20 6a 73 72 20 | 67 65 74 74 69 6d 65 20 |ime jsr |gettime |
|000017b0| 3b 74 48 49 53 a0 62 61 | 73 69 63 a0 52 4f 55 54 |;tHIS.ba|sic.ROUT|
|000017c0| 49 4e 45 a0 57 49 4c 4c | a0 53 54 4f 52 45 a0 6a |INE.WILL|.STORE.j|
|000017d0| 49 46 46 59 a0 63 4c 4f | 43 4b a0 49 4e 54 4f a0 |IFFY.cLO|CK.INTO.|
|000017e0| 66 61 63 31 2e 0d 20 6c | 64 79 20 23 24 30 30 20 |fac1.. l|dy #$00 |
|000017f0| 3b 73 45 54 55 50 a0 54 | 4f a0 43 4f 4e 56 45 52 |;sETUP.T|O.CONVER|
|00001800| 54 a0 66 61 63 31 a0 54 | 4f a0 61 73 63 69 69 2e |T.fac1.T|O.ascii.|
|00001810| 0d 20 73 74 79 20 73 74 | 72 32 0d 20 64 65 79 0d |. sty st|r2. dey.|
|00001820| 20 73 74 79 20 73 74 72 | 6e 67 32 0d 20 6c 64 79 | sty str|ng2. ldy|
|00001830| 20 23 24 30 36 20 3b 6e | 55 4d 42 45 52 a0 4f 46 | #$06 ;n|UMBER.OF|
|00001840| a0 63 48 41 52 41 43 54 | 45 52 53 a0 49 4e a0 74 |.cHARACT|ERS.IN.t|
|00001850| 69 24 2e 0d 20 73 74 79 | 20 73 74 72 31 0d 20 6c |i$.. sty| str1. l|
|00001860| 64 79 20 23 24 32 34 0d | 20 6a 73 72 20 66 61 63 |dy #$24.| jsr fac|
|00001870| 31 5f 61 73 63 20 3b 63 | 4f 4e 56 45 52 54 a0 54 |1_asc ;c|ONVERT.T|
|00001880| 48 45 a0 76 41 4c 55 45 | a0 49 4e a0 66 61 63 31 |HE.vALUE|.IN.fac1|
|00001890| a0 54 4f a0 61 73 63 69 | 69 2e 0d 0d 2a a0 74 69 |.TO.asci|i...*.ti|
|000018a0| 24 a0 49 53 a0 4e 4f 57 | a0 49 4e a0 36 a0 61 73 |$.IS.NOW|.IN.6.as|
|000018b0| 63 69 69 a0 42 59 54 45 | 53 a0 53 54 41 52 54 49 |cii.BYTE|S.STARTI|
|000018c0| 4e 47 a0 41 54 a0 24 66 | 66 2e 0d 2a a0 6e 4f 57 |NG.AT.$f|f..*.nOW|
|000018d0| a0 57 45 a0 57 49 4c 4c | a0 43 4f 4e 56 45 52 54 |.WE.WILL|.CONVERT|
|000018e0| a0 74 69 24 a0 54 4f a0 | 70 41 43 4b 45 44 2d 62 |.ti$.TO.|pACKED-b|
|000018f0| 63 64 a0 42 59 54 45 53 | 2e 0d 0d 20 6c 64 79 20 |cd.BYTES|... ldy |
|00001900| 23 24 30 30 20 3b 6f 46 | 46 53 45 54 a0 50 4f 49 |#$00 ;oF|FSET.POI|
|00001910| 4e 54 45 52 2e 0d 20 6c | 64 78 20 23 24 30 33 20 |NTER.. l|dx #$03 |
|00001920| 3b 6e 55 4d 42 45 52 a0 | 4f 46 a0 62 63 64 a0 42 |;nUMBER.|OF.bcd.B|
|00001930| 59 54 45 53 a0 54 4f a0 | 4d 41 4b 45 2e 0d 0d 3a |YTES.TO.|MAKE...:|
|00001940| 41 47 41 49 4e 20 6c 64 | 61 20 74 69 6d 65 5f 73 |AGAIN ld|a time_s|
|00001950| 74 72 2c 79 20 3b 67 45 | 54 a0 54 48 45 a0 46 49 |tr,y ;gE|T.THE.FI|
|00001960| 52 53 54 a0 42 59 54 45 | a0 4f 46 a0 54 48 45 a0 |RST.BYTE|.OF.THE.|
|00001970| 50 41 49 52 2e 0d 20 61 | 6e 64 20 23 24 30 66 20 |PAIR.. a|nd #$0f |
|00001980| 3b 6d 41 4b 45 a0 61 73 | 63 69 69 a0 54 4f a0 62 |;mAKE.as|cii.TO.b|
|00001990| 63 64 a0 42 59 a0 4d 41 | 53 4b 49 4e 47 a0 4f 55 |cd.BY.MA|SKING.OU|
|000019a0| 54 a0 54 48 45 a0 55 50 | 50 45 52 a0 4e 59 42 42 |T.THE.UP|PER.NYBB|
|000019b0| 4c 45 2e 0d 20 61 73 6c | 20 20 3b 73 48 49 46 54 |LE.. asl| ;sHIFT|
|000019c0| a0 54 48 49 53 a0 4e 59 | 42 42 4c 45 a0 54 4f a0 |.THIS.NY|BBLE.TO.|
|000019d0| 54 48 45 a0 55 50 50 45 | 52 a0 4e 59 42 42 4c 45 |THE.UPPE|R.NYBBLE|
|000019e0| 2e 0d 20 61 73 6c 0d 20 | 61 73 6c 0d 20 61 73 6c |.. asl. |asl. asl|
|000019f0| 0d 20 73 74 61 20 67 70 | 31 20 3b 73 41 56 45 a0 |. sta gp|1 ;sAVE.|
|00001a00| 49 54 a0 54 45 4d 50 4f | 52 41 52 49 4c 59 2e 0d |IT.TEMPO|RARILY..|
|00001a10| 20 69 6e 79 20 3b 70 4f | 49 4e 54 a0 54 4f a0 54 | iny ;pO|INT.TO.T|
|00001a20| 48 45 a0 53 45 43 4f 4e | 44 a0 42 59 54 45 a0 4f |HE.SECON|D.BYTE.O|
|00001a30| 46 a0 54 48 45 a0 50 41 | 49 52 2e 0d 20 6c 64 61 |F.THE.PA|IR.. lda|
|00001a40| 20 74 69 6d 65 5f 73 74 | 72 2c 79 20 3b 67 45 54 | time_st|r,y ;gET|
|00001a50| a0 49 54 2e 0d 20 61 6e | 64 20 23 24 30 66 20 3b |.IT.. an|d #$0f ;|
|00001a60| 6d 41 4b 45 a0 49 54 a0 | 62 63 64 2e a0 a0 72 45 |mAKE.IT.|bcd...rE|
|00001a70| 41 4c a0 43 4f 4d 50 4c | 49 43 41 54 45 44 a0 41 |AL.COMPL|ICATED.A|
|00001a80| 4c 47 4f 52 49 54 48 4d | 2c a0 45 48 3f 0d 20 6f |LGORITHM|,.EH?. o|
|00001a90| 72 61 20 67 70 31 20 3b | 63 4f 4d 42 49 4e 45 a0 |ra gp1 ;|cOMBINE.|
|00001aa0| 49 54 a0 57 49 54 48 a0 | 54 48 45 a0 55 50 50 45 |IT.WITH.|THE.UPPE|
|00001ab0| 52 a0 4e 59 42 42 4c 45 | 2e 0d 20 73 74 61 20 74 |R.NYBBLE|.. sta t|
|00001ac0| 65 6e 74 68 73 2c 78 20 | 3b 73 41 56 45 a0 54 48 |enths,x |;sAVE.TH|
|00001ad0| 45 a0 70 41 43 4b 45 44 | 2d 62 63 64 a0 42 59 54 |E.pACKED|-bcd.BYT|
|00001ae0| 45 2e 0d 20 69 6e 79 0d | 20 64 65 78 20 3b 63 4f |E.. iny.| dex ;cO|
|00001af0| 4e 54 49 4e 55 45 a0 55 | 4e 54 49 4c a0 33 a0 50 |NTINUE.U|NTIL.3.P|
|00001b00| 41 49 52 53 a0 44 4f 4e | 45 2e 0d 20 62 6e 65 20 |AIRS.DON|E.. bne |
|00001b10| 3a 41 47 41 49 4e 0d 0d | 2a a0 74 48 45 a0 68 4f |:AGAIN..|*.tHE.hO|
|00001b20| 55 52 a0 42 59 54 45 a0 | 48 41 53 a0 41 a0 53 50 |UR.BYTE.|HAS.A.SP|
|00001b30| 45 43 49 41 4c a0 46 4f | 52 4d 41 54 3a 0d 2a a0 |ECIAL.FO|RMAT:.*.|
|00001b40| a0 42 49 54 53 a0 30 2d | 34 a0 2d a0 68 4f 55 52 |.BITS.0-|4.-.hOUR|
|00001b50| a0 42 49 54 53 2e 0d 2a | a0 a0 42 49 54 a0 a0 a0 |.BITS..*|..BIT...|
|00001b60| a0 35 a0 2d a0 61 6d 2f | 70 6d a0 42 49 54 2e 0d |.5.-.am/|pm.BIT..|
|00001b70| 2a a0 a0 42 49 54 a0 a0 | a0 a0 37 a0 2d a0 31 32 |*..BIT..|..7.-.12|
|00001b80| 2f 32 34 a0 46 4f 52 4d | 41 54 a0 42 49 54 2e a0 |/24.FORM|AT.BIT..|
|00001b90| 77 45 a0 55 53 45 a0 54 | 48 45 a0 31 32 2d 48 4f |wE.USE.T|HE.12-HO|
|00001ba0| 55 52 a0 46 4f 52 4d 41 | 54 2e 0d 0d 20 6c 64 78 |UR.FORMA|T... ldx|
|00001bb0| 20 23 24 30 30 0d 20 73 | 74 78 20 67 70 31 20 3b | #$00. s|tx gp1 ;|
|00001bc0| 70 52 45 53 45 54 a0 54 | 48 45 a0 61 6d 2f 70 6d |pRESET.T|HE.am/pm|
|00001bd0| a0 4d 41 53 4b a0 54 4f | a0 61 6d 2e 0d 20 73 74 |.MASK.TO|.am.. st|
|00001be0| 78 20 67 70 32 20 3b 70 | 52 45 53 45 54 a0 4f 55 |x gp2 ;p|RESET.OU|
|00001bf0| 52 a0 63 4f 4e 56 45 52 | 53 49 4f 4e a0 76 41 4c |R.cONVER|SION.vAL|
|00001c00| 55 45 a0 54 4f a0 24 30 | 30 2e 0d 20 6c 64 61 20 |UE.TO.$0|0.. lda |
|00001c10| 68 6f 75 72 20 3b 67 45 | 54 a0 54 48 45 a0 68 4f |hour ;gE|T.THE.hO|
|00001c20| 55 52 53 a0 42 59 54 45 | 2e a0 69 54 a0 49 53 a0 |URS.BYTE|..iT.IS.|
|00001c30| 49 4e a0 32 34 2d 48 4f | 55 52 a0 46 4f 52 4d 41 |IN.24-HO|UR.FORMA|
|00001c40| 54 2e 0d 20 63 6d 70 20 | 23 24 31 32 20 3b 69 53 |T.. cmp |#$12 ;iS|
|00001c50| a0 49 54 a0 24 30 30 a0 | 2d a0 24 31 31 3f 0d 20 |.IT.$00.|-.$11?. |
|00001c60| 62 63 63 20 3a 49 53 5f | 41 4d 20 3b 79 45 53 2c |bcc :IS_|AM ;yES,|
|00001c70| a0 54 48 45 4e a0 49 54 | 27 53 a0 61 6d 2e 0d 20 |.THEN.IT|'S.am.. |
|00001c80| 6c 64 78 20 23 24 61 30 | 20 3b 73 45 54 a0 42 49 |ldx #$a0| ;sET.BI|
|00001c90| 54 a0 35 a0 4f 46 a0 4f | 55 52 a0 61 6d 2f 70 6d |T.5.OF.O|UR.am/pm|
|00001ca0| a0 4d 41 53 4b a0 54 4f | a0 49 4e 44 49 43 41 54 |.MASK.TO|.INDICAT|
|00001cb0| 45 a0 70 6d 2e 0d 20 73 | 74 78 20 67 70 31 0d 20 |E.pm.. s|tx gp1. |
|00001cc0| 6c 64 78 20 23 24 31 32 | 20 3b 73 45 54 a0 4f 55 |ldx #$12| ;sET.OU|
|00001cd0| 52 a0 43 4f 4e 56 45 52 | 53 49 4f 4e a0 56 41 4c |R.CONVER|SION.VAL|
|00001ce0| 55 45 a0 54 4f a0 24 31 | 32 2e 0d 20 73 74 78 20 |UE.TO.$1|2.. stx |
|00001cf0| 67 70 32 0d 0d 3a 49 53 | 5f 41 4d 20 73 65 64 20 |gp2..:IS|_AM sed |
|00001d00| 20 3b 67 45 54 a0 53 45 | 54 a0 46 4f 52 a0 62 63 | ;gET.SE|T.FOR.bc|
|00001d10| 64 a0 4d 41 54 48 2e 0d | 20 73 65 63 20 3b 73 55 |d.MATH..| sec ;sU|
|00001d20| 42 54 52 41 43 54 a0 4f | 55 52 a0 63 4f 4e 56 45 |BTRACT.O|UR.cONVE|
|00001d30| 52 53 49 4f 4e a0 76 41 | 4c 55 45 a0 46 52 4f 4d |RSION.vA|LUE.FROM|
|00001d40| a0 54 48 45 a0 68 4f 55 | 52 2e 0d 20 73 62 63 20 |.THE.hOU|R.. sbc |
|00001d50| 67 70 32 20 3b 69 46 a0 | 61 6d a0 57 45 a0 53 55 |gp2 ;iF.|am.WE.SU|
|00001d60| 42 54 52 41 43 54 a0 24 | 30 30 2c a0 49 46 a0 70 |BTRACT.$|00,.IF.p|
|00001d70| 6d a0 57 45 a0 53 55 42 | 54 52 41 43 54 a0 24 31 |m.WE.SUB|TRACT.$1|
|00001d80| 32 2e 0d 20 63 6c 64 0d | 20 62 6e 65 20 3a 4e 4f |2.. cld.| bne :NO|
|00001d90| 54 5f 30 20 3b 69 46 a0 | 52 45 53 55 4c 54 a0 57 |T_0 ;iF.|RESULT.W|
|00001da0| 41 53 a0 4e 4f 54 a0 30 | 2c a0 54 48 45 4e a0 42 |AS.NOT.0|,.THEN.B|
|00001db0| 52 41 4e 43 48 2e 0d 20 | 6c 64 61 20 23 24 31 32 |RANCH.. |lda #$12|
|00001dc0| 20 3b 6f 54 48 45 52 57 | 49 53 45 2c a0 52 45 54 | ;oTHERW|ISE,.RET|
|00001dd0| 55 52 4e a0 56 41 4c 55 | 45 a0 54 4f a0 24 31 32 |URN.VALU|E.TO.$12|
|00001de0| 2e 0d 0d 3a 4e 4f 54 5f | 30 20 6f 72 61 20 67 70 |...:NOT_|0 ora gp|
|00001df0| 31 20 3b 6d 41 53 4b a0 | 49 4e a0 54 48 45 a0 61 |1 ;mASK.|IN.THE.a|
|00001e00| 6d 2f 70 6d a0 42 49 54 | 2e 0d 20 6f 72 61 20 23 |m/pm.BIT|.. ora #|
|00001e10| 24 38 30 20 3b 73 45 54 | a0 54 48 45 a0 31 32 2d |$80 ;sET|.THE.12-|
|00001e20| 48 4f 55 52 a0 46 4f 52 | 4d 41 54 a0 42 49 54 2e |HOUR.FOR|MAT.BIT.|
|00001e30| 0d 20 73 74 61 20 68 6f | 75 72 20 3b 73 41 56 45 |. sta ho|ur ;sAVE|
|00001e40| a0 49 54 2e 0d 20 72 74 | 73 20 3b 72 45 54 55 52 |.IT.. rt|s ;rETUR|
|00001e50| 4e 2e 0d 0d 2a 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |N...*===|========|
|00001e60| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001e70| 3d 3d 3d 3d 0d 2a a0 a0 | a0 a0 73 45 54 a0 54 48 |====.*..|..sET.TH|
|00001e80| 45 a0 74 49 4d 45 a0 41 | 4e 44 a0 64 41 54 45 0d |E.tIME.A|ND.dATE.|
|00001e90| 2a 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |*=======|========|
|00001ea0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001eb0| 0d 0d 73 65 74 5f 73 6d | 77 20 6c 64 78 20 23 24 |..set_sm|w ldx #$|
|00001ec0| 30 30 0d 3a 4e 58 54 42 | 59 54 45 20 6c 64 61 20 |00.:NXTB|YTE lda |
|00001ed0| 74 65 6e 74 68 73 2c 78 | 20 3b 73 45 4e 44 a0 4f |tenths,x| ;sEND.O|
|00001ee0| 55 54 a0 54 48 45 a0 74 | 49 4d 45 2f 64 41 54 45 |UT.THE.t|IME/dATE|
|00001ef0| a0 53 54 41 52 54 49 4e | 47 a0 57 49 54 48 a0 74 |.STARTIN|G.WITH.t|
|00001f00| 45 4e 54 48 53 2e 0d 20 | 6a 73 72 20 73 65 6e 64 |ENTHS.. |jsr send|
|00001f10| 5f 62 79 74 0d 20 69 6e | 78 0d 20 63 70 78 20 23 |_byt. in|x. cpx #|
|00001f20| 24 30 38 0d 20 62 6e 65 | 20 3a 4e 58 54 42 59 54 |$08. bne| :NXTBYT|
|00001f30| 45 20 3b 69 46 a0 38 a0 | 42 59 54 45 53 a0 4e 4f |E ;iF.8.|BYTES.NO|
|00001f40| 54 a0 53 45 4e 54 2c a0 | 43 4f 4e 54 49 4e 55 45 |T.SENT,.|CONTINUE|
|00001f50| 2e 0d 0d 20 72 74 73 20 | 3b 72 45 54 55 52 4e 2e |... rts |;rETURN.|
|00001f60| 0d 0d 2a 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..*-----|--------|
|00001f70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001f80| 2d 2d 0d 2a a0 73 45 4e | 44 a0 41 a0 62 59 54 45 |--.*.sEN|D.A.bYTE|
|00001f90| a0 54 4f a0 54 48 45 a0 | 73 4d 41 52 54 57 41 54 |.TO.THE.|sMARTWAT|
|00001fa0| 43 48 0d 2a 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |CH.*----|--------|
|00001fb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001fc0| 2d 2d 2d 0d 0d 2a a0 70 | 41 52 41 4d 45 54 45 52 |---..*.p|ARAMETER|
|00001fd0| 53 3a 0d 2a a0 a0 61 a0 | 2d a0 43 4f 4e 54 41 49 |S:.*..a.|-.CONTAI|
|00001fe0| 4e 53 a0 42 59 54 45 a0 | 54 4f a0 53 45 4e 44 2e |NS.BYTE.|TO.SEND.|
|00001ff0| 0d 0d 73 65 6e 64 5f 62 | 79 74 20 73 74 61 20 67 |..send_b|yt sta g|
|00002000| 70 31 20 3b 73 41 56 45 | a0 54 48 45 a0 42 59 54 |p1 ;sAVE|.THE.BYT|
|00002010| 45 2e 0d 20 6c 64 79 20 | 23 24 30 38 20 3b 63 4f |E.. ldy |#$08 ;cO|
|00002020| 55 4e 54 45 52 a0 46 4f | 52 a0 38 a0 42 49 54 53 |UNTER.FO|R.8.BITS|
|00002030| 2e 0d 0d 3a 4e 58 54 42 | 49 54 20 6c 64 61 20 23 |...:NXTB|IT lda #|
|00002040| 24 30 30 20 3b 73 45 4e | 44 a0 42 49 54 53 a0 4f |$00 ;sEN|D.BITS.O|
|00002050| 4e 45 a0 41 54 a0 41 a0 | 54 49 4d 45 a0 54 4f a0 |NE.AT.A.|TIME.TO.|
|00002060| 54 48 45 a0 73 4d 41 52 | 54 57 41 54 43 48 2e 0d |THE.sMAR|TWATCH..|
|00002070| 20 6c 73 72 20 67 70 31 | 20 3b 6d 4f 56 45 a0 41 | lsr gp1| ;mOVE.A|
|00002080| a0 42 49 54 a0 46 52 4f | 4d a0 67 70 31 a0 54 4f |.BIT.FRO|M.gp1.TO|
|00002090| a0 54 48 45 a0 63 41 52 | 52 59 a0 42 49 54 2e 0d |.THE.cAR|RY.BIT..|
|000020a0| 20 72 6f 6c 20 20 3b 6d | 4f 56 45 a0 54 48 45 a0 | rol ;m|OVE.THE.|
|000020b0| 63 41 52 52 59 a0 42 49 | 54 a0 49 4e 54 4f a0 61 |cARRY.BI|T.INTO.a|
|000020c0| 2e 0d 20 73 74 61 20 64 | 31 70 72 61 20 3b 73 54 |.. sta d|1pra ;sT|
|000020d0| 41 52 54 a0 6d 45 4d 4f | 52 59 a0 63 59 43 4c 45 |ART.mEMO|RY.cYCLE|
|000020e0| 2c a0 50 55 54 a0 64 41 | 54 41 a0 4f 4e a0 54 48 |,.PUT.dA|TA.ON.TH|
|000020f0| 45 a0 4c 49 4e 45 2e 0d | 20 6f 72 61 20 23 77 72 |E.LINE..| ora #wr|
|00002100| 69 74 65 5f 68 69 20 3b | 65 4e 44 a0 6d 45 4d 4f |ite_hi ;|eND.mEMO|
|00002110| 52 59 a0 63 59 43 4c 45 | 2c a0 64 41 54 41 a0 53 |RY.cYCLE|,.dATA.S|
|00002120| 48 4f 55 4c 44 a0 53 54 | 49 4c 4c a0 42 45 a0 4f |HOULD.ST|ILL.BE.O|
|00002130| 4e a0 54 48 45 a0 4c 49 | 4e 45 2e 0d 20 73 74 61 |N.THE.LI|NE.. sta|
|00002140| 20 64 31 70 72 61 0d 20 | 64 65 79 0d 20 62 6e 65 | d1pra. |dey. bne|
|00002150| 20 3a 4e 58 54 42 49 54 | 20 3b 63 4f 4e 54 49 4e | :NXTBIT| ;cONTIN|
|00002160| 55 45 a0 55 4e 54 49 4c | a0 38 a0 42 49 54 53 a0 |UE.UNTIL|.8.BITS.|
|00002170| 53 45 4e 54 a0 4f 55 54 | 2e 0d 0d 20 72 74 73 20 |SENT.OUT|... rts |
|00002180| 3b 72 45 54 55 52 4e a0 | 54 4f a0 43 41 4c 4c 49 |;rETURN.|TO.CALLI|
|00002190| 4e 47 a0 52 4f 55 54 49 | 4e 45 2e 0d 0d 2a 3d 3d |NG.ROUTI|NE...*==|
|000021a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000021b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 0d 2a a0 |========|=====.*.|
|000021c0| 72 45 53 54 4f 52 45 a0 | 6f 52 49 47 49 4e 41 4c |rESTORE.|oRIGINAL|
|000021d0| a0 73 59 53 54 45 4d a0 | 73 54 41 54 45 0d 2a 3d |.sYSTEM.|sTATE.*=|
|000021e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000021f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 0d 0d |========|======..|
|00002200| 72 65 73 74 6f 72 65 20 | 6c 64 78 20 23 24 30 35 |restore |ldx #$05|
|00002210| 20 3b 72 45 53 54 4f 52 | 45 a0 54 48 45 a0 7a 70 | ;rESTOR|E.THE.zp|
|00002220| 2d 77 4f 52 4b 53 50 41 | 43 45 2e 0d 3a 41 47 41 |-wORKSPA|CE..:AGA|
|00002230| 49 4e 20 6c 64 61 20 6f | 6c 64 67 70 2c 78 0d 20 |IN lda o|ldgp,x. |
|00002240| 73 74 61 20 67 70 31 2c | 78 0d 20 64 65 78 0d 20 |sta gp1,|x. dex. |
|00002250| 62 70 6c 20 3a 41 47 41 | 49 4e 0d 0d 20 6c 64 61 |bpl :AGA|IN.. lda|
|00002260| 20 6f 6c 64 73 70 65 65 | 64 20 3b 72 45 53 54 4f | oldspee|d ;rESTO|
|00002270| 52 45 a0 54 48 45 a0 6f | 52 49 47 49 4e 41 4c a0 |RE.THE.o|RIGINAL.|
|00002280| 73 59 53 54 45 4d a0 73 | 50 45 45 44 2e 0d 20 73 |sYSTEM.s|PEED.. s|
|00002290| 74 61 20 63 6c 6b 72 61 | 74 65 0d 0d 20 6c 64 61 |ta clkra|te.. lda|
|000022a0| 20 6f 6c 64 64 64 72 61 | 20 3b 72 45 53 54 4f 52 | oldddra| ;rESTOR|
|000022b0| 45 a0 54 48 45 a0 6f 52 | 49 47 49 4e 41 4c a0 69 |E.THE.oR|IGINAL.i|
|000022c0| 2f 6f a0 73 54 41 54 45 | 0d 20 73 74 61 20 64 31 |/o.sTATE|. sta d1|
|000022d0| 64 64 72 61 0d 0d 20 6c | 64 61 20 6f 6c 64 6d 6d |ddra.. l|da oldmm|
|000022e0| 75 20 3b 72 45 53 54 4f | 52 45 a0 54 48 45 a0 6f |u ;rESTO|RE.THE.o|
|000022f0| 52 49 47 49 4e 41 4c a0 | 6d 6d 75 a0 63 4f 4e 46 |RIGINAL.|mmu.cONF|
|00002300| 49 47 55 52 41 54 49 4f | 4e 2e 0d 20 73 74 61 20 |IGURATIO|N.. sta |
|00002310| 6d 6d 75 63 72 0d 0d 20 | 63 6c 69 20 3b 72 45 45 |mmucr.. |cli ;rEE|
|00002320| 4e 41 42 4c 45 a0 69 4e | 54 45 52 52 55 50 54 53 |NABLE.iN|TERRUPTS|
|00002330| 2e 0d 0d 20 72 74 73 0d | 0d 20 65 72 72 20 5e 24 |... rts.|. err ^$|
|00002340| 31 62 66 66 20 3b 65 52 | 52 4f 52 a0 49 46 a0 43 |1bff ;eR|ROR.IF.C|
|00002350| 4f 44 45 a0 48 49 54 53 | a0 24 31 63 30 30 a0 28 |ODE.HITS|.$1c00.(|
|00002360| 62 61 73 69 63 a0 70 52 | 4f 47 52 41 4d a0 61 52 |basic.pR|OGRAM.aR|
|00002370| 45 41 29 2e 0d | |EA).. | |
+--------+-------------------------+-------------------------+--------+--------+
