; Dis68 - 8193 bytes in input file, highest ROM address = 0000 ; ; binary file = rt85arom.bin ; control file = rt85arom.ctl ; ; AWA RT85A Mask ROM disassembly. ; MC146805G2 CPU ; AWA RT-85A/A ; Motorola LSC82243P ; ; With DUMP2.a05 function resident in RAM at $3C-$4B ; ; EPROM Library routines: ; ; $280 ; $320 ; $340 - during idle ; $360 - during idle ; $380 - PTT down ; $3A0 - PTT up ; $3C0 ; $6A0 ; $6C0 ; $6E0 ; $700 ; $720 ; $740 ; $760 ; ; PORTA PA0 EQU 0 ;EPROM A2 PA1 EQU 1 ;EPROM A3 PA2 EQU 2 ;EPROM A4 PA3 EQU 3 ;EPROM A5 PA4 EQU 4 ;EPROM A6 PA5 EQU 5 ;EPROM A7 PA6 EQU 6 ;EPROM A8 PA7 EQU 7 ;EPROM /CE ; PORTB PB0 EQU 0 ;BUSY LED PB1 EQU 1 ;SILENT Silent control PB2 EQU 2 ;/SEL_RES SELCALL reset PB3 EQU 3 ;ALERT External Alarm Alert PB4 EQU 4 ;/CTC_ENC CTC encode PB5 EQU 5 ;CTC_DEC CTCSS tone decoded PB6 EQU 6 ;SEL_DEC SELCALL tone decoded PB7 EQU 7 ;SW_IN front panel switch input ; PORTC PC0 EQU 0 ;TX_ON transmitter enable PC1 EQU 1 ;EPROM A10 & P.A. Depower output PC2 EQU 2 ;DSPSTH LSB LED display data strobe PC3 EQU 3 ;DSPSTH MSB LED display data strobe PC4 EQU 4 ;UNLOCK PLL out of lock status PC5 EQU 5 ;ALARM Beep output PC6 EQU 6 ;SQLCH Squelch input PC7 EQU 7 ;AUXPTT Aux PTT input ; PORTD PD0 EQU 0 ;DSP0A0 EPROM A0 & DSP0 to head PD1 EQU 1 ;DSP1A1 EPROM A1 & DSP1 to head PD2 EQU 2 ;DSP2A9 EPROM A9 & DSP2 to head PD3 EQU 3 ;DSP3 ...........DSP3 to head PD4 EQU 4 ;SRLCH Shift register latch PD5 EQU 5 ;SRCLK Shift register clock PD6 EQU 6 ;SERSTB Serial data strobe PD7 EQU 7 ;SERDAT Serial Data (from EPROM) PORTA EQU $0 ;port A PORTB EQU $1 PORTC EQU $2 PORTD EQU $3 PA_DDR EQU $4 ;port A data direction register PB_DDR EQU $5 PC_DDR EQU $6 PD_DDR EQU $7 TIMERD EQU $8 ;timer data TIMERC EQU $9 ;timer control ORG $0 ;I/O Ports ; db B7,D5,AD,A7 ; db FF,1F,2F,7F ; db AF ;---------------------------------- ; TIMCTL: db 85,0A,0B,0C,0D,0E,0F ;' ' ; Personality bytes: (from EPROM $3F0 - $3FC) M0010 99 ;CONFIG0 highest channel number ; L0011 Called from L1FA9 (ROM self test) M0011 05 ;CONFIG1 M0012 61 ;CONFIG2 M0013 00 ;CONFIG3 M0014 00 ;CONFIG4 M0015 59 ;CONFIG5 M0016 25 ;CONFIG6 M0017 02 ;CONFIG7 M0018 11 ;CONFIG8 - SELCALL ID digit 1 M0019 00 ;CONFIG9 - SELCALL ID digit 2 M001A 00 ;CONFIGA - SELCALL ID digit 3 M001B 00 ;CONFIGB - SELCALL ID digit 4 M001C 00 ;CONFIGC - SELCALL ID digit 5 M001D 0E ;SELCALL digit buffer (working) M001E 0F ; " M001F 05 ; " M0020 0F ; " M0021 05 ; " M0022 00 M0023 20 M0024 00 M0025 04 M0026 01 M0027 00 M0028 00 M0029 5A ; RAM backup checkbyte ($5A if memory OK) M002A 00 M002B 00 M002C 00 M002D 00 M002E FF M002F FF M0030 FF M0031 FF M0032 FF M0033 FF M0034 FF M0035 FF M0036 00 M0037 01 M0038 5D M0039 01 M003A 04 M003B 00 M003C B0 ; RAM: buffer for Library Code = $3D-$5C ; With DUMP2.a05 code resident.... 9B L003D sei ; L003E Branch from L004D ; L003E Jumped from L005A 0D 01 0C L003E brclr 6,PORTB,L004D ;my DUMP2 code... C6 00 43 L0041 lda M0043 3C 43 L0044 inc M0043 26 02 L0046 bne L004A 3C 42 L0048 inc M0042 ; L004A Branch from L0046 ; L004A Branch from L004A 0C 01 FD L004A brset 6,PORTB,L004A ; L004D Branch from L003E 0B 01 EE L004D brclr 5,PORTB,L003E 15 01 L0050 bclr 2,PORTB 44 L0052 lsr A 24 02 L0053 bcc L0057 14 01 L0055 bset 2,PORTB ; L0057 Branch from L0057 ; L0057 Branch from L0053 0A 01 FD L0057 brset 5,PORTB,L0057 20 E2 L005A bra L003E ;---------------------------------- M005C: db 00,7B,28,00,9F,70,B7,08 ;' {( p ' M0064: db 9A,81,AE,0B,B7,DF,1A,24 ;' ' M006C: db 20,EE,A6,01,B7,5E,A6,E0 ;' ^ ' M0074: db 2F,E0,07,58,04,33,01,2E ;'/ X 3 ' M007C: db 01,23,01 M007F: db 8D ;Stack top ;================================== ; ; Port initialisation data. ; copy this data to Ports immediately after reset... M0080: db 00,15,2D,20 ;Port initialisation data M0084: db FF,1F,2F,7F ;Port DDR init. data ;---------------------------------- ; output X to EPROM A0,A1&A9, delay & get PORTB ; L0088 Called from L065F ; L0088 Called from L066C ; L0088 Called from L0657 ; L0088 Called from L0827 ; L0088 Called from L0216 BF 28 L0088 stx M0028 ; get M0028 & output to EPROM A0,A1&A9, delay & get PORTB ; L008A Called from L00AF ; L008A Called from L033D ; L008A Called from L05FA ; L008A Called from L0600 BE 28 L008A ldx M0028 AD 08 L008C bsr L0096 ;X0/1/2 to A0,A1,A9 A6 10 L008E lda #$10 ;delay loop ; L0090 Branch from L0091 4A L0090 dec A 26 FD L0091 bne L0090 B6 01 L0093 lda PORTB ;Switch return??? 81 L0095 rts ~ ;---------------------------------- ; output LSBs of X to EPROM address lines A0,A1,A9 ; L0096 Called from L0184 ; L0096 Called from L0810 ; L0096 Called from L014A ; L0096 Called from L03B2 ; L0096 Called from L0140 ; L0096 Called from L008C ; L0096 Called from L0230 ; L0096 Called from L00C1 ; L0096 Branch from L0036 ; L0096 Called from L00CD ; L0096 Called from L0718 ; L0096 Called from L0257 9F L0096 txa ~ ;X -> A A4 0F L0097 and #$0F B7 38 L0099 sta M0038 B6 03 L009B lda PORTD ;get portD state A4 F0 L009D and #$F0 ;keep high bits BB 38 L009F add M0038 ;merge new low bits B7 03 L00A1 sta PORTD ;output A0,A1,A9 81 L00A3 rts ~ ;---------------------------------- ; L00A4 Called from L036B ; L00A4 Called from L0452 BD C1 L00A4 jsr L00C1 A6 28 L00A6 lda #$28 ;---------------------------------- ; L00A8 Called from L0265 ; L00A8 Called from L02B6 ; L00A8 Called from L02CA BD D6 L00A8 jsr L00D6 1A 23 L00AA bset 5,M0023 81 L00AC rts ~ ;---------------------------------- ; Set up EPROM A0/A1/A9 from M0028 ; and wait for current Switch release ; L00AD Called from L036F ; L00AD Called from L062F ; L00AD Called from L024B ; L00AD Called from L0684 ; L00AD Called from L0568 AD 06 L00AD bsr L00B5 ;software time delay BD 8A L00AF jsr L008A ;out M0028 to EPROM A0/A1/A9 ;& get PORTB ; L00B1 Branch from L00B1 0F 01 FD L00B1 brclr 7,PORTB,L00B1 ;wait if Switch held 81 L00B4 rts ~ ;---------------------------------- ; software time delay (fixed delay) ; L00B5 Called from L0312 ; L00B5 Called from L04B2 ; L00B5 Called from L00AD ; L00B5 Called from L0261 A6 06 L00B5 lda #$06 B7 38 L00B7 sta M0038 ; L00B9 Branch from L00BA ; L00B9 Branch from L00BE 4A L00B9 dec A 26 FD L00BA bne L00B9 3A 38 L00BC dec M0038 26 F9 L00BE bne L00B9 81 L00C0 rts ~ ;---------------------------------- ; Display digits on LEDs ; L00C1 Called from L0816 ; L00C1 Called from L03AE ; L00C1 Called from L00A4 ; L00C1 Called from L0338 ; L00C1 Called from L048A ; L00C1 Called from L025E BD 96 L00C1 jsr L0096 ;X0/1/2 to A0,A1,A9 17 02 L00C3 bclr 3,PORTC ;LSB LED latch 7D L00C5 tst ,X ;delay 7D L00C6 tst ,X 16 02 L00C7 bset 3,PORTC ;LSB LED latch 57 L00C9 asr X 57 L00CA asr X 57 L00CB asr X 57 L00CC asr X BD 96 L00CD jsr L0096 ;X0/1/2 to A0,A1,A9 15 02 L00CF bclr 2,PORTC ;MSB LED latch 7D L00D1 tst ,X ;delay 7D L00D2 tst ,X 14 02 L00D3 bset 2,PORTC ;MSB LED latch 81 L00D5 rts ~ ;---------------------------------- ; set hardware timer period ; L00D6 Called from L00A8 B7 5E L00D6 sta M005E ;---------------------------------- ; set hardware timer period ; L00D8 Called from L0374 A6 7D L00D8 lda #$7D B7 5D L00DA sta M005D ; L00DC Jumped from L00EC ; L00DC Called from L02E3 AE 0D L00DC ldx #$0D BF 09 L00DE stx TIMCTL A6 70 L00E0 lda #$70 B7 08 L00E2 sta TIMER 9A L00E4 cli ~ 81 L00E5 rts ~ ;---------------------------------- ; L00E6 Called from L081C ; L00E6 Called from L0621 ; L00E6 Called from L0614 A6 0B L00E6 lda #$0B ;---------------------------------- ; L00E8 Called from L06BA ; L00E8 Called from L0890 B7 5F L00E8 sta M005F 1A 24 L00EA bset 5,M0024 20 EE L00EC bra L00DC ;---------------------------------- ; time delay loop ; length = 1 ; L00EE Called from L0885 A6 01 L00EE lda #$01 ;---------------------------------- ; long time delay loop ; A = time delay ; L00F0 Called from L07A2 ; L00F0 Called from L07AF ; L00F0 Called from L0779 ; L00F0 Called from L07BD ; L00F0 Called from L04AE B7 5E L00F0 sta M005E ; L00F2 Branch from L00FC A6 DE L00F2 lda #$DE ;time delay loop ; L00F4 Branch from L00F8 7D L00F4 tst ,X 7D L00F5 tst ,X 7D L00F6 tst ,X 4A L00F7 dec A 26 FA L00F8 bne L00F4 3A 5E L00FA dec M005E 26 F4 L00FC bne L00F2 81 L00FE rts ~ ;---------------------------------- ; Load Library function and execute. ; Called with MSB's of function address in EPROM ; in reg A. (A=A10-A3) ; ; Normally returns A=0 to continue, or a function ; address to chain to another function (to extend ; length of first function). ; ; Functions sometimes return a value in X ; ; Function addresses: ; 50 = 280, 54 = 2A0, 58 = 2C0, 5C = 2E0 ; 60 = 300, 64 = 320, 68 = 340, 6C = 360 ; 70 = 380, 74 = 3A0, 78 = 3C0, 7C = 3E0 ; ; D0 = 680, D4 = 6A0, D8 = 6C0, DC = 6E0 ; E0 = 700, E4 = 720, E8 = 740, EC = 760 ; F0 = 780, F4 = 7A0, F8 = 7C0, FC = 7E0 ; L00FF Jumped from L04F5 ; L00FF Called from L0362 ; L00FF Called from L02AC ; L00FF Called from L018B ; L00FF Called from L04E9 ; L00FF Called from L0844 ; L00FF Called from L064E ; L00FF Called from L071F ; L00FF Called from L0665 ; L00FF Called from L0221 ; L00FF Called from L07E2 ; L00FF Called from L0197 ; L00FF Called from L0703 ; L00FF Called from L0463 ; L00FF Branch from L0123 ; L00FF Called from L082E ; L00FF Called from L01FC AE 5D L00FF ldx #$5D BF 38 L0101 stx M0038 ;RAM block end AE 3D L0103 ldx #$3D ;RAM block start 48 L0105 lsl A ;A=2*A B7 3C L0106 sta M003C ;save funct. offset A4 F8 L0108 and #$F8 24 02 L010A bcc L010E ;leave A10=0? 12 02 L010C bset 1,PORTC ;set A10=1 ; L010E Branch from L010A B1 5C L010E cmp M005C 27 02 L0110 beq L0114 ;skip load if M005C==2*A AD 12 L0112 bsr L0126 ;load EPROM function ; with A=A2-A9 ; L0114 Branch from L0110 13 02 L0114 bclr 1,PORTC ;A10/TX Depower bit B6 3C L0116 lda M003C ;get lib. func. offset A4 07 L0118 and #$07 AB 3D L011A add #$3D ;start @ L003D-L0043 97 L011C tax ~ B6 5C L011D lda M005C ;check valid function 4C L011F inc A 27 03 L0120 beq L0125 ;quit if was $FF FD L0122 jsr X ;execute library func. **** Warning - Indirect Jump here to code in RAM at L003D ??? ; if lib function returns non-zero A, then ; call another lib function. ; L0123 User specified entry address 26 DA L0123 bne L00FF ;Load/Exec Lib Func. ; L0125 Branch from L0120 81 L0125 rts ~ ;---------------------------------- ; load EPROM function/data block into X-[M0037] block. ; enter with A=A2-A9 ; M0038 = end of RAM block ; L0126 Called from L0112 ; L0126 Called from L0171 CD 04 18 L0126 jsr L0418 ;A sets EPROM Addr A2-A9 in PORTA ; L0129 Branch from L0135 ; L0129 Jumped from L013C 14 03 L0129 bset 2,PORTD ;set EPROM A9=1 CD 04 29 L012B jsr L0429 ;get EPROM byte into ,X 5C L012E inc X B3 38 L012F cpx M0038 ;X==RAM end address? 27 19 L0131 beq L014C ;to rts to exit 3C 03 L0133 inc PORTD ;inc A0,A1,A9 04 03 F1 L0135 brset 2,PORTD,L0129 ;did A0/A1 inc overflow to A9? 3C 00 L0138 inc PORTA ;then inc. A2-A8 17 03 L013A bclr 3,PORTD ;DSP3=0 (in case D.2 overflowed??) 20 EB L013C bra L0129 ;loop next byte ; L013E Called from L017D AE 0E L013E ldx #$0E BD 96 L0140 jsr L0096 ;X0/1/2 to A0,A1,A9 06 23 03 L0142 brset 3,M0023,L0148 07 15 04 L0145 brclr 3,M0015,L014C ;OPEN LED disabled? ; L0148 Branch from L0142 AE 0C L0148 ldx #$0C BD 96 L014A jsr L0096 ;X0/1/2 to A0,A1,A9 ; L014C Branch from L0131 ; L014C Branch from L0145 81 L014C rts ~ ;---------------------------------- ; RESET ;---------------------------------- ; L014D User specified entry address ;initialise Ports... 5F L014D clr X ; L014E Branch from L0154 E6 80 L014E lda 80,X ;copy ROM to ports F7 L0150 sta ,X 5C L0151 inc X A3 08 L0152 cpx #$08 26 F8 L0154 bne L014E ; RAM backup check A6 5A L0156 lda #$5A ;RAM check byte B1 29 L0158 cmp M0029 27 0B L015A beq L0167 ;skip if OK ; Cold start - clear RAM M0008-M003C ; L015C Branch from L0160 7F L015C clr ,X 5C L015D inc X A3 3D L015E cpx #$3D 26 FA L0160 bne L015C B7 29 L0162 sta M0029 ;set RAM OK checkbyte CD 06 8B L0164 jsr L068B ;init. RAM M002E-M0035 to $FF ; Cold & Warm start continued... ; L0167 Branch from L015A 3F 24 L0167 clr M0024 AE 10 L0169 ldx #$10 A6 1D L016B lda #$1D B7 38 L016D sta M0038 A6 FC L016F lda #$FC ;get EPROM $3F0+ personality bytes AD B3 L0171 bsr L0126 ; save in RAM $10-$1C ; L0173 Jumped from L04DF ; L0173 Jumped from L0688 9C L0173 rsp ~ 1A 24 L0174 bset 5,M0024 3F 28 L0176 clr M0028 10 23 L0178 bset 0,M0023 CD 03 30 L017A jsr L0330 AD BF L017D bsr L013E 05 15 04 L017F brclr 2,M0015,L0186 ;SCAN LED as POWER AE 0A L0182 ldx #$0A BD 96 L0184 jsr L0096 ;X0/1/2 to A0,A1,A9 ; L0186 Branch from L017F 03 17 04 L0186 brclr 1,M0017,L018D ;Library 6C0 enabled? A6 D8 L0189 lda #$D8 ;function $6C0 BD FF L018B jsr L00FF ;Load/Exec Lib Func. ; L018D Branch from L0186 04 23 59 L018D brset 2,M0023,L01E9 19 25 L0190 bclr 4,M0025 ; L0192 Jumped from L01D6 07 16 04 L0192 brclr 3,M0016,L0199 ;library $340 enabled? A6 68 L0195 lda #$68 ;function $340 BD FF L0197 jsr L00FF ;Load/Exec Lib Func. ; Scan keyboard and execute key functions. ; Also do regular servicing of other tasks. ; L0199 Branch from L0192 5F L0199 clr X ;reset key count?? 9A L019A cli ~ ;allow interrupts ; L019B Branch from L01B4 AD 6D L019B bsr L020A ;get key status 24 5F L019D bcc L01FE ;jump to function table,X ;if carry=0, else continue... A3 06 L019F cpx #$06 ;key 6?? 26 0E L01A1 bne L01B1 03 24 0B L01A3 brclr 1,M0024,L01B1 ;skip if M0024.1 clr 13 24 L01A6 bclr 1,M0024 ;clr M0024.1 if set 07 17 4C L01A8 brclr 3,M0017,L01F7 ;ALERT reset from link??? AD 7F L01AB bsr L022C ; L01AD Jumped from L01F5 17 01 L01AD bclr 3,PORTB ;stop ALERT output 19 24 L01AF bclr 4,M0024 ; L01B1 Branch from L01F7 ; L01B1 Branch from L01A1 ; L01B1 Jumped from L05D9 ; L01B1 Branch from L01EB ; L01B1 Branch from L01A3 5C L01B1 inc X ;inc. key number A3 0A L01B2 cpx #$0A ;reach key 10 yet? 25 E5 L01B4 bcs L019B ;do next key, or... ; all keys scanned so do toher things before next scan starts 0C 02 1F L01B6 brset 6,PORTC,L01D8 ;SQUELCH ? 09 14 29 L01B9 brclr 4,M0014,L01E5 ;BUSY LED 5sec delay? 00 01 26 L01BC brset 0,PORTB,L01E5 ;BUSY LED on? B6 5E L01BF lda M005E A1 27 L01C1 cmp #$27 24 1C L01C3 bcc L01E1 06 25 19 L01C5 brset 3,M0025,L01E1 3D 60 L01C8 tst M0060 26 04 L01CA bne L01D0 A6 0A L01CC lda #$0A B7 60 L01CE sta M0060 ; L01D0 Branch from L01CA ; L01D0 Jumped from L01DF ; L01D0 Jumped from L01E7 0A 23 03 L01D0 brset 5,M0023,L01D6 CD 04 3F L01D3 jsr L043F ; L01D6 Branch from L01D0 20 BA L01D6 bra L0192 ;---------------------------------- ; L01D8 Branch from L01B6 11 01 L01D8 bclr 0,PORTB ;BUSY LED (off?) 0B 01 02 L01DA brclr 5,PORTB,L01DF ;br if no CTCSS tone 16 25 L01DD bset 3,M0025 ; L01DF Branch from L01DA 20 EF L01DF bra L01D0 ;---------------------------------- ; L01E1 Branch from L01C5 ; L01E1 Branch from L01C3 17 25 L01E1 bclr 3,M0025 3F 60 L01E3 clr M0060 ;---------------------------------- ; L01E5 Branch from L01BC ; L01E5 Branch from L01B9 10 01 L01E5 bset 0,PORTB ;BUSY LED (off)??? 20 E7 L01E7 bra L01D0 ;---------------------------------- ; L01E9 Branch from L018D 20 1C L01E9 bra L0207 ;---------------------------------- ; L01EB Jumped from L0205 02 24 C3 L01EB brset 1,M0024,L01B1 12 24 L01EE bset 1,M0024 07 17 04 L01F0 brclr 3,M0017,L01F7 ;ALERT reset from link??? AD 5E L01F3 bsr L0253 ; L01F5 Jumped from L024D 20 B6 L01F5 bra L01AD ; L01F7 Branch from L01F0 ; L01F7 Branch from L01A8 09 17 B7 L01F7 brclr 4,M0017,L01B1 ;Library 720 enabled? A6 E4 L01FA lda #$E4 ;function $720 BD FF L01FC jsr L00FF ;Load/Exec Lib Func. ;---------------------------------- ; jump to function table, offset by X ; L01FE Branch from L019D DC 01 FF L01FE jmp #$01FF,X **** Warning - Indirect Jump here to functions below: ;---------------------------------- ; Function 1 ; L0201 User specified entry address 20 40 L0201 bra L0243 ;---------------------------------- ; Function 2 ; L0203 User specified entry address 20 5C L0203 bra L0261 ;---------------------------------- ; Function 3 ; L0205 User specified entry address 20 E4 L0205 bra L01EB ;---------------------------------- ; Function 4 ; L0207 Jumped from L01E9 CC 05 68 L0207 jmp L0568 ;---------------------------------- ; L020A Called from L019B A3 03 L020A cpx #$03 27 0C L020C beq L021A A3 05 L020E cpx #$05 27 08 L0210 beq L021A A3 07 L0212 cpx #$07 27 04 L0214 beq L021A BD 88 L0216 jsr L0088 ;X sets EPROM A0/A1/A9,get PORTB 2A 02 L0218 bpl L021C ; L021A Branch from L0214 ; L021A Branch from L0210 ; L021A Branch from L020C 99 L021A sec ~ 81 L021B rts ~ ;---------------------------------- ; L021C Branch from L0218 09 16 04 L021C brclr 4,M0016,L0223 ;Library 360 enabled? A6 6C L021F lda #$6C ;function $360 BD FF L0221 jsr L00FF ;Load/Exec Lib Func. ; L0223 Branch from L021C A3 01 L0223 cpx #$01 27 16 L0225 beq L023D 5D L0227 tst X 27 11 L0228 beq L023B 98 L022A clc ~ 81 L022B rts ~ ;---------------------------------- ; L022C Called from L0249 ; L022C Called from L01AB 17 23 L022C bclr 3,M0023 AE 0E L022E ldx #$0E BD 96 L0230 jsr L0096 ;X0/1/2 to A0,A1,A9 04 15 03 L0232 brset 2,M0015,L0238 ;SCAN LED as POWER 05 23 02 L0235 brclr 2,M0023,L023A ; L0238 Branch from L0232 15 03 L0238 bclr 2,PORTD ;EPROM A9/DSP2 ; L023A Branch from L0235 81 L023A rts ~ ;---------------------------------- ; L023B Branch from L0228 10 23 L023B bset 0,M0023 ;---------------------------------- ; L023D Branch from L0225 CD 03 12 L023D jsr L0312 99 L0240 sec ~ 5F L0241 clr X 81 L0242 rts ~ ;---------------------------------- ; key function.... ; L0243 Jumped from L0201 01 13 05 L0243 brclr 0,M0013,L024B ;Silent switch enabled?? 07 23 06 L0246 brclr 3,M0023,L024F AD E1 L0249 bsr L022C ; L024B Branch from L0243 ; L024B Jumped from L0251 BD AD L024B jsr L00AD ;wait switch release? ; L024D Jumped from L027E 20 A6 L024D bra L01F5 ; L024F Branch from L0246 AD 02 L024F bsr L0253 20 F8 L0251 bra L024B ; L0253 Called from L024F ; L0253 Called from L01F3 16 23 L0253 bset 3,M0023 AE 0C L0255 ldx #$0C BD 96 L0257 jsr L0096 ;X0/1/2 to A0,A1,A9 81 L0259 rts ~ ;---------------------------------- ; L025A Called from L02C5 ; L025A Called from L0445 1D 23 L025A bclr 6,M0023 AE BB L025C ldx #$BB BD C1 L025E jsr L00C1 81 L0260 rts ~ ;---------------------------------- ; L0261 Jumped from L0203 BD B5 L0261 jsr L00B5 ;software time delay A6 02 L0263 lda #$02 BD A8 L0265 jsr L00A8 ; L0267 Branch from L026A 0B 23 2F L0267 brclr 5,M0023,L0299 0F 01 FA L026A brclr 7,PORTB,L0267 ;loop if switch held ; L026D Branch from L0274 05 25 10 L026D brclr 2,M0025,L0280 15 25 L0270 bclr 2,M0025 18 23 L0272 bset 4,M0023 07 13 F6 L0274 brclr 3,M0013,L026D ;SEL status call enabled? B6 22 L0277 lda M0022 AB B0 L0279 add #$B0 ; L027B Jumped from L028C CD 03 68 L027B jsr L0368 ; L027E Jumped from L0297 20 CD L027E bra L024D ;---------------------------------- ; L0280 Branch from L026D ; L0280 Branch from L0285 09 23 0D L0280 brclr 4,M0023,L0290 19 23 L0283 bclr 4,M0023 0F 13 F8 L0285 brclr 7,M0013,L0280 ;car-car SELCALL? ; L0288 Jumped from L02DC 10 25 L0288 bset 0,M0025 B6 27 L028A lda M0027 20 ED L028C bra L027B ;---------------------------------- ; L028E Branch from L029F ; L028E Branch from L02A5 AD 4E L028E bsr L02DE ;---------------------------------- ; L0290 Branch from L0280 ; L0290 Branch from L0299 ; L0290 Jumped from L02D3 11 25 L0290 bclr 0,M0025 14 25 L0292 bset 2,M0025 CD 03 44 L0294 jsr L0344 20 E5 L0297 bra L027E ;---------------------------------- ; L0299 Branch from L0267 05 13 F4 L0299 brclr 2,M0013,L0290 ;SELCALL enabled? 0D 14 03 L029C brclr 6,M0014,L02A2 ;BUSY inhibits SEND? 01 01 EC L029F brclr 0,PORTB,L028E ;BUSY LED on? ; L02A2 Branch from L029C 0F 14 03 L02A2 brclr 7,M0014,L02A8 ;OPEN inhibits SEND? 07 23 E6 L02A5 brclr 3,M0023,L028E ; L02A8 Branch from L02A2 14 24 L02A8 bset 2,M0024 A6 D4 L02AA lda #$D4 ;function $6A0 BD FF L02AC jsr L00FF ;Load/Exec Lib Func. CD 07 71 L02AE jsr L0771 03 15 1B L02B1 brclr 1,M0015,L02CF ;unknown option? A6 04 L02B4 lda #$04 BD A8 L02B6 jsr L00A8 ; L02B8 Branch from L02BB 0B 23 1A L02B8 brclr 5,M0023,L02D5 09 24 FA L02BB brclr 4,M0024,L02B8 19 24 L02BE bclr 4,M0024 A6 02 L02C0 lda #$02 CD 05 32 L02C2 jsr L0532 CD 02 5A L02C5 jsr L025A A6 02 L02C8 lda #$02 BD A8 L02CA jsr L00A8 ; L02CC Branch from L02CC 0B 23 FD L02CC brclr 5,M0023,L02CC ; L02CF Branch from L02B1 ; L02CF Branch from L02D5 15 24 L02CF bclr 2,M0024 19 23 L02D1 bclr 4,M0023 20 BB L02D3 bra L0290 ;---------------------------------- ; L02D5 Branch from L02B8 01 25 F7 L02D5 brclr 0,M0025,L02CF 15 25 L02D8 bclr 2,M0025 15 24 L02DA bclr 2,M0024 20 AA L02DC bra L0288 ;---------------------------------- ; L02DE Called from L028E ; L02DE Called from L03D0 A6 01 L02DE lda #$01 CD 05 32 L02E0 jsr L0532 BD DC L02E3 jsr L00DC 81 L02E5 rts ~ ;---------------------------------- ; L02E6 Called from L032C ; L02E6 Called from L0353 00 23 09 L02E6 brset 0,M0023,L02F2 4D L02E9 tst A 26 03 L02EA bne L02EF B6 3A L02EC lda M003A 4C L02EE inc A ; L02EF Branch from L02EA 4A L02EF dec A 20 07 L02F0 bra L02F9 ;---------------------------------- ; L02F2 Branch from L02E6 B1 3A L02F2 cmp M003A 26 02 L02F4 bne L02F8 A6 FF L02F6 lda #$FF ; L02F8 Branch from L02F4 4C L02F8 inc A ; L02F9 Jumped from L02F0 97 L02F9 tax ~ A4 0F L02FA and #$0F A1 0A L02FC cmp #$0A 26 06 L02FE bne L0306 9F L0300 txa ~ A4 F0 L0301 and #$F0 AB 10 L0303 add #$10 97 L0305 tax ~ ; L0306 Branch from L02FE A1 0F L0306 cmp #$0F 26 06 L0308 bne L0310 9F L030A txa ~ A4 F0 L030B and #$F0 AB 09 L030D add #$09 97 L030F tax ~ ; L0310 Branch from L0308 9F L0310 txa ~ 81 L0311 rts ~ ;---------------------------------- ; L0312 Called from L023D BD B5 L0312 jsr L00B5 ;software time delay 08 23 36 L0314 brset 4,M0023,L034D 00 25 42 L0317 brset 0,M0025,L035C 09 11 03 L031A brclr 4,M0011,L0320 ;display blank after 20sec? 0B 23 24 L031D brclr 5,M0023,L0344 ; L0320 Branch from L031A A6 96 L0320 lda #$96 ;---------------------------------- ; L0322 Jumped from L0379 B7 5F L0322 sta M005F 1A 24 L0324 bset 5,M0024 ;---------------------------------- ; L0326 Branch from L0333 B6 10 L0326 lda M0010 ;highest chan number B7 3A L0328 sta M003A B6 26 L032A lda M0026 AD B8 L032C bsr L02E6 BF 26 L032E stx M0026 ; L0330 Called from L017A ; L0330 Called from L0782 CD 08 A4 L0330 jsr L08A4 0E 03 F0 L0333 brset 7,PORTD,L0326 ;read EPROM serial data BE 26 L0336 ldx M0026 BD C1 L0338 jsr L00C1 ; L033A Branch from L033F 0B 24 3A L033A brclr 5,M0024,L0377 BD 8A L033D jsr L008A ;out M0028 to EPROM A0/A1/A9 ;& get PORTB 2A F9 L033F bpl L033A ;test switch return CD 03 ED L0341 jsr L03ED ; L0344 Branch from L031D ; L0344 Called from L0294 1D 23 L0344 bclr 6,M0023 BE 26 L0346 ldx M0026 09 11 20 L0348 brclr 4,M0011,L036B ;display blank after 20sec? 20 1C L034B bra L0369 ;---------------------------------- ; L034D Branch from L0314 A6 09 L034D lda #$09 B7 3A L034F sta M003A B6 22 L0351 lda M0022 CD 02 E6 L0353 jsr L02E6 B7 22 L0356 sta M0022 AB B0 L0358 add #$B0 20 0C L035A bra L0368 ;---------------------------------- ; L035C Branch from L0317 A6 99 L035C lda #$99 B7 3A L035E sta M003A A6 78 L0360 lda #$78 ;function $3C0 BD FF L0362 jsr L00FF ;Load/Exec Lib Func. B6 27 L0364 lda M0027 13 25 L0366 bclr 1,M0025 ;---------------------------------- ; L0368 Jumped from L035A ; L0368 Called from L027B 97 L0368 tax ~ ;---------------------------------- ; L0369 Jumped from L034B 1C 23 L0369 bset 6,M0023 ;---------------------------------- ; L036B Branch from L0348 BD A4 L036B jsr L00A4 11 23 L036D bclr 0,M0023 BD AD L036F jsr L00AD ;wait switch release? CD 07 21 L0371 jsr L0721 BD D8 L0374 jsr L00D8 81 L0376 rts ~ ;---------------------------------- ; L0377 Branch from L033A A6 25 L0377 lda #$25 20 A7 L0379 bra L0322 ;============================================================ ;---------------------------------- ; TIMER IRQ ;---------------------------------- ; L037B User specified entry address 1F 09 L037B bclr 7,TIMERC ;clear timer IRQ req. A6 7D L037D lda #$7D ;restart timer B7 08 L037F sta TIMER 3A 5F L0381 dec M005F 26 08 L0383 bne L038D 1B 24 L0385 bclr 5,M0024 05 13 03 L0387 brclr 2,M0013,L038D ;SELCALL enabled? CD 06 9D L038A jsr L069D ; L038D Branch from L0383 ; L038D Branch from L0387 03 13 45 L038D brclr 1,M0013,L03D5 ;CTCSS enabled? 0B 01 45 L0390 brclr 5,PORTB,L03D8 ;br if no CTCSS tone 0A 14 45 L0393 brset 5,M0014,L03DB ;Silent switch option?? ; L0396 Branch from L03D5 ; L0396 Branch from L03DB 13 01 L0396 bclr 1,PORTB ;EPROM A1/DSP1 ; L0398 Jumped from L03E0 3A 5D L0398 dec M005D 26 30 L039A bne L03CC 09 24 05 L039C brclr 4,M0024,L03A4 06 01 2C L039F brset 3,PORTB,L03CE ;DSP3 on? 16 01 L03A2 bset 3,PORTB ;set DSP3 ; L03A4 Branch from L039C ; L03A4 Jumped from L03D3 01 25 0D L03A4 brclr 0,M0025,L03B4 02 25 38 L03A7 brset 1,M0025,L03E2 12 25 L03AA bset 1,M0025 BE 27 L03AC ldx M0027 ; L03AE Jumped from L03E6 BD C1 L03AE jsr L00C1 BE 28 L03B0 ldx M0028 BD 96 L03B2 jsr L0096 ;X0/1/2 to A0,A1,A9 ; L03B4 Branch from L03A4 A6 7D L03B4 lda #$7D B7 5D L03B6 sta M005D 3D 60 L03B8 tst M0060 27 06 L03BA beq L03C2 3A 60 L03BC dec M0060 26 02 L03BE bne L03C2 10 01 L03C0 bset 0,PORTB ;BUSY LED (off)?? ; L03C2 Branch from L03BE ; L03C2 Branch from L03BA 3D 5E L03C2 tst M005E 27 04 L03C4 beq L03CA 3A 5E L03C6 dec M005E 26 02 L03C8 bne L03CC ; L03CA Branch from L03C4 1B 23 L03CA bclr 5,M0023 ; L03CC Branch from L03C8 ; L03CC Branch from L039A 9A L03CC cli ~ 80 L03CD rti ~ ;return from timer irq ;---------------------------------- ; L03CE Branch from L039F 17 01 L03CE bclr 3,PORTB ;DSP3 = 0 CD 02 DE L03D0 jsr L02DE 20 CF L03D3 bra L03A4 ;---------------------------------- ; L03D5 Branch from L038D 05 13 BE L03D5 brclr 2,M0013,L0396 ;SELCALL enabled? ; L03D8 Branch from L0390 0A 14 03 L03D8 brset 5,M0014,L03DE ;Silient switch option? ; L03DB Branch from L0393 06 23 B8 L03DB brset 3,M0023,L0396 ; L03DE Branch from L03D8 12 01 L03DE bset 1,PORTB ;DSP1 = 1 (A1=1) 20 B6 L03E0 bra L0398 ;---------------------------------- ; L03E2 Branch from L03A7 13 25 L03E2 bclr 1,M0025 AE BB L03E4 ldx #$BB 20 C6 L03E6 bra L03AE ;---------------------------------- ; Error handler - PLL lock time too long ; L03E8 Branch from L040F A6 01 L03E8 lda #$01 CD 05 32 L03EA jsr L0532 ;---------------------------------- ; load 4 EPROM bytes pointed to by X, into M0038-M003B ; L03ED Called from L04F9 ; L03ED Called from L0818 ; L03ED Called from L0341 AD 27 L03ED bsr L0416 ;M0023 sets EPROM addr. A2-A9 AE 38 L03EF ldx #$38 ;read from EPROM $0038 ; L03F1 Branch from L03F8 AD 36 L03F1 bsr L0429 ;get EPROM byte into ,X 3C 03 L03F3 inc PORTD ;inc A0,A1 5C L03F5 inc X ;next address A3 3C L03F6 cpx #$3C ; reached M003C ? 26 F7 L03F8 bne L03F1 B6 39 L03FA lda M0039 44 L03FC lsr A AA 40 L03FD ora #$40 B7 00 L03FF sta PORTA ;set EPROM addr. A2-A8 1C 03 L0401 bset 6,PORTD ;Serial Data strobe (PLL) 1D 03 L0403 bclr 6,PORTD 1E 00 L0405 bset 7,PORTA ;EPROM /CE=1 (disable) AE 4F L0407 ldx #$4F ;start timer BF 09 L0409 stx TIMCTL A6 69 L040B lda #$69 B7 08 L040D sta TIMER ; L040F Branch from L0412 0E 09 D6 L040F brset 7,TIMCTL,L03E8 ;timer expired? 08 02 FA L0412 brset 4,PORTC,L040F ;PLL out of lock? 81 L0415 rts ~ ;---------------------------------- ; output M0026 to EPROM adr. bits A2-A9 ; & zero A0,A1 ; L0416 Called from L08A6 ; L0416 Called from L03ED B6 26 L0416 lda M0026 ;get address from M0026 ; output Acc.A to EPROM adr. bits A2-A9 ; & zero A0,A1 ; L0418 Called from L058D ; L0418 Called from L0126 15 03 L0418 bclr 2,PORTD ;set EPROM A9=0 2A 04 L041A bpl L0420 14 03 L041C bset 2,PORTD ;set EPROM A9=1 A4 7F L041E and #$7F ; L0420 Branch from L041A B7 00 L0420 sta PORTA ;out EPROM A2-A8 A6 F4 L0422 lda #$F4 B4 03 L0424 and PORTD ;set EPROM A0,A1=0 B7 03 L0426 sta PORTD 81 L0428 rts ~ ;---------------------------------- ; Get EPROM data at current address. ; save in RAM byte pointed to by X ; L0429 Called from L012B ; L0429 Called from L03F1 ; L0429 Called from L0592 1F 00 L0429 bclr 7,PORTA ;set EPROM /CE=0 18 03 L042B bset 4,PORTD ;strobe S/R latch 19 03 L042D bclr 4,PORTD 1E 00 L042F bset 7,PORTA ;set EPROM /CE=1 A6 08 L0431 lda #$08 ; 8 bits ; L0433 Branch from L043C 0E 03 00 L0433 brset 7,PORTD,L0436 ;read serial EPROM data ; L0436 Branch from L0433 79 L0436 rol ,X ;shift data into ,X 1B 03 L0437 bclr 5,PORTD ;strobe S/R clock 1A 03 L0439 bset 5,PORTD 4A L043B dec A 26 F5 L043C bne L0433 ;till 8 bits done 81 L043E rts ~ ;---------------------------------- ; L043F Called from L01D3 0D 23 08 L043F brclr 6,M0023,L044A 05 25 06 L0442 brclr 2,M0025,L044B CD 02 5A L0445 jsr L025A 1D 23 L0448 bclr 6,M0023 ; L044A Branch from L043F 81 L044A rts ~ ;---------------------------------- ; L044B Branch from L0442 08 11 02 L044B brset 4,M0011,L0450 ;display blank after 20sec? 1D 23 L044E bclr 6,M0023 ; L0450 Branch from L044B BE 26 L0450 ldx M0026 BD A4 L0452 jsr L00A4 11 25 L0454 bclr 0,M0025 14 25 L0456 bset 2,M0025 19 23 L0458 bclr 4,M0023 81 L045A rts ~ ;============================================================ ;---------------------------------- ; IRQ (PTT) ;---------------------------------- ; L045B User specified entry address 2E 01 L045B bil L045E ;test PTT line 80 L045D rti ~ ; PTT has been pressed ; ; L045E Branch from L045B 0B 16 04 L045E brclr 5,M0016,L0465 ;Library 380 enabled? A6 70 L0461 lda #$70 ;function $380 BD FF L0463 jsr L00FF ;Load/Exec Lib Func. ; L0465 Branch from L045E 9C L0465 rsp ~ 05 23 0E L0466 brclr 2,M0023,L0477 00 24 0B L0469 brset 0,M0024,L0477 B6 2A L046C lda M002A B7 26 L046E sta M0026 00 15 04 L0470 brset 0,M0015,L0477 ;Voting option??? A6 01 L0473 lda #$01 20 64 L0475 bra L04DB ;---------------------------------- ; COME HERE TO TRANSMIT ; L0477 Branch from L0466 ; L0477 Branch from L0470 ; L0477 Branch from L0469 A6 02 L0477 lda #$02 0F 02 18 L0479 brclr 7,PORTC,L0494 ;AUX PTT? 0B 11 03 L047C brclr 5,M0011,L0482 ;BUSY inhibits TX? 01 01 59 L047F brclr 0,PORTB,L04DB ;BUSY LED (on)?? ; L0482 Branch from L047C 0D 11 03 L0482 brclr 6,M0011,L0488 ;OPEN inhibits Tx? 07 23 53 L0485 brclr 3,M0023,L04DB ; L0488 Branch from L0482 BE 26 L0488 ldx M0026 BD C1 L048A jsr L00C1 17 01 L048C bclr 3,PORTB ;ALERT off 17 03 L048E bclr 3,PORTD ;DSP3 19 24 L0490 bclr 4,M0024 20 02 L0492 bra L0496 ;---------------------------------- ; L0494 Branch from L0479 1E 23 L0494 bset 7,M0023 ; L0496 Jumped from L0492 10 01 L0496 bset 0,PORTB ;BUSY LED (off)?? AD 5D L0498 bsr L04F7 09 13 15 L049A brclr 4,M0013,L04B2 ;leading ANI enabled? CD 07 C9 L049D jsr L07C9 ;Get ANI leadin delay 0D 13 0B L04A0 brclr 6,M0013,L04AE ;Send ANI+beep enable? A0 32 L04A3 sub #$32 B7 38 L04A5 sta M0038 A6 01 L04A7 lda #$01 CD 05 32 L04A9 jsr L0532 B6 38 L04AC lda M0038 ; L04AE Branch from L04A0 BD F0 L04AE jsr L00F0 ;Time delay (length A) AD 63 L04B0 bsr L0515 ; L04B2 Branch from L049A CD 00 B5 L04B2 jsr L00B5 ;software time delay AE 5F L04B5 ldx #$5F B6 11 L04B7 lda M0011 ;get TX timeout value A4 0F L04B9 and #$0F 48 L04BB lsl A B7 39 L04BC sta M0039 ;set timeout 27 06 L04BE beq L04C6 ; L04C0 Branch from L04D7 AE 4F L04C0 ldx #$4F A6 E5 L04C2 lda #$E5 B7 38 L04C4 sta M0038 ; L04C6 Branch from L04BE ; L04C6 Branch from L04D1 BF 09 L04C6 stx TIMCTL B7 08 L04C8 sta TIMER ; L04CA Branch from L04CC 2F 16 L04CA bih L04E2 0F 09 FB L04CC brclr 7,TIMCTL,L04CA 3A 38 L04CF dec M0038 26 F3 L04D1 bne L04C6 AD 3A L04D3 bsr L050F 3A 39 L04D5 dec M0039 26 E7 L04D7 bne L04C0 A6 03 L04D9 lda #$03 ;---------------------------------- ; L04DB Branch from L0485 ; L04DB Branch from L047F ; L04DB Jumped from L0475 AD 55 L04DB bsr L0532 ; L04DD Branch from L04F0 ; L04DD Branch from L04ED AD 46 L04DD bsr L0525 CC 01 73 L04DF jmp L0173 ;---------------------------------- ; L04E2 Branch from L04CA AD 2E L04E2 bsr L0512 0D 16 04 L04E4 brclr 6,M0016,L04EB ;Library 3A0 enabled? A6 74 L04E7 lda #$74 ;function $3A0 BD FF L04E9 jsr L00FF ;Load/Exec Lib Func. ; L04EB Branch from L04E4 18 01 L04EB bset 4,PORTB ;CTCSS ENC disable 0E 23 ED L04ED brset 7,M0023,L04DD 05 17 EA L04F0 brclr 2,M0017,L04DD ;Library 6E0 enabled? A6 DC L04F3 lda #$DC ;function $6E0 BC FF L04F5 jmp L00FF ;Load/Exec Lib Func. ;---------------------------------- ; L04F7 Called from L0772 ; L04F7 Called from L0498 12 02 L04F7 bset 1,PORTC ;A10/TX Depower bit CD 03 ED L04F9 jsr L03ED 19 01 L04FC bclr 4,PORTB ;CTCSS ENC enable 0E 11 06 L04FE brset 7,M0011,L0507 ;Depower Tx from link? B6 38 L0501 lda M0038 27 05 L0503 beq L050A 20 05 L0505 bra L050C ;---------------------------------- ; Depower Tx from link allowed.... ; L0507 Branch from L04FE 03 24 02 L0507 brclr 1,M0024,L050C ; L050A Branch from L0503 13 02 L050A bclr 1,PORTC ;A10/TX Depower bit ; L050C Jumped from L0505 ; L050C Branch from L0507 11 02 L050C bclr 0,PORTC ;TX ON = 0 81 L050E rts ~ ;---------------------------------- ; L050F Called from L04D3 08 13 03 L050F brset 4,M0013,L0515 ;leading ANI enabled? ; L0512 Called from L04E2 0B 13 0F L0512 brclr 5,M0013,L0524 ;trail. ANI enbaled? ;---------------------------------- ; L0515 Branch from L050F ; L0515 Called from L04B0 CD 07 C0 L0515 jsr L07C0 01 16 03 L0518 brclr 0,M0016,L051E ;Bypass TX code enabled? CD 07 50 L051B jsr L0750 ; L051E Branch from L0518 CD 07 86 L051E jsr L0786 CD 06 BC L0521 jsr L06BC ; L0524 Branch from L0512 81 L0524 rts ~ ;---------------------------------- ; L0525 Called from L04DD ; L0525 Called from L077D 18 01 L0525 bset 4,PORTB ;CTCSS ENC disable 1F 23 L0527 bclr 7,M0023 10 02 L0529 bset 0,PORTC ;TX ON = 1 ; L052B Branch from L052B 2E FE L052B bil L052B 15 23 L052D bclr 2,M0023 13 02 L052F bclr 1,PORTC ;A10/TX Depower bit 81 L0531 rts ~ ;---------------------------------- ; L0532 Called from L04A9 ; L0532 Called from L0711 ; L0532 Called from L03EA ; L0532 Called from L02C2 ; L0532 Called from L02E0 ; L0532 Called from L04DB B7 39 L0532 sta M0039 ; L0534 Branch from L0558 A6 04 L0534 lda #$04 ; L0536 Branch from L054A AD 23 L0536 bsr L055B ; L0538 Branch from L0546 1B 02 L0538 bclr 5,PORTC ;ALARM off AE 4B L053A ldx #$4B ; L053C Branch from L053D 5A L053C dec X 26 FD L053D bne L053C 1A 02 L053F bset 5,PORTC ;ALARM on AE 4B L0541 ldx #$4B ; L0543 Branch from L0544 5A L0543 dec X 26 FD L0544 bne L0543 0F 09 EF L0546 brclr 7,TIMCTL,L0538 4A L0549 dec A 26 EA L054A bne L0536 A6 04 L054C lda #$04 ; L054E Branch from L0554 AD 0B L054E bsr L055B ; L0550 Branch from L0550 0F 09 FD L0550 brclr 7,TIMCTL,L0550 4A L0553 dec A 26 F8 L0554 bne L054E 3A 39 L0556 dec M0039 26 DA L0558 bne L0534 81 L055A rts ~ ;---------------------------------- ; L055B Called from L054E ; L055B Called from L0536 AE 4F L055B ldx #$4F BF 09 L055D stx TIMCTL AE AE L055F ldx #$AE BF 08 L0561 stx TIMER 81 L0563 rts ~ ;---------------------------------- ; L0564 Branch from L0577 B6 26 L0564 lda M0026 B7 2E L0566 sta M002E ;---------------------------------- ; L0568 Jumped from L0207 BD AD L0568 jsr L00AD ;wait switch release? 00 12 12 L056A brset 0,M0012,L057F ;Scan enabled? 01 15 69 L056D brclr 0,M0015,L05D9 ;Voting option??? CC 07 D0 L0570 jmp L07D0 ;---------------------------------- ; L0573 Branch from L0588 AE 2E L0573 ldx #$2E F6 L0575 lda ,X 4C L0576 inc A 27 EB L0577 beq L0564 9F L0579 txa ~ BB 2B L057A add M002B 97 L057C tax ~ 20 16 L057D bra L0595 ;---------------------------------- ; Scan enabled... ; L057F Branch from L056A CD 08 06 L057F jsr L0806 A6 1E L0582 lda #$1E B7 61 L0584 sta M0061 ; L0586 Branch from L0598 3F 2B L0586 clr M002B ; L0588 Jumped from L05C2 08 12 E8 L0588 brset 4,M0012,L0573 ;User prog. scan? B6 2B L058B lda M002B CD 04 18 L058D jsr L0418 ;Acc.A sets EPROM addr. A2-A9 AE 38 L0590 ldx #$38 ;EPROM address=M0038 CD 04 29 L0592 jsr L0429 ;get EPROM byte into M0038 ; L0595 Jumped from L057D F6 L0595 lda ,X A1 FF L0596 cmp #$FF ;EPROM data = $FF? 27 EC L0598 beq L0586 ;keep searching for $FF 08 12 0A L059A brset 4,M0012,L05A7 ;User prog. scan? AE 32 L059D ldx #$32 ; L059F Branch from L05A5 F1 L059F cmp ,X 27 1E L05A0 beq L05C0 5C L05A2 inc X A3 36 L05A3 cpx #$36 26 F8 L05A5 bne L059F ; L05A7 Branch from L059A ; L05A7 Jumped from L05D0 CD 08 13 L05A7 jsr L0813 ; L05AA Jumped from L05EA ; L05AA Branch from L05BB ; L05AA Branch from L05D2 CD 08 1C L05AA jsr L081C ; L05AD Branch from L05B5 0C 02 3C L05AD brset 6,PORTC,L05EC ;SQUELCH? 10 01 L05B0 bset 0,PORTB ;BUSY LED (off)?? CD 06 52 L05B2 jsr L0652 0A 24 F5 L05B5 brset 5,M0024,L05AD 0C 24 17 L05B8 brset 6,M0024,L05D2 0A 23 EC L05BB brset 5,M0023,L05AA 11 24 L05BE bclr 0,M0024 ; L05C0 Branch from L05A0 ; L05C0 Jumped from L05DC 3C 2B L05C0 inc M002B ; L05C2 Jumped from L05D7 20 C4 L05C2 bra L0588 ;---------------------------------- ; L05C4 Branch from L0612 A6 1E L05C4 lda #$1E B7 61 L05C6 sta M0061 B6 2A L05C8 lda M002A B7 26 L05CA sta M0026 1C 24 L05CC bset 6,M0024 12 01 L05CE bset 1,PORTB ;SILENT=1 20 D5 L05D0 bra L05A7 ;---------------------------------- ; L05D2 Branch from L05B8 0A 23 D5 L05D2 brset 5,M0023,L05AA 1D 24 L05D5 bclr 6,M0024 20 E9 L05D7 bra L05C2 ;---------------------------------- ; L05D9 Branch from L056D CC 01 B1 L05D9 jmp L01B1 ;---------------------------------- ; L05DC Jumped from L062D 20 E2 L05DC bra L05C0 ;---------------------------------- ; L05DE Branch from L05F5 10 01 L05DE bset 0,PORTB ;BUSY LED (off)?? B6 12 L05E0 lda M0012 ;get scan hold time 44 L05E2 lsr A 44 L05E3 lsr A 44 L05E4 lsr A 44 L05E5 lsr A B7 5E L05E6 sta M005E ;save scan hold time 1A 23 L05E8 bset 5,M0023 20 BE L05EA bra L05AA ;---------------------------------- ; L05EC Branch from L05AD 11 01 L05EC bclr 0,PORTB ;BUSY LED (on)?? 02 12 29 L05EE brset 1,M0012,L061A ;Scan stops w/CTCSS? ; L05F1 Branch from L061A ; L05F1 Branch from L0623 13 01 L05F1 bclr 1,PORTB ;SILENT=0 10 24 L05F3 bset 0,M0024 ; L05F5 Jumped from L0618 0D 02 E6 L05F5 brclr 6,PORTC,L05DE ;SQUELCH? 3F 28 L05F8 clr M0028 BD 8A L05FA jsr L008A ;out M0028 to EPROM A0/A1/A9 ;& get PORTB 2A 31 L05FC bpl L062F ;test switch return 3C 28 L05FE inc M0028 BD 8A L0600 jsr L008A ;out M0028 to EPROM A0/A1/A9 ;& get PORTB 2B 03 L0602 bmi L0607 ;test switch return 04 12 30 L0604 brset 2,M0012,L0637 ;DOWN deletes chan? ; L0607 Branch from L0602 09 25 0C L0607 brclr 4,M0025,L0616 0C 24 3C L060A brset 6,M0024,L0649 0A 24 06 L060D brset 5,M0024,L0616 3A 61 L0610 dec M0061 27 B0 L0612 beq L05C4 BD E6 L0614 jsr L00E6 ; L0616 Branch from L060D ; L0616 Branch from L0607 ; L0616 Jumped from L0650 ; L0616 Branch from L0649 AD 3A L0616 bsr L0652 20 DB L0618 bra L05F5 ;---------------------------------- ; L061A Branch from L05EE 06 23 D4 L061A brset 3,M0023,L05F1 A6 07 L061D lda #$07 B7 39 L061F sta M0039 ; L0621 Branch from L062B BD E6 L0621 jsr L00E6 ; L0623 Branch from L0626 0A 01 CB L0623 brset 5,PORTB,L05F1 ;br if CTCSS decoded 0A 24 FA L0626 brset 5,M0024,L0623 3A 39 L0629 dec M0039 26 F4 L062B bne L0621 ; L062D Jumped from L0635 20 AD L062D bra L05DC ;---------------------------------- ; L062F Branch from L05FC BD AD L062F jsr L00AD ;wait switch release? ; L0631 Jumped from L0647 11 24 L0631 bclr 0,M0024 10 01 L0633 bset 0,PORTB ;BUSY LED (off)?? 20 F6 L0635 bra L062D ;---------------------------------- ; L0637 Branch from L0604 AE 34 L0637 ldx #$34 ; L0639 Jumped from L0641 A3 31 L0639 cpx #$31 27 06 L063B beq L0643 F6 L063D lda ,X E7 01 L063E sta 01,X 5A L0640 dec X 20 F6 L0641 bra L0639 ;---------------------------------- ; L0643 Branch from L063B B6 26 L0643 lda M0026 E7 01 L0645 sta 01,X 20 E8 L0647 bra L0631 ;---------------------------------- ; L0649 Branch from L060A 05 16 CA L0649 brclr 2,M0016,L0616 ;Library 320 enabled? A6 64 L064C lda #$64 ;function $320 BD FF L064E jsr L00FF ;Load/Exec Lib Func. 20 C4 L0650 bra L0616 ;---------------------------------- ; L0652 Called from L05B2 ; L0652 Called from L0616 07 12 08 L0652 brclr 3,M0012,L065D ;hangup resets scan option??? AE 02 L0655 ldx #$02 BD 88 L0657 jsr L0088 ;X sets EPROM A0/A1/A9,get PORTB 2B 02 L0659 bmi L065D 18 25 L065B bset 4,M0025 ; L065D Branch from L0652 ; L065D Branch from L0659 AE 04 L065D ldx #$04 BD 88 L065F jsr L0088 ;X sets EPROM A0/A1/A9,get PORTB 2B 04 L0661 bmi L0667 A6 50 L0663 lda #$50 ;function $280 BD FF L0665 jsr L00FF ;Load/Exec Lib Func. ; L0667 Branch from L0661 AE 06 L0667 ldx #$06 0B 17 04 L0669 brclr 5,M0017,L0670 ;Depower enabled??? ; L066C Branch from L0674 BD 88 L066C jsr L0088 ;X sets EPROM A0/A1/A9,get PORTB 2A 07 L066E bpl L0677 ; L0670 Branch from L0669 5C L0670 inc X 5C L0671 inc X A3 08 L0672 cpx #$08 27 F6 L0674 beq L066C 81 L0676 rts ~ ;---------------------------------- ; L0677 Branch from L066E 08 12 02 L0677 brset 4,M0012,L067C ;User prog. scan? AD 0F L067A bsr L068B ;---------------------------------- ; L067C Jumped from L0803 ; L067C Branch from L0677 ; L067C Jumped from L08A1 B6 2A L067C lda M002A B7 26 L067E sta M0026 15 23 L0680 bclr 2,M0023 13 01 L0682 bclr 1,PORTB ;SILENT=0 BD AD L0684 jsr L00AD ;wait switch release? 19 25 L0686 bclr 4,M0025 CC 01 73 L0688 jmp L0173 ;---------------------------------- ; Set RAM M002E-M0035 to $FF ; L068B Called from L067A ; L068B Called from L0164 AE 35 L068B ldx #$35 ;clear RAM ; L068D Branch from L0692 7F L068D clr ,X 7A L068E dec ,X 5A L068F dec X A3 2D L0690 cpx #$2D 26 F9 L0692 bne L068D 81 L0694 rts ~ ;---------------------------------- ; L0695 User specified entry address B6 5B L0695 lda M005B E7 01 L0697 sta 01,X B6 5C L0699 lda M005C F7 L069B sta ,X 81 L069C rts ~ ;---------------------------------- ; L069D Called from L038A B6 2C L069D lda M002C 0D 00 3D L069F brclr 6,PORTA,L06DF ;SELCALL ENC? 0C 01 2F L06A2 brset 6,PORTB,L06D4 ;SELCALL DEC? A1 04 L06A5 cmp #$04 27 56 L06A7 beq L06FF A1 03 L06A9 cmp #$03 26 04 L06AB bne L06B1 3D 21 L06AD tst M0021 27 4E L06AF beq L06FF ; L06B1 Branch from L06AB 16 24 L06B1 bset 3,M0024 3C 2C L06B3 inc M002C A6 04 L06B5 lda #$04 CD 07 3D L06B7 jsr L073D ; L06BA Jumped from L06FD BD E8 L06BA jsr L00E8 ; L06BC Called from L0521 3F 2D L06BC clr M002D A6 1D L06BE lda #$1D BB 2C L06C0 add M002C 97 L06C2 tax ~ F6 L06C3 lda ,X AA F0 L06C4 ora #$F0 B7 00 L06C6 sta PORTA ;EPROM addr/CTC or SELCALL data 15 01 L06C8 bclr 2,PORTB ;SELCALL reset 7D L06CA tst ,X 7D L06CB tst ,X 14 01 L06CC bset 2,PORTB ;SELCALL enable A6 17 L06CE lda #$17 ; L06D0 Branch from L06D1 4A L06D0 dec A 26 FD L06D1 bne L06D0 81 L06D3 rts ~ ;---------------------------------- ; L06D4 Branch from L06A2 4D L06D4 tst A 27 08 L06D5 beq L06DF B6 2D L06D7 lda M002D A1 05 L06D9 cmp #$05 27 07 L06DB beq L06E4 3C 2D L06DD inc M002D ;---------------------------------- ; L06DF Branch from L069F ; L06DF Branch from L06D5 AD 5A L06DF bsr L073B B7 5F L06E1 sta M005F 81 L06E3 rts ~ ;---------------------------------- ; L06E4 Branch from L06DB 0E 24 3A L06E4 brset 7,M0024,L0721 1E 24 L06E7 bset 7,M0024 A6 1D L06E9 lda #$1D BB 2C L06EB add M002C 97 L06ED tax ~ ; L06EE Branch from L06F3 A6 03 L06EE lda #$03 ; L06F0 Branch from L06F9 4C L06F0 inc A A1 06 L06F1 cmp #$06 27 F9 L06F3 beq L06EE F7 L06F5 sta ,X 5C L06F6 inc X A3 22 L06F7 cpx #$22 26 F5 L06F9 bne L06F0 ; L06FB Jumped from L0739 AD 3E L06FB bsr L073B 20 BB L06FD bra L06BA ;---------------------------------- ; L06FF Branch from L06A7 ; L06FF Branch from L06AF 17 24 L06FF bclr 3,M0024 A6 E0 L0701 lda #$E0 ;function $700 BD FF L0703 jsr L00FF ;Load/Exec Lib Func. 0E 24 07 L0705 brset 7,M0024,L070F 18 24 L0708 bset 4,M0024 04 24 26 L070A brset 2,M0024,L0733 AD 62 L070D bsr L0771 ; L070F Branch from L0705 A6 04 L070F lda #$04 CD 05 32 L0711 jsr L0532 16 23 L0714 bset 3,M0023 AE 0C L0716 ldx #$0C BD 96 L0718 jsr L0096 ;X0/1/2 to A0,A1,A9 01 17 04 L071A brclr 0,M0017,L0721 ;Library 680 enabled? A6 D0 L071D lda #$D0 ;function $680 BD FF L071F jsr L00FF ;Load/Exec Lib Func. ; L0721 Called from L0371 ; L0721 Branch from L06E4 ; L0721 Branch from L071A 04 24 0F L0721 brset 2,M0024,L0733 AE 18 L0724 ldx #$18 ; L0726 Branch from L072F F6 L0726 lda ,X 43 L0727 com A A4 0F L0728 and #$0F E7 05 L072A sta 05,X 5C L072C inc X A3 1D L072D cpx #$1D 26 F5 L072F bne L0726 AD 2F L0731 bsr L0762 ; L0733 Branch from L070A ; L0733 Branch from L0721 1F 24 L0733 bclr 7,M0024 3F 2C L0735 clr M002C 17 24 L0737 bclr 3,M0024 20 C0 L0739 bra L06FB ;---------------------------------- ; L073B Called from L06FB ; L073B Called from L06DF A6 01 L073B lda #$01 ;---------------------------------- ; L073D Called from L07BB ; L073D Called from L07A0 ; L073D Called from L06B7 ; L073D Called from L07AD B7 37 L073D sta M0037 B6 15 L073F lda M0015 ;get SELCALL period 44 L0741 lsr A 44 L0742 lsr A 44 L0743 lsr A 44 L0744 lsr A B7 3B L0745 sta M003B ;save SELCALL Period 4F L0747 clr A ; L0748 Branch from L074C BB 37 L0748 add M0037 3A 3B L074A dec M003B 26 FA L074C bne L0748 44 L074E lsr A 81 L074F rts ~ ;---------------------------------- ; get SELCALL ID codes from M0018-M001C ; move to M001D-M0021 ; L0750 Called from L051B AE 18 L0750 ldx #$18 ; L0752 Branch from L075D F6 L0752 lda ,X 43 L0753 com A 44 L0754 lsr A 44 L0755 lsr A 44 L0756 lsr A 44 L0757 lsr A E7 05 L0758 sta 05,X 5C L075A inc X A3 1D L075B cpx #$1D 26 F3 L075D bne L0752 AD 01 L075F bsr L0762 81 L0761 rts ~ ;---------------------------------- ; remove duplicate digits from SELCALL ID ; L0762 Called from L075F ; L0762 Called from L0731 AE 1D L0762 ldx #$1D ; L0764 Branch from L076E F6 L0764 lda ,X 5C L0765 inc X F1 L0766 cmp ,X 26 03 L0767 bne L076C A6 05 L0769 lda #$05 F7 L076B sta ,X ; L076C Branch from L0767 A3 21 L076C cpx #$21 26 F4 L076E bne L0764 81 L0770 rts ~ ;---------------------------------- ; L0771 Called from L02AE ; L0771 Called from L070D 9B L0771 sei ~ CD 04 F7 L0772 jsr L04F7 AD 49 L0775 bsr L07C0 AD 50 L0777 bsr L07C9 ;Get ANI leading delay BD F0 L0779 jsr L00F0 ;Time delay (length A) AD 09 L077B bsr L0786 CD 05 25 L077D jsr L0525 1A 24 L0780 bset 5,M0024 CD 03 30 L0782 jsr L0330 81 L0785 rts ~ ;---------------------------------- ; L0786 Called from L077B ; L0786 Called from L051E AE 1D L0786 ldx #$1D ; L0788 Branch from L078D AD 28 L0788 bsr L07B2 5C L078A inc X A3 22 L078B cpx #$22 26 F9 L078D bne L0788 07 13 1F L078F brclr 3,M0013,L07B1 ;SEL status call enabled? 01 25 03 L0792 brclr 0,M0025,L0798 04 24 19 L0795 brset 2,M0024,L07B1 ; L0798 Branch from L0792 5A L0798 dec X F6 L0799 lda ,X 27 08 L079A beq L07A4 19 00 L079C bclr 4,PORTA ;NOTONE=0 ? A6 0A L079E lda #$0A AD 9B L07A0 bsr L073D BD F0 L07A2 jsr L00F0 ;Time delay (length A) ; L07A4 Branch from L079A B6 22 L07A4 lda M0022 43 L07A6 com A A4 0F L07A7 and #$0F AD 0A L07A9 bsr L07B5 A6 05 L07AB lda #$05 AD 8E L07AD bsr L073D BD F0 L07AF jsr L00F0 ;Time delay (length A) ; L07B1 Branch from L078F ; L07B1 Branch from L0795 81 L07B1 rts ~ ;---------------------------------- ; L07B2 Called from L0788 F6 L07B2 lda ,X 27 0A L07B3 beq L07BF ; L07B5 Called from L07A9 AA B0 L07B5 ora #$B0 B7 00 L07B7 sta PORTA ;CTCSS control ?? A6 05 L07B9 lda #$05 AD 80 L07BB bsr L073D BD F0 L07BD jsr L00F0 ;Time delay (length A) ; L07BF Branch from L07B3 81 L07BF rts ~ ;---------------------------------- ; L07C0 Called from L0775 ; L07C0 Called from L0515 15 01 L07C0 bclr 2,PORTB ;SELCALL reset 1D 00 L07C2 bclr 6,PORTA ;SELCALL ENC=0 ? 19 00 L07C4 bclr 4,PORTA ;NOTONE=0 ? 14 01 L07C6 bset 2,PORTB ;SELCALL enable 81 L07C8 rts ~ ;---------------------------------- ; get ANI leadin delay time from personaility bytes ; shift to MSB's and return in A ; L07C9 Called from L0777 ; L07C9 Called from L049D B6 14 L07C9 lda M0014 ;get ANI leadin time 48 L07CB lsl A 48 L07CC lsl A 48 L07CD lsl A 48 L07CE lsl A 81 L07CF rts ~ ;---------------------------------- ; L07D0 Jumped from L0570 ; L07D0 Branch from L0832 1B 25 L07D0 bclr 5,M0025 11 24 L07D2 bclr 0,M0024 AD 30 L07D4 bsr L0806 AE 2E L07D6 ldx #$2E ; L07D8 Branch from L07DC 7F L07D8 clr ,X 5C L07D9 inc X A3 38 L07DA cpx #$38 26 FA L07DC bne L07D8 A6 64 L07DE lda #$64 ;function $320 ; L07E0 Jumped from L083D 17 03 L07E0 bclr 3,PORTD ;DSP3 BD FF L07E2 jsr L00FF ;Load/Exec Lib Func. ; L07E4 Jumped from L0875 B6 26 L07E4 lda M0026 AD 2B L07E6 bsr L0813 AD 32 L07E8 bsr L081C B6 26 L07EA lda M0026 0A 25 0A L07EC brset 5,M0025,L07F9 A4 0F L07EF and #$0F AB 2D L07F1 add #$2D B7 3A L07F3 sta M003A 97 L07F5 tax ~ 7D L07F6 tst ,X 26 46 L07F7 bne L083F ; L07F9 Branch from L0801 ; L07F9 Branch from L07EC 0C 02 7C L07F9 brset 6,PORTC,L0878 ;SQUELCH? 0B 24 31 L07FC brclr 5,M0024,L0830 AD 24 L07FF bsr L0825 2B F6 L0801 bmi L07F9 CC 06 7C L0803 jmp L067C ;---------------------------------- ; L0806 Called from L057F ; L0806 Called from L07D4 14 23 L0806 bset 2,M0023 B6 26 L0808 lda M0026 B7 2A L080A sta M002A 3F 5E L080C clr M005E AE 0A L080E ldx #$0A BD 96 L0810 jsr L0096 ;X0/1/2 to A0,A1,A9 81 L0812 rts ~ ;---------------------------------- ; L0813 Called from L05A7 ; L0813 Called from L07E6 97 L0813 tax ~ B7 26 L0814 sta M0026 BD C1 L0816 jsr L00C1 CD 03 ED L0818 jsr L03ED 81 L081B rts ~ ;---------------------------------- ; L081C Called from L07E8 ; L081C Called from L05AA BD E6 L081C jsr L00E6 ; L081E Branch from L0822 B6 5F L081E lda M005F A1 03 L0820 cmp #$03 26 FA L0822 bne L081E 81 L0824 rts ~ ;---------------------------------- ; L0825 Called from L07FF ; L0825 Called from L089D AE 08 L0825 ldx #$08 BD 88 L0827 jsr L0088 ;X sets EPROM A0/A1/A9,get PORTB 81 L0829 rts ~ ;---------------------------------- ; L082A Branch from L089A 17 03 L082A bclr 3,PORTD ;DSP3 A6 EC L082C lda #$EC ;function $760 BD FF L082E jsr L00FF ;Load/Exec Lib Func. ;---------------------------------- ; L0830 Branch from L0860 ; L0830 Branch from L07FC 10 01 L0830 bset 0,PORTB ;BUSY LED (off)?? 0A 25 9B L0832 brset 5,M0025,L07D0 01 24 03 L0835 brclr 0,M0024,L083B BE 3A L0838 ldx M003A 7C L083A inc ,X ; L083B Jumped from L088C ; L083B Branch from L0835 A6 65 L083B lda #$65 20 A1 L083D bra L07E0 ;---------------------------------- ; L083F Branch from L07F7 ; L083F Branch from L0892 0B 17 04 L083F brclr 5,M0017,L0846 ;Library 740 enabled? A6 E8 L0842 lda #$E8 ;function $740 BD FF L0844 jsr L00FF ;Load/Exec Lib Func. ; L0846 Branch from L083F 3F 39 L0846 clr M0039 AE 2D L0848 ldx #$2D ; L084A Branch from L0850 ; L084A Jumped from L0854 5C L084A inc X F6 L084B lda ,X 27 08 L084C beq L0856 B1 39 L084E cmp M0039 25 F8 L0850 bcs L084A B7 39 L0852 sta M0039 20 F4 L0854 bra L084A ;---------------------------------- ; L0856 Branch from L084C AE 2D L0856 ldx #$2D ; L0858 Branch from L085C 5C L0858 inc X F6 L0859 lda ,X B1 39 L085A cmp M0039 26 FA L085C bne L0858 A1 01 L085E cmp #$01 27 CE L0860 beq L0830 7F L0862 clr ,X 7C L0863 inc ,X 9F L0864 txa ~ A0 2D L0865 sub #$2D B7 38 L0867 sta M0038 B6 26 L0869 lda M0026 A4 F0 L086B and #$F0 BB 38 L086D add M0038 B7 26 L086F sta M0026 B7 2A L0871 sta M002A 1A 25 L0873 bset 5,M0025 CC 07 E4 L0875 jmp L07E4 ;---------------------------------- ; L0878 Branch from L07F9 0A 25 13 L0878 brset 5,M0025,L088E 10 24 L087B bset 0,M0024 A6 5C L087D lda #$5C B7 09 L087F sta TIMCTL 3F 08 L0881 clr TIMER 12 02 L0883 bset 1,PORTC ;A10/TX Depower bit BD EE L0885 jsr L00EE ;Time delay (length 1) B6 08 L0887 lda TIMER F7 L0889 sta ,X 13 02 L088A bclr 1,PORTC ;A10/TX Depower bit 20 AD L088C bra L083B ;---------------------------------- ; L088E Branch from L0878 A6 46 L088E lda #$46 BD E8 L0890 jsr L00E8 ; L0892 Branch from L0895 0B 24 AA L0892 brclr 5,M0024,L083F 02 01 FA L0895 brset 1,PORTB,L0892 ;SILENT ? 11 01 L0898 bclr 0,PORTB ;BUSY LED (on)?? ; L089A Branch from L089F 0D 02 8D L089A brclr 6,PORTC,L082A ;SQUELCH? AD 86 L089D bsr L0825 2B F9 L089F bmi L089A CC 06 7C L08A1 jmp L067C ;---------------------------------- ; L08A4 Called from L0330 14 25 L08A4 bset 2,M0025 CD 04 16 L08A6 jsr L0416 ;M0023 sets EPROM addr. A2-A9 3C 03 L08A9 inc PORTD ;next EPROM address 18 03 L08AB bset 4,PORTD ;strobe S/R latch 19 03 L08AD bclr 4,PORTD 81 L08AF rts ~ ;================================== ; Self Check ROM (?) ;================================== ; L08B0 Called from L08C9 ; L08B0 User specified entry address ; L08B0 Called from L08C5 E7 04 L08B0 sta 04,X E1 04 L08B2 cmp 04,X ; L08B4 Branch from L08B4 26 FE L08B4 bne L08B4 A6 55 L08B6 lda #$55 ; L08B8 Branch from L08BD F7 L08B8 sta ,X F1 L08B9 cmp ,X ; L08BA Branch from L08BA 26 FE L08BA bne L08BA 48 L08BC lsl A 2B F9 L08BD bmi L08B8 81 L08BF rts ~ ;---------------------------------- ; L08C0 Jumped from L08E8 ; L08C0 User specified entry address 9C L08C0 rsp ~ AE 03 L08C1 ldx #$03 ; L08C3 Branch from L08CC A6 F0 L08C3 lda #$F0 AD E9 L08C5 bsr L08B0 A9 BA L08C7 adc #$BA AD E5 L08C9 bsr L08B0 5A L08CB dec X 2A F5 L08CC bpl L08C3 4F L08CE clr A 83 L08CF swi ~ AE 02 L08D0 ldx #$02 ; L08D2 Branch from L08D7 D6 1F F2 L08D2 lda 1F,X F7 L08D5 sta ,X 5A L08D6 dec X 2A F9 L08D7 bpl L08D2 CD 1F B5 L08D9 jsr L1FB5 83 L08DC swi ~ CD 1F 80 L08DD jsr L1F80 83 L08E0 swi ~ CD 1F 9B L08E1 jsr L1F9B 83 L08E4 swi ~ AD 03 L08E5 bsr L08EA 83 L08E7 swi ~ 20 D6 L08E8 bra L08C0 ; L08EA Called from L08E5 8E L08EA stop ~ ;---------------------------------- ; L08EB User specified entry address A6 88 L08EB lda #$88 B7 09 L08ED sta TIMCTL 8F L08EF wait ~ 9B L08F0 sei ~ 1C 09 L08F1 bset 6,TIMERC ;disable timer IRQs 0F 10 02 L08F3 brclr 7,M0010,L08F8 4F L08F6 clr A 81 L08F7 rts ~ ;---------------------------------- ; L08F8 Branch from L08F3 A6 01 L08F8 lda #$01 81 L08FA rts ~ ;---------------------------------- ; L08FB Branch from L08FB ; L08FB User specified entry address 26 FE L08FB bne L08FB 3C 03 L08FD inc PORTD ;next EPROM address 80 L08FF rti ~ ;---------------------------------- M0900: db 00,00,00,00,00,00,00,00 ;' ' .. .. .. M1F78: db 00,00,00,00,00,00,00,00 ;' ' ;================================== ; Self-Check ROM ;================================== ;---------------------------------- ; RAM self check ; L1F80 Called from L08DD ; L1F80 User specified entry address 4F L1F80 clr A 99 L1F81 sec ~ ; L1F82 Branch from L1F98 AE 6E L1F82 ldx #$6E ; L1F84 Branch from L1F88 E7 0F L1F84 sta 0F,X 46 L1F86 ror A 5A L1F87 dec X 26 FA L1F88 bne L1F84 49 L1F8A rol A 49 L1F8B rol A AE 6E L1F8C ldx #$6E ; L1F8E Branch from L1F96 E8 0F L1F8E eor 0F,X 26 08 L1F90 bne L1F9A EA 0F L1F92 ora 0F,X 46 L1F94 ror A 5A L1F95 dec X 26 F6 L1F96 bne L1F8E 24 E8 L1F98 bcc L1F82 ; L1F9A Branch from L1F90 81 L1F9A rts ~ ;---------------------------------- ; ROM checksum self check ; L1F9B User specified entry address ; L1F9B Called from L08E1 AE D8 L1F9B ldx #$D8 BF 11 L1F9D stx M0011 3F 12 L1F9F clr M0012 3F 13 L1FA1 clr M0013 AE 81 L1FA3 ldx #$81 BF 14 L1FA5 stx M0014 5A L1FA7 dec X 4F L1FA8 clr A ; L1FA9 Branch from L1FB0 ; L1FA9 Branch from L1FAC BD 11 L1FA9 jsr L0011 5C L1FAB inc X 26 FB L1FAC bne L1FA9 3C 12 L1FAE inc M0012 0B 12 F6 L1FB0 brclr 5,M0012,L1FA9 43 L1FB3 com A 81 L1FB4 rts ~ ;---------------------------------- ; TIMER self check ; L1FB5 User specified entry address ; L1FB5 Called from L08D9 A6 6F L1FB5 lda #$6F B7 09 L1FB7 sta TIMCTL AE FF L1FB9 ldx #$FF BF 08 L1FBB stx TIMER A6 5F L1FBD lda #$5F B7 09 L1FBF sta TIMCTL ; L1FC1 Jumped from L1FD2 B3 08 L1FC1 cpx TIMER 26 0F L1FC3 bne L1FD4 5A L1FC5 dec X A3 FF L1FC6 cpx #$FF 27 0A L1FC8 beq L1FD4 A6 11 L1FCA lda #$11 ; L1FCC Branch from L1FCD 4A L1FCC dec A 26 FD L1FCD bne L1FCC 3F 0A L1FCF clr M000A 9D L1FD1 nop ~ 20 ED L1FD2 bra L1FC1 ; L1FD4 Branch from L1FC8 ; L1FD4 Branch from L1FC3 81 L1FD4 rts ~ ;---------------------------------- ; data or never called ? ; L1FD5 User specified entry address 38 10 L1FD5 lsl M0010 38 10 L1FD7 lsl M0010 38 10 L1FD9 lsl M0010 1F 09 L1FDB bclr 7,TIMERC ;enable timer IRQs ?? 38 10 L1FDD lsl M0010 80 L1FDF rti ~ ;---------------------------------- ; data or never called ? M1FE0: db 00,00,00,00,00,00,1F,D5 ;' ' M1FE8: db 1F,D9,1F,DD,08,FB,08,C0 ;' ' M1FF0: db 00,00,C8,22,43,13 00 00 M1FF6: db 00,00 ;TIMER IRQ WAIT to L0000 (unused) 03 7B M1FF8: db 03,7B ;TIMER IRQ to L037B 04 5B M1FFA: db 04,5B ;IRQ to L045B FF FF M1FFC: db FF,FF ;SWI to LFFFF (unused) 01 4D M1FFE: db 01,4D ;RESET to L014D ;=================================== ;======= Disassembled blocks ======= ;=================================== ; Block L0000 to L0008 ; Block L0011 to L0024 ; Block L0025 to L003B ; Block L003C to L005B ; Block L0088 to L0089 ; Block L008A to L0095 ; Block L0096 to L00A3 ; Block L00A4 to L00A7 ; Block L00A8 to L00AC ; Block L00AD to L00B4 ; Block L00B5 to L00C0 ; Block L00C1 to L00D5 ; Block L00D6 to L00D7 ; Block L00D8 to L00E5 ; Block L00E6 to L00E7 ; Block L00E8 to L00ED ; Block L00EE to L00EF ; Block L00F0 to L00FE ; Block L00FF to L0122 ; Block L0123 to L0125 ; Block L0126 to L013D ; Block L013E to L014C ; Block L014D to L01D7 ; Block L01D8 to L01E0 ; Block L01E1 to L01E4 ; Block L01E5 to L01E8 ; Block L01E9 to L01EA ; Block L01EB to L01F6 ; Block L01F7 to L01FD ; Block L01FE to L0200 ; Block L0201 to L0202 ; Block L0203 to L0204 ; Block L0205 to L0206 ; Block L0207 to L0209 ; Block L020A to L021B ; Block L021C to L022B ; Block L022C to L023A ; Block L023B to L023C ; Block L023D to L0242 ; Block L0243 to L024E ; Block L024F to L0252 ; Block L0253 to L0259 ; Block L025A to L0260 ; Block L0261 to L027F ; Block L0280 to L028D ; Block L028E to L028F ; Block L0290 to L0298 ; Block L0299 to L02D4 ; Block L02D5 to L02DD ; Block L02DE to L02E5 ; Block L02E6 to L02F1 ; Block L02F2 to L0311 ; Block L0312 to L0321 ; Block L0322 to L0325 ; Block L0326 to L032F ; Block L0330 to L034C ; Block L034D to L035B ; Block L035C to L0367 ; Block L0368 to L0368 ; Block L0369 to L036A ; Block L036B to L0376 ; Block L0377 to L037A ; Block L037B to L03CD ; Block L03CE to L03D4 ; Block L03D5 to L03E1 ; Block L03E2 to L03E7 ; Block L03E8 to L03EC ; Block L03ED to L0415 ; Block L0416 to L0417 ; Block L0418 to L0428 ; Block L0429 to L043E ; Block L043F to L044A ; Block L044B to L045A ; Block L045B to L045D ; Block L045E to L0476 ; Block L0477 to L0493 ; Block L0494 to L04DA ; Block L04DB to L04E1 ; Block L04E2 to L04F6 ; Block L04F7 to L0506 ; Block L0507 to L050E ; Block L050F to L0514 ; Block L0515 to L0524 ; Block L0525 to L0531 ; Block L0532 to L055A ; Block L055B to L0563 ; Block L0564 to L0567 ; Block L0568 to L0572 ; Block L0573 to L057E ; Block L057F to L05C3 ; Block L05C4 to L05D1 ; Block L05D2 to L05D8 ; Block L05D9 to L05DB ; Block L05DC to L05DD ; Block L05DE to L05EB ; Block L05EC to L0619 ; Block L061A to L062E ; Block L062F to L0636 ; Block L0637 to L0642 ; Block L0643 to L0648 ; Block L0649 to L0651 ; Block L0652 to L0676 ; Block L0677 to L067B ; Block L067C to L068A ; Block L068B to L0694 ; Block L0695 to L069C ; Block L069D to L06D3 ; Block L06D4 to L06DE ; Block L06DF to L06E3 ; Block L06E4 to L06FE ; Block L06FF to L073A ; Block L073B to L073C ; Block L073D to L074F ; Block L0750 to L0761 ; Block L0762 to L0770 ; Block L0771 to L0785 ; Block L0786 to L07B1 ; Block L07B2 to L07BF ; Block L07C0 to L07C8 ; Block L07C9 to L07CF ; Block L07D0 to L0805 ; Block L0806 to L0812 ; Block L0813 to L081B ; Block L081C to L0824 ; Block L0825 to L0829 ; Block L082A to L082F ; Block L0830 to L083E ; Block L083F to L0855 ; Block L0856 to L0877 ; Block L0878 to L088D ; Block L088E to L08A3 ; Block L08A4 to L08AF ; Block L08B0 to L08BF ; Block L08C0 to L08E9 ; Block L08EA to L08EA ; Block L08EB to L08F7 ; Block L08F8 to L08FA ; Block L08FB to L08FF ; Block L1F80 to L1F9A ; Block L1F9B to L1FB4 ; Block L1FB5 to L1FD3 ; Block L1FD4 to L1FD4 ; Block L1FD5 to L1FDF ; Block LFFFF to LFFFF ;=================================== ;====== ENTRY POINT ADDRESSES ====== ;=================================== ; L0000 Called from L08DC ; L0000 Called from L08E0 ; L0000 Called from L08CF ; L0000 Called from L08E7 ; L0000 Called from L08E4 ; L0011 Called from L1FA9 ; L0014 Branch from L0011 ; L001A Branch from L0017 ; L001D Branch from L001A ; L0023 Branch from L0020 ; L0025 Branch from L001D ; L0025 Jumped from L0023 ; L0028 Branch from L0025 ; L002B Branch from L0028 ; L002E Branch from L002B ; L003C Branch from L0014 ; L003C Branch from L0039 ; L003E Branch from L004D ; L003E Jumped from L005A ; L004A Branch from L0046 ; L004A Branch from L004A ; L004D Branch from L003E ; L0057 Branch from L0057 ; L0057 Branch from L0053 ; L0088 Called from L065F ; L0088 Called from L066C ; L0088 Called from L0657 ; L0088 Called from L0827 ; L0088 Called from L0216 ; L008A Called from L00AF ; L008A Called from L033D ; L008A Called from L05FA ; L008A Called from L0600 ; L0090 Branch from L0091 ; L0096 Called from L0184 ; L0096 Called from L0810 ; L0096 Called from L014A ; L0096 Called from L03B2 ; L0096 Called from L0140 ; L0096 Called from L008C ; L0096 Called from L0230 ; L0096 Called from L00C1 ; L0096 Branch from L0036 ; L0096 Called from L00CD ; L0096 Called from L0718 ; L0096 Called from L0257 ; L00A4 Called from L036B ; L00A4 Called from L0452 ; L00A8 Called from L0265 ; L00A8 Called from L02B6 ; L00A8 Called from L02CA ; L00AD Called from L036F ; L00AD Called from L062F ; L00AD Called from L024B ; L00AD Called from L0684 ; L00AD Called from L0568 ; L00B1 Branch from L00B1 ; L00B5 Called from L0312 ; L00B5 Called from L04B2 ; L00B5 Called from L00AD ; L00B5 Called from L0261 ; L00B9 Branch from L00BA ; L00B9 Branch from L00BE ; L00C1 Called from L0816 ; L00C1 Called from L03AE ; L00C1 Called from L00A4 ; L00C1 Called from L0338 ; L00C1 Called from L048A ; L00C1 Called from L025E ; L00D6 Called from L00A8 ; L00D8 Called from L0374 ; L00DC Jumped from L00EC ; L00DC Called from L02E3 ; L00E6 Called from L081C ; L00E6 Called from L0621 ; L00E6 Called from L0614 ; L00E8 Called from L06BA ; L00E8 Called from L0890 ; L00EE Called from L0885 ; L00F0 Called from L07A2 ; L00F0 Called from L07AF ; L00F0 Called from L0779 ; L00F0 Called from L07BD ; L00F0 Called from L04AE ; L00F2 Branch from L00FC ; L00F4 Branch from L00F8 ; L00FF Jumped from L04F5 ; L00FF Called from L0362 ; L00FF Called from L02AC ; L00FF Called from L018B ; L00FF Called from L04E9 ; L00FF Called from L0844 ; L00FF Called from L064E ; L00FF Called from L071F ; L00FF Called from L0665 ; L00FF Called from L0221 ; L00FF Called from L07E2 ; L00FF Called from L0197 ; L00FF Called from L0703 ; L00FF Called from L0463 ; L00FF Branch from L0123 ; L00FF Called from L082E ; L00FF Called from L01FC ; L010E Branch from L010A ; L0114 Branch from L0110 ; L0123 User specified entry address ; L0125 Branch from L0120 ; L0126 Called from L0112 ; L0126 Called from L0171 ; L0129 Branch from L0135 ; L0129 Jumped from L013C ; L013E Called from L017D ; L0148 Branch from L0142 ; L014C Branch from L0131 ; L014C Branch from L0145 ; L014D User specified entry address ; L014E Branch from L0154 ; L015C Branch from L0160 ; L0167 Branch from L015A ; L0173 Jumped from L04DF ; L0173 Jumped from L0688 ; L0186 Branch from L017F ; L018D Branch from L0186 ; L0192 Jumped from L01D6 ; L0199 Branch from L0192 ; L019B Branch from L01B4 ; L01AD Jumped from L01F5 ; L01B1 Branch from L01F7 ; L01B1 Branch from L01A1 ; L01B1 Jumped from L05D9 ; L01B1 Branch from L01EB ; L01B1 Branch from L01A3 ; L01D0 Branch from L01CA ; L01D0 Jumped from L01DF ; L01D0 Jumped from L01E7 ; L01D6 Branch from L01D0 ; L01D8 Branch from L01B6 ; L01DF Branch from L01DA ; L01E1 Branch from L01C5 ; L01E1 Branch from L01C3 ; L01E5 Branch from L01BC ; L01E5 Branch from L01B9 ; L01E9 Branch from L018D ; L01EB Jumped from L0205 ; L01F5 Jumped from L024D ; L01F7 Branch from L01F0 ; L01F7 Branch from L01A8 ; L01FE Branch from L019D ; L0201 User specified entry address ; L0203 User specified entry address ; L0205 User specified entry address ; L0207 Jumped from L01E9 ; L020A Called from L019B ; L021A Branch from L0214 ; L021A Branch from L0210 ; L021A Branch from L020C ; L021C Branch from L0218 ; L0223 Branch from L021C ; L022C Called from L0249 ; L022C Called from L01AB ; L0238 Branch from L0232 ; L023A Branch from L0235 ; L023B Branch from L0228 ; L023D Branch from L0225 ; L0243 Jumped from L0201 ; L024B Branch from L0243 ; L024B Jumped from L0251 ; L024D Jumped from L027E ; L024F Branch from L0246 ; L0253 Called from L024F ; L0253 Called from L01F3 ; L025A Called from L02C5 ; L025A Called from L0445 ; L0261 Jumped from L0203 ; L0267 Branch from L026A ; L026D Branch from L0274 ; L027B Jumped from L028C ; L027E Jumped from L0297 ; L0280 Branch from L026D ; L0280 Branch from L0285 ; L0288 Jumped from L02DC ; L028E Branch from L029F ; L028E Branch from L02A5 ; L0290 Branch from L0280 ; L0290 Branch from L0299 ; L0290 Jumped from L02D3 ; L0299 Branch from L0267 ; L02A2 Branch from L029C ; L02A8 Branch from L02A2 ; L02B8 Branch from L02BB ; L02CC Branch from L02CC ; L02CF Branch from L02B1 ; L02CF Branch from L02D5 ; L02D5 Branch from L02B8 ; L02DE Called from L028E ; L02DE Called from L03D0 ; L02E6 Called from L032C ; L02E6 Called from L0353 ; L02EF Branch from L02EA ; L02F2 Branch from L02E6 ; L02F8 Branch from L02F4 ; L02F9 Jumped from L02F0 ; L0306 Branch from L02FE ; L0310 Branch from L0308 ; L0312 Called from L023D ; L0320 Branch from L031A ; L0322 Jumped from L0379 ; L0326 Branch from L0333 ; L0330 Called from L017A ; L0330 Called from L0782 ; L033A Branch from L033F ; L0344 Branch from L031D ; L0344 Called from L0294 ; L034D Branch from L0314 ; L035C Branch from L0317 ; L0368 Jumped from L035A ; L0368 Called from L027B ; L0369 Jumped from L034B ; L036B Branch from L0348 ; L0377 Branch from L033A ; L037B User specified entry address ; L038D Branch from L0383 ; L038D Branch from L0387 ; L0396 Branch from L03D5 ; L0396 Branch from L03DB ; L0398 Jumped from L03E0 ; L03A4 Branch from L039C ; L03A4 Jumped from L03D3 ; L03AE Jumped from L03E6 ; L03B4 Branch from L03A4 ; L03C2 Branch from L03BE ; L03C2 Branch from L03BA ; L03CA Branch from L03C4 ; L03CC Branch from L03C8 ; L03CC Branch from L039A ; L03CE Branch from L039F ; L03D5 Branch from L038D ; L03D8 Branch from L0390 ; L03DB Branch from L0393 ; L03DE Branch from L03D8 ; L03E2 Branch from L03A7 ; L03E8 Branch from L040F ; L03ED Called from L04F9 ; L03ED Called from L0818 ; L03ED Called from L0341 ; L03F1 Branch from L03F8 ; L040F Branch from L0412 ; L0416 Called from L08A6 ; L0416 Called from L03ED ; L0418 Called from L058D ; L0418 Called from L0126 ; L0420 Branch from L041A ; L0429 Called from L012B ; L0429 Called from L03F1 ; L0429 Called from L0592 ; L0433 Branch from L043C ; L0436 Branch from L0433 ; L043F Called from L01D3 ; L044A Branch from L043F ; L044B Branch from L0442 ; L0450 Branch from L044B ; L045B User specified entry address ; L045E Branch from L045B ; L0465 Branch from L045E ; L0477 Branch from L0466 ; L0477 Branch from L0470 ; L0477 Branch from L0469 ; L0482 Branch from L047C ; L0488 Branch from L0482 ; L0494 Branch from L0479 ; L0496 Jumped from L0492 ; L04AE Branch from L04A0 ; L04B2 Branch from L049A ; L04C0 Branch from L04D7 ; L04C6 Branch from L04BE ; L04C6 Branch from L04D1 ; L04CA Branch from L04CC ; L04DB Branch from L0485 ; L04DB Branch from L047F ; L04DB Jumped from L0475 ; L04DD Branch from L04F0 ; L04DD Branch from L04ED ; L04E2 Branch from L04CA ; L04EB Branch from L04E4 ; L04F7 Called from L0772 ; L04F7 Called from L0498 ; L0507 Branch from L04FE ; L050A Branch from L0503 ; L050C Jumped from L0505 ; L050C Branch from L0507 ; L050F Called from L04D3 ; L0512 Called from L04E2 ; L0515 Branch from L050F ; L0515 Called from L04B0 ; L051E Branch from L0518 ; L0524 Branch from L0512 ; L0525 Called from L04DD ; L0525 Called from L077D ; L052B Branch from L052B ; L0532 Called from L04A9 ; L0532 Called from L0711 ; L0532 Called from L03EA ; L0532 Called from L02C2 ; L0532 Called from L02E0 ; L0532 Called from L04DB ; L0534 Branch from L0558 ; L0536 Branch from L054A ; L0538 Branch from L0546 ; L053C Branch from L053D ; L0543 Branch from L0544 ; L054E Branch from L0554 ; L0550 Branch from L0550 ; L055B Called from L054E ; L055B Called from L0536 ; L0564 Branch from L0577 ; L0568 Jumped from L0207 ; L0573 Branch from L0588 ; L057F Branch from L056A ; L0586 Branch from L0598 ; L0588 Jumped from L05C2 ; L0595 Jumped from L057D ; L059F Branch from L05A5 ; L05A7 Branch from L059A ; L05A7 Jumped from L05D0 ; L05AA Jumped from L05EA ; L05AA Branch from L05BB ; L05AA Branch from L05D2 ; L05AD Branch from L05B5 ; L05C0 Branch from L05A0 ; L05C0 Jumped from L05DC ; L05C2 Jumped from L05D7 ; L05C4 Branch from L0612 ; L05D2 Branch from L05B8 ; L05D9 Branch from L056D ; L05DC Jumped from L062D ; L05DE Branch from L05F5 ; L05EC Branch from L05AD ; L05F1 Branch from L061A ; L05F1 Branch from L0623 ; L05F5 Jumped from L0618 ; L0607 Branch from L0602 ; L0616 Branch from L060D ; L0616 Branch from L0607 ; L0616 Jumped from L0650 ; L0616 Branch from L0649 ; L061A Branch from L05EE ; L0621 Branch from L062B ; L0623 Branch from L0626 ; L062D Jumped from L0635 ; L062F Branch from L05FC ; L0631 Jumped from L0647 ; L0637 Branch from L0604 ; L0639 Jumped from L0641 ; L0643 Branch from L063B ; L0649 Branch from L060A ; L0652 Called from L05B2 ; L0652 Called from L0616 ; L065D Branch from L0652 ; L065D Branch from L0659 ; L0667 Branch from L0661 ; L066C Branch from L0674 ; L0670 Branch from L0669 ; L0677 Branch from L066E ; L067C Jumped from L0803 ; L067C Branch from L0677 ; L067C Jumped from L08A1 ; L068B Called from L067A ; L068B Called from L0164 ; L068D Branch from L0692 ; L0695 User specified entry address ; L069D Called from L038A ; L06B1 Branch from L06AB ; L06BA Jumped from L06FD ; L06BC Called from L0521 ; L06D0 Branch from L06D1 ; L06D4 Branch from L06A2 ; L06DF Branch from L069F ; L06DF Branch from L06D5 ; L06E4 Branch from L06DB ; L06EE Branch from L06F3 ; L06F0 Branch from L06F9 ; L06FB Jumped from L0739 ; L06FF Branch from L06A7 ; L06FF Branch from L06AF ; L070F Branch from L0705 ; L0721 Called from L0371 ; L0721 Branch from L06E4 ; L0721 Branch from L071A ; L0726 Branch from L072F ; L0733 Branch from L070A ; L0733 Branch from L0721 ; L073B Called from L06FB ; L073B Called from L06DF ; L073D Called from L07BB ; L073D Called from L07A0 ; L073D Called from L06B7 ; L073D Called from L07AD ; L0748 Branch from L074C ; L0750 Called from L051B ; L0752 Branch from L075D ; L0762 Called from L075F ; L0762 Called from L0731 ; L0764 Branch from L076E ; L076C Branch from L0767 ; L0771 Called from L02AE ; L0771 Called from L070D ; L0786 Called from L077B ; L0786 Called from L051E ; L0788 Branch from L078D ; L0798 Branch from L0792 ; L07A4 Branch from L079A ; L07B1 Branch from L078F ; L07B1 Branch from L0795 ; L07B2 Called from L0788 ; L07B5 Called from L07A9 ; L07BF Branch from L07B3 ; L07C0 Called from L0775 ; L07C0 Called from L0515 ; L07C9 Called from L0777 ; L07C9 Called from L049D ; L07D0 Jumped from L0570 ; L07D0 Branch from L0832 ; L07D8 Branch from L07DC ; L07E0 Jumped from L083D ; L07E4 Jumped from L0875 ; L07F9 Branch from L0801 ; L07F9 Branch from L07EC ; L0806 Called from L057F ; L0806 Called from L07D4 ; L0813 Called from L05A7 ; L0813 Called from L07E6 ; L081C Called from L07E8 ; L081C Called from L05AA ; L081E Branch from L0822 ; L0825 Called from L07FF ; L0825 Called from L089D ; L082A Branch from L089A ; L0830 Branch from L0860 ; L0830 Branch from L07FC ; L083B Jumped from L088C ; L083B Branch from L0835 ; L083F Branch from L07F7 ; L083F Branch from L0892 ; L0846 Branch from L083F ; L084A Branch from L0850 ; L084A Jumped from L0854 ; L0856 Branch from L084C ; L0858 Branch from L085C ; L0878 Branch from L07F9 ; L088E Branch from L0878 ; L0892 Branch from L0895 ; L089A Branch from L089F ; L08A4 Called from L0330 ; L08B0 Called from L08C9 ; L08B0 User specified entry address ; L08B0 Called from L08C5 ; L08B4 Branch from L08B4 ; L08B8 Branch from L08BD ; L08BA Branch from L08BA ; L08C0 Jumped from L08E8 ; L08C0 User specified entry address ; L08C3 Branch from L08CC ; L08D2 Branch from L08D7 ; L08EA Called from L08E5 ; L08EB User specified entry address ; L08F8 Branch from L08F3 ; L08FB Branch from L08FB ; L08FB User specified entry address ; L1F80 Called from L08DD ; L1F80 User specified entry address ; L1F82 Branch from L1F98 ; L1F84 Branch from L1F88 ; L1F8E Branch from L1F96 ; L1F9A Branch from L1F90 ; L1F9B User specified entry address ; L1F9B Called from L08E1 ; L1FA9 Branch from L1FB0 ; L1FA9 Branch from L1FAC ; L1FB5 User specified entry address ; L1FB5 Called from L08D9 ; L1FC1 Jumped from L1FD2 ; L1FCC Branch from L1FCD ; L1FD4 Branch from L1FC8 ; L1FD4 Branch from L1FC3 ; L1FD5 User specified entry address ;=================================== ;======= Call Tree ======= ;=================================== ; L0011 Branch to L0014 ; L0014 Branch to L003C ; L0017 Branch to L001A ; L001A Branch to L001D ; L001D Branch to L0025 ; L0020 Branch to L0023 ; L0023 Jump to L0025 ; L0025 Branch to L0028 ; L0028 Branch to L002B ; L002B Branch to L002E ; L0036 Branch to L0096 ; L0039 Branch to L003C ; L003E Branch to L004D ; L0046 Branch to L004A ; L004A Branch to L004A ; L004D Branch to L003E ; L0053 Branch to L0057 ; L0057 Branch to L0057 ; L005A Jump to L003E ; L008C Call to L0096 ; L0091 Branch to L0090 ; L00A4 Call to L00C1 ; L00A8 Call to L00D6 ; L00AD Call to L00B5 ; L00AF Call to L008A ; L00B1 Branch to L00B1 ; L00BA Branch to L00B9 ; L00BE Branch to L00B9 ; L00C1 Call to L0096 ; L00CD Call to L0096 ; L00EC Jump to L00DC ; L00F8 Branch to L00F4 ; L00FC Branch to L00F2 ; L010A Branch to L010E ; L0110 Branch to L0114 ; L0112 Call to L0126 ; L0120 Branch to L0125 ; L0123 Branch to L00FF ; L0123 User specified entry address ; L0126 Call to L0418 ; L012B Call to L0429 ; L0131 Branch to L014C ; L0135 Branch to L0129 ; L013C Jump to L0129 ; L0140 Call to L0096 ; L0142 Branch to L0148 ; L0145 Branch to L014C ; L014A Call to L0096 ; L014D User specified entry address ; L0154 Branch to L014E ; L015A Branch to L0167 ; L0160 Branch to L015C ; L0164 Call to L068B ; L0171 Call to L0126 ; L017A Call to L0330 ; L017D Call to L013E ; L017F Branch to L0186 ; L0184 Call to L0096 ; L0186 Branch to L018D ; L018B Call to L00FF ; L018D Branch to L01E9 ; L0192 Branch to L0199 ; L0197 Call to L00FF ; L019B Call to L020A ; L019D Branch to L01FE ; L01A1 Branch to L01B1 ; L01A3 Branch to L01B1 ; L01A8 Branch to L01F7 ; L01AB Call to L022C ; L01B4 Branch to L019B ; L01B6 Branch to L01D8 ; L01B9 Branch to L01E5 ; L01BC Branch to L01E5 ; L01C3 Branch to L01E1 ; L01C5 Branch to L01E1 ; L01CA Branch to L01D0 ; L01D0 Branch to L01D6 ; L01D3 Call to L043F ; L01D6 Jump to L0192 ; L01DA Branch to L01DF ; L01DF Jump to L01D0 ; L01E7 Jump to L01D0 ; L01E9 Jump to L0207 ; L01EB Branch to L01B1 ; L01F0 Branch to L01F7 ; L01F3 Call to L0253 ; L01F5 Jump to L01AD ; L01F7 Branch to L01B1 ; L01FC Call to L00FF ; L0201 Jump to L0243 ; L0201 User specified entry address ; L0203 User specified entry address ; L0203 Jump to L0261 ; L0205 User specified entry address ; L0205 Jump to L01EB ; L0207 Jump to L0568 ; L020C Branch to L021A ; L0210 Branch to L021A ; L0214 Branch to L021A ; L0216 Call to L0088 ; L0218 Branch to L021C ; L021C Branch to L0223 ; L0221 Call to L00FF ; L0225 Branch to L023D ; L0228 Branch to L023B ; L0230 Call to L0096 ; L0232 Branch to L0238 ; L0235 Branch to L023A ; L023D Call to L0312 ; L0243 Branch to L024B ; L0246 Branch to L024F ; L0249 Call to L022C ; L024B Call to L00AD ; L024D Jump to L01F5 ; L024F Call to L0253 ; L0251 Jump to L024B ; L0257 Call to L0096 ; L025E Call to L00C1 ; L0261 Call to L00B5 ; L0265 Call to L00A8 ; L0267 Branch to L0299 ; L026A Branch to L0267 ; L026D Branch to L0280 ; L0274 Branch to L026D ; L027B Call to L0368 ; L027E Jump to L024D ; L0280 Branch to L0290 ; L0285 Branch to L0280 ; L028C Jump to L027B ; L028E Call to L02DE ; L0294 Call to L0344 ; L0297 Jump to L027E ; L0299 Branch to L0290 ; L029C Branch to L02A2 ; L029F Branch to L028E ; L02A2 Branch to L02A8 ; L02A5 Branch to L028E ; L02AC Call to L00FF ; L02AE Call to L0771 ; L02B1 Branch to L02CF ; L02B6 Call to L00A8 ; L02B8 Branch to L02D5 ; L02BB Branch to L02B8 ; L02C2 Call to L0532 ; L02C5 Call to L025A ; L02CA Call to L00A8 ; L02CC Branch to L02CC ; L02D3 Jump to L0290 ; L02D5 Branch to L02CF ; L02DC Jump to L0288 ; L02E0 Call to L0532 ; L02E3 Call to L00DC ; L02E6 Branch to L02F2 ; L02EA Branch to L02EF ; L02F0 Jump to L02F9 ; L02F4 Branch to L02F8 ; L02FE Branch to L0306 ; L0308 Branch to L0310 ; L0312 Call to L00B5 ; L0314 Branch to L034D ; L0317 Branch to L035C ; L031A Branch to L0320 ; L031D Branch to L0344 ; L032C Call to L02E6 ; L0330 Call to L08A4 ; L0333 Branch to L0326 ; L0338 Call to L00C1 ; L033A Branch to L0377 ; L033D Call to L008A ; L033F Branch to L033A ; L0341 Call to L03ED ; L0348 Branch to L036B ; L034B Jump to L0369 ; L0353 Call to L02E6 ; L035A Jump to L0368 ; L0362 Call to L00FF ; L036B Call to L00A4 ; L036F Call to L00AD ; L0371 Call to L0721 ; L0374 Call to L00D8 ; L0379 Jump to L0322 ; L037B User specified entry address ; L0383 Branch to L038D ; L0387 Branch to L038D ; L038A Call to L069D ; L038D Branch to L03D5 ; L0390 Branch to L03D8 ; L0393 Branch to L03DB ; L039A Branch to L03CC ; L039C Branch to L03A4 ; L039F Branch to L03CE ; L03A4 Branch to L03B4 ; L03A7 Branch to L03E2 ; L03AE Call to L00C1 ; L03B2 Call to L0096 ; L03BA Branch to L03C2 ; L03BE Branch to L03C2 ; L03C4 Branch to L03CA ; L03C8 Branch to L03CC ; L03D0 Call to L02DE ; L03D3 Jump to L03A4 ; L03D5 Branch to L0396 ; L03D8 Branch to L03DE ; L03DB Branch to L0396 ; L03E0 Jump to L0398 ; L03E6 Jump to L03AE ; L03EA Call to L0532 ; L03ED Call to L0416 ; L03F1 Call to L0429 ; L03F8 Branch to L03F1 ; L040F Branch to L03E8 ; L0412 Branch to L040F ; L041A Branch to L0420 ; L0433 Branch to L0436 ; L043C Branch to L0433 ; L043F Branch to L044A ; L0442 Branch to L044B ; L0445 Call to L025A ; L044B Branch to L0450 ; L0452 Call to L00A4 ; L045B Branch to L045E ; L045B User specified entry address ; L045E Branch to L0465 ; L0463 Call to L00FF ; L0466 Branch to L0477 ; L0469 Branch to L0477 ; L0470 Branch to L0477 ; L0475 Jump to L04DB ; L0479 Branch to L0494 ; L047C Branch to L0482 ; L047F Branch to L04DB ; L0482 Branch to L0488 ; L0485 Branch to L04DB ; L048A Call to L00C1 ; L0492 Jump to L0496 ; L0498 Call to L04F7 ; L049A Branch to L04B2 ; L049D Call to L07C9 ; L04A0 Branch to L04AE ; L04A9 Call to L0532 ; L04AE Call to L00F0 ; L04B0 Call to L0515 ; L04B2 Call to L00B5 ; L04BE Branch to L04C6 ; L04CA Branch to L04E2 ; L04CC Branch to L04CA ; L04D1 Branch to L04C6 ; L04D3 Call to L050F ; L04D7 Branch to L04C0 ; L04DB Call to L0532 ; L04DD Call to L0525 ; L04DF Jump to L0173 ; L04E2 Call to L0512 ; L04E4 Branch to L04EB ; L04E9 Call to L00FF ; L04ED Branch to L04DD ; L04F0 Branch to L04DD ; L04F5 Jump to L00FF ; L04F9 Call to L03ED ; L04FE Branch to L0507 ; L0503 Branch to L050A ; L0505 Jump to L050C ; L0507 Branch to L050C ; L050F Branch to L0515 ; L0512 Branch to L0524 ; L0515 Call to L07C0 ; L0518 Branch to L051E ; L051B Call to L0750 ; L051E Call to L0786 ; L0521 Call to L06BC ; L052B Branch to L052B ; L0536 Call to L055B ; L053D Branch to L053C ; L0544 Branch to L0543 ; L0546 Branch to L0538 ; L054A Branch to L0536 ; L054E Call to L055B ; L0550 Branch to L0550 ; L0554 Branch to L054E ; L0558 Branch to L0534 ; L0568 Call to L00AD ; L056A Branch to L057F ; L056D Branch to L05D9 ; L0570 Jump to L07D0 ; L0577 Branch to L0564 ; L057D Jump to L0595 ; L057F Call to L0806 ; L0588 Branch to L0573 ; L058D Call to L0418 ; L0592 Call to L0429 ; L0598 Branch to L0586 ; L059A Branch to L05A7 ; L05A0 Branch to L05C0 ; L05A5 Branch to L059F ; L05A7 Call to L0813 ; L05AA Call to L081C ; L05AD Branch to L05EC ; L05B2 Call to L0652 ; L05B5 Branch to L05AD ; L05B8 Branch to L05D2 ; L05BB Branch to L05AA ; L05C2 Jump to L0588 ; L05D0 Jump to L05A7 ; L05D2 Branch to L05AA ; L05D7 Jump to L05C2 ; L05D9 Jump to L01B1 ; L05DC Jump to L05C0 ; L05EA Jump to L05AA ; L05EE Branch to L061A ; L05F5 Branch to L05DE ; L05FA Call to L008A ; L05FC Branch to L062F ; L0600 Call to L008A ; L0602 Branch to L0607 ; L0604 Branch to L0637 ; L0607 Branch to L0616 ; L060A Branch to L0649 ; L060D Branch to L0616 ; L0612 Branch to L05C4 ; L0614 Call to L00E6 ; L0616 Call to L0652 ; L0618 Jump to L05F5 ; L061A Branch to L05F1 ; L0621 Call to L00E6 ; L0623 Branch to L05F1 ; L0626 Branch to L0623 ; L062B Branch to L0621 ; L062D Jump to L05DC ; L062F Call to L00AD ; L0635 Jump to L062D ; L063B Branch to L0643 ; L0641 Jump to L0639 ; L0647 Jump to L0631 ; L0649 Branch to L0616 ; L064E Call to L00FF ; L0650 Jump to L0616 ; L0652 Branch to L065D ; L0657 Call to L0088 ; L0659 Branch to L065D ; L065F Call to L0088 ; L0661 Branch to L0667 ; L0665 Call to L00FF ; L0669 Branch to L0670 ; L066C Call to L0088 ; L066E Branch to L0677 ; L0674 Branch to L066C ; L0677 Branch to L067C ; L067A Call to L068B ; L0684 Call to L00AD ; L0688 Jump to L0173 ; L0692 Branch to L068D ; L0695 User specified entry address ; L069F Branch to L06DF ; L06A2 Branch to L06D4 ; L06A7 Branch to L06FF ; L06AB Branch to L06B1 ; L06AF Branch to L06FF ; L06B7 Call to L073D ; L06BA Call to L00E8 ; L06D1 Branch to L06D0 ; L06D5 Branch to L06DF ; L06DB Branch to L06E4 ; L06DF Call to L073B ; L06E4 Branch to L0721 ; L06F3 Branch to L06EE ; L06F9 Branch to L06F0 ; L06FB Call to L073B ; L06FD Jump to L06BA ; L0703 Call to L00FF ; L0705 Branch to L070F ; L070A Branch to L0733 ; L070D Call to L0771 ; L0711 Call to L0532 ; L0718 Call to L0096 ; L071A Branch to L0721 ; L071F Call to L00FF ; L0721 Branch to L0733 ; L072F Branch to L0726 ; L0731 Call to L0762 ; L0739 Jump to L06FB ; L074C Branch to L0748 ; L075D Branch to L0752 ; L075F Call to L0762 ; L0767 Branch to L076C ; L076E Branch to L0764 ; L0772 Call to L04F7 ; L0775 Call to L07C0 ; L0777 Call to L07C9 ; L0779 Call to L00F0 ; L077B Call to L0786 ; L077D Call to L0525 ; L0782 Call to L0330 ; L0788 Call to L07B2 ; L078D Branch to L0788 ; L078F Branch to L07B1 ; L0792 Branch to L0798 ; L0795 Branch to L07B1 ; L079A Branch to L07A4 ; L07A0 Call to L073D ; L07A2 Call to L00F0 ; L07A9 Call to L07B5 ; L07AD Call to L073D ; L07AF Call to L00F0 ; L07B3 Branch to L07BF ; L07BB Call to L073D ; L07BD Call to L00F0 ; L07D4 Call to L0806 ; L07DC Branch to L07D8 ; L07E2 Call to L00FF ; L07E6 Call to L0813 ; L07E8 Call to L081C ; L07EC Branch to L07F9 ; L07F7 Branch to L083F ; L07F9 Branch to L0878 ; L07FC Branch to L0830 ; L07FF Call to L0825 ; L0801 Branch to L07F9 ; L0803 Jump to L067C ; L0810 Call to L0096 ; L0816 Call to L00C1 ; L0818 Call to L03ED ; L081C Call to L00E6 ; L0822 Branch to L081E ; L0827 Call to L0088 ; L082E Call to L00FF ; L0832 Branch to L07D0 ; L0835 Branch to L083B ; L083D Jump to L07E0 ; L083F Branch to L0846 ; L0844 Call to L00FF ; L084C Branch to L0856 ; L0850 Branch to L084A ; L0854 Jump to L084A ; L085C Branch to L0858 ; L0860 Branch to L0830 ; L0875 Jump to L07E4 ; L0878 Branch to L088E ; L0885 Call to L00EE ; L088C Jump to L083B ; L0890 Call to L00E8 ; L0892 Branch to L083F ; L0895 Branch to L0892 ; L089A Branch to L082A ; L089D Call to L0825 ; L089F Branch to L089A ; L08A1 Jump to L067C ; L08A6 Call to L0416 ; L08B0 User specified entry address ; L08B4 Branch to L08B4 ; L08BA Branch to L08BA ; L08BD Branch to L08B8 ; L08C0 User specified entry address ; L08C5 Call to L08B0 ; L08C9 Call to L08B0 ; L08CC Branch to L08C3 ; L08CF Call to L0000 ; L08D7 Branch to L08D2 ; L08D9 Call to L1FB5 ; L08DC Call to L0000 ; L08DD Call to L1F80 ; L08E0 Call to L0000 ; L08E1 Call to L1F9B ; L08E4 Call to L0000 ; L08E5 Call to L08EA ; L08E7 Call to L0000 ; L08E8 Jump to L08C0 ; L08EB User specified entry address ; L08F3 Branch to L08F8 ; L08FB User specified entry address ; L08FB Branch to L08FB ; L1F80 User specified entry address ; L1F88 Branch to L1F84 ; L1F90 Branch to L1F9A ; L1F96 Branch to L1F8E ; L1F98 Branch to L1F82 ; L1F9B User specified entry address ; L1FA9 Call to L0011 ; L1FAC Branch to L1FA9 ; L1FB0 Branch to L1FA9 ; L1FB5 User specified entry address ; L1FC3 Branch to L1FD4 ; L1FC8 Branch to L1FD4 ; L1FCD Branch to L1FCC ; L1FD2 Jump to L1FC1 ; L1FD5 User specified entry address