------------------------------------------------ --- SQ80 initialization routine ---------------- ------------------------------------------------ 0000: 8D 49 BSR $004B 0002: BD BB 75 JSR $BB75 ; cartridge checking 0005: BD 75 06 JSR $7506 ; panel communication 0008: BD 75 28 JSR $7528 ; panel communication 000B: 86 03 LDA #$03 000D: 91 E3 CMPA $E3 000F: 24 02 BCC $0013 0011: 97 E3 STA $E3 0013: 8D 78 BSR $008D 0015: CE 70 00 LDU #$7000 ; ENSONIQ SQ80 ($5000) 0018: C6 0A LDB #$0A 001A: BD BC 17 JSR $BC17 ; print string 001D: BD 86 D2 JSR $86D2 ; master initialization 0020: C1 C9 CMPB #$C9 ; calib. failed code 0022: 26 03 BNE $0027 0024: BD 70 F7 JSR $70F7 ; keyboard calib. failed 0027: BD BB EA JSR $BBEA ; cartridge bank A access 002A: B6 0B 8B LDA $0B8B ; get reset/SWI-mode 002D: 27 17 BEQ $0046 ; zero if normal reset ------------------------------------------------; soft reset only 002F: CE 70 4D LDU #$704D ; print SOFT RESET ($504d) 0032: BD 99 54 JSR $9954 ; 0035: 86 A0 LDA #$A0 ; cursor to position 20 0037: BD 99 81 JSR $9981 003A: B6 0B 8B LDA $0B8B ; get SWI mode 003D: 7F 0B 8B CLR $0B8B ; clear SWI mode 0040: BD BB AB JSR $BBAB ; print SWI mode 0043: BD BB 46 JSR $BB46 ; keyboard calibration? ------------------------------------------------ 0046: 86 26 LDA #$26 0048: 7E 79 34 JMP $7934 ; BANKS/left group handler ------------------------------------------------ 004B: 8E 02 D4 LDX #$02D4 004E: 9F C1 STX $C1 0050: CC 7E D0 LDD #$7ED0 0053: A7 0C STA +$0C,X 0055: E7 03 STB +$03,X 0057: 0F C7 CLR $C7 0059: 0F B6 CLR $B6 005B: BF 0D 0B STX $0D0B 005E: A6 02 LDA +$02,X 0060: 97 D1 STA $D1 0062: BD BA 7B JSR $BA7B 0065: ED 84 STD ,X 0067: FD 0D 07 STD $0D07 006A: 86 01 LDA #$01 006C: 97 AB STA $AB 006E: 96 F5 LDA $F5 0070: 2B 16 BMI $0088 0072: 8E 02 03 LDX #$0203 0075: 6D 86 TST A,X 0077: 2B 0F BMI $0088 0079: C6 05 LDB #$05 007B: D7 AA STB $AA 007D: D7 CA STB $CA 007F: BD A6 F3 JSR $A6F3 0082: BD AE 68 JSR $AE68 0085: 7E D0 03 JMP $D003 ------------------------------------------------ 0088: 86 01 LDA #$01 008A: 7E B0 AD JMP $B0AD ------------------------------------------------ 008D: 8E 71 39 LDX #$7139 ; softbutton handler to RTS 0090: BF 0D 11 STX $0D11 0093: 86 10 LDA #$10 ; ? 0095: 97 A8 STA $A8 0097: 86 00 LDA #$00 ; prepare display of int prog 0099: 97 A9 STA $A9 009B: BD BB E5 JSR $BBE5 ; clear stored keycodes 009E: BD BC C0 JSR $BCC0 ; set bit7 of $c7 00A1: 7E BC B2 JMP $BCB2 ; $acad = #$0101 ------------------------------------------------ --- hidden function: software revision --------- ------------------------------------------------ 00A4: CC FB FC LDD #$FBFC ; send #$fbfc to panel 00A7: BD 99 7D JSR $997D 00AA: 8D E1 BSR $008D 00AC: CE 70 85 LDU #$7085 ; software rev. info ($5085) 00AF: BD 99 54 JSR $9954 00B2: CC 01 50 LDD #$0150 ; version number: 1.80 00B5: 34 04 PSHS B 00B7: 1F 89 TFR A,B 00B9: CB 30 ADDB #$30 00BB: 86 C3 LDA #$C3 ; cursor to pos. $43 (1) 00BD: BD 99 7D JSR $997D ; print major number 00C0: 86 C5 LDA #$C5 ; cursor to pos. $45 (80) 00C2: BD 99 81 JSR $9981 ; 00C5: A6 E0 LDA ,S+ ; print minor number 00C7: BD BB AB JSR $BBAB ; 00CA: 86 CA LDA #$CA ; cursor to pos. $4a 00CC: BD 99 81 JSR $9981 ; 00CF: 4F CLRA ; print appendix number 00D0: F6 0B 9F LDB $0B9F ; 00D3: 7E C3 CA JMP $C3CA ; ------------------------------------------------ --- keyboard processor error 02 ---------------- ------------------------------------------------ 00D6: 4D TSTA 00D7: 26 06 BNE $00DF 00D9: CE 77 C7 LDU #$77C7 ; KEYB. PROC. ERROR ($67c7) 00DC: 7E 99 5A JMP $995A ------------------------------------------------ --- keyboard processor error 01 ---------------- ------------------------------------------------ 00DF: 8E 00 A2 LDX #$00A2 ; clear misc cariables 00E2: 6F 80 CLR ,X+ ; 00E4: 8C 00 C7 CMPX #$00C7 ; 00E7: 25 F9 BCS $00E2 ; 00E9: BD C4 03 JSR $C403 00EC: CE 77 F5 LDU #$77F5 ; KEYB. PROC. ERROR ($67f5) 00EF: BD 99 5A JSR $995A 00F2: 8D 99 BSR $008D 00F4: 16 FF 54 LBRA $004B ------------------------------------------------ --- keyboard calibration failed ---------------- ------------------------------------------------ 00F7: CE 78 28 LDU #$7828 ; CALIB. FAILED ($6828) 00FA: 8D F3 BSR $00EF 00FC: BD BB 46 JSR $BB46 00FF: 81 2E CMPA #$2E 0101: 26 0A BNE $010D 0103: BD 72 08 JSR $7208 0106: C1 C9 CMPB #$C9 0108: 26 02 BNE $010C 010A: 20 EB BRA $00F7 ------------------------------------------------ 010C: 39 RTS ------------------------------------------------ --- keyboard disabled -------------------------- ------------------------------------------------ 010D: 81 33 CMPA #$33 010F: 26 08 BNE $0119 0111: CE 78 65 LDU #$7865 ; KEYB. IS DISABLED ($6865) 0114: C6 04 LDB #$04 0116: 7E BC 20 JMP $BC20 ------------------------------------------------ 0119: 20 E1 BRA $00FC ------------------------------------------------ --- master routine (1) via $f75e --------------- --- S: $0e90 ROMLOW: $0000 --------------- ------------------------------------------------ 011B: BD 70 00 JSR $7000 ; initialize SQ80 011E: BD 84 29 JSR $8429 ; VDB handler manipulation 0121: EE 22 LDU +$02,Y 0123: EC 24 LDD +$04,Y 0125: AE 26 LDX +$06,Y 0127: BD 84 9F JSR $849F ; VDB handler manipulation 012A: AD C4 JSR ,U 012C: 20 F0 BRA $011E ; loop ------------------------------------------------ 012E: CE F8 DD LDU #$F8DD 0131: A6 C6 LDA A,U 0133: 39 RTS ------------------------------------------------ 0134: BD 71 2E JSR $712E 0137: 26 03 BNE $013C 0139: 39 RTS ------------------------------------------------ 013A: D7 AE STB $AE 013C: 34 02 PSHS A 013E: 81 19 CMPA #$19 0140: 26 04 BNE $0146 0142: 86 09 LDA #$09 0144: 20 06 BRA $014C ------------------------------------------------ 0146: 81 18 CMPA #$18 0148: 26 10 BNE $015A 014A: 86 08 LDA #$08 014C: 0D AE TST $AE 014E: 26 08 BNE $0158 0150: 8E 02 D4 LDX #$02D4 ; track table base 0153: C6 7F LDB #$7F 0155: BD 8B B5 JSR $8BB5 0158: 0F AE CLR $AE 015A: 35 02 PULS A 015C: 0D A2 TST $A2 015E: 2B 03 BMI $0163 0160: 7E 72 29 JMP $7229 ------------------------------------------------ 0163: D6 A3 LDB $A3 0165: C4 7F ANDB #$7F 0167: C1 19 CMPB #$19 0169: 26 18 BNE $0183 016B: 81 18 CMPA #$18 016D: 26 14 BNE $0183 016F: 8E 02 D4 LDX #$02D4 0172: 86 07 LDA #$07 0174: C6 40 LDB #$40 0176: BD 8B B5 JSR $8BB5 0179: BD BB E5 JSR $BBE5 017C: 86 40 LDA #$40 017E: 1F 89 TFR A,B 0180: 7E 74 7D JMP $747D ------------------------------------------------ 0183: 34 04 PSHS B ; store keycode 0185: D6 A9 LDB $A9 0187: C1 01 CMPB #$01 0189: 27 04 BEQ $018F 018B: C1 05 CMPB #$05 018D: 26 16 BNE $01A5 018F: 35 04 PULS B ; restore keycode 0191: C1 22 CMPB #$22 ; BANKS group 0193: 25 0F BCS $01A4 ; 0195: C1 28 CMPB #$28 ; 0197: 22 0B BHI $01A4 ; 0199: 81 2A CMPA #$2A ; SOFTBUTTONs 019B: 25 07 BCS $01A4 ; 019D: 81 33 CMPA #$33 ; 019F: 22 03 BHI $01A4 ; 01A1: 7E A4 67 JMP $A467 ------------------------------------------------ 01A4: 39 RTS ------------------------------------------------ 01A5: C1 03 CMPB #$03 01A7: 26 7E BNE $0227 01A9: 35 04 PULS B 01AB: C1 1F CMPB #$1F ; RECORD pressed? 01AD: 26 64 BNE $0213 ------------------------------------------------ --- RECORD + PLAY ------------------------------ ------------------------------------------------ 01AF: 81 21 CMPA #$21 ; PLAY 01B1: 26 03 BNE $01B6 01B3: 7E AA 03 JMP $AA03 ------------------------------------------------ --- hidden function: RECORD + SOFT0 ------------ --- erase all memory and reinitialize ---------- ------------------------------------------------ 01B6: 81 2A CMPA #$2A 01B8: 26 03 BNE $01BD 01BA: 7E BC E0 JMP $BCE0 ; erase all memory & reinit ------------------------------------------------ --- hidden function: RECORD + SOFT6 ------------ --- warm reset (jams machine in this version) -- ------------------------------------------------ 01BD: 81 2F CMPA #$2F 01BF: 26 01 BNE $01C2 01C1: 3F SWI ; warm reset (jams machine!) ------------------------------------------------ --- hidden function: RECORD + MASTER ----------- --- software revision information -------------- ------------------------------------------------ 01C2: 81 12 CMPA #$12 01C4: 26 03 BNE $01C9 01C6: 7E 70 A4 JMP $70A4 ; software rev. info ------------------------------------------------ --- hidden function: RECORD + MODES ------------ --- creators of the SQ80 ----------------------- ------------------------------------------------ 01C9: 81 10 CMPA #$10 01CB: 26 03 BNE $01D0 01CD: 7E BC 9C JMP $BC9C ; whodoneit ------------------------------------------------ --- hidden function: RECORD + COMPARE ---------- --- analog voltage check ----------------------- ------------------------------------------------ 01D0: 81 17 CMPA #$17 01D2: 26 05 BNE $01D9 01D4: CE BC 29 LDU #$BC29 ; analog voltage check 01D7: 20 13 BRA $01EC ------------------------------------------------ --- hidden function: RECORD + FILTER ----------- --- filter calibration ------------------------- ------------------------------------------------ 01D9: 81 0F CMPA #$0F 01DB: 26 05 BNE $01E2 01DD: CE BC 5D LDU #$BC5D ; filter tuning 01E0: 20 0A BRA $01EC ------------------------------------------------ --- hidden function: RECORD + SPLIT/LAYER ------ --- keyboard recalibration --------------------- ------------------------------------------------ 01E2: 81 11 CMPA #$11 01E4: 26 05 BNE $01EB 01E6: CE 71 FB LDU #$71FB ; keyboard recalibration 01E9: 20 01 BRA $01EC ; ROMLOW $01fb ------------------------------------------------ 01EB: 39 RTS ------------------------------------------------ 01EC: 96 AA LDA $AA 01EE: 81 00 CMPA #$00 ; softbutton 1 01F0: 27 04 BEQ $01F6 01F2: 81 05 CMPA #$05 ; softbutton 6 01F4: 26 02 BNE $01F8 01F6: 6E C4 JMP ,U ------------------------------------------------ 01F8: 7E A9 F6 JMP $A9F6 ; SEQ. MUST BE STOPPED ------------------------------------------------ --- keyboard recalibration --------------------- ------------------------------------------------ 01FB: 8D 0B BSR $0208 ; calibrate 01FD: C1 C9 CMPB #$C9 ; calib. failed error code 01FF: 26 03 BNE $0204 0201: BD 70 F7 JSR $70F7 ; calibration failed msg. 0204: 86 13 LDA #$13 0206: 20 21 BRA $0229 ------------------------------------------------ 0208: C6 06 LDB #$06 020A: CE 77 9F LDU #$779F ; CALIB. KEYBOARD ($679f) 020D: BD BC 20 JSR $BC20 0210: 7E 86 D2 JMP $86D2 ------------------------------------------------ --- move inside main menu ---------------------- ------------------------------------------------ 0213: C1 22 CMPB #$22 ; buttons of BANKS group? 0215: 25 0F BCS $0226 ; 0217: C1 28 CMPB #$28 ; 0219: 22 0B BHI $0226 ; 021B: 81 2A CMPA #$2A ; key is SOFTBUTTON? 021D: 25 07 BCS $0226 ; 021F: 81 33 CMPA #$33 ; 0221: 22 03 BHI $0226 ; 0223: 7E A4 67 JMP $A467 ; program menu handler ------------------------------------------------ 0226: 39 RTS ------------------------------------------------ 0227: 35 84 PULS PC,B ------------------------------------------------ --- jump to button handler --------------------- ------------------------------------------------ 0229: 97 A3 STA $A3 ; keyboard status? 022B: 8E F7 A2 LDX #$F7A2 ; button handler base 022E: D6 A9 LDB $A9 ; button handler offset 0230: 58 LSLB 0231: 6E 95 JMP [B,X] ; to button handler ------------------------------------------------ ------------------------------------------------ --- Button parsing (all keys) ------------------ ------------------------------------------------ ------------------------------------------------ ------------------------------------------------ --- INC / DEC ---------------------------------- ------------------------------------------------ 0233: 81 18 CMPA #$18 ; INC 0235: 27 04 BEQ $023B ; 0237: 81 19 CMPA #$19 ; DEC 0239: 26 03 BNE $023E ; 023B: 7E 74 86 JMP $7486 ; INC/DEC handler ------------------------------------------------ --- BANKS group: left row of buttons ----------- ------------------------------------------------ 023E: 81 26 CMPA #$26 ; BANKS group left row? 0240: 25 07 BCS $0249 ; 0242: 81 29 CMPA #$29 ; 0244: 22 03 BHI $0249 ; 0246: 7E 79 34 JMP $7934 ; SEQ/CARTa/CARTb/INT handler ------------------------------------------------ --- BANKS group: right row of buttons ---------- ------------------------------------------------ 0249: 81 22 CMPA #$22 ; BANKS group right row? 024B: 25 07 BCS $0254 ; 024D: 81 25 CMPA #$25 ; 024F: 22 03 BHI $0254 ; 0251: 7E 78 8E JMP $788E ; BANK/SEQ 1-4 handler ------------------------------------------------ --- SOFTKEYs ----------------------------------- ------------------------------------------------ 0254: 81 2A CMPA #$2A ; key is SOFTKEY? 0256: 25 07 BCS $025F ; 0258: 81 33 CMPA #$33 ; 025A: 22 03 BHI $025F ; 025C: 7E A4 67 JMP $A467 ; SOFTKEY handler ------------------------------------------------ --- SEQUENCER group ---------------------------- ------------------------------------------------ 025F: 81 1A CMPA #$1A ; key inside SEQUENCER group? 0261: 25 0B BCS $026E ; 0263: 81 21 CMPA #$21 ; 0265: 22 07 BHI $026E ; 0267: C6 03 LDB #$03 ; SEQ mode 0269: D7 A9 STB $A9 026B: 7E A7 D5 JMP $A7D5 ; SEQUENCER handler ------------------------------------------------ --- VOICE group -------------------------------- ------------------------------------------------ 026E: 81 01 CMPA #$01 ; key inside VOICE group? 0270: 25 07 BCS $0279 ; 0272: 81 11 CMPA #$11 ; 0274: 22 03 BHI $0279 ; 0276: 7E 78 30 JMP $7830 ; VOICE handler ------------------------------------------------ --- MASTER group ------------------------------- ------------------------------------------------ 0279: 81 12 CMPA #$12 ; key inside MASTER group? 027B: 25 07 BCS $0284 ; 027D: 81 17 CMPA #$17 ; 027F: 22 03 BHI $0284 ; 0281: 7E 79 76 JMP $7976 ; MASTER handler ------------------------------------------------ 0284: 11 3F SWI3 ; button error ------------------------------------------------ ------------------------------------------------ - Button parsing (banks, data, softkeys only) - ------------------------------------------------ ------------------------------------------------ ------------------------------------------------ --- BANKS group, left row ---------------------- ------------------------------------------------ 0286: 81 26 CMPA #$26 ; BANKS left row 0288: 25 0B BCS $0295 ; 028A: 81 28 CMPA #$28 ; 028C: 22 07 BHI $0295 ; 028E: C6 01 LDB #$01 0290: D7 A9 STB $A9 0292: 7E 79 34 JMP $7934 ; handler ------------------------------------------------ --- BANKS group, right row --------------------- ------------------------------------------------ 0295: 81 22 CMPA #$22 ; BANKS right row 0297: 25 0B BCS $02A4 ; 0299: 81 25 CMPA #$25 ; 029B: 22 07 BHI $02A4 ; 029D: C6 01 LDB #$01 029F: D7 A9 STB $A9 02A1: 7E 78 8E JMP $788E ; handler ------------------------------------------------ --- SOFTKEYs ----------------------------------- ------------------------------------------------ 02A4: 81 2A CMPA #$2A ; SOFTKEYs 02A6: 25 07 BCS $02AF 02A8: 81 33 CMPA #$33 02AA: 22 03 BHI $02AF 02AC: 7E A4 67 JMP $A467 ; handler ------------------------------------------------ --- INC/DEC ------------------------------------ ------------------------------------------------ 02AF: 81 18 CMPA #$18 ; INC 02B1: 27 04 BEQ $02B7 02B3: 81 19 CMPA #$19 ; DEC 02B5: 26 03 BNE $02BA 02B7: 7E 74 86 JMP $7486 ; handler ------------------------------------------------ 02BA: 39 RTS ------------------------------------------------ ------------------------------------------------ --- button parsing (sequencer while play) ------ ------------------------------------------------ ------------------------------------------------ ------------------------------------------------ 02BB: D6 AA LDB $AA 02BD: C1 04 CMPB #$04 02BF: 26 16 BNE $02D7 02C1: 81 20 CMPA #$20 ; STOP 02C3: 27 04 BEQ $02C9 02C5: 81 21 CMPA #$21 ; PLAY 02C7: 26 02 BNE $02CB 02C9: 20 08 BRA $02D3 ; STOP handler ------------------------------------------------ 02CB: 81 1C CMPA #$1C ; TRACKS SELECT 02CD: 27 04 BEQ $02D3 02CF: 81 1D CMPA #$1D ; LOCATE 02D1: 26 03 BNE $02D6 02D3: 7E A7 D5 JMP $A7D5 ------------------------------------------------ 02D6: 39 RTS ------------------------------------------------ 02D7: C1 00 CMPB #$00 02D9: 25 07 BCS $02E2 02DB: C1 06 CMPB #$06 02DD: 22 03 BHI $02E2 02DF: 7E 72 33 JMP $7233 ------------------------------------------------ 02E2: C1 08 CMPB #$08 02E4: 26 2F BNE $0315 02E6: 81 2A CMPA #$2A ; key is SOFTKEY? 02E8: 25 07 BCS $02F1 ; 02EA: 81 33 CMPA #$33 ; 02EC: 22 03 BHI $02F1 ; 02EE: 7E A4 67 JMP $A467 ------------------------------------------------ 02F1: 81 18 CMPA #$18 ; INC 02F3: 27 04 BEQ $02F9 02F5: 81 19 CMPA #$19 ; DEC 02F7: 26 03 BNE $02FC 02F9: 7E 74 86 JMP $7486 ------------------------------------------------ 02FC: 81 20 CMPA #$20 ; RECORD 02FE: 27 04 BEQ $0304 0300: 81 1D CMPA #$1D ; LOCATE 0302: 26 03 BNE $0307 0304: 7E A7 D5 JMP $A7D5 ------------------------------------------------ 0307: 81 1E CMPA #$1E ; MIX-MIDI 0309: 26 02 BNE $030D 030B: 20 F7 BRA $0304 ------------------------------------------------ 030D: 81 14 CMPA #$14 ; CONTROL 030F: 26 03 BNE $0314 0311: 7E 79 76 JMP $7976 ------------------------------------------------ 0314: 39 RTS ------------------------------------------------ 0315: C1 07 CMPB #$07 0317: 26 09 BNE $0322 0319: 81 21 CMPA #$21 ; PLAY 031B: 26 03 BNE $0320 031D: 7E A7 D5 JMP $A7D5 ------------------------------------------------ 0320: 20 C4 BRA $02E6 ------------------------------------------------ 0322: C1 0C CMPB #$0C 0324: 27 04 BEQ $032A 0326: C1 15 CMPB #$15 0328: 26 32 BNE $035C 032A: 81 18 CMPA #$18 ; INC 032C: 27 04 BEQ $0332 032E: 81 19 CMPA #$19 ; DEC 0330: 26 03 BNE $0335 0332: 7E 74 86 JMP $7486 ; +/- handler ------------------------------------------------ 0335: 81 2A CMPA #$2A ; SOFTKEYs 0337: 25 07 BCS $0340 0339: 81 33 CMPA #$33 033B: 22 03 BHI $0340 033D: 7E A4 67 JMP $A467 ; SOFTKEY handler ------------------------------------------------ 0340: 81 20 CMPA #$20 ; STOP 0342: 26 02 BNE $0346 0344: 86 1D LDA #$1D 0346: 81 1D CMPA #$1D 0348: 26 11 BNE $035B 034A: D6 CA LDB $CA 034C: C1 07 CMPB #$07 034E: 27 06 BEQ $0356 0350: C1 05 CMPB #$05 0352: 27 02 BEQ $0356 0354: C6 00 LDB #$00 0356: D7 AA STB $AA 0358: 7E A7 D5 JMP $A7D5 ------------------------------------------------ 035B: 39 RTS ------------------------------------------------ 035C: C1 0A CMPB #$0A 035E: 27 04 BEQ $0364 0360: C1 11 CMPB #$11 0362: 26 02 BNE $0366 0364: 20 19 BRA $037F ------------------------------------------------ 0366: C1 0B CMPB #$0B 0368: 27 04 BEQ $036E 036A: C1 0D CMPB #$0D 036C: 26 01 BNE $036F 036E: 39 RTS ------------------------------------------------ 036F: C1 10 CMPB #$10 0371: 26 01 BNE $0374 0373: 39 RTS ------------------------------------------------ ------------------------------------------------ - button parsing (data entry, softkeys only ) - ------------------------------------------------ ------------------------------------------------ ------------------------------------------------ --- INC / DEC ---------------------------------- ------------------------------------------------ 0374: 81 18 CMPA #$18 0376: 27 04 BEQ $037C 0378: 81 19 CMPA #$19 037A: 26 03 BNE $037F 037C: 7E 74 86 JMP $7486 ------------------------------------------------ ------------------------------------------------ --- button parsing (softkeys only) ------------- ------------------------------------------------ ------------------------------------------------ ------------------------------------------------ --- SOFTKEYs------------------------------------ ------------------------------------------------ 037F: 81 2A CMPA #$2A 0381: 25 07 BCS $038A 0383: 81 33 CMPA #$33 0385: 22 03 BHI $038A 0387: 7E A4 67 JMP $A467 ------------------------------------------------ 038A: 39 RTS ------------------------------------------------ 038B: BD 71 2E JSR $712E 038E: 2B 0A BMI $039A 0390: 0D A2 TST $A2 0392: 2B 07 BMI $039B 0394: 91 A3 CMPA $A3 0396: 26 02 BNE $039A 0398: 0F A3 CLR $A3 039A: 39 RTS ------------------------------------------------ 039B: 91 A3 CMPA $A3 039D: 27 01 BEQ $03A0 039F: 39 RTS ------------------------------------------------ 03A0: 81 19 CMPA #$19 03A2: 26 02 BNE $03A6 03A4: 20 49 BRA $03EF ------------------------------------------------ 03A6: D6 A9 LDB $A9 03A8: C1 01 CMPB #$01 03AA: 26 15 BNE $03C1 03AC: 81 22 CMPA #$22 03AE: 25 10 BCS $03C0 03B0: 81 28 CMPA #$28 03B2: 22 0C BHI $03C0 03B4: BD BB E5 JSR $BBE5 03B7: 86 01 LDA #$01 03B9: 97 C7 STA $C7 03BB: 86 16 LDA #$16 03BD: 7E 79 76 JMP $7976 ------------------------------------------------ 03C0: 39 RTS ------------------------------------------------ 03C1: C1 05 CMPB #$05 03C3: 26 15 BNE $03DA 03C5: 81 22 CMPA #$22 03C7: 25 10 BCS $03D9 03C9: 81 28 CMPA #$28 03CB: 22 0C BHI $03D9 03CD: BD BB E5 JSR $BBE5 03D0: 86 01 LDA #$01 03D2: 97 AB STA $AB 03D4: 86 11 LDA #$11 03D6: 7E 78 30 JMP $7830 ------------------------------------------------ 03D9: 39 RTS ------------------------------------------------ 03DA: C1 03 CMPB #$03 03DC: 26 14 BNE $03F2 03DE: 81 22 CMPA #$22 03E0: 25 09 BCS $03EB 03E2: 81 28 CMPA #$28 03E4: 22 05 BHI $03EB 03E6: BD C2 8A JSR $C28A 03E9: 20 04 BRA $03EF ------------------------------------------------ 03EB: 81 1F CMPA #$1F 03ED: 26 03 BNE $03F2 03EF: 7E BB E5 JMP $BBE5 ------------------------------------------------ 03F2: C1 06 CMPB #$06 03F4: 26 0A BNE $0400 03F6: 81 1F CMPA #$1F 03F8: 26 06 BNE $0400 03FA: 86 00 LDA #$00 03FC: 97 A9 STA $A9 03FE: 20 EF BRA $03EF ------------------------------------------------ 0400: 39 RTS ------------------------------------------------ 0401: 8C 02 D4 CMPX #$02D4 0404: 26 11 BNE $0417 0406: 91 BC CMPA $BC 0408: 23 04 BLS $040E 040A: 80 28 SUBA #$28 040C: 20 F8 BRA $0406 ------------------------------------------------ 040E: A7 02 STA +$02,X 0410: BD BA 7B JSR $BA7B 0413: ED 84 STD ,X 0417: BC 0D 0B CMPX $0D0B 041A: 26 07 BNE $0423 041C: 97 D1 STA $D1 041E: 0C AE INC $AE 0420: BD A5 D5 JSR $A5D5 0423: 96 A8 LDA $A8 0425: 81 03 CMPA #$03 0427: 26 05 BNE $042E 0429: CC C2 CA LDD #$C2CA 042C: 20 07 BRA $0435 ------------------------------------------------ 042E: 81 07 CMPA #$07 0430: 26 06 BNE $0438 0432: CC 82 88 LDD #$8288 0435: 7E 80 E9 JMP $80E9 ------------------------------------------------ 0438: 81 00 CMPA #$00 043A: 26 17 BNE $0453 043C: BC 0D 0B CMPX $0D0B 043F: 26 12 BNE $0453 0441: A6 02 LDA +$02,X 0443: 91 BC CMPA $BC 0445: 22 0C BHI $0453 0447: 8D 0B BSR $0454 0449: D7 CB STB $CB 044B: BD BB B4 JSR $BBB4 044E: 97 CF STA $CF 0450: 7E 7A E4 JMP $7AE4 ------------------------------------------------ 0453: 39 RTS ------------------------------------------------ 0454: 5F CLRB 0455: 81 28 CMPA #$28 0457: 25 05 BCS $045E 0459: 80 28 SUBA #$28 045B: 5C INCB 045C: 20 F7 BRA $0455 ------------------------------------------------ 045E: 39 RTS ------------------------------------------------ 045F: 0D A2 TST $A2 0461: 2B 05 BMI $0468 0463: 1F 89 TFR A,B 0465: 7E 74 7D JMP $747D ------------------------------------------------ 0468: D6 A9 LDB $A9 046A: C1 06 CMPB #$06 046C: 26 02 BNE $0470 046E: 20 F3 BRA $0463 ------------------------------------------------ 0470: 39 RTS ------------------------------------------------ 0471: 34 02 PSHS A 0473: BD 71 3A JSR $713A 0476: 35 02 PULS A 0478: 7E 73 90 JMP $7390 ------------------------------------------------ 047B: 39 RTS ------------------------------------------------ 047C: 39 RTS ------------------------------------------------ 047D: 0D AD TST $AD 047F: 27 01 BEQ $0482 0481: 39 RTS ------------------------------------------------ 0482: 5F CLRB 0483: 7E 74 9D JMP $749D ------------------------------------------------ --- INC/DEC possible? -------------------------- ------------------------------------------------ 0486: 0D AC TST $AC 0488: 27 01 BEQ $048B 048A: 39 RTS ------------------------------------------------ --- DEC ---------------------------------------- ------------------------------------------------ 048B: 81 19 CMPA #$19 048D: 26 08 BNE $0497 048F: 8A 80 ORA #$80 ; keycode | bit 7 0491: 97 A2 STA $A2 0493: C6 80 LDB #$80 ; "dec" 0495: 20 06 BRA $049D ------------------------------------------------ --- INC ---------------------------------------- ------------------------------------------------ 0497: 81 18 CMPA #$18 0499: 26 02 BNE $049D 049B: C6 01 LDB #$01 ; "inc" 049D: 34 06 PSHS B,A ; 049F: D6 A9 LDB $A9 ; parameter? 04A1: 8E F7 B6 LDX #$F7B6 ; get parameter handler 04A4: 58 LSLB 04A5: 6E 95 JMP [B,X] ------------------------------------------------ 04A7: 96 B4 LDA $B4 04A9: 81 8F CMPA #$8F 04AB: 27 04 BEQ $04B1 04AD: 81 90 CMPA #$90 04AF: 26 0C BNE $04BD 04B1: D6 AA LDB $AA 04B3: C1 00 CMPB #$00 04B5: 27 06 BEQ $04BD 04B7: C1 05 CMPB #$05 04B9: 27 02 BEQ $04BD 04BB: 35 86 PULS PC,B,A ------------------------------------------------ 04BD: 81 84 CMPA #$84 04BF: 24 1C BCC $04DD 04C1: CE 0D 6A LDU #$0D6A 04C4: BE 0D 0B LDX $0D0B 04C7: 11 A3 84 CMPU ,X 04CA: 27 11 BEQ $04DD 04CC: FF 0D 07 STU $0D07 04CF: EF 84 STU ,X 04D1: BD BB 5F JSR $BB5F 04D4: 96 A8 LDA $A8 04D6: 81 01 CMPA #$01 04D8: 26 03 BNE $04DD 04DA: BD B7 54 JSR $B754 04DD: 96 B2 LDA $B2 ; offset 04DF: 48 LSLA 04E0: 8E 80 45 LDX #$8045 ; vector base 04E3: 30 86 LEAX A,X ; get address 04E5: D6 B9 LDB $B9 04E7: BD B7 C5 JSR $B7C5 04EA: 35 06 PULS B,A 04EC: D7 C9 STB $C9 04EE: AD 94 JSR [,X] ; jump to address 04F0: 1F 89 TFR A,B 04F2: 86 E8 LDA #$E8 ; #$e8 to panel 04F4: BD 99 81 JSR $9981 ; 04F7: 96 B3 LDA $B3 04F9: 81 43 CMPA #$43 04FB: 26 22 BNE $051F 04FD: 8D 07 BSR $0506 04FF: DE C1 LDU $C1 0501: 6F 4B CLR +$0B,U 0503: 16 00 BB LBRA $05C1 ------------------------------------------------ --- send $fbfe to panel if $e1=#$00 ------------ ------------------------------------------------ 0506: 96 E1 LDA $E1 0508: 81 00 CMPA #$00 050A: 26 04 BNE $0510 050C: C6 FE LDB #$FE ; D = $fbfe ($e1=$00) 050E: 20 0A BRA $051A ------------------------------------------------ --- send $fbe6 to panel if $e1=#$01 ------------ ------------------------------------------------ 0510: 81 01 CMPA #$01 0512: 26 04 BNE $0518 0514: C6 E6 LDB #$E6 ; D = $fbe6 ($e1=$01) 0516: 20 02 BRA $051A ------------------------------------------------ --- send $fbe5 to panel if $e1>#$01 ------------ ------------------------------------------------ 0518: C6 E5 LDB #$E5 051A: 86 FB LDA #$FB ; D = $fbe5 ($e1>$01) 051C: 7E 99 7D JMP $997D ; print A then B ------------------------------------------------ 051F: 81 3C CMPA #$3C 0521: 26 0E BNE $0531 0523: 8D 03 BSR $0528 0525: 16 00 99 LBRA $05C1 ------------------------------------------------ --- send #$fb ($da OR #$d0) to panel ----------- ------------------------------------------------ 0528: 86 FB LDA #$FB ; d = $fb($da)|$00d0 052A: D6 DA LDB $DA 052C: CA D0 ORB #$D0 052E: 7E 99 7D JMP $997D ------------------------------------------------ 0531: 81 48 CMPA #$48 0533: 26 08 BNE $053D 0535: 96 E6 LDA $E6 0537: B7 02 C2 STA $02C2 053A: 16 00 84 LBRA $05C1 053D: 81 3D CMPA #$3D 053F: 26 0B BNE $054C 0541: 96 DB LDA $DB 0543: 26 05 BNE $054A 0545: 86 7E LDA #$7E 0547: B7 02 E0 STA $02E0 054A: 20 75 BRA $05C1 ------------------------------------------------ 054C: 81 4A CMPA #$4A 054E: 26 1C BNE $056C 0550: 96 AA LDA $AA 0552: 81 05 CMPA #$05 0554: 27 04 BEQ $055A 0556: 81 06 CMPA #$06 0558: 26 09 BNE $0563 055A: BD AD 1C JSR $AD1C 055D: 96 E8 LDA $E8 055F: A7 85 STA B,X 0561: 20 5E BRA $05C1 ------------------------------------------------ 0563: 81 04 CMPA #$04 0565: 22 03 BHI $056A 0567: BD BF 53 JSR $BF53 056A: 20 55 BRA $05C1 ------------------------------------------------ 056C: 81 40 CMPA #$40 056E: 26 0A BNE $057A 0570: 96 DE LDA $DE 0572: B7 02 D8 STA $02D8 0575: BD 89 E7 JSR $89E7 0578: 20 47 BRA $05C1 ------------------------------------------------ 057A: 81 44 CMPA #$44 057C: 26 07 BNE $0585 057E: BD 89 E7 JSR $89E7 0581: C6 00 LDB #$00 0583: 20 36 BRA $05BB ------------------------------------------------ 0585: 81 14 CMPA #$14 0587: 26 04 BNE $058D 0589: C6 00 LDB #$00 058B: 20 2E BRA $05BB ------------------------------------------------ 058D: 81 1B CMPA #$1B 058F: 26 14 BNE $05A5 0591: C4 80 ANDB #$80 0593: 27 2C BEQ $05C1 0595: FE 0D 07 LDU $0D07 0598: 33 C8 1E LEAU +$1E,U 059B: A6 C4 LDA ,U 059D: 84 7F ANDA #$7F 059F: A7 C4 STA ,U 05A1: C6 01 LDB #$01 05A3: 20 16 BRA $05BB ------------------------------------------------ 05A5: 81 1C CMPA #$1C 05A7: 26 18 BNE $05C1 05A9: C4 80 ANDB #$80 05AB: 27 14 BEQ $05C1 05AD: FE 0D 07 LDU $0D07 05B0: 33 C8 1F LEAU +$1F,U 05B3: A6 C4 LDA ,U 05B5: 84 7F ANDA #$7F 05B7: A7 C4 STA ,U 05B9: C6 00 LDB #$00 05BB: BE 0D 0D LDX $0D0D 05BE: BD B7 5B JSR $B75B 05C1: BE 0D 0D LDX $0D0D 05C4: D6 B9 LDB $B9 05C6: BD B7 5B JSR $B75B 05C9: 96 A8 LDA $A8 05CB: 81 09 CMPA #$09 05CD: 27 03 BEQ $05D2 05CF: BD 7A D5 JSR $7AD5 05D2: 39 RTS ------------------------------------------------ 05D3: 86 1D LDA #$1D 05D5: 97 B2 STA $B2 05D7: FE 0D 09 LDU $0D09 05DA: BD 77 BF JSR $77BF 05DD: 32 62 LEAS +$02,S ; skip return address 05DF: A6 C4 LDA ,U 05E1: 8E BA 04 LDX #$BA04 ; print routine vectors 05E4: D6 B2 LDB $B2 ; offset 05E6: 58 LSLB 05E7: AD 95 JSR [B,X] ; to printing routine 05E9: 86 D5 LDA #$D5 ; #$d5 to panel 05EB: 7E 99 81 JMP $9981 ------------------------------------------------ 05EE: 96 AA LDA $AA 05F0: 81 1B CMPA #$1B 05F2: 26 05 BNE $05F9 05F4: 8E BD AC LDX #$BDAC ; prepare jump to $bdac 05F7: 20 77 BRA $0670 ------------------------------------------------ 05F9: 81 12 CMPA #$12 05FB: 27 04 BEQ $0601 05FD: 81 20 CMPA #$20 05FF: 26 02 BNE $0603 0601: 20 D0 BRA $05D3 ------------------------------------------------ 0603: 81 0C CMPA #$0C 0605: 27 04 BEQ $060B 0607: 81 21 CMPA #$21 0609: 26 05 BNE $0610 060B: 8E BD 23 LDX #$BD23 ; prepare jump to $bd23 060E: 20 60 BRA $0670 ------------------------------------------------ 0610: 81 15 CMPA #$15 0612: 26 05 BNE $0619 0614: 8E BD E4 LDX #$BDE4 ; prepare jump to $bde4 0617: 20 57 BRA $0670 ------------------------------------------------ 0619: 81 0E CMPA #$0E 061B: 26 05 BNE $0622 061D: 8E BE 41 LDX #$BE41 ; prepare jump to $be41 0620: 20 4E BRA $0670 ------------------------------------------------ 0622: 81 16 CMPA #$16 0624: 26 04 BNE $062A 0626: 86 93 LDA #$93 0628: 20 0E BRA $0638 ------------------------------------------------ 062A: 81 17 CMPA #$17 062C: 26 04 BNE $0632 062E: 86 8B LDA #$8B 0630: 20 06 BRA $0638 ------------------------------------------------ 0632: 81 0F CMPA #$0F ; 0634: 26 0A BNE $0640 0636: 86 95 LDA #$95 ; set cursor to pos. $15 0638: BD 99 81 JSR $9981 063B: 8E BE 73 LDX #$BE73 ; prepare jump $be73 063E: 20 30 BRA $0670 ; ------------------------------------------------ 0640: 81 13 CMPA #$13 0642: 26 1F BNE $0663 0644: 86 80 LDA #$80 0646: 9A A6 ORA $A6 0648: 97 A6 STA $A6 064A: 0D FD TST $FD 064C: 2A 11 BPL $065F 064E: 86 01 LDA #$01 0650: 97 FD STA $FD 0652: 86 A6 LDA #$A6 ; set cursor to pos. $26 0654: BD 99 81 JSR $9981 ; 0657: B6 02 AA LDA $02AA 065A: 97 C0 STA $C0 065C: BD BB AB JSR $BBAB ; print A 065F: 86 9F LDA #$9F ; set cursor to pos. $1f 0661: 20 D5 BRA $0638 ------------------------------------------------ 0663: 81 14 CMPA #$14 0665: 26 0F BNE $0676 0667: 86 01 LDA #$01 0669: 9A A6 ORA $A6 066B: 97 A6 STA $A6 066D: 8E BE AE LDX #$BEAE ; prepare jump to $beae 0670: 35 06 PULS B,A 0672: D7 C9 STB $C9 0674: 6E 84 JMP ,X ------------------------------------------------ 0676: 81 18 CMPA #$18 0678: 26 14 BNE $068E 067A: 86 96 LDA #$96 ; set cursor to pos. $16 067C: BD 99 81 JSR $9981 067F: 35 06 PULS B,A 0681: D7 C9 STB $C9 0683: BD BF 40 JSR $BF40 0686: B6 0D 17 LDA $0D17 ; get value 0689: 8B 31 ADDA #$31 ; transform to ASCII 068B: 7E 99 81 JMP $9981 ; print ------------------------------------------------ 068E: 81 19 CMPA #$19 0690: 26 04 BNE $0696 0692: 86 99 LDA #$99 ; set cursor to pos. $19 0694: 20 E6 BRA $067C ------------------------------------------------ 0696: 81 1A CMPA #$1A 0698: 26 05 BNE $069F 069A: CE 0D 17 LDU #$0D17 ; value 069D: 20 0D BRA $06AC ------------------------------------------------ 069F: 81 1F CMPA #$1F 06A1: 26 1A BNE $06BD 06A3: 86 01 LDA #$01 06A5: 9A A6 ORA $A6 06A7: 97 A6 STA $A6 06A9: CE 01 01 LDU #$0101 06AC: 35 06 PULS B,A 06AE: D7 C9 STB $C9 06B0: BD BE DB JSR $BEDB 06B3: 86 97 LDA #$97 ; set cursor to pos. $17 06B5: BD 99 81 JSR $9981 06B8: A6 C4 LDA ,U ; get value 06BA: 7E B8 71 JMP $B871 ------------------------------------------------ 06BD: 81 1E CMPA #$1E 06BF: 26 02 BNE $06C3 06C1: 20 04 BRA $06C7 ------------------------------------------------ 06C3: 81 1D CMPA #$1D 06C5: 26 0D BNE $06D4 06C7: CE 00 ED LDU #$00ED 06CA: 86 1B LDA #$1B 06CC: BD 77 BF JSR $77BF 06CF: 32 62 LEAS +$02,S 06D1: 7E B4 CF JMP $B4CF ------------------------------------------------ 06D4: 96 A8 LDA $A8 06D6: 81 09 CMPA #$09 06D8: 27 04 BEQ $06DE 06DA: 81 01 CMPA #$01 06DC: 26 03 BNE $06E1 06DE: 7E 74 A7 JMP $74A7 ------------------------------------------------ 06E1: 81 02 CMPA #$02 06E3: 26 12 BNE $06F7 06E5: 96 E5 LDA $E5 06E7: 84 7F ANDA #$7F ; limit to 7 bit 06E9: 10 26 00 DF LBNE $07CC 06ED: 35 06 PULS B,A 06EF: D7 C9 STB $C9 06F1: BD BE 16 JSR $BE16 06F4: 7E C2 68 JMP $C268 ------------------------------------------------ 06F7: 81 03 CMPA #$03 06F9: 26 16 BNE $0711 06FB: 96 AA LDA $AA 06FD: 81 04 CMPA #$04 06FF: 26 02 BNE $0703 0701: 35 86 PULS PC,B,A ------------------------------------------------ 0703: 81 08 CMPA #$08 0705: 27 04 BEQ $070B 0707: 81 02 CMPA #$02 0709: 26 04 BNE $070F 070B: 35 86 PULS PC,B,A ------------------------------------------------ 070D: 20 02 BRA $0711 ------------------------------------------------ 070F: 20 D4 BRA $06E5 ------------------------------------------------ 0711: 81 04 CMPA #$04 0713: 10 25 00 B5 LBCS $07CC 0717: 81 07 CMPA #$07 0719: 10 22 00 AF LBHI $07CC 071D: 96 B6 LDA $B6 071F: 10 27 00 A9 LBEQ $07CC 0723: BD BB 58 JSR $BB58 0726: 1F 03 TFR D,U 0728: 86 E8 LDA #$E8 ; send #$e8 to panel 072A: BD 99 81 JSR $9981 072D: BD BF 53 JSR $BF53 0730: 96 A8 LDA $A8 0732: 81 04 CMPA #$04 0734: 26 17 BNE $074D 0736: 33 4C LEAU +$0C,U 0738: 86 05 LDA #$05 073A: BD 77 BF JSR $77BF 073D: 32 62 LEAS +$02,S 073F: 33 54 LEAU -$0C,U 0741: 1F 31 TFR U,X 0743: 86 06 LDA #$06 0745: E6 0C LDB +$0C,X 0747: BD 8B B5 JSR $8BB5 074A: 7E 81 21 JMP $8121 ------------------------------------------------ 074D: 81 05 CMPA #$05 074F: 26 22 BNE $0773 0751: 33 44 LEAU +$04,U 0753: 86 0E LDA #$0E 0755: BD 77 BF JSR $77BF 0758: 32 62 LEAS +$02,S 075A: 33 5C LEAU -$04,U 075C: 34 40 PSHS U 075E: 11 93 C1 CMPU $C1 0761: 26 08 BNE $076B 0763: BD BB E5 JSR $BBE5 0766: 1F 31 TFR U,X 0768: BD 89 43 JSR $8943 076B: BD 89 E7 JSR $89E7 076E: 35 40 PULS U 0770: 7E 81 CE JMP $81CE ------------------------------------------------ 0773: 81 07 CMPA #$07 0775: 26 35 BNE $07AC 0777: 96 E2 LDA $E2 0779: 81 03 CMPA #$03 077B: 26 02 BNE $077F 077D: 20 4D BRA $07CC ------------------------------------------------ 077F: 33 42 LEAU +$02,U 0781: A6 C4 LDA ,U 0783: 81 FF CMPA #$FF 0785: 27 45 BEQ $07CC 0787: 86 07 LDA #$07 0789: BD 77 BF JSR $77BF 078C: 32 62 LEAS +$02,S 078E: A6 C4 LDA ,U 0790: 33 5E LEAU -$02,U 0792: 34 40 PSHS U 0794: 1F 31 TFR U,X 0796: 34 02 PSHS A 0798: 97 D1 STA $D1 079A: BD BA 7B JSR $BA7B 079D: ED 84 STD ,X ; value to memory 079F: FD 0D 07 STD $0D07 ; value to display 07A2: E6 E0 LDB ,S+ 07A4: BD 8A BB JSR $8ABB 07A7: 35 40 PULS U 07A9: 7E 82 85 JMP $8285 ------------------------------------------------ 07AC: 81 06 CMPA #$06 07AE: 26 0E BNE $07BE 07B0: 33 43 LEAU +$03,U 07B2: 35 06 PULS B,A 07B4: D7 C9 STB $C9 07B6: BD BF 0A JSR $BF0A 07B9: 33 5D LEAU -$03,U 07BB: 7E 82 2A JMP $822A ------------------------------------------------ 07BE: 39 RTS ------------------------------------------------ 07BF: 8E 80 45 LDX #$8045 ; vector table base 07C2: 48 LSLA ; offset adjust 07C3: 30 86 LEAX A,X ; get entry 07C5: EC 62 LDD +$02,S 07C7: D7 C9 STB $C9 07C9: AD 94 JSR [,X] ; to handler 07CB: 39 RTS ------------------------------------------------ 07CC: 35 86 PULS PC,B,A ------------------------------------------------ 07CE: CE 77 FC LDU #$77FC ; prepare jump to ROMLOW $07fc 07D1: 8E 9C C6 LDX #$9CC6 ; prep. indirect jump to $9cc6 07D4: 20 11 BRA $07E7 ------------------------------------------------ 07D6: 96 C3 LDA $C3 07D8: 81 0A CMPA #$0A 07DA: 22 05 BHI $07E1 07DC: CE 77 F9 LDU #$77F9 ; prepare jump to ROMLOW $07f9 07DF: 20 03 BRA $07E4 ------------------------------------------------ 07E1: CE 77 FB LDU #$77FB ; prepare jump to ROMLOW $07fb 07E4: 8E 9E 71 LDX #$9E71 ; prep. indirect jump to $9e71 07E7: BF 0D 15 STX $0D15 07EA: BE 0D E8 LDX $0DE8 07ED: 35 06 PULS B,A 07EF: 34 10 PSHS X 07F1: D7 C9 STB $C9 07F3: 27 02 BEQ $07F7 07F5: 20 17 BRA $080E ------------------------------------------------ 07F7: 6E C4 JMP ,U ------------------------------------------------ 07F9: 44 LSRA 07FA: 44 LSRA 07FB: 44 LSRA 07FC: AB E4 ADDA ,S 07FE: A1 61 CMPA +$01,S 0800: 23 04 BLS $0806 0802: A6 61 LDA +$01,S 0804: 20 22 BRA $0828 ------------------------------------------------ 0806: A1 E4 CMPA ,S 0808: 24 02 BCC $080C 080A: A6 E4 LDA ,S 080C: 20 1A BRA $0828 ------------------------------------------------ 080E: 96 C3 LDA $C3 0810: 0D C9 TST $C9 0812: 2A 0B BPL $081F 0814: A1 E4 CMPA ,S 0816: 23 03 BLS $081B 0818: 4A DECA 0819: 20 02 BRA $081D ------------------------------------------------ 081B: A6 61 LDA +$01,S 081D: 20 09 BRA $0828 ------------------------------------------------ 081F: A1 61 CMPA +$01,S 0821: 24 03 BCC $0826 0823: 4C INCA 0824: 20 02 BRA $0828 ------------------------------------------------ 0826: A6 E4 LDA ,S 0828: 97 C3 STA $C3 082A: 35 10 PULS X 082C: 6E 9F 0D 15 JMP [$0D15] ; perform indirect jump ------------------------------------------------ 0830: BD BC B6 JSR $BCB6 0833: C6 00 LDB #$00 0835: D7 A9 STB $A9 0837: BD BC AE JSR $BCAE 083A: CE A4 70 LDU #$A470 ; softbutton handler 083D: FF 0D 11 STU $0D11 ; to $a470 0840: BD 78 7E JSR $787E 0843: 1F 89 TFR A,B --- ENV1-4 ------------------------------------------------ 0845: 81 01 CMPA #$01 0847: 25 0A BCS $0853 0849: 81 04 CMPA #$04 084B: 22 06 BHI $0853 084D: C0 00 SUBB #$00 ; useless! 084F: D7 B7 STB $B7 0851: 20 28 BRA $087B --- LFO1-3 ------------------------------------------------ 0853: 81 05 CMPA #$05 0855: 25 0A BCS $0861 0857: 81 07 CMPA #$07 0859: 22 06 BHI $0861 085B: C0 04 SUBB #$04 085D: D7 B7 STB $B7 085F: 20 1A BRA $087B --- OSC1-3 ------------------------------------------------ 0861: 81 08 CMPA #$08 0863: 25 0A BCS $086F 0865: 81 0A CMPA #$0A 0867: 22 06 BHI $086F 0869: C0 07 SUBB #$07 086B: D7 B7 STB $B7 086D: 20 0C BRA $087B --- DCA1-3 ------------------------------------------------ 086F: 81 0B CMPA #$0B 0871: 25 08 BCS $087B 0873: 81 0D CMPA #$0D 0875: 22 04 BHI $087B 0877: C0 0A SUBB #$0A 0879: D7 B7 STB $B7 087B: 7E B6 E2 JMP $B6E2 ; sound edit page ------------------------------------------------ 087E: 34 46 PSHS U,B,A 0880: CE 71 C7 LDU #$71C7 ; ALL SEQ. PROGRAMS 0883: C6 0A LDB #$0A 0885: 4A DECA 0886: 3D MUL 0887: 33 CB LEAU D,U 0889: FF 0D 0F STU $0D0F 088C: 35 C6 PULS PC,U,B,A ------------------------------------------------ 088E: 1F 89 TFR A,B 0890: C0 22 SUBB #$22 0892: 0D A5 TST $A5 0894: 2B 1E BMI $08B4 0896: 96 D0 LDA $D0 0898: C1 03 CMPB #$03 089A: 26 06 BNE $08A2 089C: 90 A5 SUBA $A5 089E: 80 03 SUBA #$03 08A0: 20 06 BRA $08A8 ------------------------------------------------ 08A2: 0D A5 TST $A5 08A4: 27 02 BEQ $08A8 08A6: 80 03 SUBA #$03 08A8: 34 02 PSHS A 08AA: E1 E0 CMPB ,S+ 08AC: 26 03 BNE $08B1 08AE: 7E BF 6F JMP $BF6F ------------------------------------------------ 08B1: 7E BF 93 JMP $BF93 ------------------------------------------------ 08B4: D7 CF STB $CF 08B6: BD BC B2 JSR $BCB2 08B9: BD BC B6 JSR $BCB6 08BC: D6 A9 LDB $A9 08BE: C1 00 CMPB #$00 08C0: 26 10 BNE $08D2 08C2: 84 7F ANDA #$7F 08C4: 97 A2 STA $A2 08C6: BD 7A E4 JSR $7AE4 08C9: CE A6 07 LDU #$A607 ; softbutton handler to $a607 08CC: FF 0D 11 STU $0D11 08CF: 7E 7A D5 JMP $7AD5 ------------------------------------------------ 08D2: C1 01 CMPB #$01 08D4: 26 0B BNE $08E1 08D6: CE A5 65 LDU #$A565 ; softbutton handler to 08D9: FF 0D 11 STU $0D11 ; $a565 08DC: CE 7F A8 LDU #$7FA8 ; WRITE ($5fa8) 08DF: 20 0D BRA $08EE ------------------------------------------------ 08E1: C1 05 CMPB #$05 08E3: 26 28 BNE $090D 08E5: CE A5 83 LDU #$A583 ; soft button handler 08E8: FF 0D 11 STU $0D11 ; to $a583 08EB: CE 7F AF LDU #$7FAF ; EDIT ($5faf) 08EE: 8A 80 ORA #$80 08F0: 97 A2 STA $A2 08F2: 34 40 PSHS U 08F4: BD BC C0 JSR $BCC0 08F7: C6 00 LDB #$00 08F9: D7 AB STB $AB 08FB: BD 7A E4 JSR $7AE4 08FE: 86 D0 LDA #$D0 0900: BD 99 81 JSR $9981 0903: 35 40 PULS U 0905: BD 99 56 JSR $9956 0908: 86 D1 LDA #$D1 090A: 7E 99 81 JMP $9981 ------------------------------------------------ 090D: C1 03 CMPB #$03 090F: 26 22 BNE $0933 0911: D6 A8 LDB $A8 0913: C1 03 CMPB #$03 0915: 26 1A BNE $0931 0917: 0D B6 TST $B6 0919: 27 A7 BEQ $08C2 091B: D6 AA LDB $AA 091D: C1 04 CMPB #$04 091F: 27 10 BEQ $0931 0921: 8A 80 ORA #$80 0923: 97 A2 STA $A2 0925: BD BC C0 JSR $BCC0 0928: 8E A6 13 LDX #$A613 ; softbutton handler to 092B: BF 0D 11 STX $0D11 ; $a613 092E: 7E 7A E4 JMP $7AE4 ------------------------------------------------ 0931: 20 8F BRA $08C2 ------------------------------------------------ 0933: 39 RTS --- SEQ ------------------------------------------------ 0934: 81 29 CMPA #$29 0936: 26 13 BNE $094B 0938: 96 A9 LDA $A9 093A: 81 02 CMPA #$02 093C: 26 01 BNE $093F 093E: 39 RTS --- OSC 1 ------------------------------------------------ 093F: 96 A8 LDA $A8 0941: 81 08 CMPA #$08 0943: 26 03 BNE $0948 0945: 7E BF 6F JMP $BF6F ------------------------------------------------ 0948: 7E BF A7 JMP $BFA7 ------------------------------------------------ 094B: BD BF 65 JSR $BF65 094E: 1F 89 TFR A,B 0950: C0 26 SUBB #$26 0952: 81 26 CMPA #$26 0954: 27 1B BEQ $0971 0956: 0D D5 TST $D5 0958: 27 0C BEQ $0966 095A: 34 04 PSHS B 095C: 50 NEGB 095D: 8E 3F FF LDX #$3FFF ; CARTRIDGE check 0960: 6D 85 TST B,X 0962: 35 04 PULS B 0964: 27 0B BEQ $0971 0966: D6 A9 LDB $A9 0968: C1 01 CMPB #$01 096A: 26 04 BNE $0970 096C: C6 02 LDB #$02 096E: D7 A9 STB $A9 0970: 39 RTS ------------------------------------------------ 0971: D7 CB STB $CB 0973: 7E 78 B6 JMP $78B6 --- compare button ------------------------------------------------ 0976: 81 17 CMPA #$17 0978: 26 3C BNE $09B6 097A: 0D C7 TST $C7 097C: 2A 01 BPL $097F 097E: 39 RTS ------------------------------------------------ 097F: 27 09 BEQ $098A 0981: 0F C7 CLR $C7 0983: 96 D1 LDA $D1 0985: BD BA 7B JSR $BA7B 0988: 20 05 BRA $098F ------------------------------------------------ 098A: 0C C7 INC $C7 098C: CC 0D 6A LDD #$0D6A 098F: FD 0D 07 STD $0D07 0992: FE 0D 0B LDU $0D0B 0995: ED C4 STD ,U 0997: 0D AE TST $AE 0999: 26 03 BNE $099E 099B: BD 8A 8C JSR $8A8C ------------------------------------------------ --- parse pressed button through $A8 ----------- ------------------------------------------------ 099E: 96 A8 LDA $A8 09A0: 81 00 CMPA #$00 09A2: 26 03 BNE $09A7 09A4: 7E 7A D5 JMP $7AD5 ------------------------------------------------ --- ENV3 menu ---------------------------------- ------------------------------------------------ 09A7: 81 03 CMPA #$03 09A9: 26 03 BNE $09AE 09AB: 7E C2 A9 JMP $C2A9 ------------------------------------------------ --- ENV1 menu ---------------------------------- ------------------------------------------------ 09AE: 81 01 CMPA #$01 09B0: 26 03 BNE $09B5 09B2: 7E B7 54 JMP $B754 ------------------------------------------------ 09B5: 39 RTS ------------------------------------------------ --- edit/compare ------------------------------- ------------------------------------------------ 09B6: 81 16 CMPA #$16 ; write button? 09B8: 26 6D BNE $0A27 ; no->$7|0a27 09BA: 96 AA LDA $AA 09BC: 81 00 CMPA #$00 09BE: 27 04 BEQ $09C4 09C0: 81 05 CMPA #$05 09C2: 26 60 BNE $0A24 09C4: C6 00 LDB #$00 09C6: D7 A9 STB $A9 09C8: BD BC C0 JSR $BCC0 09CB: 96 C7 LDA $C7 09CD: 84 7F ANDA #$7F 09CF: 26 13 BNE $09E4 09D1: BD BC B2 JSR $BCB2 09D4: 8E A4 B5 LDX #$A4B5 ; softbutton handler to 09D7: BF 0D 11 STX $0D11 ; $a4b5 09DA: 86 04 LDA #$04 09DC: 97 A9 STA $A9 09DE: CE 7E EC LDU #$7EEC ; replace edit program ($5eec) 09E1: 7E 99 56 JMP $9956 ------------------------------------------------ --- write program ------------------------------ ------------------------------------------------ 09E4: BD BC AE JSR $BCAE 09E7: CE 7E B4 LDU #$7EB4 ; write program ($5eb4) 09EA: BD 99 56 JSR $9956 09ED: 86 0E LDA #$0E 09EF: 97 A8 STA $A8 09F1: BD BF 65 JSR $BF65 09F4: 8E A4 C6 LDX #$A4C6 ; softbutton handler to 09F7: BF 0D 11 STX $0D11 ; $a4c6 09FA: 8E 0D 6A LDX #$0D6A 09FD: BF 0D 07 STX $0D07 0A00: FE 0D 0B LDU $0D0B 0A03: AF C4 STX ,U 0A05: 86 02 LDA #$02 0A07: 97 A9 STA $A9 0A09: 86 7E LDA #$7E 0A0B: 97 C8 STA $C8 0A0D: 86 9D LDA #$9D 0A0F: C6 E8 LDB #$E8 0A11: BD 99 7D JSR $997D 0A14: 4F CLRA 0A15: BD A5 1F JSR $A51F 0A18: C6 06 LDB #$06 0A1A: BD B9 71 JSR $B971 0A1D: 86 9D LDA #$9D 0A1F: C6 D9 LDB #$D9 0A21: 7E 99 7D JMP $997D ------------------------------------------------ 0A24: 7E A9 F6 JMP $A9F6 ------------------------------------------------ --- STORAGE menu ------------------------------- ------------------------------------------------ 0A27: 81 15 CMPA #$15 ; storage button? 0A29: 26 24 BNE $0A4F ; no -> $7|0a4f 0A2B: 96 AA LDA $AA 0A2D: 81 00 CMPA #$00 0A2F: 27 04 BEQ $0A35 0A31: 81 05 CMPA #$05 0A33: 26 17 BNE $0A4C 0A35: C6 00 LDB #$00 0A37: D7 A9 STB $A9 0A39: BD BC B2 JSR $BCB2 0A3C: 86 0F LDA #$0F 0A3E: 97 A8 STA $A8 0A40: 8E A6 74 LDX #$A674 ; softbutton handler to 0A43: BF 0D 11 STX $0D11 ; $a674 0A46: CE 7F 31 LDU #$7F31 ; STORAGE SEL. TYPE ($5f31) 0A49: 7E 99 56 JMP $9956 ------------------------------------------------ 0A4C: 7E A9 F6 JMP $A9F6 ------------------------------------------------ --- CONTROL menu ------------------------------- ------------------------------------------------ 0A4F: 81 14 CMPA #$14 ; control button 0A51: 26 0D BNE $0A60 0A53: BD BC C0 JSR $BCC0 0A56: BD 78 37 JSR $7837 0A59: 86 09 LDA #$09 0A5B: 97 A8 STA $A8 0A5D: 7E C3 63 JMP $C363 ------------------------------------------------ 0A60: 16 FD CD LBRA $0830 ------------------------------------------------ 0A63: BD BB 75 JSR $BB75 0A66: 0D D5 TST $D5 0A68: 26 2D BNE $0A97 0A6A: 0F CB CLR $CB 0A6C: 96 D1 LDA $D1 0A6E: 81 27 CMPA #$27 0A70: 23 23 BLS $0A95 0A72: BE 0D 07 LDX $0D07 0A75: 34 10 PSHS X 0A77: 5F CLRB 0A78: BD AB 0B JSR $AB0B 0A7B: 0F CF CLR $CF 0A7D: 0F D1 CLR $D1 0A7F: 0C AE INC $AE 0A81: BD A5 D5 JSR $A5D5 0A84: AE E1 LDX ,S++ 0A86: 8C 0D 6A CMPX #$0D6A 0A89: 26 0A BNE $0A95 0A8B: FE 0D 0B LDU $0D0B 0A8E: AF C4 STX ,U 0A90: BF 0D 07 STX $0D07 0A93: 0C C7 INC $C7 0A95: 20 0E BRA $0AA5 ------------------------------------------------ 0A97: BE 0D 0B LDX $0D0B 0A9A: A6 02 LDA +$02,X 0A9C: 81 27 CMPA #$27 0A9E: 23 05 BLS $0AA5 0AA0: EC 84 LDD ,X 0AA2: FD 0D 07 STD $0D07 0AA5: 96 A8 LDA $A8 0AA7: 81 00 CMPA #$00 0AA9: 26 03 BNE $0AAE 0AAB: 7E 7A E4 JMP $7AE4 --- env 3 ------------------------------------------------ 0AAE: 81 03 CMPA #$03 0AB0: 26 03 BNE $0AB5 0AB2: 7E C2 A9 JMP $C2A9 --- env 1 ------------------------------------------------ 0AB5: 81 01 CMPA #$01 0AB7: 26 03 BNE $0ABC 0AB9: 7E B7 54 JMP $B754 ------------------------------------------------ 0ABC: 39 RTS ------------------------------------------------ 0ABD: 0D C7 TST $C7 0ABF: 2B 13 BMI $0AD4 0AC1: 84 01 ANDA #$01 0AC3: 26 04 BNE $0AC9 0AC5: 0C C7 INC $C7 0AC7: 20 02 BRA $0ACB ------------------------------------------------ 0AC9: 0F C7 CLR $C7 0ACB: 86 17 LDA #$17 0ACD: 0C AE INC $AE 0ACF: BD 79 76 JSR $7976 0AD2: 0F AE CLR $AE 0AD4: 39 RTS ------------------------------------------------ --- program write ------------------------------ ------------------------------------------------ 0AD5: CE 7F A3 LDU #$7FA3 ; WRITE ($5fa3) 0AD8: 96 C7 LDA $C7 0ADA: 84 7F ANDA #$7F 0ADC: 27 03 BEQ $0AE1 ------------------------------------------------ --- program parameter change ------------------- ------------------------------------------------ 0ADE: CE 7F 9E LDU #$7F9E ; *C* 0AE1: 7E 99 56 JMP $9956 ------------------------------------------------ 0AE4: 86 00 LDA #$00 0AE6: 97 A8 STA $A8 0AE8: 86 D6 LDA #$D6 0AEA: BD 99 81 JSR $9981 0AED: 96 CB LDA $CB 0AEF: 8E 76 37 LDX #$7637 ; INT/CRTA/CRTB/ SEQ/SONG 0AF2: C6 04 LDB #$04 ; text length 0AF4: BD B9 71 JSR $B971 0AF7: 8E 10 4A LDX #$104A ; sound buffer base 0AFA: D6 CB LDB $CB 0AFC: 27 0E BEQ $0B0C 0AFE: 34 04 PSHS B 0B00: 86 66 LDA #$66 ; PCB length 0B02: C6 28 LDB #$28 ; max. programs (40) 0B04: 3D MUL 0B05: 30 8B LEAX D,X ; sound buffer address 0B07: 35 04 PULS B 0B09: 5A DECB 0B0A: 20 F0 BRA $0AFC ------------------------------------------------ 0B0C: 96 CF LDA $CF ; INT counter 0B0E: 1F 89 TFR A,B 0B10: 8B 31 ADDA #$31 ; bank number to ASCII 0B12: BD 99 81 JSR $9981 0B15: 86 0A LDA #$0A ; bank number by 10 0B17: 3D MUL 0B18: 86 66 LDA #$66 ; result by PCB length 0B1A: 3D MUL 0B1B: 30 8B LEAX D,X ; get position in soundbank 0B1D: 30 88 C6 LEAX -$3A,X 0B20: 5F CLRB ; init sound counter 0B21: 10 8E F7 7A LDY #$F77A ; 10 parameter display pos. 0B25: A6 A5 LDA B,Y ; get position 0B27: 27 0D BEQ $0B36 0B29: 34 04 PSHS B 0B2B: BD 99 81 JSR $9981 ; position cursor 0B2E: 4F CLRA 0B2F: C6 06 LDB #$06 ; print sound name 0B31: BD B9 71 JSR $B971 0B34: 35 04 PULS B 0B36: 5C INCB 0B37: C1 0A CMPB #$0A ; 10 sounds printed? 0B39: 24 05 BCC $0B40 ; yes -> ROMLOW $0b40 0B3B: 30 88 66 LEAX +$66,X ; next PCB 0B3E: 20 E5 BRA $0B25 ------------------------------------------------ 0B40: 0D AB TST $AB 0B42: 27 19 BEQ $0B5D 0B44: 96 CB LDA $CB 0B46: C6 28 LDB #$28 0B48: 3D MUL 0B49: 34 04 PSHS B 0B4B: 96 D1 LDA $D1 0B4D: A0 E0 SUBA ,S+ 0B4F: BD BB B4 JSR $BBB4 0B52: 91 CF CMPA $CF 0B54: 26 07 BNE $0B5D 0B56: A6 A5 LDA B,Y 0B58: C6 06 LDB #$06 0B5A: BD BB DA JSR $BBDA 0B5D: 39 RTS --- via $8045 ------------------------------------------------ 0B5E: 34 11 PSHS X,CC --- via $804b ------------------------------------------------ 0B60: 8E C0 3F LDX #$C03F ; X=$C03F 0B63: 20 06 BRA $0B6B --- via $8049 ------------------------------------------------ 0B65: 34 11 PSHS X,CC 0B67: 8E E0 1F LDX #$E01F ; X=$E01F 0B6A: 44 LSRA 0B6B: 34 10 PSHS X ; x to stack 0B6D: E6 62 LDB +$02,S ; get CC via stack 0B6F: 1F 9A TFR B,CC 0B71: 26 03 BNE $0B76 ; cc != 0 0B73: 44 LSRA ; cc = 0 0B74: 20 13 BRA $0B89 ; -> $8b89 ------------------------------------------------ 0B76: A6 C4 LDA ,U 0B78: A4 61 ANDA +$01,S 0B7A: 0D C9 TST $C9 0B7C: 2A 06 BPL $0B84 0B7E: 4D TSTA 0B7F: 27 01 BEQ $0B82 0B81: 4A DECA 0B82: 20 05 BRA $0B89 ------------------------------------------------ 0B84: A1 61 CMPA +$01,S 0B86: 24 01 BCC $0B89 0B88: 4C INCA 0B89: E6 E4 LDB ,S 0B8B: 32 62 LEAS +$02,S 0B8D: 35 11 PULS X,CC 0B8F: 7E 80 37 JMP $8037 --- via $8047 ------------------------------------------------ 0B92: 26 10 BNE $0BA4 0B94: 81 6C CMPA #$6C 0B96: 23 04 BLS $0B9C 0B98: 86 6C LDA #$6C 0B9A: 20 1C BRA $0BB8 ------------------------------------------------ 0B9C: 81 15 CMPA #$15 0B9E: 24 18 BCC $0BB8 0BA0: 86 15 LDA #$15 0BA2: 20 14 BRA $0BB8 ------------------------------------------------ 0BA4: A6 C4 LDA ,U 0BA6: 84 7F ANDA #$7F 0BA8: 0D C9 TST $C9 0BAA: 2B 07 BMI $0BB3 0BAC: 81 6C CMPA #$6C 0BAE: 24 0D BCC $0BBD 0BB0: 4C INCA 0BB1: 20 05 BRA $0BB8 ------------------------------------------------ 0BB3: 81 15 CMPA #$15 0BB5: 23 06 BLS $0BBD 0BB7: 4A DECA 0BB8: C6 80 LDB #$80 0BBA: BD 80 37 JSR $8037 0BBD: 39 RTS --- via $804f ------------------------------------------------ 0BBE: 34 01 PSHS CC 0BC0: C6 7E LDB #$7E 0BC2: 35 01 PULS CC 0BC4: 34 04 PSHS B 0BC6: 26 12 BNE $0BDA 0BC8: 84 7E ANDA #$7E 0BCA: 20 24 BRA $0BF0 ------------------------------------------------ 0BCC: 44 LSRA 0BCD: 44 LSRA 0BCE: 44 LSRA 0BCF: 44 LSRA 0BD0: 84 06 ANDA #$06 0BD2: A1 E4 CMPA ,S 0BD4: 23 1A BLS $0BF0 0BD6: A6 E4 LDA ,S 0BD8: 20 16 BRA $0BF0 ------------------------------------------------ 0BDA: A6 C4 LDA ,U 0BDC: 84 7E ANDA #$7E 0BDE: 0D C9 TST $C9 0BE0: 2B 08 BMI $0BEA 0BE2: A1 E4 CMPA ,S 0BE4: 24 0F BCC $0BF5 0BE6: 8B 02 ADDA #$02 0BE8: 20 06 BRA $0BF0 ------------------------------------------------ 0BEA: 81 00 CMPA #$00 0BEC: 27 07 BEQ $0BF5 0BEE: 80 02 SUBA #$02 0BF0: C6 80 LDB #$80 0BF2: BD 80 37 JSR $8037 0BF5: 35 84 PULS PC,B --- via $804d ------------------------------------------------ 0BF7: 26 0B BNE $0C04 0BF9: 44 LSRA 0BFA: 84 3C ANDA #$3C 0BFC: 81 30 CMPA #$30 0BFE: 23 1A BLS $0C1A 0C00: 86 30 LDA #$30 0C02: 20 16 BRA $0C1A ------------------------------------------------ 0C04: A6 C4 LDA ,U 0C06: 84 3C ANDA #$3C 0C08: 0D C9 TST $C9 0C0A: 2B 08 BMI $0C14 0C0C: 81 30 CMPA #$30 0C0E: 24 0F BCC $0C1F 0C10: 8B 04 ADDA #$04 0C12: 20 06 BRA $0C1A ------------------------------------------------ 0C14: 81 04 CMPA #$04 0C16: 25 07 BCS $0C1F 0C18: 80 04 SUBA #$04 0C1A: C6 C0 LDB #$C0 0C1C: BD 80 37 JSR $8037 0C1F: 39 RTS --- via $8095 ------------------------------------------------ 0C20: 34 01 PSHS CC 0C22: 8E 3F 00 LDX #$3F00 0C25: 10 8E 01 80 LDY #$0180 0C29: 35 01 PULS CC 0C2B: 34 30 PSHS Y,X 0C2D: 26 0A BNE $0C39 0C2F: 81 40 CMPA #$40 0C31: 25 04 BCS $0C37 0C33: 84 3F ANDA #$3F 0C35: 8A 80 ORA #$80 0C37: 20 58 BRA $0C91 ------------------------------------------------ 0C39: 20 1D BRA $0C58 --- via $8051 ------------------------------------------------ 0C3B: 34 01 PSHS CC 0C3D: 8E FC 04 LDX #$FC04 0C40: 10 8E 04 01 LDY #$0401 0C44: 35 01 PULS CC 0C46: 34 30 PSHS Y,X 0C48: 26 0E BNE $0C58 0C4A: 34 02 PSHS A 0C4C: 48 LSLA 0C4D: 48 LSLA 0C4E: E6 E0 LDB ,S+ ; x.lsb 0C50: C1 40 CMPB #$40 0C52: 25 02 BCS $0C56 0C54: 8A 01 ORA #$01 0C56: 20 39 BRA $0C91 ------------------------------------------------ 0C58: A6 C4 LDA ,U 0C5A: A4 E4 ANDA ,S ; x.msb 0C5C: 1C FE ANDCC #$FE ; clear carry 0C5E: 0D C9 TST $C9 0C60: 2B 0D BMI $0C6F 0C62: A1 E4 CMPA ,S ; x.msb 0C64: 24 04 BCC $0C6A 0C66: AB 62 ADDA +$02,S ; y.msb 0C68: 20 03 BRA $0C6D ------------------------------------------------ 0C6A: 4F CLRA 0C6B: 1A 01 ORCC #$01 ; set carry 0C6D: 20 0C BRA $0C7B ------------------------------------------------ 0C6F: A1 61 CMPA +$01,S ; x.lsb 0C71: 25 04 BCS $0C77 0C73: A0 62 SUBA +$02,S ; y.msb 0C75: 20 04 BRA $0C7B ------------------------------------------------ 0C77: A6 E4 LDA ,S ; x.msb 0C79: 1A 01 ORCC #$01 ; set carry 0C7B: E6 C4 LDB ,U 0C7D: 24 0C BCC $0C8B 0C7F: E4 63 ANDB +$03,S ; y.lsb 0C81: 26 04 BNE $0C87 0C83: AA 63 ORA +$03,S ; y.lsb 0C85: 20 02 BRA $0C89 ------------------------------------------------ 0C87: A4 E4 ANDA ,S ; x.msb 0C89: 20 06 BRA $0C91 ------------------------------------------------ 0C8B: E4 63 ANDB +$03,S ; y.lsb 0C8D: 34 04 PSHS B 0C8F: AA E0 ORA ,S+ ; x.msb 0C91: 35 30 PULS Y,X 0C93: A7 C4 STA ,U 0C95: 39 RTS --- via $8055 ------------------------------------------------ 0C96: 26 10 BNE $0CA8 0C98: 48 LSLA 0C99: 81 02 CMPA #$02 0C9B: 24 02 BCC $0C9F 0C9D: 86 02 LDA #$02 0C9F: 40 NEGA 0CA0: 34 02 PSHS A 0CA2: 86 80 LDA #$80 0CA4: A0 E0 SUBA ,S+ 0CA6: 20 16 BRA $0CBE ------------------------------------------------ 0CA8: A6 C4 LDA ,U 0CAA: 84 FE ANDA #$FE 0CAC: 0D C9 TST $C9 0CAE: 2B 08 BMI $0CB8 0CB0: 81 7E CMPA #$7E 0CB2: 2C 0F BGE $0CC3 0CB4: 8B 02 ADDA #$02 0CB6: 20 06 BRA $0CBE ------------------------------------------------ 0CB8: 81 82 CMPA #$82 0CBA: 2F 07 BLE $0CC3 0CBC: 80 02 SUBA #$02 0CBE: C6 01 LDB #$01 0CC0: BD 80 37 JSR $8037 0CC3: 39 RTS --- via $8057 ------------------------------------------------ 0CC4: 26 15 BNE $0CDB 0CC6: 81 01 CMPA #$01 0CC8: 24 02 BCC $0CCC 0CCA: 86 01 LDA #$01 0CCC: 34 02 PSHS A 0CCE: 86 80 LDA #$80 0CD0: A0 E0 SUBA ,S+ 0CD2: 48 LSLA 0CD3: 34 02 PSHS A 0CD5: 86 80 LDA #$80 0CD7: A0 E0 SUBA ,S+ 0CD9: 20 15 BRA $0CF0 ------------------------------------------------ 0CDB: A6 C4 LDA ,U 0CDD: 48 LSLA 0CDE: 0D C9 TST $C9 0CE0: 2B 08 BMI $0CEA 0CE2: 81 7E CMPA #$7E 0CE4: 2C 10 BGE $0CF6 0CE6: 8B 02 ADDA #$02 0CE8: 20 06 BRA $0CF0 ------------------------------------------------ 0CEA: 81 82 CMPA #$82 0CEC: 2F 08 BLE $0CF6 0CEE: 80 02 SUBA #$02 0CF0: 44 LSRA 0CF1: C6 80 LDB #$80 0CF3: BD 80 37 JSR $8037 0CF6: 39 RTS --- via $8059 ------------------------------------------------ 0CF7: 26 0B BNE $0D04 0CF9: C6 0F LDB #$0F 0CFB: 8D 23 BSR $0D20 0CFD: C6 0C LDB #$0C 0CFF: 3D MUL 0D00: 1F 98 TFR B,A 0D02: 20 16 BRA $0D1A ------------------------------------------------ 0D04: A6 C4 LDA ,U 0D06: 84 7F ANDA #$7F 0D08: 0D C9 TST $C9 0D0A: 2B 08 BMI $0D14 0D0C: 81 54 CMPA #$54 0D0E: 22 0F BHI $0D1F 0D10: 8B 0C ADDA #$0C 0D12: 20 06 BRA $0D1A ------------------------------------------------ 0D14: 81 0C CMPA #$0C 0D16: 25 07 BCS $0D1F 0D18: 80 0C SUBA #$0C 0D1A: C6 80 LDB #$80 0D1C: BD 80 37 JSR $8037 0D1F: 39 RTS ------------------------------------------------ 0D20: 34 04 PSHS B 0D22: 1F 89 TFR A,B 0D24: 4F CLRA 0D25: E1 E4 CMPB ,S 0D27: 25 05 BCS $0D2E 0D29: E0 E4 SUBB ,S 0D2B: 4C INCA 0D2C: 20 F7 BRA $0D25 ------------------------------------------------ 0D2E: 32 61 LEAS +$01,S 0D30: 39 RTS --- via $805b ------------------------------------------------ 0D31: 26 1A BNE $0D4D 0D33: C6 0B LDB #$0B 0D35: 8D E9 BSR $0D20 0D37: 34 02 PSHS A 0D39: A6 C4 LDA ,U 0D3B: 84 7F ANDA #$7F 0D3D: BD BB C7 JSR $BBC7 0D40: C6 0C LDB #$0C 0D42: 3D MUL 0D43: EB E0 ADDB ,S+ 0D45: C1 60 CMPB #$60 0D47: 22 1D BHI $0D66 0D49: 1F 98 TFR B,A 0D4B: 20 14 BRA $0D61 ------------------------------------------------ 0D4D: A6 C4 LDA ,U 0D4F: 84 7F ANDA #$7F 0D51: 0D C9 TST $C9 0D53: 2B 07 BMI $0D5C 0D55: 81 60 CMPA #$60 0D57: 24 0D BCC $0D66 0D59: 4C INCA 0D5A: 20 05 BRA $0D61 ------------------------------------------------ 0D5C: 81 00 CMPA #$00 0D5E: 23 06 BLS $0D66 0D60: 4A DECA 0D61: C6 80 LDB #$80 0D63: BD 80 37 JSR $8037 0D66: 39 RTS --- via $805d ------------------------------------------------ 0D67: 26 05 BNE $0D6E 0D69: 48 LSLA 0D6A: 84 FC ANDA #$FC 0D6C: 20 16 BRA $0D84 ------------------------------------------------ 0D6E: A6 C4 LDA ,U 0D70: 84 F8 ANDA #$F8 0D72: 0D C9 TST $C9 0D74: 2B 08 BMI $0D7E 0D76: 81 F8 CMPA #$F8 0D78: 24 0F BCC $0D89 0D7A: 8B 08 ADDA #$08 0D7C: 20 06 BRA $0D84 ------------------------------------------------ 0D7E: 81 08 CMPA #$08 0D80: 25 07 BCS $0D89 0D82: 80 08 SUBA #$08 0D84: C6 03 LDB #$03 0D86: BD 80 37 JSR $8037 0D89: 39 RTS --- via $805f ------------------------------------------------ 0D8A: 26 19 BNE $0DA5 0D8C: 1F 89 TFR A,B 0D8E: 58 LSLB 0D8F: 58 LSLB 0D90: 25 0A BCS $0D9C 0D92: 86 FF LDA #$FF 0D94: C1 08 CMPB #$08 0D96: 24 0B BCC $0DA3 0D98: C6 08 LDB #$08 0D9A: 20 07 BRA $0DA3 ------------------------------------------------ 0D9C: 4F CLRA 0D9D: C1 F8 CMPB #$F8 0D9F: 23 02 BLS $0DA3 0DA1: C6 F8 LDB #$F8 0DA3: 20 1C BRA $0DC1 ------------------------------------------------ 0DA5: EC C4 LDD ,U 0DA7: C4 F8 ANDB #$F8 0DA9: 0D C9 TST $C9 0DAB: 2B 0B BMI $0DB8 0DAD: 10 83 00 F8 CMPD #$00F8 0DB1: 2C 10 BGE $0DC3 0DB3: C3 00 08 ADDD #$0008 0DB6: 20 09 BRA $0DC1 ------------------------------------------------ 0DB8: 10 83 FF 08 CMPD #$FF08 0DBC: 2F 05 BLE $0DC3 0DBE: 83 00 08 SUBD #$0008 0DC1: ED C4 STD ,U 0DC3: 39 RTS --- via $8063, $8067, $808d, $8091 ------------------------------------------------ 0DC4: 26 03 BNE $0DC9 0DC6: 48 LSLA 0DC7: 20 09 BRA $0DD2 ------------------------------------------------ 0DC9: 0D C9 TST $C9 0DCB: 2A 03 BPL $0DD0 0DCD: 4F CLRA 0DCE: 20 02 BRA $0DD2 ------------------------------------------------ 0DD0: 86 80 LDA #$80 0DD2: 4D TSTA 0DD3: 2B 06 BMI $0DDB 0DD5: 86 FE LDA #$FE 0DD7: A4 C4 ANDA ,U 0DD9: 20 04 BRA $0DDF ------------------------------------------------ 0DDB: 86 01 LDA #$01 0DDD: AA C4 ORA ,U 0DDF: A7 C4 STA ,U 0DE1: 39 RTS --- via $8065, $8069 ------------------------------------------------ 0DE2: 26 03 BNE $0DE7 0DE4: 48 LSLA 0DE5: 20 09 BRA $0DF0 ------------------------------------------------ 0DE7: 0D C9 TST $C9 0DE9: 2A 03 BPL $0DEE 0DEB: 4F CLRA 0DEC: 20 02 BRA $0DF0 ------------------------------------------------ 0DEE: 86 80 LDA #$80 0DF0: 4D TSTA 0DF1: 2B 06 BMI $0DF9 0DF3: 86 7F LDA #$7F 0DF5: A4 C4 ANDA ,U 0DF7: 20 04 BRA $0DFD ------------------------------------------------ 0DF9: 86 80 LDA #$80 0DFB: AA C4 ORA ,U 0DFD: A7 C4 STA ,U 0DFF: 39 RTS --- via $806b ------------------------------------------------ 0E00: 26 04 BNE $0E06 0E02: 84 40 ANDA #$40 0E04: 20 09 BRA $0E0F ------------------------------------------------ 0E06: 0D C9 TST $C9 0E08: 2A 03 BPL $0E0D 0E0A: 4F CLRA 0E0B: 20 02 BRA $0E0F ------------------------------------------------ 0E0D: 86 40 LDA #$40 0E0F: 4D TSTA 0E10: 26 06 BNE $0E18 0E12: 86 BF LDA #$BF 0E14: A4 C4 ANDA ,U 0E16: 20 02 BRA $0E1A ------------------------------------------------ 0E18: AA C4 ORA ,U 0E1A: A7 C4 STA ,U 0E1C: 39 RTS --- via $806d ------------------------------------------------ 0E1D: 26 05 BNE $0E24 0E1F: 48 LSLA 0E20: 84 C0 ANDA #$C0 0E22: 20 15 BRA $0E39 ------------------------------------------------ 0E24: A6 C4 LDA ,U 0E26: 84 C0 ANDA #$C0 0E28: 0D C9 TST $C9 0E2A: 2B 08 BMI $0E34 0E2C: 81 C0 CMPA #$C0 0E2E: 24 0E BCC $0E3E 0E30: 8B 40 ADDA #$40 0E32: 20 05 BRA $0E39 ------------------------------------------------ 0E34: 4D TSTA 0E35: 27 07 BEQ $0E3E 0E37: 80 40 SUBA #$40 0E39: C6 3F LDB #$3F 0E3B: BD 80 37 JSR $8037 0E3E: 39 RTS --- via $806f ------------------------------------------------ 0E3F: 27 16 BEQ $0E57 0E41: E6 C4 LDB ,U 0E43: C4 0F ANDB #$0F 0E45: 0D C9 TST $C9 0E47: 2B 07 BMI $0E50 0E49: C1 0F CMPB #$0F 0E4B: 24 12 BCC $0E5F 0E4D: 6C C4 INC ,U 0E4F: 39 RTS ------------------------------------------------ 0E50: C1 00 CMPB #$00 0E52: 23 0B BLS $0E5F 0E54: 6A C4 DEC ,U 0E56: 39 RTS ------------------------------------------------ 0E57: 44 LSRA 0E58: 44 LSRA 0E59: 44 LSRA 0E5A: C6 F0 LDB #$F0 0E5C: BD 80 37 JSR $8037 0E5F: 39 RTS --- via $8071 ------------------------------------------------ 0E60: 26 05 BNE $0E67 0E62: 48 LSLA 0E63: 84 F0 ANDA #$F0 0E65: 20 16 BRA $0E7D ------------------------------------------------ 0E67: A6 C4 LDA ,U 0E69: 84 F0 ANDA #$F0 0E6B: 0D C9 TST $C9 0E6D: 2B 08 BMI $0E77 0E6F: 81 F0 CMPA #$F0 0E71: 24 0F BCC $0E82 0E73: 8B 10 ADDA #$10 0E75: 20 06 BRA $0E7D ------------------------------------------------ 0E77: 81 00 CMPA #$00 0E79: 23 07 BLS $0E82 0E7B: 80 10 SUBA #$10 0E7D: C6 0F LDB #$0F 0E7F: BD 80 37 JSR $8037 0E82: 39 RTS --- via $8073 ------------------------------------------------ 0E83: 26 05 BNE $0E8A 0E85: 48 LSLA 0E86: 84 F0 ANDA #$F0 0E88: 20 20 BRA $0EAA ------------------------------------------------ 0E8A: A6 C4 LDA ,U 0E8C: 84 C0 ANDA #$C0 0E8E: 34 02 PSHS A 0E90: A6 41 LDA +$01,U 0E92: 84 C0 ANDA #$C0 0E94: 44 LSRA 0E95: 44 LSRA 0E96: AA E0 ORA ,S+ 0E98: 0D C9 TST $C9 0E9A: 2B 08 BMI $0EA4 0E9C: 81 F0 CMPA #$F0 0E9E: 24 20 BCC $0EC0 0EA0: 8B 10 ADDA #$10 0EA2: 20 06 BRA $0EAA ------------------------------------------------ 0EA4: 81 00 CMPA #$00 0EA6: 23 18 BLS $0EC0 0EA8: 80 10 SUBA #$10 0EAA: 34 02 PSHS A 0EAC: 84 C0 ANDA #$C0 0EAE: C6 3F LDB #$3F 0EB0: BD 80 37 JSR $8037 0EB3: 35 02 PULS A 0EB5: 48 LSLA 0EB6: 48 LSLA 0EB7: 34 40 PSHS U 0EB9: 33 41 LEAU +$01,U 0EBB: BD 80 37 JSR $8037 0EBE: 35 40 PULS U 0EC0: 39 RTS --- via $8081 ------------------------------------------------ 0EC1: 26 05 BNE $0EC8 0EC3: 48 LSLA 0EC4: 84 C0 ANDA #$C0 0EC6: 20 1F BRA $0EE7 ------------------------------------------------ 0EC8: A6 C4 LDA ,U 0ECA: 84 80 ANDA #$80 0ECC: 34 02 PSHS A 0ECE: A6 5E LDA -$02,U 0ED0: 44 LSRA 0ED1: 84 40 ANDA #$40 0ED3: AA E0 ORA ,S+ 0ED5: 0D C9 TST $C9 0ED7: 2B 08 BMI $0EE1 0ED9: 81 C0 CMPA #$C0 0EDB: 24 1F BCC $0EFC 0EDD: 8B 40 ADDA #$40 0EDF: 20 06 BRA $0EE7 ------------------------------------------------ 0EE1: 81 00 CMPA #$00 0EE3: 23 17 BLS $0EFC 0EE5: 80 40 SUBA #$40 0EE7: 34 02 PSHS A 0EE9: 84 80 ANDA #$80 0EEB: C6 7F LDB #$7F 0EED: BD 80 37 JSR $8037 0EF0: 35 02 PULS A 0EF2: 48 LSLA 0EF3: 34 40 PSHS U 0EF5: 33 5E LEAU -$02,U 0EF7: BD 80 37 JSR $8037 0EFA: 35 40 PULS U 0EFC: 39 RTS --- via $807d ------------------------------------------------ 0EFD: 34 01 PSHS CC 0EFF: BD BB 75 JSR $BB75 0F02: 35 01 PULS CC 0F04: 27 14 BEQ $0F1A 0F06: A6 C4 LDA ,U 0F08: 84 7F ANDA #$7F 0F0A: 0D C9 TST $C9 0F0C: 2B 07 BMI $0F15 0F0E: 91 BC CMPA $BC 0F10: 24 13 BCC $0F25 0F12: 4C INCA 0F13: 20 05 BRA $0F1A ------------------------------------------------ 0F15: 81 00 CMPA #$00 0F17: 23 0C BLS $0F25 0F19: 4A DECA 0F1A: 91 BC CMPA $BC 0F1C: 23 02 BLS $0F20 0F1E: 96 BC LDA $BC 0F20: C6 80 LDB #$80 0F22: BD 80 37 JSR $8037 0F25: 39 RTS --- via $807f ------------------------------------------------ 0F26: 26 03 BNE $0F2B 0F28: 44 LSRA 0F29: 20 19 BRA $0F44 ------------------------------------------------ 0F2B: A6 C4 LDA ,U 0F2D: 80 20 SUBA #$20 0F2F: 1A 01 ORCC #$01 ; set carry 0F31: BD BD 0D JSR $BD0D ; get entry from $17f5 table 0F34: 0D C9 TST $C9 0F36: 2B 07 BMI $0F3F 0F38: 81 3F CMPA #$3F 0F3A: 24 0F BCC $0F4B 0F3C: 4C INCA 0F3D: 20 05 BRA $0F44 ------------------------------------------------ 0F3F: 81 00 CMPA #$00 0F41: 23 08 BLS $0F4B 0F43: 4A DECA 0F44: 1C FE ANDCC #$FE ; clear carry 0F46: BD BD 0D JSR $BD0D ; get entry from $17b5 table 0F49: A7 C4 STA ,U 0F4B: 39 RTS --- via $8079 ------------------------------------------------ 0F4C: 26 0C BNE $0F5A 0F4E: 44 LSRA 0F4F: 44 LSRA 0F50: 44 LSRA 0F51: 44 LSRA 0F52: 81 07 CMPA #$07 0F54: 23 1B BLS $0F71 0F56: 86 07 LDA #$07 0F58: 20 17 BRA $0F71 ------------------------------------------------ 0F5A: A6 C4 LDA ,U 0F5C: 0D C9 TST $C9 0F5E: 2B 07 BMI $0F67 0F60: 81 07 CMPA #$07 0F62: 24 0C BCC $0F70 0F64: 4C INCA 0F65: 20 04 BRA $0F6B ------------------------------------------------ 0F67: 4D TSTA 0F68: 27 06 BEQ $0F70 0F6A: 4A DECA 0F6B: 8D 04 BSR $0F71 0F6D: 5D TSTB 0F6E: 26 EC BNE $0F5C 0F70: 39 RTS ------------------------------------------------ 0F71: 34 40 PSHS U 0F73: CE 7F 82 LDU #$7F82 ; table below 0F76: E6 C6 LDB A,U 0F78: BD DB 11 JSR $DB11 0F7B: 5D TSTB 0F7C: 26 02 BNE $0F80 0F7E: 97 E4 STA $E4 0F80: 35 C0 PULS PC,U ------------------------------------------------ 0F82: 18 10 0C 08 06 04 03 ....... --- via $807b ------------------------------------------------ 0F8A: 34 01 PSHS CC 0F8C: C6 07 LDB #$07 0F8E: 35 01 PULS CC 0F90: BD 7F A2 JSR $7FA2 0F93: A6 C4 LDA ,U 0F95: 84 7F ANDA #$7F 0F97: 34 40 PSHS U 0F99: CE 7F 82 LDU #$7F82 ; table above 0F9C: E6 C6 LDB A,U 0F9E: D7 FC STB $FC 0FA0: 35 C0 PULS PC,U ------------------------------------------------ 0FA2: 34 04 PSHS B 0FA4: 26 77 BNE $801D 0FA6: 20 69 BRA $8011 --- via $8053 ------------------------------------------------ 0FA8: 34 01 PSHS CC 0FAA: C6 7F LDB #$7F 0FAC: 35 01 PULS CC 0FAE: 34 04 PSHS B 0FB0: 26 6B BNE $801D 0FB2: 20 61 BRA $8015 --- via $808f ------------------------------------------------ 0FB4: 34 01 PSHS CC 0FB6: C6 5F LDB #$5F 0FB8: 35 01 PULS CC 0FBA: 34 04 PSHS B 0FBC: 26 5F BNE $801D 0FBE: 20 55 BRA $8015 --- via $808b ------------------------------------------------ 0FC0: 34 01 PSHS CC 0FC2: C6 4A LDB #$4A 0FC4: 35 01 PULS CC 0FC6: 34 04 PSHS B 0FC8: 26 53 BNE $801D 0FCA: 20 49 BRA $8015 --- via $8061 ------------------------------------------------ 0FCC: 34 01 PSHS CC 0FCE: D6 E2 LDB $E2 0FD0: C1 03 CMPB #$03 0FD2: 26 04 BNE $0FD8 0FD4: C6 08 LDB #$08 0FD6: 20 02 BRA $0FDA ------------------------------------------------ 0FD8: C6 0F LDB #$0F 0FDA: 35 01 PULS CC 0FDC: 34 04 PSHS B 0FDE: 26 3D BNE $801D 0FE0: 20 30 BRA $8012 --- via $8083 ------------------------------------------------ 0FE2: 34 01 PSHS CC 0FE4: C6 04 LDB #$04 0FE6: 35 01 PULS CC 0FE8: 34 04 PSHS B 0FEA: 26 31 BNE $801D 0FEC: 20 23 BRA $8011 --- via $8089 ------------------------------------------------ 0FEE: 34 01 PSHS CC 0FF0: C6 0F LDB #$0F 0FF2: 35 01 PULS CC 0FF4: 34 04 PSHS B 0FF6: 26 25 BNE $801D 0FF8: 20 18 BRA $8012 --- via $8075 ------------------------------------------------ 0FFA: 34 01 PSHS CC 0FFC: C6 03 LDB #$03 0FFE: 35 01 PULS CC ; continue at $8000 --- wave offsets: --- each line represents one wave (0-74) --- each entry covers 8 semitones --- (starting with semitone 0) ------------------------------------------------ 1000: 34 34 34 34 34 35 36 36 37 37 38 38 39 18 16 15 ; saw 1010: 09 09 09 09 09 09 09 09 0A 0B 0C 24 24 18 16 15 ; bell 1020: 15 15 15 15 15 15 15 15 15 15 15 15 15 15 15 15 ; sine 1030: 46 46 46 46 46 47 48 48 49 49 4A 4A 4B 19 15 15 ; square 1040: 02 02 02 02 02 02 02 03 04 05 06 07 08 1A 17 15 ; pulse 1050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ; noise1 1060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ; noise2 1070: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 ; noise3 1080: 27 27 27 27 27 27 27 27 28 29 29 2A 2A 18 16 15 ; bass 1090: 21 21 21 21 21 22 23 42 43 44 45 45 18 18 16 15 ; piano (multisample) 10A0: 3F 3F 3F 3F 3F 3F 3F 3F 3F 40 40 41 41 18 16 15 ; el pno 10B0: 25 25 25 25 25 3A 26 3B 3C 3D 3E 3E 17 17 17 15 ; voice1 10C0: 25 25 25 25 25 25 3A 26 3B 3C 3D 3E 17 17 17 15 ; voice2 10D0: 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F 1F ; kick 10E0: 1D 1D 1D 1D 1D 1D 1D 1E 4C 4D 4E 4F 50 51 17 15 ; reed 10F0: 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0E 0E 17 17 15 ; organ 1100: 0F 0F 0F 0F 0F 0F 0F 0F 0F 0F 10 11 11 17 17 15 ; synth1 1110: 12 12 12 12 12 12 12 12 12 12 13 14 14 15 15 15 ; synth2 1120: 1B 1B 1B 1B 1B 1B 1B 1B 1B 1B 1C 1C 1A 1A 17 15 ; synth3 1130: 2B 2B 2C 2D 2E 2F 30 31 32 33 33 33 33 18 16 15 ; formt1 1140: 2B 2B 2B 2C 2D 2E 2F 30 31 32 33 33 33 18 16 15 ; formt2 1150: 2B 2B 2B 2B 2C 2D 2E 2F 30 31 32 33 33 18 16 15 ; formt3 1160: 2B 2B 2B 2B 2B 2C 2D 2E 2F 30 31 32 33 18 16 15 ; formt4 1170: 2B 2B 2B 2B 2B 2B 2C 2D 2E 2F 30 31 32 18 16 15 ; formt5 1180: 07 07 07 07 07 07 07 07 07 07 07 07 08 1A 17 15 ; pulse2 1190: 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 4B 19 15 15 ; sqr 2 11A0: 0E 0E 0E 0E 0E 0E 0E 0E 0E 0E 0E 0E 0E 17 17 15 ; 4octs 11B0: 1C 1C 1C 1C 1C 1C 1C 1C 1C 1C 1C 1C 1A 1A 17 15 ; prime 11C0: 29 29 29 29 29 29 29 29 29 29 29 2A 2A 18 16 15 ; bass 2 11D0: 41 41 41 41 41 41 41 41 41 41 41 41 41 18 16 15 ; epno 2 11E0: 17 17 17 17 17 17 17 17 17 17 17 17 17 17 17 15 ; octave 11F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 17 15 ; oct+5 1200: 18 18 18 18 18 18 18 18 18 18 18 18 18 18 16 15 ; saw 2 1210: 19 19 19 19 19 19 19 19 19 19 19 19 19 19 15 15 ; triang 1220: 30 30 30 30 30 30 30 30 30 30 31 32 33 18 16 15 ; reed 2 1230: 8C 8C 8C 8C 8C 8C 8C 8C 8C 8C 8C 8C 08 1A 17 15 ; reed 3 1240: 6E 6E 6E 6E 6E 6F 70 71 72 73 74 1A 1A 1A 17 15 ; grit 1 1250: 6D 6D 6D 6D 6D 6E 6F 70 71 72 73 74 74 1A 17 15 ; grit 2 1260: 6D 6D 6D 6D 6D 6D 6E 6F 70 71 72 73 74 1A 17 15 ; grit 3 1270: 8D 8D 8D 8D 8D 8E 8F 90 91 92 93 94 95 96 15 15 ; glint1 1280: 8D 8D 8D 8D 8E 8F 90 91 92 93 94 95 96 15 15 15 ; glint2 1290: 8D 8D 8D 8E 8F 90 91 92 93 94 95 96 15 15 15 15 ; glint3 12A0: 89 89 89 89 89 89 89 8A 8B 8B 8C 8C 08 1A 17 15 ; clav 12B0: 76 76 76 76 76 76 76 76 7B 7B 7B 7C 7C 18 16 15 ; brass 12C0: 80 80 80 80 80 80 80 80 80 7D 7E 7F 7F 1A 17 15 ; string 12D0: 85 85 85 85 85 85 85 85 85 86 86 07 08 1A 17 15 ; digit1 12E0: 87 87 87 87 87 87 87 87 87 87 88 88 88 19 15 15 ; digit2 12F0: 78 78 78 78 78 78 78 78 78 78 77 77 77 15 15 15 ; bell 2 1300: 81 81 81 81 81 81 81 82 82 83 84 84 84 1A 17 15 ; alien 1310: 67 67 67 67 67 67 67 67 67 67 67 15 15 15 15 15 ; breath 1320: 65 65 65 65 65 65 65 65 65 66 66 17 17 17 17 15 ; voice3 1330: 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 64 ; steam 1340: 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 ; metal 1350: 68 68 68 68 68 68 68 68 68 69 69 69 69 69 69 69 ; chime 1360: 52 52 52 52 52 52 55 55 55 55 55 55 55 55 55 55 ; bowing 1370: 5B 5B 5B 5B 5B 5B 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C ; pick 1 1380: 56 56 56 56 56 56 56 58 58 58 58 58 58 58 58 58 ; pick 2 1390: 5E 5E 5E 5E 5E 5E 5E 5E 5E 5E 5E 5E 5E 5E 5E 5E ; mallet 13A0: 5D 5D 5D 5D 5D 5D 5D 5D 5D 5D 5D 5D 5D 5D 5D 5D ; slap 13B0: 57 57 57 57 57 57 57 57 57 57 57 57 57 57 57 57 ; plink 13C0: 54 54 54 54 54 54 54 54 54 54 54 54 54 54 54 54 ; plick 13D0: 53 53 53 53 53 53 53 53 53 53 53 53 53 53 53 53 ; plunk 13E0: 79 79 79 79 79 79 79 79 79 79 79 79 79 79 79 79 ; click 13F0: 5A 5A 5A 5A 5A 5A 5A 5A 59 59 59 59 59 59 59 59 ; chiff 1400: 7A 7A 7A 7A 7A 7A 7A 7A 7A 7A 7A 7A 7A 7A 7A 7A ; thump 1410: 6B 6B 6B 6B 6B 6B 6B 6B 6B 6B 6B 6B 6B 6B 6B 6B ; logdrm 1420: 6A 6A 6A 6A 6A 6A 6A 6A 6A 6A 6A 6A 6A 6A 6A 6A ; kick 2 1430: 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 ; snare 1440: 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F ; tomtom 1450: 75 75 75 75 75 75 75 75 75 75 75 75 75 75 75 75 ; hi hat 1460: 6A 6A 6A 6A 6A 75 61 6C 60 60 60 60 60 60 60 60 ; drums1 1470: 6A 6A 6A 6A 6A 75 61 60 60 60 60 60 60 60 60 60 ; drums2 1480: 6A 6A 6A 6A 6A 75 61 6C 6C 6C 6C 6C 6C 6C 6C 6C ; drums3 1490: 6A 6A 6A 6A 6A 75 60 60 60 60 60 60 60 60 60 60 ; drums4 14A0: 6A 6A 6A 6A 6A 75 62 62 62 62 62 62 62 62 62 62 ; drums5 ------------------------------------------------ --- raw wave parameters ------------------------ --- 1: pointer to waverom page --- --- 2: value for wavetable size register (?) --- --- 3: semitone shift --- --- 4: fine tune --- ------------------------------------------------ 14B0: 00 24 00 00 ; noise1 00 14B4: 00 19 00 00 ; noise3 14B8: 10 19 00 00 ; pulse.1 14BC: 18 19 00 00 ; pulse.2 14C0: 20 19 00 00 ; pulse.3 14C4: 28 11 00 00 ; pulse.4 14C8: 2C 11 00 00 ; pulse.5 14CC: 30 11 00 00 ; pulse.6 14D0: 34 11 00 00 ; pulse.7 14D4: 38 11 00 00 ; bell.1 14D8: 3C 11 00 00 ; bell.2 14DC: 40 11 00 00 ; bell.3 14E0: 44 11 00 00 ; bell.4 14E4: 48 11 00 00 ; organ.1 14E8: 4C 11 00 00 ; organ.2 14EC: 50 11 00 00 ; synth1.1 14F0: 54 11 00 00 ; synth1.2 10 14F4: 58 11 00 00 ; synth1.3 14F8: 5C 11 00 00 ; synth2.1 14FC: 60 11 00 00 ; synth2.2 1500: 64 11 00 00 ; synth2.3 1504: 68 11 00 00 ; sine 1508: 6C 11 00 00 ; more aggressive sine 150C: 70 11 00 00 ; octave 1510: 74 11 00 00 ; saw2 1514: 78 11 00 00 ; triang 1518: 7C 11 00 00 ; oct+5 151C: 80 11 00 00 ; synth3.1 1520: 84 11 00 00 ; prime, synth3.2 1524: 88 11 00 00 ; reed.1 1528: 8C 11 00 00 ; reed.2 152C: 90 11 00 00 ; kick 1530: 94 11 00 00 ; noise2 20 1534: 98 13 00 00 ; piano.1.low 1538: 9C 13 00 00 ; piano.2.low 153C: A0 13 00 00 ; piano.3.low 1540: A4 09 00 00 ; bell.3 1544: A6 09 00 00 ; voice.1 1548: A8 09 00 00 ; voice.3 154C: AA 09 00 00 ; bass.1 1550: AC 09 00 00 ; bass.2 1554: AE 09 00 00 ; bass.3 1558: B0 09 00 00 ; bass.4 155C: B2 09 00 00 ; formt.1 1560: B4 09 00 00 ; formt.2 1564: B6 09 00 00 ; formt.3 1568: B8 09 00 00 ; formt.4 156C: BA 09 00 00 ; formt.5 1570: BC 09 00 00 ; formt.6 30 1574: BE 09 00 00 ; formt.7 1578: C0 09 00 00 ; formt.8 157C: C2 09 00 00 ; formt.9 1580: C4 09 00 00 ; saw.1 1584: C6 09 00 00 ; saw.2 1588: C8 09 00 00 ; saw.3 158C: CA 09 00 00 ; saw.4 1590: CC 09 00 00 ; saw.5 1594: CE 09 00 00 ; saw.6 1598: D0 09 00 00 ; voice.2 159C: D2 09 00 00 ; voice.4 15A0: D4 09 00 00 ; voice.5 15A4: D6 09 00 00 ; voice.6 15A8: D8 09 00 00 ; voice.7 15AC: DA 09 00 00 ; el pno.1 15B0: DC 09 00 00 ; el pno.2 40 15B4: DE 09 00 00 ; el pno.3 15B8: E0 09 00 00 ; piano.1.high 15BC: E2 09 00 00 ; piano.2.high 15C0: E4 09 00 00 ; piano.3.high 50 15C4: E6 09 00 00 ; piano.4.high 15C8: E8 09 00 00 ; square.1 15CC: EA 09 00 00 ; square.2 15D0: EC 09 00 00 ; square.3 15D4: EE 09 00 00 ; square.4 15D8: F0 09 00 00 ; square.5 15DC: F2 09 00 00 ; square.6 15E0: F4 09 00 00 ; reed.3 15E4: F6 09 00 00 ; reed.4 15E8: F8 09 00 00 ; reed.5 15EC: FA 09 00 00 ; reed.6 15F0: FC 09 00 00 ; reed.7 15F4: FE 09 00 00 ; reed.8 15F8: 00 74 DC 00 ; bowing.1 15FC: 28 5B E0 BC ; plunk 1600: 30 64 CD FC ; plick 60 1604: 40 74 DC 00 ; bowing.2 1608: 80 74 E3 30 ; pick2.1 160C: B0 64 E0 A8 ; plink 1610: C0 74 DC 30 ; pick2.2 1614: F0 64 E8 00 ; chiff.2 1618: 00 AC EE 30 ; chiff.1 161C: 20 A4 F9 1C ; pick1.1 1620: 30 A4 F4 00 ; pick1.2 1624: 40 AC F4 00 ; slap 1628: 60 AC E8 00 ; mallet 162C: 80 AC C9 3C ; tomtom 1630: 80 AC BD 3C ; tomtom.ds 1634: A0 AC DD 00 ; snare 1638: A0 AC D5 00 ; snare.ds 163C: C0 AC E4 4C ; metal 1640: E0 AC D8 00 ; steam 70 1644: 00 EC DC 00 ; voice3.1 1648: 20 EC DC 00 ; voice3.2 164C: 40 EC E8 00 ; breath 1650: 60 E4 09 96 ; chime.1 1654: 70 E4 09 96 ; chime.2 1658: 80 E4 F9 00 ; kick2 165C: 90 E4 00 00 ; logdrm 1660: 90 E4 E8 00 ; logdrm.ds 1664: A0 D1 00 00 ; grit.1 1668: A4 D1 00 00 ; grit.2 166C: A8 D1 00 00 ; grit.3 1670: AC D1 00 00 ; grit.4 1674: B0 D1 00 00 ; grit.5 1678: B4 D1 00 00 ; grit.6 167C: B8 D1 00 00 ; grit.7 1680: BC D1 00 00 ; grit.8 80 1684: C0 E4 F7 00 ; hi hat 1688: CC C9 00 00 ; brass.1 168C: CE C9 00 00 ; bell2.2 1690: D0 D1 00 00 ; bell2.1 1694: D4 D2 E8 00 ; click 1698: D8 DB E8 00 ; thump 169C: E0 C1 00 00 ; brass.2 16A0: E1 C1 00 00 ; brass.3 16A4: E2 C9 00 00 ; string.2 16A8: E4 C9 00 00 ; string.3 16AC: E6 C9 00 00 ; string.4 16B0: E8 C1 00 00 ; string.1 16B4: E9 C1 00 00 ; alien.1 16B8: EA C9 00 00 ; alien.2 16BC: EC C9 00 00 ; alien.3 16C0: EE C9 00 00 ; alien.4 90 16C4: F0 C9 00 00 ; digit1.1 16C8: F2 C9 00 00 ; digit1.2 16CC: F4 C9 00 00 ; digit2.1 16D0: F6 C9 00 00 ; digit2.2 16D4: F8 C9 00 00 ; clav.1 16D8: FA C9 00 00 ; clav.2 16DC: FC C9 00 00 ; clav.3 16E0: FE C9 00 00 ; clav.4 16E4: 68 11 54 00 ; glint.1 16E8: 68 11 48 00 ; glint.2 16EC: 68 11 43 00 ; glint.3 16F0: 68 11 3C 00 ; glint.4 16F4: 68 11 30 00 ; glint.5 16F8: 68 11 2B 00 ; glint.6 16FC: 68 11 24 00 ; glint.7 1700: 68 11 18 00 ; glint.8 a0 1704: 68 11 13 00 ; glint.9 1708: 68 11 0C 00 ; glint.10 --- accessed by $b7dc (byte values) 170C: CC CD CE D3 D4 CF D0 D1 D2 D5 D6 D7 D8 DD DE D9 ................ 171C: DA DB DC DF E0 E1 E2 E7 E8 E3 E4 E5 E6 E9 EA EB ................ 172C: EC F1 F2 ED EE EF F0 F3 F4 F7 F7 F4 F5 F7 F6 F5 ................ 173C: F8 FB FB F8 F9 FB FA F9 FC FF FF FC FD FF FE FD ................ 174C: 00 00 01 05 02 03 02 04 0A 0A 0B 0F 0C 0D 0C 0E ................ 175C: 14 14 15 19 16 17 16 18 06 06 07 08 07 09 10 10 ................ 176C: 11 12 11 13 1A 1A 1B 1C 1B 1D 1E 2A 2A 2B 1F 20 ...........**+. 177C: 24 21 22 21 23 1E 25 23 1F 22 24 25 2B 29 29 27 $!"!#.%#."$%+))' 178C: 27 28 28 26 00 02 03 04 05 06 07 08 09 0A 0B 0C '((&............ 179C: 0D 0E 0F 10 00 00 00 00 00 01 01 01 02 02 02 03 ................ 17AC: 03 03 04 05 06 07 08 09 0A ......... ------------------------------------------------ --- printable charset --- --- ! to ] represent 0. to 9. --- ------------------------------------------------ 17B5: 20 22 27 2A 2F 2B 2D 3D 3C 3E 5E 5F 2C 2E 3F 40 "'*/+-=<>^_,.?@ 17C5: 24 26 21 23 25 28 29 3A 3B 5B 5C 5D 30 31 32 33 $&!#%():;[\]0123 17D5: 34 35 36 37 38 39 41 42 43 44 45 46 47 48 49 4A 456789ABCDEFGHIJ 17E5: 4B 4C 4D 4E 4F 50 51 52 53 54 55 56 57 58 59 5A KLMNOPQRSTUVWXYZ --- accessed by $bd0d (byte values) 17F5: 00 12 01 13 10 14 11 02 15 16 03 05 0C 06 0D 04 ................ 1805: 1C 1D 1E 1F 20 21 22 23 24 25 17 18 08 07 09 0E .... !"#$%...... 1815: 0F 26 27 28 29 2A 2B 2C 2D 2E 2F 30 31 32 33 34 .&'()*+,-./01234 1825: 35 36 37 38 39 3A 3B 3C 3D 3E 3F 19 1A 1B 0A 0B 56789:;<=>?..... ------------------------------------------------ --- MIDI message vectors ----------------------- ------------------------------------------------ 1835: 72 23 FDB $7223 ; TARGET SYSTEM NOT RESPONDING 1837: 72 06 FDB $7206 ; MIDI PROCEDURE COMPLETE 1839: 73 D2 FDB $73D2 ; FATAL ERROR: SEQ. MEM CLEARED 183A: 72 45 FDB $7245 ; ERROR: ONLY SEQ. DATA ALLOWED 183C: 72 79 FDB $7279 ; NOT ENOUGH MEMORY TO LOAD SEQ. 183F: 72 A0 FDB $72A0 ; NO SEQUENCE LOCATIONS AVAILABLE 1841: 72 C5 FDB $72C5 ; DATA TX'ed - CHECK RECEIVER ------------------------------------------------ --- TAPE message vectors ----------------------- ------------------------------------------------ 1843: 73 23 FDB $7323 ; TAPE PROCEDURE COMPLETE 1845: 73 40 FDB $7340 ; ERROR: TAPE NOT STARTED ON L. TONE 1847: 73 73 FDB $7373 ; WARNING: DATA ERROR WAS FIXED 1849: 73 A1 FDB $73A1 ; WARNING: VERIFY FAILED 184A: 72 79 FDB $7279 ; NOT ENOUGH MEMORY TO LOAD SEQ. 184C: 72 A0 FDB $72A0 ; NO SEQUENCE LOCATIONS AVAILABLE 184F: 73 D2 FDB $73D2 ; FATAL ERROR: SEQ. MEM CLEARED 1851: 73 A1 FDB $73A1 ; WARNING: VERIFY FAILED 1853: 74 0B FDB $740B ; ERROR: INCORRECT TYPE OF DATA 1855: 74 3D FDB $743D ; FATAL ERROR: INTL. PROGRAMS RESET 1857: 74 76 FDB $7476 ; ERROR: SEQ. LOAD FAILED, TAPE ERROR ------------------------------------------------ --- initialization of all voices --------------- ------------------------------------------------ 1859: 8E 40 00 LDX #$4000 ; clear DOSRAM between 185C: 6F 80 CLR ,X+ ; $4000 and $4738 185E: 8C 47 38 CMPX #$4738 1861: 25 F9 BCS $185C 1863: 8E 0D BF LDX #$0DBF ; Q correction table 1866: 10 8E 40 70 LDY #$4070 ; set filter resonance 186A: A6 80 LDA ,X+ ; correction values for 186C: A7 A8 5D STA +$5D,Y ; all voices in VDB area 186F: 31 A9 00 E7 LEAY +$00E7,Y ; 1873: 10 8C 47 A8 CMPY #$47A8 ; 1877: 25 F1 BCS $186A ; 1879: 10 8E 40 70 LDY #$4070 ; base of VDB table 187D: CE 60 7F LDU #$607F ; DOC address 1880: 0F 8C CLR $8C ; zero channel address 1882: BD EE C8 JSR $EEC8 ; init envelopes 1885: BD F2 4C JSR $F24C ; init LFOs 1888: 8E F4 79 LDX #$F479 ; jump vector to $f479 188B: AF A8 6B STX +$6B,Y 188E: 1F 30 TFR U,D ; A/B = $607f 1890: E7 A8 6D STB +$6D,Y ; DOC segment = $7f 1893: 96 8C LDA $8C ; (voice-1) * 16 1895: A7 A8 6E STA +$6E,Y 1898: 4C INCA ; voice * 16 1899: EF A8 C7 STU -$39,Y ; $607f + 3*voice number 189C: A7 C8 21 STA +$21,U ; set channel address osc #1 189F: 33 41 LEAU +$01,U ; U=U+1 18A1: EF A8 D9 STU -$27,Y ; $6080 + 3*voice number 18A4: A7 C8 21 STA +$21,U ; set channel address osc #2 18A7: 33 41 LEAU +$01,U ; U=U+1 18A9: EF A8 EB STU -$15,Y ; $6081 + 3*voice number 18AC: A7 C8 21 STA +$21,U ; set channel address osc #3 18AF: 33 41 LEAU +$01,U ; U=U+1 18B1: 8B 0F ADDA #$0F ; increment channel address 18B3: 97 8C STA $8C ; 18B5: 31 A9 00 E7 LEAY +$00E7,Y ; select next voice block 18B9: 10 8C 47 A8 CMPY #$47A8 ; end of VDB area 18BD: 25 C3 BCS $1882 18BF: 10 8E 40 70 LDY #$4070 ; start of VDB area 18C3: CE 68 F8 LDU #$68F8 ; DAC base 18C6: 5F CLRB 18C7: EF A8 6F STU +$6F,Y ; DAC base to voice table 18CA: EF A8 71 STU +$71,Y 18CD: E7 C4 STB ,U ; zero DAC output 18CF: E7 58 STB -$08,U ; zero filter frequency 18D1: E7 50 STB -$10,U ; zero resonance 18D3: E7 C8 C0 STB -$40,U ; center panning 18D6: 33 41 LEAU +$01,U ; increment DAC base ptr. 18D8: 31 A9 00 E7 LEAY +$00E7,Y ; select next VDB 18DC: 10 8C 47 A8 CMPY #$47A8 ; end of VDB area 18E0: 25 E5 BCS $18C7 18E2: BD F4 A5 JSR $F4A5 ; A/D conversion 18E5: 8E F4 D0 LDX #$F4D0 ; A/D interpolation 18E8: BF 0D AC STX $0DAC ; to indirect jump vector 18EB: 39 RTS ------------------------------------------------ --- STORAGE/MIDI: SEND ------------------------- ------------------------------------------------ 18EC: C1 08 CMPB #$08 ; SEND button 18EE: 26 07 BNE $18F7 18F0: 0F 0D CLR $0D 18F2: CE 71 20 LDU #$7120 ; MIDI CURRENT PROG ($5120) 18F5: 20 0B BRA $1902 ------------------------------------------------ --- STORAGE/MIDI LOAD -------------------------- ------------------------------------------------ 18F7: C1 06 CMPB #$06 ; LOAD button 18F9: 26 0C BNE $1907 18FB: 86 01 LDA #$01 18FD: 97 0D STA $0D 18FF: CE 70 DA LDU #$70DA ; MIDI LOAD 1902: 8E A6 BB LDX #$A6BB 1905: 20 30 BRA $1937 ------------------------------------------------ 1907: 39 RTS ------------------------------------------------ --- STORAGE/TAPE SAVE -------------------------- ------------------------------------------------ 1908: C1 07 CMPB #$07 ; SAVE button 190A: 26 07 BNE $1913 190C: 0F 0D CLR $0D 190E: CE 71 9A LDU #$719A ; TAPE SAVE ($519a) 1911: 20 18 BRA $192B ------------------------------------------------ --- STORAGE/TAPE LOAD -------------------------- ------------------------------------------------ 1913: C1 06 CMPB #$06 ; LOAD button 1915: 26 09 BNE $1920 1917: 86 01 LDA #$01 1919: 97 0D STA $0D ; TAPE LOAD ($518f) 191B: CE 71 8F LDU #$718F 191E: 20 0B BRA $192B ------------------------------------------------ --- STORAGE/TAPE VERIFY ------------------------ ------------------------------------------------ 1920: C1 08 CMPB #$08 ; VERIFY button 1922: 26 19 BNE $193D 1924: 86 80 LDA #$80 1926: 97 0D STA $0D 1928: CE 71 A5 LDU #$71A5 ; TAPE VERIFY ($51a5) 192B: BD 99 56 JSR $9956 192E: CE 71 B2 LDU #$71B2 ; SEQ. ONE/ALL... ($51b2) 1931: BD 99 56 JSR $9956 1934: 8E A6 E5 LDX #$A6E5 ; softbutton handler to 1937: BF 0D 11 STX $0D11 ; $a6e5 193A: 7E 99 56 JMP $9956 ------------------------------------------------ 193D: 39 RTS ------------------------------------------------ --- MIDI/SEND menu: button 0-2 (current prog.) - ------------------------------------------------ 193E: C1 00 CMPB #$00 1940: 25 0F BCS $1951 1942: C1 02 CMPB #$02 1944: 22 0B BHI $1951 1946: 5F CLRB 1947: 0D 0D TST $0D 1949: 27 01 BEQ $194C 194B: 39 RTS ------------------------------------------------ 194C: 8E 91 23 LDX #$9123 194F: 20 43 BRA $1994 ------------------------------------------------ --- MIDI/SEND: int. prog. banks ---------------- ------------------------------------------------ 1951: C1 05 CMPB #$05 1953: 25 0F BCS $1964 1955: C1 07 CMPB #$07 1957: 22 0B BHI $1964 1959: 5F CLRB 195A: 0D 0D TST $0D 195C: 27 01 BEQ $195F 195E: 39 RTS ------------------------------------------------ 195F: 8E 91 47 LDX #$9147 ; prepare jump to $9147 1962: 20 30 BRA $1994 ------------------------------------------------ --- MIDI SEND TO SQ-80 menu: CURRENT SEQUENCE -- ------------------------------------------------ 1964: C1 03 CMPB #$03 1966: 27 04 BEQ $196C 1968: C1 04 CMPB #$04 196A: 26 09 BNE $1975 196C: 5F CLRB 196D: 0D 0D TST $0D 196F: 26 01 BNE $1972 1971: 39 RTS ------------------------------------------------ 1972: 4F CLRA 1973: 20 1B BRA $1990 ------------------------------------------------ --- MIDI SEND TO SQ-80 menu: ALL SEQ. DATA ----- ------------------------------------------------ 1975: C1 08 CMPB #$08 1977: 27 04 BEQ $197D 1979: C1 09 CMPB #$09 197B: 26 32 BNE $19AF 197D: 5F CLRB 197E: 0D 0D TST $0D 1980: 26 0C BNE $198E ------------------------------------------------; target system not responding 1982: 8E A6 C9 LDX #$A6C9 ; softbutton handler to 1985: BF 0D 11 STX $0D11 ; $a6c9 / ROMLOW $19b0 1988: CE 71 57 LDU #$7157 ; MIDI SEND TO SQ80 ($5157) 198B: 7E 99 56 JMP $9956 ------------------------------------------------; target system did respond 198E: 86 01 LDA #$01 1990: 8E 93 90 LDX #$9390 ; prepare jump to $9390 1993: 5A DECB 1994: 34 06 PSHS B,A ; ff01 1996: CE 71 E4 LDU #$71E4 ; MIDI DATA TRANSFER ($51e4) 1999: BD A7 1E JSR $A71E ; handler 199C: AD 84 JSR ,X 199E: 35 06 PULS B,A 19A0: 96 0D LDA $0D ; get storage status 19A2: 81 06 CMPA #$06 19A4: 23 02 BLS $19A8 19A6: 86 01 LDA #$01 ; 01: MIDI procedure complete 19A8: C6 01 LDB #$01 19AA: 8E 78 35 LDX #$7835 ; error message vector base 19AD: 20 1D BRA $19CC ------------------------------------------------ 19AF: 39 RTS --- ------------------------------------------------ 19B0: 5F CLRB 19B1: 81 03 CMPA #$03 19B3: 27 04 BEQ $19B9 19B5: 81 04 CMPA #$04 19B7: 26 05 BNE $19BE 19B9: 8E 92 7D LDX #$927D ; prepare jump to $927d 19BC: 20 D6 BRA $1994 --- button 7-9 ------------------------------------------------ 19BE: 81 07 CMPA #$07 19C0: 24 04 BCC $19C6 19C2: 81 09 CMPA #$09 19C4: 22 05 BHI $19CB 19C6: 8E 92 38 LDX #$9238 ; prepare jump to $9238 19C9: 20 C9 BRA $1994 ------------------------------------------------ 19CB: 39 RTS ------------------------------------------------ 19CC: 34 06 PSHS B,A 19CE: 48 LSLA 19CF: EE 86 LDU A,X ; print dispplay buffer 19D1: BD 99 54 JSR $9954 19D4: 86 10 LDA #$10 ; keycode = 10 19D6: 97 A8 STA $A8 19D8: 8E 71 39 LDX #$7139 ; softbutton handler to 19DB: BF 0D 11 STX $0D11 ; ROMLOW $1139 19DE: A6 E0 LDA ,S+ 19E0: A1 E0 CMPA ,S+ 19E2: 26 12 BNE $19F6 19E4: C6 08 LDB #$08 19E6: BD BC 05 JSR $BC05 19E9: 34 06 PSHS B,A 19EB: CC 7A 35 LDD #$7A35 ; jump to ROMLOW $0a35 19EE: 34 06 PSHS B,A ; 19F0: CC 0E 00 LDD #$0E00 ; 19F3: BD 85 B4 JSR $85B4 ; 19F6: 39 RTS ------------------------------------------------ --- STORAGE/TAPE VERIFY menu: INT BANKS -------- ------------------------------------------------ 19F7: C1 07 CMPB #$07 ; softbutton 7: INT BANKS 19F9: 26 15 BNE $1A10 19FB: 0D 0D TST $0D 19FD: 2B 0C BMI $1A0B 19FF: 26 05 BNE $1A06 1A01: 8E 7A 75 LDX #$7A75 ; prepare jump to ROMLOW $1a75 1A04: 20 4C BRA $1A52 ------------------------------------------------ 1A06: 8E 7A 8F LDX #$7A8F ; prepare jump to ROMLOW $1a8f 1A09: 20 42 BRA $1A4D ------------------------------------------------ 1A0B: 8E 7A 92 LDX #$7A92 ; prepare jump to ROMLOW $1a92 1A0E: 20 3D BRA $1A4D ------------------------------------------------ --- STORAGE/TAPE VERIFY menu: ONE SEQ ---------- ------------------------------------------------ 1A10: C1 02 CMPB #$02 ; softbutton 2: ONE SEQ 1A12: 26 20 BNE $1A34 1A14: 0D 0D TST $0D 1A16: 2B 17 BMI $1A2F 1A18: 26 05 BNE $1A1F 1A1A: 8E 7B 56 LDX #$7B56 ; prepare jump to ROMLOW $1b56 1A1D: 20 33 BRA $1A52 ------------------------------------------------ 1A1F: BD A7 0A JSR $A70A 1A22: 24 04 BCC $1A28 1A24: 86 05 LDA #$05 1A26: 20 40 BRA $1A68 ------------------------------------------------ 1A28: 8E 7B 7E LDX #$7B7E ; prepare jump to ROMLOW $1b7e 1A2B: 0F CD CLR $CD 1A2D: 20 1E BRA $1A4D ------------------------------------------------ 1A2F: 8E 7B 94 LDX #$7B94 ; prepare jump to ROMLOW $1b94 1A32: 20 19 BRA $1A4D ------------------------------------------------ --- STORAGE/TAPE VERIFY menu: ALL SEQ ---------- ------------------------------------------------ 1A34: C1 04 CMPB #$04 1A36: 26 3C BNE $1A74 1A38: 0D 0D TST $0D 1A3A: 2B 0E BMI $1A4A 1A3C: 26 05 BNE $1A43 1A3E: 8E 7A EB LDX #$7AEB ; prepare jump to ROMLOW $1aeb 1A41: 20 0F BRA $1A52 ------------------------------------------------ 1A43: 8E 7B 17 LDX #$7B17 ; prepare jump to ROMLOW $1b17 1A46: 0F CD CLR $CD 1A48: 20 03 BRA $1A4D ------------------------------------------------ 1A4A: 8E 7B 2B LDX #$7B2B ; prepare jump to ROMLOW $1b2b 1A4D: CE 73 06 LDU #$7306 ; READING DATA FROM TAPE 1A50: 20 03 BRA $1A55 ------------------------------------------------ 1A52: CE 72 EC LDU #$72EC ; SAVING DATA TO TAPE 1A55: BD A7 1E JSR $A71E 1A58: 34 10 PSHS X 1A5A: BD 86 02 JSR $8602 1A5D: AE E4 LDX ,S 1A5F: AD 84 JSR ,X 1A61: BD 86 93 JSR $8693 1A64: 35 10 PULS X 1A66: 96 0D LDA $0D 1A68: 81 0A CMPA #$0A 1A6A: 23 01 BLS $1A6D 1A6C: 4F CLRA 1A6D: 5F CLRB 1A6E: 8E 78 43 LDX #$7843 1A71: 7E 79 CC JMP $79CC ------------------------------------------------ 1A74: 39 RTS ------------------------------------------------ 1A75: BD 7C D5 JSR $7CD5 1A78: 7F 0F FF CLR $0FFF 1A7B: 8E 12 34 LDX #$1234 1A7E: 86 01 LDA #$01 1A80: B7 10 00 STA $1000 1A83: BD 7C 8D JSR $7C8D 1A86: BD 7C 4E JSR $7C4E 1A89: BD 7C B9 JSR $7CB9 1A8C: 7E 7C DE JMP $7CDE ------------------------------------------------ 1A8F: 4F CLRA 1A90: 20 02 BRA $1A94 ------------------------------------------------ 1A92: 86 FF LDA #$FF 1A94: B7 0F FF STA $0FFF 1A97: 86 01 LDA #$01 1A99: B7 10 00 STA $1000 1A9C: BD 7C D5 JSR $7CD5 1A9F: CC 7D 3A LDD #$7D3A ; vector to $1d3a 1AA2: FD 0F F8 STD $0FF8 1AA5: CC 7D 1F LDD #$7D1F ; vector to $1d1f 1AA8: FD 0F F6 STD $0FF6 1AAB: BD 7C 81 JSR $7C81 1AAE: BD 7C 6F JSR $7C6F 1AB1: BD 7C B4 JSR $7CB4 1AB4: 8E 0F F3 LDX #$0FF3 1AB7: 10 8E 7A E8 LDY #$7AE8 1ABB: A6 84 LDA ,X 1ABD: A1 A4 CMPA ,Y 1ABF: 27 05 BEQ $1AC6 1AC1: 86 08 LDA #$08 1AC3: 7E 7C DF JMP $7CDF ------------------------------------------------ 1AC6: 30 01 LEAX +$01,X 1AC8: 31 21 LEAY +$01,Y 1ACA: 8C 0F F6 CMPX #$0FF6 1ACD: 26 EC BNE $1ABB 1ACF: B6 0F FF LDA $0FFF 1AD2: 27 05 BEQ $1AD9 1AD4: CC 7D 41 LDD #$7D41 ; vector to ROMLOW $1d41 1AD7: 20 03 BRA $1ADC ------------------------------------------------ 1AD9: CC 7D 3A LDD #$7D3A ; vector to ROMLOW $1d3a 1ADC: FD 0F F8 STD $0FF8 1ADF: BD 7C 4E JSR $7C4E 1AE2: BD 7C B4 JSR $7CB4 1AE5: 7E 7C DE JMP $7CDE ------------------------------------------------ 1AE8: 12 NOP 1AE9: 34 01 PSHS CC 1AEB: BD 7C D5 JSR $7CD5 1AEE: BE 01 21 LDX $0121 1AF1: 86 04 LDA #$04 1AF3: B7 10 00 STA $1000 1AF6: BD 7C 8D JSR $7C8D 1AF9: BD 7C 56 JSR $7C56 1AFC: BD 7C B9 JSR $7CB9 1AFF: BD 7C 5E JSR $7C5E 1B02: BD 7C B9 JSR $7CB9 1B05: CC 7D 0D LDD #$7D0D ; vector to ROMLOW $1d0d 1B08: FD 0F F6 STD $0FF6 1B0B: BE 01 21 LDX $0121 1B0E: BD 7C 77 JSR $7C77 1B11: BD 7C B9 JSR $7CB9 1B14: 7E 7C DE JMP $7CDE ------------------------------------------------ 1B17: BD 7C D5 JSR $7CD5 1B1A: 7F 0F FF CLR $0FFF 1B1D: BD 7B 4B JSR $7B4B 1B20: CC 7D 3A LDD #$7D3A ; vector to ROMLOW $1d3a 1B23: BD 7B CF JSR $7BCF 1B26: CC 7D 2A LDD #$7D2A ; vector to ROMLOW $1d2a 1B29: 20 14 BRA $1B3F ------------------------------------------------ 1B2B: BD 7C D5 JSR $7CD5 1B2E: 86 FF LDA #$FF 1B30: B7 0F FF STA $0FFF 1B33: BD 7B 4B JSR $7B4B 1B36: CC 7D 41 LDD #$7D41 ; vector to ROMLOW $1d41 1B39: BD 7B CF JSR $7BCF 1B3C: CC 7D 41 LDD #$7D41 ; vector to ROMLOW $1d41 1B3F: BE 0F F3 LDX $0FF3 1B42: BD 7B DE JSR $7BDE 1B45: BD 91 71 JSR $9171 1B48: 7E 7C DE JMP $7CDE ------------------------------------------------ 1B4B: 86 04 LDA #$04 1B4D: B7 10 00 STA $1000 1B50: BD 7C 81 JSR $7C81 1B53: 7E 7B ED JMP $7BED ------------------------------------------------ 1B56: BD 7C D5 JSR $7CD5 1B59: BD E9 5F JSR $E95F 1B5C: 1F 01 TFR D,X 1B5E: 86 03 LDA #$03 1B60: B7 10 00 STA $1000 1B63: BD 7C 8D JSR $7C8D 1B66: CC 7D 0D LDD #$7D0D ; vector to $1d0d 1B69: FD 0F F6 STD $0FF6 1B6C: DC F0 LDD $F0 1B6E: F3 0F F3 ADDD $0FF3 1B71: 1F 01 TFR D,X 1B73: DC F0 LDD $F0 1B75: BD 7C 7A JSR $7C7A 1B78: BD 7C B9 JSR $7CB9 1B7B: 7E 7C DE JMP $7CDE ------------------------------------------------ 1B7E: BD 7C D5 JSR $7CD5 1B81: 7F 0F FF CLR $0FFF 1B84: 86 03 LDA #$03 1B86: B7 10 00 STA $1000 1B89: BD 7C 81 JSR $7C81 1B8C: BD 7C 25 JSR $7C25 1B8F: CC 7D 2A LDD #$7D2A ; vector to $1d2a 1B92: 20 16 BRA $1BAA ------------------------------------------------ 1B94: BD 7C D5 JSR $7CD5 1B97: 86 FF LDA #$FF 1B99: B7 0F FF STA $0FFF 1B9C: 86 03 LDA #$03 1B9E: B7 10 00 STA $1000 1BA1: BD 7C 81 JSR $7C81 1BA4: BD 7C 25 JSR $7C25 1BA7: CC 7D 41 LDD #$7D41 ; vector to $1d41 1BAA: FD 0F F8 STD $0FF8 1BAD: CC 7D 0D LDD #$7D0D ; vector to $1d0d 1BB0: FD 0F F6 STD $0FF6 1BB3: FC 01 21 LDD $0121 1BB6: F3 0F F3 ADDD $0FF3 1BB9: 1F 01 TFR D,X 1BBB: FC 01 21 LDD $0121 1BBE: BD 7C 7A JSR $7C7A 1BC1: BD 7C B4 JSR $7CB4 1BC4: B6 0F FF LDA $0FFF 1BC7: 26 03 BNE $1BCC 1BC9: BD E6 C9 JSR $E6C9 1BCC: 7E 7B 45 JMP $7B45 ------------------------------------------------ 1BCF: FD 0F F8 STD $0FF8 1BD2: BD 7C 56 JSR $7C56 1BD5: BD 7C B4 JSR $7CB4 1BD8: BD 7C 5E JSR $7C5E 1BDB: 7E 7C B4 JMP $7CB4 ------------------------------------------------ 1BDE: FD 0F F8 STD $0FF8 1BE1: CC 7D 0D LDD #$7D0D ; vector to $1d0d 1BE4: FD 0F F6 STD $0FF6 1BE7: BD 7C 77 JSR $7C77 1BEA: 7E 7C B4 JMP $7CB4 ------------------------------------------------ 1BED: BD 7C A5 JSR $7CA5 1BF0: B6 0F F5 LDA $0FF5 1BF3: 81 02 CMPA #$02 1BF5: 26 07 BNE $1BFE 1BF7: 86 01 LDA #$01 1BF9: B7 0B E6 STA $0BE6 1BFC: 20 09 BRA $1C07 ------------------------------------------------ 1BFE: 81 04 CMPA #$04 1C00: 27 05 BEQ $1C07 1C02: 86 08 LDA #$08 1C04: 7E 7C DF JMP $7CDF ------------------------------------------------ 1C07: DC D3 LDD $D3 1C09: 83 00 01 SUBD #$0001 1C0C: 34 06 PSHS B,A 1C0E: B6 0F FF LDA $0FFF 1C11: 26 0F BNE $1C22 1C13: FC 0F F3 LDD $0FF3 1C16: 10 A3 E1 CMPD ,S++ 1C19: 23 05 BLS $1C20 1C1B: 86 04 LDA #$04 1C1D: 7E 7C DF JMP $7CDF ------------------------------------------------ 1C20: 20 02 BRA $1C24 ------------------------------------------------ 1C22: 32 62 LEAS +$02,S 1C24: 39 RTS ------------------------------------------------ 1C25: BD 7C A5 JSR $7CA5 1C28: B6 0F F5 LDA $0FF5 1C2B: 81 03 CMPA #$03 1C2D: 27 05 BEQ $1C34 1C2F: 86 08 LDA #$08 1C31: 7E 7C DF JMP $7CDF ------------------------------------------------ 1C34: B6 0F FF LDA $0FFF 1C37: 26 14 BNE $1C4D 1C39: FC 01 21 LDD $0121 1C3C: F3 0F F3 ADDD $0FF3 1C3F: 25 DA BCS $1C1B 1C41: 34 06 PSHS B,A 1C43: FC 01 23 LDD $0123 1C46: 10 A3 E4 CMPD ,S 1C49: 23 D0 BLS $1C1B 1C4B: 35 06 PULS B,A 1C4D: 39 RTS ------------------------------------------------ --- prepare sound bank transfer OSRAM<>CART ---- ------------------------------------------------ 1C4E: CC 10 10 LDD #$1010 ; init copy 1C51: 8E 20 00 LDX #$2000 ; ram<>ramcard 1C54: 20 24 BRA $1C7A ------------------------------------------------ --- $0ffa to #$00ee, $0ffc to #$0100 ----------- ------------------------------------------------ 1C56: CC 00 EE LDD #$00EE ; init copy 1C59: 8E 01 00 LDX #$0100 1C5C: 20 1C BRA $1C7A ------------------------------------------------ --- $0ffa to #$02d4 / #$0220, $0ffc to #$0100 -- ------------------------------------------------ 1C5E: 8E 02 D4 LDX #$02D4 ; track table (?) 1C61: B6 0B E6 LDA $0BE6 1C64: 27 04 BEQ $1C6A 1C66: 30 89 FF 4C LEAX -$00B4,X ; -> $0220 1C6A: CC 01 00 LDD #$0100 1C6D: 20 0B BRA $1C7A ------------------------------------------------ --- set $0ffa to #$0ff3 / $0ffc to #$0ff6 ------ ------------------------------------------------ 1C6F: CC 0F F3 LDD #$0FF3 ; source = ($0ff3) 1C72: 8E 0F F6 LDX #$0FF6 ; dest = ($0ff6) 1C75: 20 03 BRA $1C7A ------------------------------------------------ --- $0ffa to #$0000 / $0ffc to X --------------- ------------------------------------------------ 1C77: CC 00 00 LDD #$0000 ; source = $0000 ------------------------------------------------ --- set $0ffa / $0ffc to D/X ------------------- ------------------------------------------------ 1C7A: FD 0F FA STD $0FFA ; source address 1C7D: BF 0F FC STX $0FFC ; destination address 1C80: 39 RTS ------------------------------------------------ 1C81: 7F 0F FE CLR $0FFE 1C84: BD 7D 83 JSR $7D83 1C87: 27 F7 BEQ $1C80 1C89: 86 01 LDA #$01 1C8B: 20 52 BRA $1CDF ------------------------------------------------ 1C8D: BF 0F F3 STX $0FF3 1C90: B7 0F F5 STA $0FF5 1C93: 7F 0F FE CLR $0FFE 1C96: BD 7D 51 JSR $7D51 1C99: CC 7D 1F LDD #$7D1F ; vector to $1d1f 1C9C: FD 0F F6 STD $0FF6 1C9F: BD 7C 6F JSR $7C6F 1CA2: 7E 7E 17 JMP $7E17 ------------------------------------------------ --- $0ff8 to #$1d3a, $0ff6 to #$1d1f ----------- ------------------------------------------------ 1CA5: CC 7D 3A LDD #$7D3A ; vector = $1d3a 1CA8: FD 0F F8 STD $0FF8 1CAB: CC 7D 1F LDD #$7D1F ; vector = $1d1f 1CAE: FD 0F F6 STD $0FF6 1CB1: BD 7C 6F JSR $7C6F ------------------------------------------------ 1CB4: 8E 7E B1 LDX #$7EB1 ; prepare jump to ROMLOW $1eb1 1CB7: 20 03 BRA $1CBC ------------------------------------------------ 1CB9: 8E 7E 17 LDX #$7E17 ; prepare jump to ROMLOW $1e17 1CBC: 34 10 PSHS X 1CBE: AD 84 JSR ,X 1CC0: 27 07 BEQ $1CC9 1CC2: 81 02 CMPA #$02 1CC4: 26 19 BNE $1CDF 1CC6: B7 0F FE STA $0FFE 1CC9: 35 10 PULS X 1CCB: FC 0F FA LDD $0FFA 1CCE: 10 B3 0F FC CMPD $0FFC 1CD2: 25 E8 BCS $1CBC 1CD4: 39 RTS ------------------------------------------------ 1CD5: 1F 40 TFR S,D 1CD7: C3 00 02 ADDD #$0002 1CDA: FD 10 01 STD $1001 1CDD: 39 RTS ------------------------------------------------ 1CDE: 4F CLRA ------------------------------------------------ 1CDF: 97 0D STA $0D 1CE1: 81 06 CMPA #$06 1CE3: 26 0D BNE $1CF2 1CE5: B6 10 00 LDA $1000 1CE8: 81 03 CMPA #$03 1CEA: 27 06 BEQ $1CF2 1CEC: BD C4 D5 JSR $C4D5 1CEF: BD C4 03 JSR $C403 1CF2: 96 0D LDA $0D 1CF4: 81 09 CMPA #$09 1CF6: 26 03 BNE $1CFB 1CF8: BD 85 F2 JSR $85F2 1CFB: 96 0D LDA $0D 1CFD: 26 07 BNE $1D06 1CFF: B6 0F FE LDA $0FFE 1D02: 27 02 BEQ $1D06 1D04: 97 0D STA $0D 1D06: 10 FE 10 01 LDS $1001 1D0A: 7E 7E 02 JMP $7E02 ------------------------------------------------ 1D0D: BD 7D 4A JSR $7D4A 1D10: 26 02 BNE $1D14 1D12: 4F CLRA 1D13: 39 RTS ------------------------------------------------ 1D14: 34 02 PSHS A 1D16: 1F 10 TFR X,D 1D18: BD D8 16 JSR $D816 1D1B: 35 02 PULS A 1D1D: 20 22 BRA $1D41 ------------------------------------------------ 1D1F: BD 7D 4A JSR $7D4A 1D22: 26 02 BNE $1D26 1D24: 4F CLRA 1D25: 39 RTS ------------------------------------------------ 1D26: A6 84 LDA ,X 1D28: 20 17 BRA $1D41 ------------------------------------------------ 1D2A: BD 7D 4A JSR $7D4A 1D2D: 27 1A BEQ $1D49 1D2F: 34 02 PSHS A 1D31: 1F 10 TFR X,D 1D33: BD D7 E6 JSR $D7E6 1D36: 35 02 PULS A 1D38: 20 07 BRA $1D41 ------------------------------------------------ 1D3A: BD 7D 4A JSR $7D4A 1D3D: 27 0A BEQ $1D49 1D3F: A7 84 STA ,X 1D41: BE 0F FA LDX $0FFA ; decrement $0ffa 1D44: 30 01 LEAX +$01,X 1D46: BF 0F FA STX $0FFA 1D49: 39 RTS ------------------------------------------------ 1D4A: BE 0F FA LDX $0FFA 1D4D: BC 0F FC CMPX $0FFC 1D50: 39 RTS ------------------------------------------------ 1D51: 1A 50 ORCC #$50 ; disable FIRQ/IRQ 1D53: CC 03 20 LDD #$0320 ; timer preset to $0320 1D56: FD 64 06 STD $6406 1D59: 86 08 LDA #$08 ; set counter ready int 1D5B: B7 64 05 STA $6405 1D5E: CC 00 00 LDD #$0000 1D61: DD 09 STD $09 1D63: 97 0C STA $0C 1D65: 4A DECA 1D66: 97 0B STA $0B 1D68: CC F7 41 LDD #$F741 ; FIRQ handler to $f741 1D6B: FD 10 0A STD $100A 1D6E: 1C BF ANDCC #$BF ; enable FIRQ 1D70: 96 0B LDA $0B 1D72: 26 FC BNE $1D70 1D74: 8E 27 10 LDX #$2710 ; init downcounter 1D77: 34 10 PSHS X ; save downcounter 1D79: BD 7E 9C JSR $7E9C 1D7C: 35 10 PULS X ; restore downcounter 1D7E: 30 1F LEAX -$01,X ; decrement downcounter 1D80: 26 F5 BNE $1D77 1D82: 39 RTS ------------------------------------------------ 1D83: 1A 50 ORCC #$50 ; disable FIRQ/IRQ 1D85: CC 31 80 LDD #$3180 1D88: B7 64 04 STA $6404 ; clock/16, delta IP 0 int 1D8B: F7 64 05 STB $6405 ; inport change irq 1D8E: CC FF FF LDD #$FFFF ; counter to $ffff 1D91: FD 64 06 STD $6406 1D94: CC F4 24 LDD #$F424 ; delay counter = $f424 1D97: 97 05 STA $05 ; delay counter MSB 1D99: 1C BF ANDCC #$BF ; enable FIRQ 1D9B: 83 00 01 SUBD #$0001 1D9E: 27 5F BEQ $1DFF ; delay counter = $ff00 1DA0: 0D 05 TST $05 ; repeat 1DA2: 26 F7 BNE $1D9B ; until delay ctr MSB = 0 1DA4: 1A 40 ORCC #$40 ; disable FIRQ 1DA6: B6 64 0F LDA $640F ; stop counter 1DA9: 86 11 LDA #$11 1DAB: 97 02 STA $02 1DAD: CC 00 00 LDD #$0000 1DB0: FD 10 06 STD $1006 1DB3: 4A DECA 1DB4: 97 05 STA $05 1DB6: 5A DECB 1DB7: DD 07 STD $07 1DB9: CC 00 00 LDD #$0000 1DBC: 1C BF ANDCC #$BF ; enable FIRQ 1DBE: 8E F4 24 LDX #$F424 ; initialize downcounter 1DC1: 30 1F LEAX -$01,X ; count down 1DC3: 27 3A BEQ $1DFF 1DC5: 10 B3 10 06 CMPD $1006 1DC9: 27 F6 BEQ $1DC1 1DCB: B6 64 0E LDA $640E ; start counter 1DCE: 0F 05 CLR $05 1DD0: FC 10 06 LDD $1006 1DD3: 0A 02 DEC $02 1DD5: 26 E7 BNE $1DBE 1DD7: 1A 40 ORCC #$40 ; disable FIRQ 1DD9: 44 LSRA ; D/16 1DDA: 56 RORB 1DDB: 44 LSRA 1DDC: 56 RORB 1DDD: 44 LSRA 1DDE: 56 RORB 1DDF: 44 LSRA 1DE0: 56 RORB 1DE1: DD 07 STD $07 1DE3: 44 LSRA ; D+D/2 (exponential curve?) 1DE4: 56 RORB 1DE5: D3 07 ADDD $07 1DE7: DD 07 STD $07 1DE9: B6 64 0F LDA $640F ; stop counter 1DEC: 86 FF LDA #$FF 1DEE: 97 00 STA $00 1DF0: 97 05 STA $05 1DF2: 1C BF ANDCC #$BF ; enable FIRQ 1DF4: BD 7F 4D JSR $7F4D 1DF7: 96 01 LDA $01 1DF9: 81 FF CMPA #$FF 1DFB: 26 02 BNE $1DFF 1DFD: 4C INCA 1DFE: 39 RTS ------------------------------------------------ 1DFF: 86 FF LDA #$FF 1E01: 39 RTS ------------------------------------------------ --- DUART: set counter to $07d0, clock x1 ------ ------------------------------------------------ 1E02: 1A 50 ORCC #$50 ; disable FIRQ/IRQ 1E04: CC 60 AB LDD #$60AB 1E07: B7 64 04 STA $6404 ; clock x1 1E0A: F7 64 05 STB $6405 ; inport change, rxrdy/ffull b 1E0D: CC 07 D0 LDD #$07D0 ; counter ready, b/rr/ff a 1E10: FD 64 06 STD $6406 ; counter = 07d0 1E13: B6 64 0E LDA $640E ; start counter 1E16: 39 RTS ------------------------------------------------ 1E17: 8D 64 BSR $1E7D 1E19: 8D 62 BSR $1E7D 1E1B: 0F 06 CLR $06 1E1D: 7F 10 04 CLR $1004 1E20: AD 9F 0F F6 JSR [$0FF6] 1E24: 8D 0B BSR $1E31 1E26: 7C 10 04 INC $1004 1E29: 26 F5 BNE $1E20 1E2B: 96 06 LDA $06 1E2D: 8D 02 BSR $1E31 1E2F: 20 4C BRA $1E7D ------------------------------------------------ 1E31: BD 7E 70 JSR $7E70 1E34: 98 06 EORA $06 1E36: 97 06 STA $06 1E38: 96 03 LDA $03 1E3A: 81 05 CMPA #$05 1E3C: 26 0A BNE $1E48 1E3E: B6 10 03 LDA $1003 1E41: 26 05 BNE $1E48 1E43: BD 7E 96 JSR $7E96 1E46: 0F 03 CLR $03 1E48: 08 01 LSL $01 1E4A: 24 09 BCC $1E55 1E4C: 0C 03 INC $03 1E4E: 03 04 COM $04 1E50: BD 7E 9C JSR $7E9C 1E53: 20 05 BRA $1E5A ------------------------------------------------ 1E55: BD 7E 96 JSR $7E96 1E58: 0F 03 CLR $03 1E5A: 0A 02 DEC $02 1E5C: 26 DA BNE $1E38 1E5E: B6 10 05 LDA $1005 1E61: 26 0C BNE $1E6F 1E63: 96 04 LDA $04 1E65: 27 05 BEQ $1E6C 1E67: BD 7E 9C JSR $7E9C 1E6A: 20 03 BRA $1E6F ------------------------------------------------ 1E6C: BD 7E 96 JSR $7E96 1E6F: 39 RTS ------------------------------------------------ 1E70: 97 01 STA $01 1E72: 0F 03 CLR $03 1E74: 0F 04 CLR $04 1E76: 86 08 LDA #$08 1E78: 97 02 STA $02 1E7A: 96 01 LDA $01 1E7C: 39 RTS ------------------------------------------------ 1E7D: 86 FF LDA #$FF 1E7F: B7 10 05 STA $1005 1E82: B7 10 03 STA $1003 1E85: 86 7E LDA #$7E 1E87: BD 7E 31 JSR $7E31 1E8A: 86 7E LDA #$7E 1E8C: BD 7E 31 JSR $7E31 1E8F: 7F 10 03 CLR $1003 1E92: 7F 10 05 CLR $1005 1E95: 39 RTS ------------------------------------------------ 1E96: 03 0C COM $0C 1E98: D6 0C LDB $0C 1E9A: 20 06 BRA $1EA2 ------------------------------------------------ 1E9C: 03 0C COM $0C 1E9E: D6 0C LDB $0C 1EA0: 03 0C COM $0C 1EA2: 96 0C LDA $0C 1EA4: 0D 0B TST $0B 1EA6: 26 FC BNE $1EA4 1EA8: 1A 40 ORCC #$40 ; disable FIRQ 1EAA: DD 09 STD $09 1EAC: 0A 0B DEC $0B 1EAE: 1C BF ANDCC #$BF ; enable FIRQ 1EB0: 39 RTS ------------------------------------------------ 1EB1: CC 00 00 LDD #$0000 1EB4: FD 10 08 STD $1008 1EB7: BD 7F A9 JSR $7FA9 1EBA: 10 25 00 78 LBCS $1F36 1EBE: 0F 06 CLR $06 1EC0: 7F 10 04 CLR $1004 1EC3: BD 7F 4D JSR $7F4D 1EC6: 24 0B BCC $1ED3 1EC8: FC 10 08 LDD $1008 1ECB: 26 69 BNE $1F36 1ECD: FC 0F FA LDD $0FFA 1ED0: FD 10 08 STD $1008 1ED3: 96 01 LDA $01 1ED5: AD 9F 0F F8 JSR [$0FF8] 1ED9: 98 06 EORA $06 1EDB: 97 06 STA $06 1EDD: 7C 10 04 INC $1004 1EE0: 26 E1 BNE $1EC3 1EE2: BD 7F 4D JSR $7F4D 1EE5: 25 4F BCS $1F36 1EE7: 98 06 EORA $06 1EE9: 97 06 STA $06 1EEB: 27 08 BEQ $1EF5 1EED: B6 0F FF LDA $0FFF 1EF0: 27 03 BEQ $1EF5 1EF2: 86 03 LDA #$03 1EF4: 39 RTS ------------------------------------------------ 1EF5: FC 10 08 LDD $1008 1EF8: 27 37 BEQ $1F31 1EFA: 86 08 LDA #$08 1EFC: 97 02 STA $02 1EFE: 4F CLRA 1EFF: D6 06 LDB $06 1F01: 54 LSRB 1F02: 89 00 ADCA #$00 1F04: 0A 02 DEC $02 1F06: 26 F9 BNE $1F01 1F08: 4A DECA 1F09: 26 2B BNE $1F36 1F0B: FC 10 08 LDD $1008 1F0E: FD 0F FA STD $0FFA 1F11: AD 9F 0F F6 JSR [$0FF6] 1F15: 95 06 BITA $06 1F17: 26 04 BNE $1F1D 1F19: 9A 06 ORA $06 1F1B: 20 04 BRA $1F21 ------------------------------------------------ 1F1D: 03 06 COM $06 1F1F: 94 06 ANDA $06 1F21: BE 0F FA LDX $0FFA 1F24: 30 1F LEAX -$01,X 1F26: BF 0F FA STX $0FFA 1F29: AD 9F 0F F8 JSR [$0FF8] 1F2D: 86 02 LDA #$02 1F2F: 20 04 BRA $1F35 ------------------------------------------------ 1F31: 96 06 LDA $06 1F33: 26 01 BNE $1F36 1F35: 39 RTS ------------------------------------------------ 1F36: B6 0F FF LDA $0FFF 1F39: 27 04 BEQ $1F3F 1F3B: 86 07 LDA #$07 1F3D: 20 0D BRA $1F4C ------------------------------------------------ 1F3F: B6 10 00 LDA $1000 1F42: 81 01 CMPA #$01 1F44: 26 04 BNE $1F4A 1F46: 86 09 LDA #$09 1F48: 20 02 BRA $1F4C ------------------------------------------------ 1F4A: 86 06 LDA #$06 1F4C: 39 RTS ------------------------------------------------ 1F4D: 4F CLRA 1F4E: BD 7E 70 JSR $7E70 1F51: 4A DECA 1F52: B7 10 03 STA $1003 1F55: BD 7F C5 JSR $7FC5 1F58: 26 0D BNE $1F67 1F5A: 96 03 LDA $03 1F5C: 81 05 CMPA #$05 1F5E: 26 07 BNE $1F67 1F60: 0F 03 CLR $03 1F62: 7F 10 03 CLR $1003 1F65: 20 13 BRA $1F7A ------------------------------------------------ 1F67: 5D TSTB 1F68: 27 06 BEQ $1F70 1F6A: 0C 03 INC $03 1F6C: 03 04 COM $04 1F6E: 20 02 BRA $1F72 ------------------------------------------------ 1F70: 0F 03 CLR $03 1F72: 08 01 LSL $01 1F74: DA 01 ORB $01 1F76: D7 01 STB $01 1F78: 0A 02 DEC $02 1F7A: 96 02 LDA $02 1F7C: 26 D7 BNE $1F55 1F7E: 96 01 LDA $01 1F80: 81 7E CMPA #$7E 1F82: 26 07 BNE $1F8B 1F84: B6 10 03 LDA $1003 1F87: 27 02 BEQ $1F8B 1F89: 20 C2 BRA $1F4D ------------------------------------------------ 1F8B: BD 7F C5 JSR $7FC5 1F8E: 26 08 BNE $1F98 1F90: 96 04 LDA $04 1F92: 26 04 BNE $1F98 1F94: 1C FE ANDCC #$FE ; clear carry 1F96: 20 0E BRA $1FA6 ------------------------------------------------ 1F98: C1 01 CMPB #$01 1F9A: 26 08 BNE $1FA4 1F9C: 96 04 LDA $04 1F9E: 27 04 BEQ $1FA4 1FA0: 1C FE ANDCC #$FE ; clear carry 1FA2: 20 02 BRA $1FA6 ------------------------------------------------ 1FA4: 1A 01 ORCC #$01 ; set carry 1FA6: 96 01 LDA $01 1FA8: 39 RTS ------------------------------------------------ 1FA9: BD 7F C5 JSR $7FC5 1FAC: 26 FB BNE $1FA9 1FAE: 86 06 LDA #$06 1FB0: 97 02 STA $02 1FB2: BD 7F C5 JSR $7FC5 1FB5: 26 02 BNE $1FB9 1FB7: 20 F5 BRA $1FAE ------------------------------------------------ 1FB9: 0A 02 DEC $02 1FBB: 26 F5 BNE $1FB2 1FBD: BD 7F C5 JSR $7FC5 1FC0: 27 02 BEQ $1FC4 1FC2: 20 E5 BRA $1FA9 ------------------------------------------------ 1FC4: 39 RTS ------------------------------------------------ 1FC5: DC 07 LDD $07 1FC7: 58 LSLB ; *4 1FC8: 49 ROLA 1FC9: 58 LSLB 1FCA: 49 ROLA 1FCB: 83 00 01 SUBD #$0001 1FCE: 26 04 BNE $1FD4 1FD0: 1A 01 ORCC #$01 ; set carry 1FD2: 35 86 PULS PC,B,A ------------------------------------------------ 1FD4: 0D 00 TST $00 1FD6: 2B F3 BMI $1FCB 1FD8: D6 00 LDB $00 1FDA: 86 FF LDA #$FF 1FDC: 97 00 STA $00 1FDE: 1C FE ANDCC #$FE ; clear carry 1FE0: 5D TSTB 1FE1: 39 RTS ------------------------------------------------ --- spare -------------------------------------- ------------------------------------------------ 1FE2: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................ 1FF2: FF FF FF FF FF FF FF FF FF FF FF FF FF FF .............. ------------------------------------------------ --- perform floppy reset ----------------------- ------------------------------------------------ 2000: 7E 73 D4 JMP $73D4 ; floppy reset ------------------------------------------------ --- floppy access master routine --------------- ------------------------------------------------ 2003: 8D 27 BSR $202C 2005: BD 73 9D JSR $739D ; floppy LED / motor on 2008: B6 64 0D LDA $640D ; input port 200B: 84 02 ANDA #$02 ; if bit 1 set 200D: 27 07 BEQ $2016 ; goto $2016 200F: 86 03 LDA #$03 ; else 2011: B7 0D E2 STA $0DE2 ; floppy error = 3 2014: 20 09 BRA $201F ; end floppy access ------------------------------------------------ --- floppy jobcode handling -------------------- ------------------------------------------------ 2016: B6 0D C7 LDA $0DC7 ; get floppy jobcode 2019: 48 LSLA ; get jobcode handler 201A: 8E 77 51 LDX #$7751 ; address from table 201D: AD 96 JSR [A,X] ; do jobcode handler 201F: BD 73 A7 JSR $73A7 ; floppy LED / motor off 2022: B6 6E 01 LDA $6E01 ; get FDC track register 2025: B7 0D E7 STA $0DE7 ; store it in OSRAM 2028: 4F CLRA ; DP to zeropage 2029: 1F 8B TFR A,DP 202B: 39 RTS ------------------------------------------------ --- init floppy access ------------------------- ------------------------------------------------ 202C: B7 0D C7 STA $0DC7 ; store floppy task 202F: F7 0D C8 STB $0DC8 ; # of item to access 2032: 86 04 LDA #$04 ; size of disk geo. table entry 2034: 3D MUL 2035: FD 0D C9 STD $0DC9 ; offset for geo. table access 2038: 7F 0D E2 CLR $0DE2 ; clear error code 203B: 86 6E LDA #$6E ; DP to FDC 203D: 1F 8B TFR A,DP 203F: 7F 0D CC CLR $0DCC ; actual head = 0 2042: 86 01 LDA #$01 ; next head = 1 2044: B7 0D CB STA $0DCB 2047: 39 RTS ------------------------------------------------ --- jobcode 4-7 handler ------------------------ ------------------------------------------------ 2048: BD 70 CE JSR $70CE ; jobcode 0 204B: B6 0D DE LDA $0DDE ; get floppy status 204E: 81 00 CMPA #$00 ; if nothing happened 2050: 27 03 BEQ $2055 ; goto $2055 2052: 7E 73 04 JMP $7304 ; analyze floppy status/error ------------------------------------------------ 2055: BD 71 7D JSR $717D ; init transfer SEQ/DOSRAM 2058: B6 0D DE LDA $0DDE ; get floppy status 205B: 81 00 CMPA #$00 ; if nothing happened 205D: 27 03 BEQ $2062 ; RTS 205F: 7E 73 04 JMP $7304 ; else analyze status/error ------------------------------------------------ 2062: 39 RTS ------------------------------------------------ --- directory access (jobcode 0/1/9) ----------- ------------------------------------------------ 2063: 7F 0D C9 CLR $0DC9 ; clear geo. table offset 2066: 7F 0D CA CLR $0DCA 2069: 8D 63 BSR $20CE 206B: B6 0D DE LDA $0DDE ; get floppy status 206E: 81 00 CMPA #$00 ; if nothing happened 2070: 27 03 BEQ $2075 ; goto $2075 2072: 7E 73 04 JMP $7304 ; else analyze error/status ------------------------------------------------ 2075: BD 71 DA JSR $71DA ; consecutive track access 2078: B6 0D DE LDA $0DDE ; get floppy status 207B: 81 00 CMPA #$00 ; if nothing happened 207D: 27 03 BEQ $2082 ; goto $2075 207F: 7E 73 04 JMP $7304 ; else analyze error/status ------------------------------------------------ 2082: B6 0D C7 LDA $0DC7 ; get floppy task 2085: 81 00 CMPA #$00 2087: 27 04 BEQ $208D 2089: 81 09 CMPA #$09 208B: 26 0E BNE $209B ; floppy task = 0 / 9 208D: BE 4F 36 LDX $4F36 ; x=($4f36) 2090: 8C 53 51 CMPX #$5351 ; if x=$5351 2093: 27 06 BEQ $209B ; goto $209b 2095: 86 11 LDA #$11 ; floppy error code = 17 2097: B7 0D E2 STA $0DE2 209A: 39 RTS ------------------------------------------------ 209B: 81 09 CMPA #$09 209D: 26 14 BNE $20B3 ; floppy task = 9 209F: BE 0D DA LDX $0DDA ; get DOSRAM transfer area 20A2: 30 89 FE 00 LEAX -$0200,X ; reduce by 512 20A6: BD 76 6A JSR $766A ; write sector to disk 20A9: B6 0D DE LDA $0DDE ; get floppy status 20AC: 81 00 CMPA #$00 ; if nothing happened 20AE: 27 03 BEQ 20B0: 7E 73 04 JMP $7304 ; else analyze error/status ------------------------------------------------ 20B3: 39 RTS ------------------------------------------------ --- SEQRAM transfer (jobcode 2/3) -------------- ------------------------------------------------ 20B4: 8D 18 BSR $20CE ; jobcode 0 20B6: B6 0D DE LDA $0DDE ; get floppy status 20B9: 81 00 CMPA #$00 ; if nothing happened 20BB: 27 03 BEQ $20C0 ; goto $20c0 20BD: 7E 73 04 JMP $7304 ; else analyze error/status ------------------------------------------------ 20C0: BD 72 3B JSR $723B ; transfer SEQRAM to/from disk 20C3: B6 0D DE LDA $0DDE ; get floppy status 20C6: 81 00 CMPA #$00 ; if nothing happened 20C8: 27 03 BEQ $20CD ; RTS 20CA: 7E 73 04 JMP $7304 ; else analyze error/status ------------------------------------------------ 20CD: 39 RTS ------------------------------------------------ --- directory read (jobcode 0) ----------------- ------------------------------------------------ 20CE: B6 0D C7 LDA $0DC7 ; floppy task = 0 20D1: 81 00 CMPA #$00 20D3: 26 07 BNE $20DC 20D5: 86 00 LDA #$00 ; transfer mode 20D7: 8E 77 65 LDX #$7765 ; directory access 20DA: 20 56 BRA $2132 ------------------------------------------------ --- directory write (jobcode 1) ---------------- ------------------------------------------------ 20DC: 81 01 CMPA #$01 20DE: 26 07 BNE $20E7 20E0: 86 02 LDA #$02 ; transfer mode 20E2: 8E 77 65 LDX #$7765 ; directory access 20E5: 20 4B BRA $2132 ------------------------------------------------ --- SEQRAM read (jobcode 2) -------------------- ------------------------------------------------ 20E7: 81 02 CMPA #$02 20E9: 26 07 BNE $20F2 20EB: 86 00 LDA #$00 ; transfer mode 20ED: 8E 77 75 LDX #$7775 ; ONE/SEQ/SYX access 20F0: 20 40 BRA $2132 ------------------------------------------------ --- SEQRAM write (jobcode 3) ------------------- ------------------------------------------------ 20F2: 81 03 CMPA #$03 20F4: 26 07 BNE $20FD 20F6: 86 02 LDA #$02 ; transfer mode 20F8: 8E 77 75 LDX #$7775 ; ONE/SEQ/SYX access 20FB: 20 35 BRA $2132 ------------------------------------------------ --- program bank read (jobcode 4) -------------- ------------------------------------------------ 20FD: 81 04 CMPA #$04 20FF: 26 07 BNE $2108 2101: 86 00 LDA #$00 ; transfer mode 2103: 8E 77 9D LDX #$779D ; BNK access 2106: 20 2A BRA $2132 ------------------------------------------------ --- program bank write (jobcode 5) ------------- ------------------------------------------------ 2108: 81 05 CMPA #$05 210A: 26 07 BNE $2113 210C: 86 02 LDA #$02 ; transfer mode 210E: 8E 77 9D LDX #$779D ; BNK access 2111: 20 1F BRA $2132 ------------------------------------------------ --- single sound read (jobcode 6) -------------- ------------------------------------------------ 2113: 81 06 CMPA #$06 2115: 26 07 BNE $211E 2117: 86 00 LDA #$00 ; transfer mode 2119: 8E 78 3D LDX #$783D ; SND access 211C: 20 14 BRA $2132 ------------------------------------------------ --- single sound write (jobcode 7) ------------- ------------------------------------------------ 211E: 81 07 CMPA #$07 2120: 26 07 BNE $2129 2122: 86 02 LDA #$02 ; transfer mode 2124: 8E 78 3D LDX #$783D ; SND access 2127: 20 09 BRA $2132 ------------------------------------------------ --- whole disk access (jobcode 9) -------------- ------------------------------------------------ 2129: 81 09 CMPA #$09 212B: 26 05 BNE $2132 212D: 86 00 LDA #$00 ; transfer mode 212F: 8E 77 65 LDX #$7765 ; directory access ------------------------------------------------ --- process jobcode 8 / set head/track/sector -- ------------------------------------------------ 2132: B7 0D D7 STA $0DD7 ; transfer mode 2135: FC 0D C9 LDD $0DC9 ; disk geo. table offset 2138: 30 8B LEAX D,X ; get table element address 213A: 7F 0D D8 CLR $0DD8 ; head = 0 213D: A6 84 LDA ,X ; get first element (head) 213F: 2A 05 BPL $2146 2141: 7C 0D D8 INC $0DD8 ; head = 1 2144: 84 10 ANDA #$10 ; mask bit 4 2146: 44 LSRA 2147: 44 LSRA 2148: 44 LSRA 2149: 44 LSRA 214A: B7 0D CE STA $0DCE ; end head 214D: B7 0D CC STA $0DCC ; actual head 2150: BD 76 7D JSR $767D ; access floppy head 2153: A6 80 LDA ,X+ ; get first element (bit 0) 2155: 84 01 ANDA #$01 ; mask bit 0 2157: B7 0D CD STA $0DCD 215A: A6 80 LDA ,X+ ; get 2nd element (start track) 215C: B7 0D CF STA $0DCF ; store start track 215F: B7 0D E7 STA $0DE7 ; set floppy track 2162: A6 80 LDA ,X+ ; get 3rd element (end track) 2164: B7 0D D1 STA $0DD1 ; store end track 2167: A6 84 LDA ,X ; get 4th element (start sector) 2169: 44 LSRA 216A: 44 LSRA 216B: 44 LSRA 216C: 44 LSRA 216D: B7 0D D0 STA $0DD0 ; store start sector 2170: B7 0D D9 STA $0DD9 ; set floppy sector 2173: A6 84 LDA ,X ; get 4th element (end sector) 2175: 84 0F ANDA #$0F ; limit to 0-15 2177: B7 0D D2 STA $0DD2 ; store end sector 217A: 7E 73 AB JMP $73AB ; seek track ------------------------------------------------ --- transfer 10 sectors to DOSRAM $5000 -------- ------------------------------------------------ 217D: 7A 0D D9 DEC $0DD9 ; decrement floppy sector 2180: 8E 50 00 LDX #$5000 ; DOSRAM transfer area = $5000 2183: BF 0D DA STX $0DDA 2186: 7C 0D D9 INC $0DD9 ; increment floppy sector 2189: B6 0D D7 LDA $0DD7 ; if transfer mode != 0 218C: 81 00 CMPA #$00 ; goto $2195 218E: 26 05 BNE $2195 2190: BD 73 29 JSR $7329 ; read 10 sectors from disk 2193: 20 03 BRA $2198 ------------------------------------------------ --- transfer DOSRAM $5000 to 10 sectors -------- ------------------------------------------------ 2195: BD 73 5E JSR $735E ; write 10 sectors to disk 2198: B6 0D DE LDA $0DDE ; get floppy status 219B: 81 00 CMPA #$00 ; if nothing happened 219D: 27 01 BEQ $21A0 ; goto $21a0 219F: 39 RTS ; else RTS ------------------------------------------------ --- check for end of transfer / prepare next --- ------------------------------------------------ 21A0: B6 0D D9 LDA $0DD9 ; get floppy sector 21A3: 81 04 CMPA #$04 ; if sector != 4 21A5: 26 1B BNE $21C2 ; prepare next transfer 21A7: B6 0D D9 LDA $0DD9 ; get floppy sector 21AA: B1 0D D2 CMPA $0DD2 ; if end sector reached 21AD: 27 13 BEQ $21C2 ; prepare next transfer 21AF: 7C 0D E7 INC $0DE7 ; increment track 21B2: BD 73 AB JSR $73AB 21B5: B6 0D DE LDA $0DDE ; get floppy status 21B8: 81 00 CMPA #$00 ; if nothing happened 21BA: 27 01 BEQ $21BD ; goto $21bd 21BC: 39 RTS ; else RTS ------------------------------------------------ 21BD: 86 FF LDA #$FF ; prepare first sector access 21BF: B7 0D D9 STA $0DD9 21C2: BE 0D DA LDX $0DDA ; DOSRAM pointer +1024 21C5: 30 89 04 00 LEAX +$0400,X 21C9: B6 0D E7 LDA $0DE7 ; get track 21CC: B1 0D D1 CMPA $0DD1 ; if end track not reached 21CF: 26 B2 BNE $2183 ; prepare next transfer 21D1: B6 0D D9 LDA $0DD9 ; get sector 21D4: B1 0D D2 CMPA $0DD2 ; if end sector not reached 21D7: 26 AA BNE $2183 ; prepare next transfer 21D9: 39 RTS ; else RTS ------------------------------------------------ --- consecutive track access (heads 0-3) ------- ------------------------------------------------ 21DA: 8E 47 38 LDX #$4738 ; DOSRAM pointer to $4738 21DD: BF 0D DA STX $0DDA 21E0: 4F CLRA ; head 0 to stack 21E1: 34 02 PSHS A 21E3: B6 0D D7 LDA $0DD7 ; get transfer mode 21E6: 81 00 CMPA #$00 ; 21E8: 26 05 BNE $21EF ; if transfer mode = read 21EA: BD 73 29 JSR $7329 ; read 10 sectors from disk 21ED: 20 03 BRA $21F2 ------------------------------------------------; else 21EF: BD 73 5E JSR $735E ; write 10 sectors to disk 21F2: B6 0D DE LDA $0DDE ; get floppy status 21F5: 81 00 CMPA #$00 ; if nothing happened 21F7: 27 02 BEQ $21FB ; goto $21fb 21F9: 35 82 PULS PC,A ; else RTS ------------------------------------------------ 21FB: BE 0D DA LDX $0DDA ; DOSRAM pointer +512 21FE: 30 89 02 00 LEAX +$0200,X 2202: BF 0D DA STX $0DDA 2205: 6C E4 INC ,S ; increment head 2207: A6 E4 LDA ,S 2209: 81 01 CMPA #$01 ; if head = 1 220B: 26 08 BNE $2215 ; goto $2215 220D: 7C 0D CC INC $0DCC ; increment actual head 2210: BD 76 7D JSR $767D ; access floppy head 2213: 20 1F BRA $2234 ------------------------------------------------ 2215: 81 02 CMPA #$02 ; if head=2 increment track 2217: 26 11 BNE $222A ; else goto $222a 2219: 7C 0D E7 INC $0DE7 ; increment track 221C: BD 73 AB JSR $73AB ; seek track 221F: B6 0D DE LDA $0DDE ; get floppy status 2222: 81 00 CMPA #$00 ; if nothing happened 2224: 27 02 BEQ $2228 ; goto $2228 ($2234) 2226: 35 82 PULS PC,A ; else RTS ------------------------------------------------ 2228: 20 0A BRA $2234 ------------------------------------------------ 222A: 81 03 CMPA #$03 ; if head=3 222C: 26 06 BNE $2234 ; head is 1, nothing to do 222E: 7F 0D CC CLR $0DCC ; else actual head = 0 2231: BD 76 7D JSR $767D ; access floppy head 2234: 35 02 PULS A ; store head counter 2236: 81 04 CMPA #$04 ; everything read? 2238: 25 A7 BCS $21E1 ; no, repeat 223A: 39 RTS ------------------------------------------------ --- transfer SEQRAM to/from disk --------------- ------------------------------------------------ 223B: BD 73 EA JSR $73EA 223E: 8E 50 00 LDX #$5000 ; DOSRAM pointer to $5000 2241: BF 0D DA STX $0DDA 2244: 10 BE 0D D3 LDY $0DD3 ; get transfer address ptr. 2248: 7A 0D D9 DEC $0DD9 ; decrement sector 224B: 10 BF 0D D3 STY $0DD3 ; store transfer address ptr. 224F: 7C 0D D9 INC $0DD9 ; increment sector 2252: CE 54 00 LDU #$5400 2255: B6 0D D7 LDA $0DD7 ; get transfer mode 2258: 81 00 CMPA #$00 225A: 26 14 BNE $2270 ; if read mode 225C: BD 73 29 JSR $7329 ; read 10 sectors 225F: B6 0D DE LDA $0DDE ; get status 2262: 81 00 CMPA #$00 ; if nothing happened 2264: 27 01 BEQ $2267 ; goto $2267 2266: 39 RTS ; else RTS ------------------------------------------------ 2267: 10 BE 0D D3 LDY $0DD3 ; get transfer address ptr. 226B: BD 9A D6 JSR $9AD6 ; transfer DOSRAM to SEQRAM 226E: 20 06 BRA $2276 ------------------------------------------------; else 2270: BD 9A D6 JSR $9AD6 ; transfer DOSRAM to SEQRAM 2273: BD 73 5E JSR $735E ; write 10 sectors 2276: B6 0D DE LDA $0DDE ; get status 2279: 81 00 CMPA #$00 ; if nothing happened 227B: 27 01 BEQ $227E ; goto $227e 227D: 39 RTS ; else RTS ------------------------------------------------ 227E: B6 0D D9 LDA $0DD9 ; get sector 2281: 81 04 CMPA #$04 ; if sector != 4 2283: 26 2F BNE $22B4 ; goto $22b4 2285: 86 FF LDA #$FF ; prepare sector 0 access 2287: B7 0D D9 STA $0DD9 228A: B6 0D D8 LDA $0DD8 ; if head != 1 228D: 81 01 CMPA #$01 ; goto $22a1 228F: 26 10 BNE $22A1 2291: 7C 0D E7 INC $0DE7 ; increment track 2294: BD 73 AB JSR $73AB ; seek track 2297: B6 0D DE LDA $0DDE ; get status 229A: 81 00 CMPA #$00 ; if nothing happened 229C: 27 01 BEQ $229F ; goto $229f ($22ac) 229E: 39 RTS ; else RTS ------------------------------------------------ 229F: 20 0B BRA $22AC ------------------------------------------------ 22A1: B6 0D CC LDA $0DCC ; change actual head 22A4: 88 01 EORA #$01 22A6: B7 0D CC STA $0DCC 22A9: BD 76 7D JSR $767D ; access floppy head 22AC: B6 0D D8 LDA $0DD8 ; change head 22AF: 88 01 EORA #$01 22B1: B7 0D D8 STA $0DD8 22B4: 10 BE 0D D3 LDY $0DD3 ; transfer address pointer 22B8: 31 A9 04 00 LEAY +$0400,Y ; +1024 22BC: 10 BC 0D D5 CMPY $0DD5 ; end of transfer area? 22C0: 22 06 BHI $22C8 22C2: 10 8C 04 00 CMPY #$0400 ; 1024 bytes transferred? 22C6: 24 83 BCC $224B ; no -> $224b 22C8: B6 00 C4 LDA $00C4 22CB: 81 03 CMPA #$03 22CD: 26 34 BNE $2303 22CF: B6 0D CD LDA $0DCD 22D2: B7 0D CC STA $0DCC ; set actual head to next head 22D5: BD 76 7D JSR $767D 22D8: B6 0D D1 LDA $0DD1 ; get end track 22DB: B7 0D E7 STA $0DE7 ; set actual track to end track 22DE: BD 73 AB JSR $73AB 22E1: B6 0D DE LDA $0DDE ; get status 22E4: 81 00 CMPA #$00 ; if nothing happened 22E6: 27 01 BEQ $22E9 ; prepare transfer 22E8: 39 RTS ; else RTS ------------------------------------------------ --- prepare transfer DOSRAM to/from disk ------- ------------------------------------------------ 22E9: 8E 58 00 LDX #$5800 ; DOSRAM pointer to $5800 22EC: BF 0D DA STX $0DDA 22EF: 86 05 LDA #$05 ; floppy sector = 5 22F1: B7 0D D9 STA $0DD9 22F4: B6 0D D7 LDA $0DD7 22F7: 81 00 CMPA #$00 22F9: 26 05 BNE $2300 ; transfer mode = 0 22FB: BD 73 29 JSR $7329 ; read 10 sectors from disk 22FE: 20 03 BRA $2303 ------------------------------------------------; transfer mode = 1 2300: BD 73 5E JSR $735E ; write 10 sectors to disk 2303: 39 RTS ------------------------------------------------ --- analyze floppy status ---------------------- ------------------------------------------------ 2304: C6 01 LDB #$01 ; floppy error 1 2306: 86 14 LDA #$14 ; track zero / lost data 2308: B5 0D DE BITA $0DDE 230B: 27 04 BEQ $2311 230D: C6 02 LDB #$02 ; floppy error 2 230F: 20 14 BRA $2325 ------------------------------------------------ 2311: 86 40 LDA #$40 ; write protect 2313: B5 0D DE BITA $0DDE 2316: 27 04 BEQ $231C 2318: C6 04 LDB #$04 ; floppy error 4 231A: 20 09 BRA $2325 ------------------------------------------------ 231C: 86 08 LDA #$08 ; crc error 231E: B5 0D DE BITA $0DDE 2321: 27 02 BEQ $2325 2323: C6 06 LDB #$06 ; floppy error 6 2325: F7 0D E2 STB $0DE2 2328: 39 RTS ------------------------------------------------ --- read 10 sectors (1 track ) from disk ------- ------------------------------------------------ 2329: 86 0A LDA #$0A ; number of sectors = 10 232B: B7 0D DC STA $0DDC 232E: BE 0D DA LDX $0DDA ; get DOSRAM transfer area 2331: BD 76 1A JSR $761A ; read sector from disk 2334: 7A 0D DC DEC $0DDC 2337: B6 0D DC LDA $0DDC ; if all sectors read 233A: 27 07 BEQ $2343 ; goto $2343 233C: B6 0D DE LDA $0DDE ; get floppy status 233F: 81 00 CMPA #$00 ; if nothing happened 2341: 26 EB BNE $232E ; goto $232e 2343: B6 0D DE LDA $0DDE ; get floppy status 2346: 81 00 CMPA #$00 ; if nothing happened 2348: 27 13 BEQ $235D ; RTS 234A: BD 76 E9 JSR $76E9 ; step out & update track reg. 234D: 10 8E 03 A9 LDY #$03A9 ; delay length = $03a9 2351: BD 77 08 JSR $7708 ; floppy delay 2354: BD 76 E0 JSR $76E0 ; step in & update track reg. 2357: BE 0D DA LDX $0DDA ; get DOSRAM transfer area 235A: BD 76 1A JSR $761A ; read sector from disk 235D: 39 RTS ------------------------------------------------ --- write 10 sectors (1 track ) to disk -------- ------------------------------------------------ 235E: 86 0A LDA #$0A ; number of sectors = 10 2360: B7 0D DC STA $0DDC 2363: BE 0D DA LDX $0DDA ; get DOSRAM transfer area 2366: BD 76 6A JSR $766A ; write sector to floppy 2369: 7A 0D DC DEC $0DDC ; decrement transf. sectors 236C: B6 0D DC LDA $0DDC ; if all sectors transferred 236F: 27 07 BEQ $2378 ; goto $2378 2371: B6 0D DE LDA $0DDE ; get floppy status 2374: 81 00 CMPA #$00 ; if nothing happened 2376: 26 EB BNE $2363 ; goto $2363 2378: B6 0D DE LDA $0DDE ; get floppy status 237B: 81 00 CMPA #$00 ; if nothing happened 237D: 27 13 BEQ $2392 ; goto $2392 237F: BD 76 E9 JSR $76E9 ; step out & update track reg. 2382: 10 8E 03 A9 LDY #$03A9 ; delay length = $03a9 2386: BD 77 08 JSR $7708 ; floppy delay 2389: BD 76 E0 JSR $76E0 ; step in & update track reg. 238C: BE 0D DA LDX $0DDA ; get DOSRAM transfer area 238F: BD 76 6A JSR $766A ; write sector to floppy 2392: B6 0D DE LDA $0DDE ; get floppy status 2395: 81 00 CMPA #$00 ; if nothing happened 2397: 26 03 BNE $239C ; RTS 2399: 7E 76 43 JMP $7643 ; read sector from disk & ------------------------------------------------; discard data 239C: 39 RTS ------------------------------------------------ --- perform digital to analog conversion ------- ------------------------------------------------ 239D: B7 68 7F STA $687F ; DAC conversion 23A0: 10 8E B7 1B LDY #$B71B ; delay length = $b71b 23A4: 7E 77 08 JMP $7708 ; perform delay ------------------------------------------------ --- perform undelayed digital to analog conv. -- ------------------------------------------------ 23A7: B7 68 FF STA $68FF ; ADC write 23AA: 39 RTS ------------------------------------------------ --- seek track, retry 2 times on error -------- ------------------------------------------------ 23AB: 86 02 LDA #$02 ; retries = 2 23AD: B7 0D DC STA $0DDC 23B0: BD 76 D2 JSR $76D2 ; seek track 23B3: B6 0D DE LDA $0DDE ; get floppy status 23B6: 81 00 CMPA #$00 ; if nothing happened 23B8: 27 0D BEQ $23C7 ; goto $23c7 23BA: 34 02 PSHS A ; floppy status to stack 23BC: BD 76 C9 JSR $76C9 ; restore floppy 23BF: 7A 0D DC DEC $0DDC ; dec. sectors to transfer 23C2: 35 02 PULS A ; restore old floppy status 23C4: B7 0D DE STA $0DDE 23C7: B6 0D DC LDA $0DDC ; if sectors to transfer=0 23CA: 27 07 BEQ $23D3 ; RTS 23CC: B6 0D DE LDA $0DDE ; else get floppy status 23CF: 81 00 CMPA #$00 ; if something happened 23D1: 26 DD BNE $23B0 ; retry seek 23D3: 39 RTS ------------------------------------------------ --- floppy reset ------------------------------- ------------------------------------------------ 23D4: 7F 0D E7 CLR $0DE7 ; track = 0 23D7: 7F 0D E2 CLR $0DE2 ; error = 0 23DA: 86 6E LDA #$6E ; set page to FDC 23DC: 1F 8B TFR A,DP 23DE: BD 76 F2 JSR $76F2 ; reset floppy & get status 23E1: 86 FF LDA #$FF ; track = 255 23E3: B7 6E 01 STA $6E01 ; FDC track register 23E6: 4F CLRA ; set page to zeropage 23E7: 1F 8B TFR A,DP 23E9: 39 RTS --- ??? ------------------------------------------------ 23EA: FC 0D D3 LDD $0DD3 ; get transfer address ptr. 23ED: 44 LSRA 23EE: 44 LSRA 23EF: 44 LSRA 23F0: 44 LSRA 23F1: 84 0E ANDA #$0E 23F3: B7 0D DD STA $0DDD 23F6: 39 RTS ------------------------------------------------ --- transfer DOSRAM to SEQRAM ------------------ ------------------------------------------------ 23F7: B7 0D D7 STA $0DD7 ; transfer mode 23FA: BF 0D D3 STX $0DD3 ; transfer address pointer 23FD: 34 50 PSHS U,X 23FF: BD 86 02 JSR $8602 ; prepare disk access 2402: 8D E6 BSR $23EA 2404: EC 62 LDD +$02,S ; transfer length 2406: F3 0D D3 ADDD $0DD3 ; add transfer base 2409: FD 0D D5 STD $0DD5 ; store transfer end 240C: EE 62 LDU +$02,S ; transfer length 240E: 33 C9 50 00 LEAU +$5000,U ; U = transfer start address 2412: 10 BE 0D D3 LDY $0DD3 ; transfer address 2416: BD 9A D6 JSR $9AD6 ; transfer DOSRAM to SEQRAM 2419: BD 86 93 JSR $8693 241C: 35 D0 PULS PC,U,X ------------------------------------------------ --- sector buffer vectors (DOSRAM) ------------- ------------------------------------------------ 241E: 40 4B FDB $404B ; sector 0 buffer 2420: 44 9F FDB $449F ; sector 1 buffer 2422: 48 F3 FDB $48F3 ; sector 2 buffer 2424: 4D 47 FDB $4D47 ; sector 3 buffer 2426: 51 9B FDB $519B ; sector 4 buffer 2428: 55 EF FDB $55EF ; sector 5 buffer ------------------------------------------------ --- verify sector (jobcode 8) ------------------ ------------------------------------------------ 242A: 10 FF 0D E0 STS $0DE0 ; rescue stackpointer 242E: 8D 07 BSR $2437 2430: BD 74 42 JSR $7442 ; read 5 sectors 2433: BD 75 AA JSR $75AA ; verify 2436: 39 RTS ------------------------------------------------ --- access head 0, prepare head 1 -------------- ------------------------------------------------ 2437: 86 01 LDA #$01 ; next head = 1 2439: B7 0D CB STA $0DCB 243C: 7F 0D CC CLR $0DCC ; head = 0 243F: 7E 76 7D JMP $767D ; access floppy head ------------------------------------------------ --- read 5 sectors from disk ------------------- ------------------------------------------------ 2442: BD 76 C9 JSR $76C9 ; restore & update track reg. 2445: 7F 0D E7 CLR $0DE7 ; track = 0 2448: BD 74 AC JSR $74AC 244B: 7F 0D D9 CLR $0DD9 ; sector = 0 244E: B6 0D D9 LDA $0DD9 ; get sector 2451: 48 LSLA ; get DOSRAM destination 2452: 10 8E 74 1E LDY #$741E 2456: AE A6 LDX A,Y 2458: BD 75 50 JSR $7550 ; create sector ID address 245B: 7C 0D D9 INC $0DD9 ; increment sector 245E: B6 0D D9 LDA $0DD9 ; repeat until sector 6 2461: 81 06 CMPA #$06 ; reached 2463: 26 E9 BNE $244E ; 2465: BD 75 0A JSR $750A 2468: B6 0D CC LDA $0DCC 246B: 88 01 EORA #$01 246D: B7 0D CC STA $0DCC 2470: BD 76 7D JSR $767D 2473: 7F 0D D9 CLR $0DD9 ; sector = 0 2476: B6 0D D9 LDA $0DD9 ; get sector 2479: 48 LSLA ; get DOSRAM destination 247A: 10 8E 74 1E LDY #$741E 247E: AE A6 LDX A,Y 2480: BD 75 50 JSR $7550 2483: 7C 0D D9 INC $0DD9 ; increment sector 2486: B6 0D D9 LDA $0DD9 ; get sector 2489: 81 06 CMPA #$06 ; repeat until sector 6 248B: 26 E9 BNE $2476 ; reached 248D: BD 75 0A JSR $750A 2490: 7C 0D E7 INC $0DE7 ; increment track 2493: B6 0D E7 LDA $0DE7 ; get track 2496: 81 50 CMPA #$50 ; if track 80 reached 2498: 27 03 BEQ $249D ; goto $249d 249A: BD 76 E0 JSR $76E0 ; step in & update track reg. 249D: B6 0D E7 LDA $0DE7 ; get track 24A0: 81 50 CMPA #$50 ; if track 80 reached 24A2: 27 07 BEQ $24AB ; RTS 24A4: B6 0D DE LDA $0DDE ; get floppy status 24A7: 81 00 CMPA #$00 ; if nothing happened 24A9: 27 A0 BEQ $244B ; goto $244b 24AB: 39 RTS ------------------------------------------------ --- format sectors 0 to 5 ---------------------- ------------------------------------------------ 24AC: 7F 0D D9 CLR $0DD9 ; sector = 0 24AF: 8E 40 00 LDX #$4000 ; DOSRAM pointer = $4000 24B2: C6 4E LDB #$4E ; gap 1 24B4: 10 8E 00 3C LDY #$003C ; gap 1 data (60 bytes) 24B8: BD 75 9F JSR $759F 24BB: C6 00 LDB #$00 ; gap 3 24BD: 10 8E 00 0C LDY #$000C ; gap 3 data (12 bytes) 24C1: BD 75 9F JSR $759F 24C4: C6 F5 LDB #$F5 ; reset CRC generator 24C6: 10 8E 00 03 LDY #$0003 ; three times 24CA: BD 75 9F JSR $759F 24CD: BD 75 50 JSR $7550 ; create sector ID address entry 24D0: C6 4E LDB #$4E ; gap 2 / read 24D2: 10 8E 00 16 LDY #$0016 ; gap 2 data (22 times) 24D6: BD 75 9F JSR $759F 24D9: C6 00 LDB #$00 ; gap 2 / write 24DB: 10 8E 00 0C LDY #$000C ; gap 2 data (12 times) 24DF: BD 75 9F JSR $759F 24E2: C6 F5 LDB #$F5 ; reset CRC generator 24E4: 10 8E 00 03 LDY #$0003 ; three times 24E8: BD 75 9F JSR $759F 24EB: BD 75 77 JSR $7577 ; create empty sector data 24EE: C6 4E LDB #$4E ; gap 4 24F0: 10 8E 00 18 LDY #$0018 ; gap 4 data (24 times) 24F4: BD 75 9F JSR $759F 24F7: 7C 0D D9 INC $0DD9 ; increment sector 24FA: B6 0D D9 LDA $0DD9 ; repeat until sector 6 24FD: 81 06 CMPA #$06 ; reached 24FF: 26 BA BNE $24BB 2501: C6 4E LDB #$4E ; end of disk formatting mark 2503: 10 8E 04 00 LDY #$0400 ; set mark 1024 times 2507: 7E 75 9F JMP $759F ------------------------------------------------ --- write 10 tracks to disk -------------------- ------------------------------------------------ 250A: 86 0A LDA #$0A ; 10 tracks to transfer 250C: B7 0D DC STA $0DDC 250F: 8E 40 00 LDX #$4000 ; DOSRAM pointer to $4000 2512: BD 76 BB JSR $76BB ; write track to floppy 2515: 7A 0D DC DEC $0DDC ; decrement track 2518: B6 0D DC LDA $0DDC ; if track 0 reached 251B: 27 07 BEQ $2524 ; goto $2524 251D: B6 0D DE LDA $0DDE ; get floppy status 2520: 81 00 CMPA #$00 ; if nothing happened 2522: 26 EB BNE $250F ; write next track 2524: B6 0D DE LDA $0DDE ; get floppy status 2527: 81 00 CMPA #$00 ; if noting happened 2529: 27 13 BEQ $253E ; skip repositioning 252B: BD 76 E9 JSR $76E9 ; step out & update track reg. 252E: 10 8E 03 A9 LDY #$03A9 ; delay length = $03a9 2532: BD 77 08 JSR $7708 ; delay 2535: BD 76 E0 JSR $76E0 ; step in & update track reg. 2538: 8E 40 00 LDX #$4000 ; DOSRAM pointer to $4000 253B: BD 76 BB JSR $76BB ; write track to floppy 253E: B6 0D DE LDA $0DDE ; get floppy status 2541: 81 00 CMPA #$00 ; if nothing happened 2543: 27 0A BEQ $254F ; RTS 2545: BD 73 04 JSR $7304 ; analyze floppy status 2548: 10 FE 0D E0 LDS $0DE0 ; restore stack pointer 254C: 7E 74 36 JMP $7436 ------------------------------------------------ 254F: 39 RTS ------------------------------------------------ --- create sector ID address mark -------------- ------------------------------------------------ 2550: C6 FE LDB #$FE ; ID address mark 2552: E7 80 STB ,X+ 2554: F6 0D E7 LDB $0DE7 ; track 2557: E7 80 STB ,X+ 2559: F6 0D CC LDB $0DCC ; side 255C: E7 80 STB ,X+ 255E: F6 0D D9 LDB $0DD9 ; sector 2561: E7 80 STB ,X+ 2563: B6 0D D9 LDA $0DD9 2566: 81 05 CMPA #$05 ; if floppy sector != 5 2568: 26 04 BNE $256E ; goto $256e 256A: C6 02 LDB #$02 256C: 20 02 BRA $2570 ------------------------------------------------ 256E: C6 03 LDB #$03 ; length code ($02 or $03) 2570: E7 80 STB ,X+ 2572: C6 F7 LDB #$F7 ; write 2-byte CRC 2574: E7 80 STB ,X+ 2576: 39 RTS ------------------------------------------------ --- create empty sector data (format) ---------- ------------------------------------------------ 2577: C6 FB LDB #$FB ; data address mark 2579: E7 80 STB ,X+ 257B: B6 0D D9 LDA $0DD9 ; get sector 257E: 81 05 CMPA #$05 ; if sector != 5 2580: 26 06 BNE $2588 ; prepare 1024 byte transfer 2582: 10 8E 02 00 LDY #$0200 ; else 2586: 20 04 BRA $258C ; prepare 512 byte transfer ------------------------------------------------ 2588: 10 8E 04 00 LDY #$0400 ; prepare 1024 bytes transfer 258C: C6 B6 LDB #$B6 ; write %110110110110110110 258E: 86 6D LDA #$6D ; to disk 2590: ED 81 STD ,X++ 2592: 31 3E LEAY -$02,Y 2594: 10 8C 00 00 CMPY #$0000 ; all data written? 2598: 26 F6 BNE $2590 ; if not, do it 259A: C6 F7 LDB #$F7 ; write 2-byte CRC 259C: E7 80 STB ,X+ 259E: 39 RTS ------------------------------------------------ --- write byte to sector data ------------------ ------------------------------------------------ 259F: E7 80 STB ,X+ ; store byte in sector data 25A1: 31 3F LEAY -$01,Y 25A3: 10 8C 00 00 CMPY #$0000 ; all data written? 25A7: 26 F6 BNE $259F ; if not, do it 25A9: 39 RTS ------------------------------------------------ --- verify disk -------------------------------- ------------------------------------------------ 25AA: 7F 0D D9 CLR $0DD9 ; sector = 0 25AD: BD 76 43 JSR $7643 ; read sector data & discard 25B0: B6 0D DE LDA $0DDE ; get floppy status 25B3: 81 00 CMPA #$00 ; if nothing happened 25B5: 27 06 BEQ $25BD ; goto $25bd 25B7: 86 05 LDA #$05 ; floppy error = 5 25B9: B7 0D E2 STA $0DE2 25BC: 39 RTS ------------------------------------------------ 25BD: 7C 0D D9 INC $0DD9 ; increment sector 25C0: B6 0D D9 LDA $0DD9 ; get sector number 25C3: 81 06 CMPA #$06 ; repeat until sector 6 25C5: 26 E6 BNE $25AD ; reached 25C7: B6 0D CC LDA $0DCC ; change head 25CA: 88 01 EORA #$01 25CC: B7 0D CC STA $0DCC 25CF: BD 76 7D JSR $767D 25D2: 7F 0D D9 CLR $0DD9 ; sector = 0 25D5: BD 76 43 JSR $7643 ; read sector & discard data 25D8: B6 0D DE LDA $0DDE ; get floppy status 25DB: 81 00 CMPA #$00 ; if nothing happened 25DD: 27 06 BEQ $25E5 ; goto $25e5 25DF: 86 05 LDA #$05 ; floppy error = 5 25E1: B7 0D E2 STA $0DE2 25E4: 39 RTS ------------------------------------------------ 25E5: 7C 0D D9 INC $0DD9 ; increment sector 25E8: B6 0D D9 LDA $0DD9 ; get sector number 25EB: 81 06 CMPA #$06 ; repeat until sector 6 25ED: 26 E6 BNE $25D5 ; reached 25EF: 7A 0D E7 DEC $0DE7 ; decrement track 25F2: B6 0D E7 LDA $0DE7 ; get track number 25F5: 81 FF CMPA #$FF ; if track underrun 25F7: 27 03 BEQ $25FC ; goto $25fc 25F9: BD 73 AB JSR $73AB 25FC: B6 0D E7 LDA $0DE7 ; get track number 25FF: 81 FF CMPA #$FF ; if track underrun 2601: 27 09 BEQ $260C ; goto $260c 2603: B6 0D DE LDA $0DDE ; get floppy status 2606: 81 00 CMPA #$00 ; if nothing happened 2608: 10 27 FF 9E LBEQ $25AA ; goto $25aa 260C: 7F 0D E7 CLR $0DE7 ; track = 0 260F: B6 0D DE LDA $0DDE ; get floppy status 2612: 81 00 CMPA #$00 ; nothing happened 2614: 27 03 BEQ $2619 ; -> RTS 2616: 7E 73 04 JMP $7304 ------------------------------------------------ 2619: 39 RTS ------------------------------------------------ --- read sector from disk ---------------------- ------------------------------------------------ 261A: B6 0D D9 LDA $0DD9 ; get sector 261D: 97 02 STA $02 ; write to FDC SR 261F: 10 8E 04 01 LDY #$0401 ; if sector==5 then 2623: 81 05 CMPA #$05 ; sector length = 1024 2625: 26 04 BNE $262B ; else 2627: 10 8E 02 01 LDY #$0201 ; sector length = 512 262B: 86 88 LDA #$88 ; command = read sector 262D: B7 0D DF STA $0DDF ; store command 2630: 97 00 STA $00 ; write command to FDC SR 2632: 13 SYNC ; wait for completion 2633: 96 03 LDA $03 ; get data from FDC 2635: 31 3F LEAY -$01,Y 2637: 26 06 BNE $263F ; store data to OSRAM 2639: 86 08 LDA #$08 ; simulate CRC error (?) 263B: B7 0D DE STA $0DDE 263E: 39 RTS ------------------------------------------------ --- store sector data to OSRAM ----------------- ------------------------------------------------ 263F: A7 80 STA ,X+ 2641: 20 EF BRA $2632 ------------------------------------------------ --- verify sector ------------------------------ ------------------------------------------------ 2643: B6 0D D9 LDA $0DD9 ; get floppy sector 2646: 97 02 STA $02 ; write to FDC SR 2648: 10 8E 04 01 LDY #$0401 ; if sector==5 264C: 81 05 CMPA #$05 ; sector length = 1024 264E: 26 04 BNE $2654 ; else 2650: 10 8E 02 01 LDY #$0201 ; sector length = 512 2654: 86 88 LDA #$88 ; command = read sector 2656: B7 0D DF STA $0DDF ; store command 2659: 97 00 STA $00 ; write to FDC CR 265B: 13 SYNC ; wait for completion 265C: 96 03 LDA $03 ; get floppy data 265E: 31 3F LEAY -$01,Y ; y=y-1 2660: 26 06 BNE $2668 ; got all data? no -> dly&loop 2662: 86 08 LDA #$08 ; simulate CRC error (?) 2664: B7 0D DE STA $0DDE 2667: 39 RTS ------------------------------------------------ 2668: 20 F1 BRA $265B ; delay & loop ------------------------------------------------ --- write sector to floppy --------------------- ------------------------------------------------ 266A: B6 0D D9 LDA $0DD9 ; get sector 266D: 97 02 STA $02 ; write to FDC SR 266F: 86 A8 LDA #$A8 ; command = write sector 2671: B7 0D DF STA $0DDF ; store command 2674: 97 00 STA $00 ; write command to FDC WR 2676: 13 SYNC ; wait for completion 2677: A6 80 LDA ,X+ ; transfer sector data 2679: 97 03 STA $03 267B: 20 F9 BRA $2676 ; wait for completion ------------------------------------------------ --- access floppy head ------------------------- ------------------------------------------------ 267D: C6 01 LDB #$01 267F: B6 0D CC LDA $0DCC ; get floppy head 2682: 81 01 CMPA #$01 2684: 26 05 BNE $268B 2686: F7 64 0F STB $640F ; access floppy head 0 2689: 20 03 BRA $268E ------------------------------------------------ 268B: F7 64 0E STB $640E ; access floppy head 1 268E: B6 0D CB LDA $0DCB ; if next head = actual head 2691: B1 0D CC CMPA $0DCC ; skip this 2694: 27 1E BEQ $26B4 2696: B6 0D C7 LDA $0DC7 ; get floppy task 2699: 81 07 CMPA #$07 ; case task in 269B: 27 10 BEQ $26AD ; 1/3/5/7/8 : goto $26ad 269D: 81 05 CMPA #$05 269F: 27 0C BEQ $26AD 26A1: 81 03 CMPA #$03 26A3: 27 08 BEQ $26AD 26A5: 81 01 CMPA #$01 26A7: 27 04 BEQ $26AD 26A9: 81 08 CMPA #$08 26AB: 26 07 BNE $26B4 26AD: 10 8E 00 05 LDY #$0005 ; delay length = $0005 26B1: BD 77 08 JSR $7708 ; delay 26B4: B6 0D CC LDA $0DCC ; set next head = actual head 26B7: B7 0D CB STA $0DCB 26BA: 39 RTS ------------------------------------------------ --- write track to floppy ---------------------- ------------------------------------------------ 26BB: 86 F8 LDA #$F8 ; command = track write 26BD: B7 0D DF STA $0DDF ; store command in RAM 26C0: 97 00 STA $00 ; write to FDC CR 26C2: 13 SYNC ; wait for completion 26C3: A6 80 LDA ,X+ ; write data from buffer 26C5: 97 03 STA $03 ; to FDC DR 26C7: 20 F9 BRA $26C2 ------------------------------------------------ --- restore & update track register ------------ ------------------------------------------------ 26C9: 86 0F LDA #$0F ; command = restore 26CB: B7 0D DF STA $0DDF ; store command 26CE: 97 00 STA $00 ; write to FDC CR 26D0: 20 FE BRA $26D0 ; wait for completion ------------------------------------------------ --- seek track w/ verify & update track register ------------------------------------------------ 26D2: B6 0D E7 LDA $0DE7 ; get floppy track 26D5: 97 03 STA $03 ; write to FDC DR 26D7: 86 1F LDA #$1F ; command = seek track 26D9: B7 0D DF STA $0DDF ; store command 26DC: 97 00 STA $00 ; write to FDC CR 26DE: 20 FE BRA $26DE ; wait for completion ------------------------------------------------ --- step in & update track register ------------ ------------------------------------------------ 26E0: 86 5B LDA #$5B ; command = step in 26E2: B7 0D DF STA $0DDF ; store command 26E5: 97 00 STA $00 ; write to FDC CR 26E7: 20 FE BRA $26E7 ; wait for completion ------------------------------------------------ --- step out & update track register ----------- ------------------------------------------------ 26E9: 86 7B LDA #$7B ; command = step out 26EB: B7 0D DF STA $0DDF ; store command 26EE: 97 00 STA $00 ; write to FDC CR 26F0: 20 FE BRA $26F0 ; wait for completion (irq) ------------------------------------------------ --- reset floppy & get status ------------------ ------------------------------------------------ 26F2: 86 D0 LDA #$D0 ; FDC: shut off irq output 26F4: B7 0D DF STA $0DDF 26F7: 97 00 STA $00 ; send command to FDC 26F9: D6 00 LDB $00 ; wait for index pulse 26FB: C5 01 BITB #$01 ; 26FD: 26 FA BNE $26F9 ; 26FF: F7 0D DE STB $0DDE ; get floppy status 2702: 10 8E 00 01 LDY #$0001 ; delay length 2706: 20 00 BRA $2708 ; floppy delay ------------------------------------------------ --- delay routine ------------------------------ ------------------------------------------------ 2708: 12 NOP ; delay loop 2709: 12 NOP 270A: 12 NOP 270B: 12 NOP 270C: 12 NOP 270D: 12 NOP 270E: 12 NOP 270F: 12 NOP 2710: 12 NOP 2711: 12 NOP 2712: 12 NOP 2713: 12 NOP 2714: 31 3F LEAY -$01,Y ; y-- 2716: 26 F0 BNE $2708 2718: 39 RTS ------------------------------------------------ --- floppy: get status after sector read ------- ------------------------------------------------ 2719: 32 6C LEAS +$0C,S ; s=s+12 271B: D6 00 LDB $00 ; get floppy status 271D: B6 0D DF LDA $0DDF ; get last floppy command 2720: 81 88 CMPA #$88 ; command = read 2722: 26 04 BNE $2728 2724: C4 5C ANDB #$5C ; wp/rnf/crc/id-rq 2726: 20 25 BRA $274D ------------------------------------------------ --- floppy: get status after seek (track 0) ---- ------------------------------------------------ 2728: 81 1F CMPA #$1F ; command = seek 272A: 26 0F BNE $273B 272C: B6 0D E7 LDA $0DE7 272F: 26 06 BNE $2737 2731: C4 1C ANDB #$1C ; rnf/crc/id-rq 2733: C8 04 EORB #$04 2735: 20 02 BRA $2739 ; finish with delay ------------------------------------------------ --- floppy: get status after seek (other tracks) ------------------------------------------------ 2737: C4 18 ANDB #$18 ; rnf/crc 2739: 20 12 BRA $274D ------------------------------------------------ --- floppy: get status after sector write ------ ------------------------------------------------ 273B: 81 A8 CMPA #$A8 ; command = write sector 273D: 26 04 BNE $2743 273F: C4 5C ANDB #$5C ; wp/rnf/crc/id-rq 2741: 20 0A BRA $274D ------------------------------------------------ --- floppy: get status after track write ------- ------------------------------------------------ 2743: 81 F8 CMPA #$F8 ; command = write track 2745: 26 04 BNE $274B 2747: C4 5C ANDB #$5C ; wp/rnf/crc/id-rq 2749: 20 02 BRA $274D ------------------------------------------------ --- floppy: get status (all other commands) ---- ------------------------------------------------ 274B: C4 18 ANDB #$18 ; rnf/crc 274D: F7 0D DE STB $0DDE ; write status to RAM 2750: 39 RTS ------------------------------------------------ --- floppy handler ----------------------------- ------------------------------------------------ 2751: 70 63 FDB $7063 2753: 70 63 FDB $7063 2755: 70 B4 FDB $70B4 2757: 70 B4 FDB $70B4 2759: 70 48 FDB $7048 275B: 70 48 FDB $7048 275D: 70 48 FDB $7048 275F: 70 48 FDB $7048 2761: 74 2A FDB $742A ; verify sector 2763: 70 63 FDB $7063 ------------------------------------------------ --- directory positions ------------------------ ------------------------------------------------ 2765: 00 00 00 55 91 00 00 55 11 01 01 55 00 01 01 55 ...U...U...U...U ------------------------------------------------ --- position of 10 SEQRAM contents ------------- ------------------------------------------------ 2775: 00 00 06 03 01 06 0C 42 91 0C 13 31 10 13 19 20 .......B...1... 2785: 80 19 1F 14 00 20 26 03 01 26 2C 42 91 2C 33 31 ..... &..&,B.,31 2795: 10 33 39 20 80 39 3F 14 .39 .9?. ------------------------------------------------ --- position of 40 program banks --------------- ------------------------------------------------ 279D: 80 40 40 03 80 40 41 42 80 41 42 31 80 42 43 20 .@@..@AB.AB1.BC 27AD: 80 43 43 14 80 44 44 03 80 44 45 42 80 45 46 31 .CC..DD..DEB.EF1 27BD: 80 46 47 20 80 47 47 14 80 48 48 03 80 48 49 42 .FG .GG..HH..HIB 27CD: 80 49 4A 31 80 4A 4B 20 80 4B 4B 14 80 4C 4C 03 .IJ1.JK .KK..LL. 27DD: 80 4C 4D 42 80 4D 4E 31 80 4E 4F 20 80 4F 4F 14 .LMB.MN1.NO .OO. 27ED: 91 40 40 03 91 40 41 42 91 41 42 31 91 42 43 20 .@@..@AB.AB1.BC 27FD: 91 43 43 14 91 44 44 03 91 44 45 42 91 45 46 31 .CC..DD..DEB.EF1 280D: 91 46 47 20 91 47 47 14 91 48 48 03 91 48 49 42 .FG .GG..HH..HIB 281D: 91 49 4A 31 91 4A 4B 20 91 4B 4B 14 91 4C 4C 03 .IJ1.JK .KK..LL. 282D: 91 4C 4D 42 91 4D 4E 31 91 4E 4F 20 91 4F 4F 14 .LMB.MN1.NO .OO. ------------------------------------------------ --- position of 128 single sounds -------------- ------------------------------------------------ 283D: 00 02 02 55 00 03 03 55 00 04 04 55 00 05 05 55 ...U...U...U...U 284D: 00 42 42 55 00 07 07 55 00 08 08 55 00 09 09 55 .BBU...U...U...U 285D: 00 0A 0A 55 00 0B 0B 55 00 0C 0C 55 00 0D 0D 55 ...U...U...U...U 286D: 00 0E 0E 55 00 0F 0F 55 00 10 10 55 00 11 11 55 ...U...U...U...U 287D: 00 12 12 55 00 13 13 55 00 14 14 55 00 15 15 55 ...U...U...U...U 288D: 00 16 16 55 00 17 17 55 00 18 18 55 11 42 42 55 ...U...U...U.BBU 289D: 00 1A 1A 55 00 1B 1B 55 00 1C 1C 55 00 1D 1D 55 ...U...U...U...U 28AD: 00 1E 1E 55 00 43 43 55 00 20 20 55 00 21 21 55 ...U.CCU. U.!!U 28BD: 00 22 22 55 00 23 23 55 00 24 24 55 00 25 25 55 .""U.##U.$$U.%%U 28CD: 11 43 43 55 00 27 27 55 00 28 28 55 00 29 29 55 .CCU.''U.((U.))U 28DD: 00 2A 2A 55 00 2B 2B 55 00 2C 2C 55 00 2D 2D 55 .**U.++U.,,U.--U 28ED: 00 2E 2E 55 00 2F 2F 55 00 30 30 55 00 31 31 55 ...U.//U.00U.11U 28FD: 00 32 32 55 00 33 33 55 00 34 34 55 00 35 35 55 .22U.33U.44U.55U 290D: 00 36 36 55 00 37 37 55 00 38 38 55 00 44 44 55 .66U.77U.88U.DDU 291D: 00 3A 3A 55 00 3B 3B 55 00 3C 3C 55 00 3D 3D 55 .::U.;;U.<>U.DDU.@@U.AAU 293D: 11 02 02 55 11 03 03 55 11 04 04 55 11 05 05 55 ...U...U...U...U 294D: 11 06 06 55 11 07 07 55 11 08 08 55 11 09 09 55 ...U...U...U...U 295D: 11 0A 0A 55 11 0B 0B 55 00 45 45 55 11 0D 0D 55 ...U...U.EEU...U 296D: 11 0E 0E 55 11 0F 0F 55 11 10 10 55 11 11 11 55 ...U...U...U...U 297D: 11 12 12 55 11 45 45 55 11 14 14 55 11 15 15 55 ...U.EEU...U...U 298D: 11 16 16 55 11 17 17 55 11 18 18 55 11 19 19 55 ...U...U...U...U 299D: 11 1A 1A 55 11 1B 1B 55 11 1C 1C 55 11 1D 1D 55 ...U...U...U...U 29AD: 11 1E 1E 55 11 1F 1F 55 11 20 20 55 11 21 21 55 ...U...U. U.!!U 29BD: 11 22 22 55 11 23 23 55 11 24 24 55 11 25 25 55 .""U.##U.$$U.%%U 29CD: 11 26 26 55 11 27 27 55 11 28 28 55 11 29 29 55 .&&U.''U.((U.))U 29DD: 11 2A 2A 55 11 2B 2B 55 00 46 46 55 11 2D 2D 55 .**U.++U.FFU.--U 29ED: 11 2E 2E 55 11 2F 2F 55 11 30 30 55 11 31 31 55 ...U.//U.00U.11U 29FD: 11 32 32 55 11 46 46 55 11 34 34 55 11 35 35 55 .22U.FFU.44U.55U 2A0D: 11 36 36 55 11 37 37 55 11 38 38 55 11 39 39 55 .66U.77U.88U.99U 2A1D: 11 3A 3A 55 11 3B 3B 55 11 3C 3C 55 11 3D 3D 55 .::U.;;U.<>U.??U.@@U.AAU ------------------------------------------------ --- master routine (2) via $f765 --------------- --- S: $0ef4 ROMLOW: $2000 --------------- ------------------------------------------------ 2A3D: BD 84 29 JSR $8429 ; handler moving (?) 2A40: AD B8 02 JSR [+$02,Y] ; to voice block handler 2A43: 20 F8 BRA $2A3D ; loop ------------------------------------------------ 2A45: 7E 98 CF JMP $98CF ------------------------------------------------ 2A48: AE 24 LDX +$04,Y 2A4A: EC 26 LDD +$06,Y 2A4C: BD 84 9F JSR $849F 2A4F: 7E 8B 6C JMP $8B6C ------------------------------------------------ 2A52: BD 7B 90 JSR $7B90 2A55: 9E 50 LDX $50 2A57: DE 52 LDU $52 2A59: E6 44 LDB +$04,U 2A5B: C1 04 CMPB #$04 2A5D: 25 13 BCS $2A72 2A5F: C6 01 LDB #$01 2A61: A6 C5 LDA B,U 2A63: 5A DECB 2A64: A7 C5 STA B,U 2A66: CB 02 ADDB #$02 2A68: C1 04 CMPB #$04 2A6A: 25 F5 BCS $2A61 2A6C: 96 54 LDA $54 2A6E: A7 43 STA +$03,U 2A70: 20 07 BRA $2A79 ------------------------------------------------ 2A72: 96 54 LDA $54 2A74: A7 C5 STA B,U 2A76: 5C INCB 2A77: E7 44 STB +$04,U 2A79: 0F 60 CLR $60 2A7B: DE 5C LDU $5C 2A7D: BD 7D 2B JSR $7D2B 2A80: 96 60 LDA $60 2A82: 97 56 STA $56 2A84: 10 9F 57 STY $57 2A87: 86 80 LDA #$80 2A89: 97 60 STA $60 2A8B: DE 5E LDU $5E 2A8D: 27 05 BEQ $2A94 2A8F: BD 7D 2B JSR $7D2B 2A92: 20 08 BRA $2A9C ------------------------------------------------ 2A94: 96 DF LDA $DF 2A96: 27 04 BEQ $2A9C 2A98: 86 02 LDA #$02 2A9A: 97 60 STA $60 2A9C: 96 60 LDA $60 2A9E: 84 7F ANDA #$7F 2AA0: 97 59 STA $59 2AA2: 10 9F 5A STY $5A 2AA5: 9E 52 LDX $52 2AA7: 96 54 LDA $54 2AA9: A7 05 STA +$05,X 2AAB: 96 DF LDA $DF 2AAD: 27 13 BEQ $2AC2 2AAF: 96 56 LDA $56 2AB1: 81 02 CMPA #$02 2AB3: 26 0D BNE $2AC2 2AB5: 96 59 LDA $59 2AB7: 81 02 CMPA #$02 2AB9: 26 07 BNE $2AC2 2ABB: 9E 50 LDX $50 2ABD: DC 54 LDD $54 2ABF: 7E 8B 45 JMP $8B45 ------------------------------------------------ 2AC2: 96 56 LDA $56 2AC4: 81 02 CMPA #$02 2AC6: 26 07 BNE $2ACF 2AC8: DE 5C LDU $5C 2ACA: 0F 60 CLR $60 2ACC: BD 7E 84 JSR $7E84 2ACF: 96 59 LDA $59 2AD1: 81 02 CMPA #$02 2AD3: 26 0B BNE $2AE0 2AD5: DE 5E LDU $5E 2AD7: 27 07 BEQ $2AE0 2AD9: 86 80 LDA #$80 2ADB: 97 60 STA $60 2ADD: BD 7E 84 JSR $7E84 2AE0: 39 RTS ------------------------------------------------ 2AE1: BD 7B 90 JSR $7B90 2AE4: DE 52 LDU $52 2AE6: 86 02 LDA #$02 2AE8: 97 55 STA $55 2AEA: E6 44 LDB +$04,U 2AEC: 5A DECB 2AED: 2B 27 BMI $2B16 2AEF: 96 54 LDA $54 2AF1: A1 C5 CMPA B,U 2AF3: 26 08 BNE $2AFD 2AF5: 86 01 LDA #$01 2AF7: 97 55 STA $55 2AF9: 6A 44 DEC +$04,U 2AFB: 20 17 BRA $2B14 ------------------------------------------------ 2AFD: 5A DECB 2AFE: A1 85 CMPA B,X 2B00: 26 0F BNE $2B11 2B02: 5C INCB 2B03: A6 85 LDA B,X 2B05: 5A DECB 2B06: A7 85 STA B,X 2B08: 5C INCB 2B09: E1 44 CMPB +$04,U 2B0B: 26 F5 BNE $2B02 2B0D: 6A 44 DEC +$04,U 2B0F: 20 09 BRA $2B1A ------------------------------------------------ 2B11: 5A DECB 2B12: 2A EA BPL $2AFE 2B14: 20 04 BRA $2B1A ------------------------------------------------ 2B16: 86 01 LDA #$01 2B18: 97 55 STA $55 2B1A: DE 5C LDU $5C 2B1C: 0F 60 CLR $60 2B1E: BD 7E C6 JSR $7EC6 2B21: 86 80 LDA #$80 2B23: 97 60 STA $60 2B25: DE 5E LDU $5E 2B27: BD 7E C6 JSR $7EC6 2B2A: 39 RTS ------------------------------------------------ 2B2B: 6F A8 63 CLR +$63,Y 2B2E: A6 29 LDA +$09,Y 2B30: 84 02 ANDA #$02 2B32: 27 0C BEQ $2B40 2B34: 34 40 PSHS U 2B36: CE 00 48 LDU #$0048 2B39: BD 7C 3D JSR $7C3D 2B3C: 35 40 PULS U 2B3E: 20 0A BRA $2B4A ------------------------------------------------ 2B40: 34 40 PSHS U 2B42: CE 00 4C LDU #$004C 2B45: BD 7C 3D JSR $7C3D 2B48: 35 40 PULS U 2B4A: A6 28 LDA +$08,Y 2B4C: 2A 04 BPL $2B52 2B4E: AE 26 LDX +$06,Y 2B50: 6F 04 CLR +$04,X 2B52: CC 00 00 LDD #$0000 2B55: ED 26 STD +$06,Y 2B57: 34 40 PSHS U 2B59: CE 00 46 LDU #$0046 2B5C: BD 7C 26 JSR $7C26 2B5F: 35 40 PULS U 2B61: 39 RTS ------------------------------------------------ 2B62: AE 24 LDX +$04,Y 2B64: BD 84 9F JSR $849F 2B67: 10 9E 4C LDY $4C 2B6A: 27 23 BEQ $2B8F 2B6C: E6 29 LDB +$09,Y 2B6E: C4 04 ANDB #$04 2B70: 27 18 BEQ $2B8A 2B72: AC 24 CMPX +$04,Y 2B74: 27 05 BEQ $2B7B 2B76: 8C 00 00 CMPX #$0000 2B79: 26 0F BNE $2B8A 2B7B: 4F CLRA 2B7C: 64 29 LSR +$09,Y 2B7E: 46 RORA 2B7F: 8A 01 ORA #$01 2B81: A7 29 STA +$09,Y 2B83: 34 10 PSHS X 2B85: BD EE AA JSR $EEAA ; envelope related 2B88: 35 10 PULS X 2B8A: 10 AE A4 LDY ,Y 2B8D: 20 DB BRA $2B6A ; loop ------------------------------------------------ 2B8F: 39 RTS ------------------------------------------------ --- get actual program (single & layer) -------- ------------------------------------------------ 2B90: EE 24 LDU +$04,Y 2B92: DF 50 STU $50 2B94: 30 4F LEAX +$0F,U 2B96: 9F 52 STX $52 2B98: EC 26 LDD +$06,Y ; key & velocity 2B9A: DD 54 STD $54 ; 2B9C: BD 84 9F JSR $849F 2B9F: EC C4 LDD ,U 2BA1: 10 83 0D 6A CMPD #$0D6A 2BA5: 27 04 BEQ $2BAB 2BA7: A6 42 LDA +$02,U 2BA9: 8D 51 BSR $2BFC ; get program address 2BAB: DD 5C STD $5C ; store split program address 2BAD: 1F 03 TFR D,U ; program address to U 2BAF: A6 C8 27 LDA +$27,U ; check LAYER flag 2BB2: 2A 04 BPL $2BB8 ; ------------------------------------------------; layered 2BB4: 8D 46 BSR $2BFC ; get program address 2BB6: 20 03 BRA $2BBB ------------------------------------------------; not layered 2BB8: CC 00 00 LDD #$0000 2BBB: DD 5E STD $5E ; store layer program address 2BBD: E6 C8 28 LDB +$28,U ; check SPLIT flag 2BC0: 2A 23 BPL $2BE5 ; 2BC2: E6 C8 26 LDB +$26,U ; get split point 2BC5: C4 7F ANDB #$7F ; 2BC7: D1 54 CMPB $54 ; compare with actual key 2BC9: 22 07 BHI $2BD2 ; ------------------------------------------------; key below split point 2BCB: 9E 50 LDX $50 2BCD: 30 88 15 LEAX +$15,X 2BD0: 9F 52 STX $52 ------------------------------------------------; key above split point 2BD2: A6 C8 26 LDA +$26,U ; check split direction 2BD5: 2B 08 BMI $2BDF ; ------------------------------------------------; split direction: lower 2BD7: D1 54 CMPB $54 ; key below split point 2BD9: 23 02 BLS $2BDD ; -> RTS 2BDB: 8D 09 BSR $2BE6 2BDD: 20 06 BRA $2BE5 ------------------------------------------------; split direction: upper 2BDF: D1 54 CMPB $54 ; key above split point 2BE1: 22 02 BHI $2BE5 ; -> RTS 2BE3: 8D 01 BSR $2BE6 ------------------------------------------------; not split 2BE5: 39 RTS ------------------------------------------------ --- get split program -------------------------- ------------------------------------------------ 2BE6: A6 C8 28 LDA +$28,U ; get split program 2BE9: 8D 11 BSR $2BFC ; get program address 2BEB: DD 5C STD $5C ; 2BED: A6 C8 29 LDA +$29,U ; get SPLIT/LAYER flag 2BF0: 2A 04 BPL $2BF6 ------------------------------------------------; SPLIT/LAYER on 2BF2: 8D 08 BSR $2BFC ; get program address 2BF4: 20 03 BRA $2BF9 ------------------------------------------------; SPLIT/LAYER off 2BF6: CC 00 00 LDD #$0000 2BF9: DD 5E STD $5E 2BFB: 39 RTS ------------------------------------------------ --- get program address ------------------------ ------------------------------------------------ 2BFC: 84 7F ANDA #$7F ; get program 2BFE: 81 50 CMPA #$50 ; CART B programs? 2C00: 25 09 BCS $2C0B ; ------------------------------------------------; CART B programs 2C02: F6 3F FD LDB $3FFD ; programs on CART B? 2C05: 27 02 BEQ $2C09 ; no -> use internal 2C07: 8D 14 BSR $2C1D 2C09: 20 0B BRA $2C16 ------------------------------------------------; CART A or INTERNAL program 2C0B: 81 28 CMPA #$28 ; CART A or INTERNAL? 2C0D: 25 07 BCS $2C16 ; ------------------------------------------------; CART A programs 2C0F: F6 3F FE LDB $3FFE ; programs on CART A 2C12: 27 02 BEQ $2C16 ; no -> use internal 2C14: 8D 07 BSR $2C1D ------------------------------------------------; INTERNAL programs 2C16: C6 66 LDB #$66 2C18: 3D MUL 2C19: C3 10 4A ADDD #$104A 2C1C: 39 RTS ------------------------------------------------ --- skip CART offset of program number --------- ------------------------------------------------ 2C1D: 81 28 CMPA #$28 2C1F: 25 04 BCS $2C25 2C21: 80 28 SUBA #$28 2C23: 20 F8 BRA $2C1D ------------------------------------------------ 2C25: 39 RTS ------------------------------------------------ 2C26: AE C4 LDX ,U 2C28: 26 05 BNE $2C2F 2C2A: 10 AF 5E STY -$02,U 2C2D: 20 03 BRA $2C32 ------------------------------------------------ 2C2F: 10 AF 84 STY ,X 2C32: 10 AF C4 STY ,U 2C35: AF 22 STX +$02,Y 2C37: CE 00 00 LDU #$0000 2C3A: EF A4 STU ,Y 2C3C: 39 RTS ------------------------------------------------ 2C3D: 34 40 PSHS U ; U to stack 2C3F: 33 42 LEAU +$02,U ; U+2 to stack 2C41: 34 40 PSHS U 2C43: EE 22 LDU +$02,Y ; U=(Y+2) 2C45: 27 0E BEQ $2C55 2C47: AE A4 LDX ,Y ; X=(Y) 2C49: AF C4 STX ,U ; (Y)->Y+2 2C4B: 26 04 BNE $2C51 2C4D: EF F4 STU [,S] ; Y+2 to [S] 2C4F: 20 02 BRA $2C53 ------------------------------------------------ 2C51: EF 02 STU +$02,X ; 2C53: 20 0D BRA $2C62 ------------------------------------------------ 2C55: AE A4 LDX ,Y 2C57: AF F8 02 STX [+$02,S] 2C5A: 27 04 BEQ $2C60 2C5C: EF 02 STU +$02,X 2C5E: 20 02 BRA $2C62 ------------------------------------------------ 2C60: EF F4 STU [,S] ; 2C62: 32 64 LEAS +$04,S ; restore stack pointer 2C64: 39 RTS ------------------------------------------------ 2C65: AE 24 LDX +$04,Y ; key & velocity 2C67: EC 26 LDD +$06,Y 2C69: BD 84 9F JSR $849F 2C6C: CE 40 70 LDU #$4070 ; voice data base 2C6F: 4D TSTA 2C70: 2A 02 BPL $2C74 2C72: E7 0B STB +$0B,X 2C74: AC 44 CMPX +$04,U 2C76: 26 0D BNE $2C85 2C78: 4D TSTA 2C79: 2B 07 BMI $2C82 2C7B: A1 C8 61 CMPA +$61,U 2C7E: 27 02 BEQ $2C82 2C80: 20 03 BRA $2C85 ------------------------------------------------ 2C82: E7 C8 63 STB +$63,U 2C85: 33 C9 00 E7 LEAU +$00E7,U ; next voice data block 2C89: 11 83 47 A8 CMPU #$47A8 2C8D: 25 E5 BCS $2C74 2C8F: 39 RTS ------------------------------------------------ 2C90: EC 24 LDD +$04,Y ; key & velocity 2C92: BD 84 9F JSR $849F 2C95: 34 06 PSHS B,A 2C97: 10 9E 48 LDY $48 2C9A: 27 1E BEQ $2CBA 2C9C: EC 24 LDD +$04,Y ; key & velocity 2C9E: DD 50 STD $50 2CA0: 10 A3 E4 CMPD ,S 2CA3: 27 04 BEQ $2CA9 2CA5: EC E4 LDD ,S 2CA7: 26 0C BNE $2CB5 2CA9: AE 26 LDX +$06,Y 2CAB: 6F 04 CLR +$04,X 2CAD: BD 7F 1E JSR $7F1E 2CB0: 10 9E 48 LDY $48 2CB3: 20 03 BRA $2CB8 ------------------------------------------------ 2CB5: 10 AE A4 LDY ,Y 2CB8: 20 E0 BRA $2C9A ------------------------------------------------ 2CBA: 35 86 PULS PC,B,A ------------------------------------------------ 2CBC: 6F 88 13 CLR +$13,X 2CBF: 6F 88 19 CLR +$19,X 2CC2: 39 RTS --- voice initialization ------------------------------------------------ 2CC3: 34 06 PSHS B,A 2CC5: CC 78 59 LDD #$7859 ; initialize all voices 2CC8: 34 06 PSHS B,A ; 2CCA: CC 0E 02 LDD #$0E02 ; 2CCD: BD 85 B4 JSR $85B4 ; 2CD0: 8E 02 D4 LDX #$02D4 2CD3: 6F 88 13 CLR +$13,X 2CD6: 6F 88 19 CLR +$19,X 2CD9: 6F 07 CLR +$07,X 2CDB: 6F 08 CLR +$08,X 2CDD: 6F 09 CLR +$09,X 2CDF: 6F 0A CLR +$0A,X 2CE1: 6F 0B CLR +$0B,X 2CE3: 86 40 LDA #$40 2CE5: A7 06 STA +$06,X 2CE7: 30 88 1B LEAX +$1B,X 2CEA: 8C 03 C7 CMPX #$03C7 2CED: 26 E4 BNE $2CD3 2CEF: CC 00 00 LDD #$0000 2CF2: DD 4C STD $4C 2CF4: DD 4E STD $4E 2CF6: DD 48 STD $48 2CF8: DD 4A STD $4A 2CFA: 8E 40 70 LDX #$4070 ; voice data base 2CFD: 9F 44 STX $44 ; to $44 2CFF: 1F 10 TFR X,D 2D01: 1F 13 TFR X,U 2D03: 6F 46 CLR +$06,U 2D05: 6F 47 CLR +$07,U 2D07: 6F 49 CLR +$09,U 2D09: 6F 48 CLR +$08,U 2D0B: C3 00 E7 ADDD #$00E7 ; next voice data block 2D0E: ED 84 STD ,X 2D10: DD 46 STD $46 2D12: 1F 01 TFR D,X 2D14: EF 02 STU +$02,X 2D16: 10 83 46 C1 CMPD #$46C1 2D1A: 25 E3 BCS $2CFF 2D1C: CC 00 00 LDD #$0000 2D1F: ED 06 STD +$06,X 2D21: 6F 09 CLR +$09,X 2D23: 6F 08 CLR +$08,X 2D25: FD 40 72 STD $4072 2D28: ED 84 STD ,X 2D2A: 39 RTS ------------------------------------------------ 2D2B: A6 C8 23 LDA +$23,U 2D2E: 2B 07 BMI $2D37 2D30: B6 00 E2 LDA $00E2 2D33: 81 03 CMPA #$03 2D35: 26 08 BNE $2D3F 2D37: BD 7E 0E JSR $7E0E 2D3A: 86 80 LDA #$80 2D3C: A7 28 STA +$08,Y 2D3E: 39 RTS ------------------------------------------------ 2D3F: 10 9E 4C LDY $4C 2D42: 8D 7B BSR $2DBF 2D44: 24 53 BCC $2D99 2D46: A6 C8 22 LDA +$22,U ; check RESTART bit 2D49: 2B 32 BMI $2D7D ; ------------------------------------------------; no restart 2D4B: 34 20 PSHS Y 2D4D: 10 AE A4 LDY ,Y 2D50: 8D 6D BSR $2DBF 2D52: 24 04 BCC $2D58 2D54: 35 20 PULS Y 2D56: 20 25 BRA $2D7D ------------------------------------------------ 2D58: 10 9E 44 LDY $44 2D5B: 27 1E BEQ $2D7B 2D5D: 34 40 PSHS U 2D5F: CE 00 44 LDU #$0044 2D62: BD 7C 3D JSR $7C3D 2D65: 35 40 PULS U 2D67: 32 62 LEAS +$02,S 2D69: 8D 79 BSR $2DE4 2D6B: 6F 28 CLR +$08,Y 2D6D: 34 06 PSHS B,A 2D6F: CC E9 E9 LDD #$E9E9 ; jump to $e9e9 2D72: 34 06 PSHS B,A ; with ROMLOW $0000 2D74: CC 0E 00 LDD #$0E00 ; 2D77: BD 85 B4 JSR $85B4 ; 2D7A: 39 RTS ------------------------------------------------ 2D7B: 35 20 PULS Y ------------------------------------------------; restart 2D7D: 34 40 PSHS U 2D7F: CE 00 4C LDU #$004C 2D82: BD 7C 3D JSR $7C3D 2D85: 35 40 PULS U 2D87: 8D 5B BSR $2DE4 2D89: 6F 28 CLR +$08,Y 2D8B: 34 06 PSHS B,A 2D8D: CC E9 E4 LDD #$E9E4 ; jump tp $e9e4 2D90: 34 06 PSHS B,A ; with ROMLOW $0000 2D92: CC 0E 00 LDD #$0E00 ; 2D95: BD 85 B4 JSR $85B4 ; 2D98: 39 RTS ------------------------------------------------ 2D99: 10 9E 44 LDY $44 2D9C: 27 1C BEQ $2DBA 2D9E: 34 40 PSHS U 2DA0: CE 00 44 LDU #$0044 2DA3: BD 7C 3D JSR $7C3D 2DA6: 35 40 PULS U 2DA8: 8D 3A BSR $2DE4 2DAA: 6F 28 CLR +$08,Y 2DAC: 34 06 PSHS B,A 2DAE: CC E9 E9 LDD #$E9E9 ; jump to $e9e9 2DB1: 34 06 PSHS B,A ; with ROMLOW $0000 2DB3: CC 0E 00 LDD #$0E00 ; 2DB6: BD 85 B4 JSR $85B4 ; 2DB9: 39 RTS ------------------------------------------------ 2DBA: 86 02 LDA #$02 2DBC: 97 60 STA $60 2DBE: 39 RTS ------------------------------------------------ 2DBF: 10 8C 00 00 CMPY #$0000 2DC3: 27 1C BEQ $2DE1 2DC5: 96 54 LDA $54 2DC7: A1 A8 61 CMPA +$61,Y 2DCA: 26 10 BNE $2DDC 2DCC: EC 24 LDD +$04,Y 2DCE: 10 93 50 CMPD $50 2DD1: 26 09 BNE $2DDC 2DD3: 96 60 LDA $60 2DD5: A8 29 EORA +$09,Y 2DD7: 2B 03 BMI $2DDC 2DD9: 1A 01 ORCC #$01 ; set carry 2DDB: 39 RTS ------------------------------------------------ 2DDC: 10 AE A4 LDY ,Y 2DDF: 20 DE BRA $2DBF ------------------------------------------------ 2DE1: 1C FE ANDCC #$FE ; clear carry 2DE3: 39 RTS ------------------------------------------------ 2DE4: 9E 52 LDX $52 2DE6: A6 05 LDA +$05,X 2DE8: A7 A8 67 STA +$67,Y 2DEB: 34 40 PSHS U 2DED: CE 00 4A LDU #$004A 2DF0: BD 7C 26 JSR $7C26 2DF3: 35 40 PULS U 2DF5: DC 54 LDD $54 2DF7: ED A8 61 STD +$61,Y 2DFA: 9E 52 LDX $52 2DFC: AF 26 STX +$06,Y 2DFE: 9E 50 LDX $50 2E00: A6 0B LDA +$0B,X 2E02: A7 A8 63 STA +$63,Y 2E05: AF 24 STX +$04,Y 2E07: 86 02 LDA #$02 2E09: 9A 60 ORA $60 2E0B: A7 29 STA +$09,Y 2E0D: 39 RTS ------------------------------------------------ 2E0E: 10 8E 40 70 LDY #$4070 2E12: 9E 52 LDX $52 2E14: AC 26 CMPX +$06,Y 2E16: 26 42 BNE $2E5A 2E18: A6 29 LDA +$09,Y 2E1A: 98 60 EORA $60 2E1C: 2B 3C BMI $2E5A 2E1E: A6 29 LDA +$09,Y 2E20: 85 05 BITA #$05 2E22: 27 1B BEQ $2E3F 2E24: 34 40 PSHS U 2E26: CE 00 4C LDU #$004C 2E29: BD 7C 3D JSR $7C3D 2E2C: 35 40 PULS U 2E2E: BD 7D EB JSR $7DEB 2E31: 34 06 PSHS B,A 2E33: CC E9 E4 LDD #$E9E4 ; jump to $e9e4 2E36: 34 06 PSHS B,A ; with ROMLOW $0000 2E38: CC 0E 00 LDD #$0E00 ; 2E3B: BD 85 B4 JSR $85B4 ; 2E3E: 39 RTS ------------------------------------------------ 2E3F: 34 40 PSHS U 2E41: CE 00 48 LDU #$0048 2E44: BD 7C 3D JSR $7C3D 2E47: 35 40 PULS U 2E49: BD 7D EB JSR $7DEB 2E4C: 34 06 PSHS B,A 2E4E: CC F3 7E LDD #$F37E ; jump to $f37e 2E51: 34 06 PSHS B,A ; with ROMLOW $0000 2E53: CC 0E 00 LDD #$0E00 ; 2E56: BD 85 B4 JSR $85B4 ; 2E59: 39 RTS ------------------------------------------------ 2E5A: 31 A9 00 E7 LEAY +$00E7,Y 2E5E: 10 8C 47 A8 CMPY #$47A8 2E62: 25 B0 BCS $2E14 2E64: 10 9E 44 LDY $44 2E67: 27 1B BEQ $2E84 2E69: 34 40 PSHS U 2E6B: CE 00 44 LDU #$0044 2E6E: BD 7C 3D JSR $7C3D 2E71: 35 40 PULS U 2E73: BD 7D EB JSR $7DEB 2E76: 34 06 PSHS B,A 2E78: CC E9 E9 LDD #$E9E9 ; jump to $e9e9 2E7B: 34 06 PSHS B,A ; with ROMLOW $0000 2E7D: CC 0E 00 LDD #$0E00 ; 2E80: BD 85 B4 JSR $85B4 ; 2E83: 39 RTS ------------------------------------------------ 2E84: 10 9E 4C LDY $4C 2E87: 27 1B BEQ $2EA4 2E89: 34 40 PSHS U 2E8B: CE 00 4C LDU #$004C 2E8E: BD 7C 3D JSR $7C3D 2E91: 35 40 PULS U 2E93: BD 7D E4 JSR $7DE4 2E96: 34 06 PSHS B,A 2E98: CC E9 E9 LDD #$E9E9 ; jump to $e9e9 2E9B: 34 06 PSHS B,A ; with ROMLOW $0000 2E9D: CC 0E 00 LDD #$0E00 ; 2EA0: BD 85 B4 JSR $85B4 ; 2EA3: 39 RTS ------------------------------------------------ 2EA4: 10 9E 48 LDY $48 2EA7: 27 1B BEQ $2EC4 2EA9: 34 40 PSHS U 2EAB: CE 00 48 LDU #$0048 2EAE: BD 7C 3D JSR $7C3D 2EB1: 35 40 PULS U 2EB3: BD 7D E4 JSR $7DE4 2EB6: 34 06 PSHS B,A 2EB8: CC E9 E9 LDD #$E9E9 ; jump to $e9e9 2EBB: 34 06 PSHS B,A ; with ROMLOW $0000 2EBD: CC 0E 00 LDD #$0E00 ; 2EC0: BD 85 B4 JSR $85B4 ; 2EC3: 39 RTS ------------------------------------------------ 2EC4: 20 FE BRA $2EC4 ------------------------------------------------ 2EC6: A6 C8 23 LDA +$23,U ; check MONO flag 2EC9: 2B 07 BMI $2ED2 ; ------------------------------------------------; polyphonic mode 2ECB: B6 00 E2 LDA $00E2 2ECE: 81 03 CMPA #$03 2ED0: 26 44 BNE $2F16 ------------------------------------------------; monophonic mode 2ED2: 10 9E 48 LDY $48 2ED5: BD 7D BF JSR $7DBF 2ED8: 24 10 BCC $2EEA 2EDA: 6F A8 63 CLR +$63,Y 2EDD: A6 28 LDA +$08,Y 2EDF: 27 07 BEQ $2EE8 2EE1: B6 00 E2 LDA $00E2 2EE4: 81 03 CMPA #$03 2EE6: 26 02 BNE $2EEA 2EE8: 20 34 BRA $2F1E ------------------------------------------------ 2EEA: 96 55 LDA $55 2EEC: 81 02 CMPA #$02 2EEE: 26 01 BNE $2EF1 2EF0: 39 RTS ------------------------------------------------ 2EF1: 10 8C 00 00 CMPY #$0000 2EF5: 27 1E BEQ $2F15 2EF7: 9E 52 LDX $52 2EF9: E6 04 LDB +$04,X 2EFB: 27 16 BEQ $2F13 2EFD: 5A DECB 2EFE: A6 85 LDA B,X 2F00: A7 A8 61 STA +$61,Y 2F03: 34 06 PSHS B,A 2F05: CC F3 7E LDD #$F37E ; jump to $f37e 2F08: 34 06 PSHS B,A ; with ROMLOW $0000 2F0A: CC 0E 00 LDD #$0E00 ; 2F0D: BD 85 B4 JSR $85B4 ; 2F10: 39 RTS ------------------------------------------------ 2F11: 20 02 BRA $2F15 ------------------------------------------------ 2F13: 20 09 BRA $2F1E ------------------------------------------------ 2F15: 39 RTS ------------------------------------------------ 2F16: 10 9E 48 LDY $48 2F19: BD 7D BF JSR $7DBF 2F1C: 24 2B BCC $2F49 2F1E: 34 40 PSHS U 2F20: CE 00 48 LDU #$0048 2F23: BD 7C 3D JSR $7C3D 2F26: 35 40 PULS U 2F28: 34 40 PSHS U 2F2A: CE 00 4E LDU #$004E 2F2D: BD 7C 26 JSR $7C26 2F30: 35 40 PULS U 2F32: 9E 50 LDX $50 2F34: A6 07 LDA +$07,X 2F36: 26 0B BNE $2F43 2F38: 86 01 LDA #$01 2F3A: 9A 60 ORA $60 2F3C: A7 29 STA +$09,Y 2F3E: 7E EE AA JMP $EEAA ------------------------------------------------ 2F41: 20 06 BRA $2F49 ------------------------------------------------ 2F43: 86 04 LDA #$04 2F45: 9A 60 ORA $60 2F47: A7 29 STA +$09,Y 2F49: 39 RTS ------------------------------------------------ 2F4A: 01 01 01 01 0B 0B 0B 16 16 16 23 23 23 29 2D 1B ..........###)-. 2F5A: 3A 3B 40 48 :;@H ------------------------------------------------ 2F5E: CE 7F 4A LDU #$7F4A ; copy $2f4a-2f5e 2F61: 8E 0D 96 LDX #$0D96 ; to $0d96-$0daa 2F64: C6 14 LDB #$14 2F66: A6 C0 LDA ,U+ 2F68: A7 80 STA ,X+ 2F6A: 5A DECB 2F6B: 26 F9 BNE $2F66 2F6D: CC 10 4A LDD #$104A ; edit program pointer 2F70: FD 0D 07 STD $0D07 ; to $104a 2F73: BD BA 56 JSR $BA56 ; transfer a program to $0d30 2F76: 86 01 LDA #$01 ; edit program flag = 1 2F78: 97 AF STA $AF 2F7A: 7F 02 D8 CLR $02D8 2F7D: 86 01 LDA #$01 2F7F: B7 0D 1B STA $0D1B 2F82: 86 02 LDA #$02 2F84: 97 E0 STA $E0 2F86: 97 E1 STA $E1 2F88: 86 03 LDA #$03 2F8A: 97 E3 STA $E3 2F8C: 86 08 LDA #$08 2F8E: 97 DC STA $DC 2F90: 4C INCA 2F91: 97 DA STA $DA 2F93: 86 D0 LDA #$D0 2F95: B7 02 F2 STA $02F2 2F98: 7E A4 5A JMP $A45A ------------------------------------------------ --- spare -------------------------------------- ------------------------------------------------ 2F9B: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................ 2FAB: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................ 2FBB: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................ 2FCB: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................ 2FDB: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................ 2FEB: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................ 2FFB: FF FF FF FF FF ..... ------------------------------------------------ --- Factory Presets ---------------------------- --- organized as 40 Program Control Blocks ----- --- each 102 Bytes ($66) ----------------------- --- refer to p. 202/203 of SQ80 manual --------- ------------------------------------------------ 3000: 42 45 4C 54 4F 4D 9C 00 00 00 11 1B 1C 7A 00 09 BELTOM.......z.. 3010: 7E 64 5A 00 32 3F 0C 00 00 09 34 7E 7E 23 2C 3F ~dZ.2?....4~~#,? 3020: 97 02 3B 00 54 7A 56 26 1D 3F 9F 5A 3F 09 14 00 ..;.TzV&.?.Z?... 3030: 1F 54 16 80 E6 41 06 FF FF 40 18 00 30 04 08 2F .T...A...@..0../ 3040: EC FE 30 00 24 28 FF 00 00 44 FE FF 00 00 18 00 ..0.$(...D...... 3050: F1 02 00 2F E8 FE 26 00 7E 2F 03 55 3F 3F 34 00 .../..&.~/.U??4. 3060: 3C 00 00 00 82 06 4D 41 4C 4C 45 54 7E B8 00 00 <.....MALLET~... 3070: 2F 12 31 00 00 00 7E 1E FA 00 25 1E 1F 6D 00 00 /.1...~...%..m.. 3080: 7E C8 F0 00 1A 3F 00 62 00 1B 7E 7E 7E 00 00 10 ~....?.b..~~~... 3090: A8 AA 02 00 0F 80 C0 40 0F 9D CF 75 B2 6C 3B 69 .......@...u.l;i 30A0: 18 00 FF 00 00 02 80 03 72 20 18 00 FF 00 00 39 ........r .....9 30B0: F2 FF 00 00 34 00 FF 00 00 3B 80 44 3E 7E 7E 49 ....4....;.D>~~I 30C0: 00 F5 3F 00 00 80 15 00 00 00 80 3F 48 41 55 4E ..?........?HAUN 30D0: 54 20 9C 00 00 00 11 1B 1C 7A 00 09 7E 64 5A 00 T .......z..~dZ. 30E0: 32 3F 0C 00 00 09 34 7E 7E 23 2C 3F 97 02 2D 00 2?....4~~#,?..-. 30F0: 54 7A 56 1C 1D 3F 9F 5A 3F 09 14 00 1F 54 16 00 TzV..?.Z?....T.. 3100: 04 5C 06 FF FF 40 24 00 30 04 08 2C EC FF 00 00 .\...@$.0..,.... 3110: 24 28 30 FE 06 32 E4 FF 00 00 24 00 F1 02 00 2C $(0..2....$...., 3120: E8 FF 00 00 7E 2F 05 E5 3F 41 34 00 3C 00 00 00 ....~/..?A4.<... 3130: 82 0A 53 51 2D 42 52 53 44 00 00 00 0C 00 14 00 ..SQ-BRSD....... 3140: 00 01 7E 7E 7E 00 0F 3F 14 00 00 09 7E 7E 7E 09 ..~~~..?....~~~. 3150: 00 15 14 00 00 09 7E 7E 7E 00 00 00 80 00 00 00 ......~~~....... 3160: 16 80 D4 40 06 BF 00 3F D0 80 D4 41 24 00 03 04 ...@...?...A$... 3170: 04 2B EE EF 00 24 24 10 0F 00 04 2B EE EF 00 2E .+...$$....+.... 3180: 24 18 03 FA 04 2B EE EF 00 2A 7E 2B 04 E7 BF 18 $....+...*~+.... 3190: 80 80 3C 00 00 00 8F 00 54 4F 4D 54 57 4F 7E 82 ..<.....TOMTWO~. 31A0: 00 00 25 3F 27 02 00 09 7E 40 40 00 19 29 00 00 ..%?'...~@@..).. 31B0: 00 00 7E 7E 00 00 11 28 00 00 00 09 7E 7E 7E 00 ..~~...(....~~~. 31C0: 18 3F 14 60 13 00 13 BF FF 4D 11 3F 7F 4D FF FF .?......M.?.M.. 31D0: FF 7F 24 00 3B 30 02 44 F0 AF 00 00 18 08 FF 00 ..$.;0.D........ 31E0: 00 3E FE AF 00 00 18 20 FF 00 00 41 F0 A4 00 00 .>..... ...A.... 31F0: 7E 1A 00 75 BF 0D 9A 80 3E 00 6E 00 81 F8 46 4C ~..u....>.n...FL 3200: 4F 4F 4E 20 7E A8 00 0C 00 00 00 00 00 09 48 6C OON ~.........Hl 3210: 60 1A 33 3F 2B 02 06 09 7E 22 82 00 14 36 18 52 .3?+...~"...6.R 3220: 00 09 6A 56 00 00 3F 3A 80 02 06 07 1D C0 AF C0 ..jV..?:........ 3230: 0A 82 C3 C0 04 C0 C0 00 30 20 F3 06 00 02 F2 FF ........0 ...... 3240: 00 00 30 00 0F 00 02 02 F2 FF 00 00 3C 00 FF 00 ..0.........<... 3250: 00 33 A2 A5 7E EC 7E 7F 01 BE C1 41 AE 80 C4 00 .3..~.~....A.... 3260: 1A 00 83 27 48 55 53 48 20 20 0E 00 00 21 23 00 ...'HUSH ...!#. 3270: 00 FE 00 01 7E 00 00 00 00 00 00 00 00 00 7C 2C ....~.........|, 3280: 02 00 1B 2F 25 A6 16 1B 7E 5E 00 00 1C 31 1F 00 .../%...~^...1.. 3290: 00 09 16 85 C5 41 16 80 CC 55 06 F8 D4 40 30 00 .....A...U...@0. 32A0: FF 00 00 34 D0 AF 00 E4 18 24 30 06 FC 32 F2 FF ...4.....$0..2.. 32B0: 00 00 18 00 F1 02 00 32 F2 FF 00 00 7E 7F 0A EE .......2....~... 32C0: 41 6C 00 80 3C 00 00 00 82 17 43 4C 49 4F 50 45 Al..<.....CLIOPE 32D0: 7E 00 00 09 1B 33 9D 00 00 02 7E 7E 7E 09 1F 1D ~....3....~~~... 32E0: AC 00 00 00 7E 00 00 00 0C 00 26 02 00 00 7E 7E ....~.....&...~~ 32F0: 7E 00 20 31 80 02 00 00 16 C4 94 01 16 80 FF 80 ~. 1............ 3300: 16 0B FF 61 32 00 FF 00 00 33 80 A3 76 00 30 20 ...a2....3..v.0 3310: 01 04 04 21 80 F4 72 00 30 00 01 04 04 21 80 F4 ...!..r.0....!.. 3320: 70 00 7E 7F 00 FB 41 00 FE 00 3C 71 00 00 82 03 p.~...A... 33E0: EA F3 7E 00 0C 00 44 7E 7E 3A EE F4 7E 00 7E 7F ..~...D~~:..~.~. 33F0: 02 FF 00 00 BE 00 3C 00 00 00 80 BF 50 49 41 4E ......<.....PIAN 3400: 4F 20 7E 10 28 00 32 3F 14 00 00 09 7E 00 00 00 O ~.(.2?....~... 3410: 0D 00 00 7A 00 00 7E 14 0C 00 38 3F 1A B6 00 31 ...z..~...8?...1 3420: 7E 56 00 00 22 32 1B 9A 00 15 08 FF C8 00 81 80 ~V.."2.......... 3430: D2 00 09 80 C0 81 18 00 FF 00 00 09 FE FF 00 00 ................ 3440: 18 08 FB 02 00 09 FE FF 00 00 1C 00 A7 06 82 40 ...............@ 3450: A4 7F 00 46 7E 24 00 A5 BF 11 80 80 3C 00 00 00 ...F~$......<... 3460: 80 28 42 45 4C 50 4E 4F 7E 00 00 00 08 00 00 FE .(BELPNO~....... 3470: 00 01 7E 00 00 00 00 00 00 00 00 00 7E 3C 02 00 ..~.........~<.. 3480: 1C 2F 25 A6 16 0F 7E 5E 00 00 29 3F 82 92 3F 09 ./%...~^..)?..?. 3490: 18 C0 80 41 0C FF D4 00 FE F8 D4 80 24 00 30 02 ...A........$.0. 34A0: 00 0A FE FF 00 00 24 18 30 04 00 0A FE 8F 46 7E ......$.0.....F~ 34B0: 4F 00 FF 7E C0 29 C2 83 50 20 74 1B 00 45 3F 0F O..~.)..P t..E?. 34C0: 36 80 BC 00 20 00 81 2F 41 49 52 53 54 52 7E 7E 6... ../AIRSTR~~ 34D0: 00 16 09 1E 32 00 00 09 7E 7E 7E 16 00 00 00 00 ....2...~~~..... 34E0: 00 00 78 2C 46 21 29 2C 16 04 01 09 52 6A 5E 12 ..x,F!),....Rj^. 34F0: 1E 3F A1 02 00 09 18 C6 D3 00 18 CB CB 00 07 DD .?.............. 3500: 80 00 24 00 00 02 0A 00 D0 47 7E 7E 24 18 10 02 ..$......G~~$... 3510: 0A 00 F0 E3 50 7E 24 28 2F 00 02 32 EA E3 00 7E ....P~$(/..2...~ 3520: 7E 27 02 E5 0D 14 BC 00 3C 52 00 00 82 3F 4D 49 ~'......cn..?MRBA 3730: 53 53 3C 00 00 00 06 00 06 00 00 09 7E 82 7E 00 SS<.........~.~. 3740: 0C 0D BF E6 00 00 7E 24 00 00 1C 1A 14 FE 00 00 ......~$........ 3750: 7E 76 6E 00 14 3F 1C 2A 00 00 16 C0 94 00 FC BF ~vn..?.*........ 3760: D4 80 D0 80 D4 01 18 00 03 6E 06 2C FE 0F 7E 00 .........n.,..~. 3770: 18 08 03 5C 06 3A FE 0F 7E 00 24 20 0F 00 06 1C ...\.:..~.$ .... 3780: FE 44 7E 7E 7E 19 00 E5 BF 13 86 80 3C 00 00 00 .D~~~.......<... 3790: 84 0B 4D 52 43 4C 41 56 3C 00 00 00 06 00 06 00 ..MRCLAV<....... 37A0: 00 09 7E 00 00 00 07 00 14 98 00 09 7E 3A 0C 00 ..~.........~:.. 37B0: 15 1E 14 FE 00 00 7E 40 E6 00 21 2B 00 2A 00 00 ......~@..!+.*.. 37C0: 16 80 D4 00 13 C0 94 80 16 C0 94 01 18 18 03 6E ...............n 37D0: 06 2A FE 0F 7E 00 18 08 0F 08 06 2A FE 0F 7E 00 .*..~......*..~. 37E0: 30 20 FF 00 7E 3E 80 44 58 3E 7E 28 00 F5 BF 00 0 ..~>.DX>~(.... 37F0: A8 80 3C 00 00 00 81 3F 58 59 4C 4F 56 58 7E 00 ..<....?XYLOVX~. 3800: 00 00 08 00 00 FE 00 01 7E 00 00 00 19 00 00 00 ........~....... 3810: 00 00 7E 3C 02 00 1C 2F 25 A6 16 0F 7E 5E 00 00 ..~<.../%...~^.. 3820: 29 3F 22 92 3F 09 10 15 3F 41 16 C0 80 00 0C C0 )?".?...?A...... 3830: 80 80 24 18 F1 04 00 31 F0 F0 36 00 24 00 F1 04 ..$....1..6.$... 3840: 00 31 EE F0 30 00 24 00 F1 04 00 39 FE FF 00 00 .1..0.$....9.... 3850: 7E 1B 00 45 25 1E 36 80 BC 00 20 00 82 3F 46 49 ~..E%.6... ..?FI 3860: 44 44 4C 32 F0 04 00 04 07 00 1A 00 34 00 7E 7E DDL2........4.~~ 3870: 7E 09 00 00 33 02 00 00 7E 54 44 06 1F 2E 14 98 ~...3...~TD..... 3880: 33 00 7E 7E 78 00 30 3F 1D 42 00 00 16 80 C0 40 3.~~x.0?.B.....@ 3890: 16 C0 80 00 20 C0 C0 00 24 00 30 06 0E 36 FE FF .... ...$.0..6.. 38A0: 00 00 24 00 30 04 12 00 80 F4 68 00 24 00 31 04 ..$.0.....h.$.1. 38B0: 04 2C 80 F4 70 00 7E 2B 00 A5 3F 0C 22 00 3C 00 .,..p.~+..?.".<. 38C0: 00 00 8A 3F 4C 49 50 53 20 20 7E 4C 42 07 13 0B ...?LIPS ~LB... 38D0: 8A D8 00 00 D0 00 00 0B 00 00 00 02 00 00 7E 00 ..............~. 38E0: 00 04 0A 00 8B 00 00 00 7E 7E 7E 00 00 00 89 88 ........~~~..... 38F0: 00 00 13 C0 AF C0 14 C0 80 C0 FF FF C0 3E 24 00 .............>$. 3900: 04 02 02 00 E8 8E 7E 48 24 10 12 0A FE 00 E8 8E ......~H$....... 3910: 7A 78 23 F0 04 04 00 2B 80 55 7E 7E 7E 16 00 E3 zx#....+.U~~~... 3920: BF 3F C2 80 C4 00 1A 00 8F 00 46 52 54 42 41 53 .?........FRTBAS 3930: 7E 78 74 03 20 16 30 8D 00 01 7E 7E 7E 02 14 20 ~xt. .0...~~~.. 3940: 36 29 00 00 7E 10 00 08 1D 20 25 59 05 00 7E 70 6)..~.... %Y..~p 3950: 60 00 20 20 12 51 00 1A 1A C0 94 C0 00 80 C0 80 . .Q.......... 3960: 0A EB 00 80 18 20 10 04 04 2E 80 33 7E 7E 18 00 ..... .....3~~.. 3970: 10 04 04 2E 80 44 7E 7E 24 10 10 04 04 2E D2 FF .....D~~$....... 3980: 00 00 7E 27 00 E5 28 0A 8E 00 BC 00 20 00 82 34 ..~'..(..... ..4 3990: 45 4C 2D 47 54 52 98 00 00 03 03 02 00 00 00 00 EL-GTR.......... 39A0: 06 7E 0E 0D 19 2E 14 00 00 00 7E 7E 60 00 06 0F .~........~~... 39B0: 8A 00 35 1B 7E 6E 24 00 1D 34 13 A0 00 00 18 C0 ..5.~n$..4...... 39C0: A2 C1 25 71 A0 F5 B2 6C 3B 69 24 20 30 02 0E 18 ..%q...l;i$ 0... 39D0: FE BF 00 D2 24 00 F0 04 00 03 DE F4 7E 00 24 00 ....$.......~.$. 39E0: FF 00 00 38 FE FF 00 00 7E 00 00 B5 3E 78 5A 80 ...8....~...>xZ. 39F0: 15 00 00 00 8F 00 53 41 4D 50 4C 45 7E 82 00 00 ......SAMPLE~... 3A00: 0F 27 27 02 00 09 7E 00 00 00 26 01 2A 00 00 00 .''...~...&.*... 3A10: 7E 7E 7E 0E 32 3F AE 00 00 09 7A 78 6E 19 18 3F ~~~.2?....zxn..? 3A20: A1 36 11 00 18 80 FF 40 15 00 3F 7F 0A FF FF 7F .6.....@..?..... 3A30: 18 20 01 02 02 0B F8 F4 7E 00 18 18 01 02 02 32 . ......~......2 3A40: F8 FF 00 00 18 00 01 FE 02 0B F8 FF 00 00 6C 00 ..............l. 3A50: 00 5E AB 31 4A 00 3E 63 6E 00 8E 1E 53 51 2D 53 .^.1J.>cn...SQ-S 3A60: 54 52 7E 00 00 04 06 3F 00 15 00 08 7E 64 5A 00 TR~....?....~dZ. 3A70: 32 3F 14 00 00 09 7E 7E 7E 0A 3F 13 0B 00 00 00 2?....~~~.?..... 3A80: 7E 7E 7E 15 20 20 22 00 0F 00 0F FF ED 7F 0D FF ~~~. "......... 3A90: ED 7F 1B 80 C0 40 24 00 20 02 02 00 E4 0E 0A 00 .....@$. ....... 3AA0: 24 00 21 02 02 00 E4 0E 0A 00 24 00 23 E6 00 36 $.!.......$.#..6 3AB0: EE F7 7E 00 7E 21 00 E5 93 0C C0 00 3C 00 00 00 ..~.~!......<... 3AC0: 82 1A 41 4E 41 52 45 56 7E 6A 70 00 1A 09 13 02 ..ANAREV~jp..... 3AD0: 00 00 7E 82 7E 00 08 08 98 00 00 09 7E 58 3C 1D ..~.~.......~X<. 3AE0: 2C 32 00 15 17 3F 7E 7E 7E 00 20 20 27 15 00 00 ,2...?~~~. '... 3AF0: 16 C3 80 40 C6 92 80 40 D0 80 D4 01 18 00 F0 06 ...@...@........ 3B00: 00 2B D6 E3 7E 7E 18 20 F0 06 00 00 DA E3 7E 7E .+..~~. ......~~ 3B10: 18 18 00 06 00 2B 80 4E 7E 7E 7E 2C 00 B5 96 41 .....+.N~~~,...A 3B20: 46 00 3C 00 00 00 64 21 43 45 4C 4C 4F 20 7E 00 F.<...d!CELLO ~. 3B30: 00 00 0F 2A 0F 00 00 01 7E 7E 7E 09 00 00 34 00 ...*....~~~...4. 3B40: 00 09 7E E6 EC 00 31 00 2C 00 00 00 7E 7E 7E 10 ..~...1.,...~~~. 3B50: 21 32 92 A4 1E 00 16 C0 A0 40 19 C0 9A 40 15 80 !2.......@...@.. 3B60: FF 40 18 00 20 02 04 2C 80 F4 74 00 18 00 FF 00 .@.. ..,..t..... 3B70: 00 36 FE FF 00 00 18 10 F1 02 00 1A 80 F4 70 00 .6............p. 3B80: 7E 42 00 FF 80 00 FE 80 3C 00 00 00 8F 00 4B 45 ~B......<.....KE 3B90: 59 53 20 52 32 10 28 0E 32 3F 16 00 00 09 7E 4A YS R2.(.2?....~J 3BA0: FA 00 0A 17 14 8E 25 09 00 06 00 00 0E 00 19 02 ......%......... 3BB0: 01 00 7E 7E 7E 00 1C 2F 9E BE 00 19 15 C0 97 40 ..~~~../.......@ 3BC0: 13 80 FF 00 10 C0 D4 00 24 28 F0 02 00 09 FE 1F ........$(...... 3BD0: 00 54 24 00 F0 02 00 0A FE FF 00 00 30 18 5F 00 .T$.........0._. 3BE0: 00 3B F0 0F 00 00 7E 16 00 E4 3F 2D CA 80 3C 00 .;....~...?-..<. 3BF0: 00 00 81 15 4D 54 4C 42 45 4C 1E 00 00 0F 00 00 ....MTLBEL...... 3C00: 06 00 00 09 7E 00 00 00 19 20 14 E6 00 09 7E 1C ....~.... ....~. 3C10: 7E 00 0D 29 14 00 00 00 7E 76 6E 00 14 3F 2A 2A ~..)....~vn..?** 3C20: 00 00 14 00 3F 01 D7 3F 14 81 D0 80 D4 01 1D 58 ....?..?.......X 3C30: F0 02 00 35 EE B0 7E 82 18 08 F0 10 00 2F EE EB ...5..~....../.. 3C40: EE 7E 29 20 B1 02 7E 3B FE FF 00 00 7E 46 04 E4 .~) ..~;....~F.. 3C50: B4 3F 88 80 3C 00 00 00 8A 3F 53 59 4E 42 41 44 .?..<....?SYNBAD 3C60: 32 10 28 0A 32 3F 0F 00 00 09 7E EC B6 09 0E 14 2.(.2?....~..... 3C70: 09 00 25 09 00 06 00 00 21 00 86 02 01 00 7E 7E ..%.....!.....~~ 3C80: 7E 00 00 3F 85 02 3F 00 16 C0 91 41 90 80 D4 01 ~..?..?....A.... 3C90: 10 80 D4 00 24 20 50 0A 44 3E 82 24 7E 00 18 00 ....$ P.D>.$~... 3CA0: 50 0A 00 00 FE 03 7E 00 18 28 50 0A 00 00 FE 03 P.....~..(P..... 3CB0: 7E 00 7E 2F 07 A4 3F 20 C0 00 3C 00 00 00 80 00 ~.~/..? ..<..... 3CC0: 4D 54 4C 47 54 52 32 10 28 0E 32 3F 16 00 00 09 MTLGTR2.(.2?.... 3CD0: 7E 4A FA 00 0A 17 14 8E 25 09 00 06 00 00 0E 00 ~J......%....... 3CE0: 19 02 01 00 7E 4C 00 00 22 2B 90 BE 00 00 15 80 ....~L.."+...... 3CF0: FF 40 13 C0 B2 00 10 80 D4 00 18 20 F0 02 00 2C .@......... ..., 3D00: FE FF 00 00 30 28 FF 00 00 39 FE FF 00 00 18 18 ....0(...9...... 3D10: 10 02 04 09 DE F8 2C 00 7E 8E 00 74 34 17 CA 80 ......,.~..t4... 3D20: 3C 00 00 00 81 05 44 52 55 4D 5A 20 00 EE 00 00 <.....DRUMZ .... 3D30: 24 26 95 00 00 09 72 00 00 00 27 20 14 E6 00 09 $&....r...' .... 3D40: 7E 00 00 00 1A 20 93 00 00 00 7E 7E 6E 00 06 00 ~.... ....~~n... 3D50: 98 2A 00 00 0D 00 3F 01 D7 3F 14 81 D0 80 D4 01 .*....?..?...... 3D60: 18 00 F0 02 00 46 F4 FF 00 00 0C 08 F0 0A 00 33 .....F.........3 3D70: EE AB 82 5C 0C 20 F1 02 00 46 FE AF 00 7E 7E 5F ...\. ...F...~~_ 3D80: 00 55 BF 3F 88 80 3C 00 00 00 80 BF 54 41 52 5A .U.?..<.....TARZ 3D90: 41 4E 9C 00 00 00 11 1B 1C 7A 00 09 7E 64 5A 00 AN.......z..~dZ. 3DA0: 32 3F 0C 00 00 09 F4 7E 7E 23 2C 3F 97 02 3B 00 2?.....~~#,?..;. 3DB0: 54 7A 56 26 1D 22 2F 5A 3F 09 14 00 1F 54 16 00 TzV&."/Z?....T.. 3DC0: 04 5C 06 FF FF 40 24 00 30 04 08 34 7E FF 00 00 .\...@$.0..4~... 3DD0: 24 28 E0 FE EE 44 FE FA CE 00 18 38 F1 02 00 46 $(...D.....8...F 3DE0: E8 FF 00 00 7E AC 03 55 3F 3F B4 80 3C 00 00 00 ....~..U??..<... 3DF0: 82 BD 53 50 52 4B 53 54 7E 2E 3C 00 25 33 9D 00 ..SPRKST~.<.%3.. 3E00: 00 02 7E 7E 7E 00 1F 1D AC 00 00 00 7E 00 00 00 ..~~~.......~... 3E10: 0C 00 26 02 00 00 7E 7E 7E 00 20 31 9D 02 00 00 ..&...~~~. 1.... 3E20: 16 C4 94 01 16 80 FF 80 16 0B FF 61 3E 58 FF 00 ...........a>X.. 3E30: 00 33 80 A3 7E EE 18 20 0F 00 04 2C F2 FF 00 00 .3..~.. ...,.... 3E40: 18 00 01 04 04 2C F0 FF 00 00 7E 00 05 33 3F 3F .....,....~..3?? 3E50: FE 00 3C 71 00 00 82 03 48 41 52 50 20 3C 32 10 ...n...SQ-BEL 3F90: 28 10 00 00 1F 13 14 00 00 01 7E 64 5A 00 32 3F (.........~dZ.2? 3FA0: 14 00 00 09 7E 10 00 10 32 3F 14 00 00 09 7E 64 ....~...2?....~d 3FB0: 00 00 21 32 2D 00 00 00 14 80 D4 41 16 80 D4 10 ..!2-......A.... 3FC0: 16 C0 80 40 60 00 20 10 06 28 DE 81 36 52 24 10 ...@'. ..(..6R$. 3FD0: 20 E2 06 01 F0 E1 C8 70 24 20 20 1E 06 01 E4 EF ......p$ ..... 3FE0: 7E 6E 7E 16 00 F6 BF 3F A4 80 3C 00 00 00 80 3F ~n~....?..<....? ------------------------------------------------ ---- spare ------------------------------------- ------------------------------------------------ 3FF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................ ------------------------------------------------ 4000: 7F 01 01 CLR $0101 4003: FD 01 04 STD $0104 4006: 10 B3 01 02 CMPD $0102 400A: 22 08 BHI $4014 400C: BD 71 40 JSR $7140 400F: FD 01 04 STD $0104 4012: 20 0F BRA $4023 ------------------------------------------------ 4014: 73 01 01 COM $0101 4017: BD 70 BB JSR $70BB 401A: FD 01 02 STD $0102 401D: FC 01 04 LDD $0104 4020: 73 01 01 COM $0101 4023: 10 83 00 00 CMPD #$0000 4027: 26 DD BNE $4006 4029: 10 B3 01 02 CMPD $0102 402D: 26 D7 BNE $4006 402F: 39 RTS ------------------------------------------------ 4030: 4D TSTA 4031: 26 58 BNE $408B 4033: 5D TSTB 4034: 27 53 BEQ $4089 4036: 34 04 PSHS B 4038: 7D 02 A6 TST $02A6 403B: 26 17 BNE $4054 403D: C6 02 LDB #$02 403F: BD 71 B1 JSR $71B1 4042: 86 F5 LDA #$F5 4044: 34 02 PSHS A 4046: FC 02 9F LDD $029F 4049: AD 9F FF EA JSR [$FFEA] ; $D90F 404D: C3 00 01 ADDD #$0001 4050: 32 61 LEAS +$01,S 4052: 20 29 BRA $407D ------------------------------------------------ 4054: C6 01 LDB #$01 4056: BD 71 B1 JSR $71B1 4059: FC 02 9D LDD $029D 405C: 32 7F LEAS -$01,S 405E: AD 9F FF EC JSR [$FFEC] ; $D8FC 4062: C3 00 01 ADDD #$0001 4065: A6 E4 LDA ,S 4067: 84 7F ANDA #$7F 4069: A7 E4 STA ,S 406B: FC 02 9D LDD $029D 406E: AD 9F FF EA JSR [$FFEA] ; $D90F 4072: C3 00 01 ADDD #$0001 4075: 32 61 LEAS +$01,S 4077: 7F 02 A6 CLR $02A6 407A: FC 02 9F LDD $029F 407D: AD 9F FF EA JSR [$FFEA] ; $D90F 4081: C3 00 01 ADDD #$0001 4084: 32 61 LEAS +$01,S 4086: FD 02 9F STD $029F 4089: 20 2F BRA $40BA ------------------------------------------------ 408B: 34 06 PSHS B,A 408D: C6 03 LDB #$03 408F: BD 71 B1 JSR $71B1 4092: BD 72 48 JSR $7248 4095: 86 F4 LDA #$F4 4097: 34 02 PSHS A 4099: FC 02 9F LDD $029F 409C: AD 9F FF EA JSR [$FFEA] ; $D90F 40A0: C3 00 01 ADDD #$0001 40A3: 32 61 LEAS +$01,S 40A5: AD 9F FF EA JSR [$FFEA] ; $D90F 40A9: C3 00 01 ADDD #$0001 40AC: 32 61 LEAS +$01,S 40AE: AD 9F FF EA JSR [$FFEA] ; $D90F 40B2: C3 00 01 ADDD #$0001 40B5: 32 61 LEAS +$01,S 40B7: FD 02 9F STD $029F 40BA: 39 RTS ------------------------------------------------ 40BB: 10 BE 02 8F LDY $028F 40BF: CE 70 D6 LDU #$70D6 40C2: BD 72 6F JSR $726F 40C5: 10 BF 02 8F STY $028F 40C9: EC 0C LDD +$0C,X 40CB: 27 05 BEQ $40D2 40CD: F3 01 02 ADDD $0102 40D0: 20 03 BRA $40D5 ------------------------------------------------ 40D2: FD 01 04 STD $0104 40D5: 39 RTS ------------------------------------------------ 40D6: 70 ED FDB $70ED 40D8: 70 E6 FDB $70E6 40DA: 70 E6 FDB $70E6 40DC: 74 71 FDB $7471 40DE: 71 1D FDB $711D 40E0: 71 1D FDB $711D 40E2: 70 F9 FDB $70F9 40E4: 74 6E FDB $746E ------------------------------------------------ 40E6: A6 04 LDA +$04,X 40E8: 91 F6 CMPA $F6 40EA: 26 31 BNE $411D 40EC: 39 RTS ------------------------------------------------ 40ED: A6 04 LDA +$04,X 40EF: 91 F6 CMPA $F6 40F1: 27 03 BEQ $40F6 40F3: BD 70 FE JSR $70FE 40F6: 7E 74 71 JMP $7471 ------------------------------------------------ 40F9: 73 02 BE COM $02BE 40FC: 20 1F BRA $411D ------------------------------------------------ 40FE: BD 71 28 JSR $7128 4101: E6 0E LDB +$0E,X 4103: BD 71 B1 JSR $71B1 4106: FC 02 9F LDD $029F 4109: C3 00 02 ADDD #$0002 410C: FD 02 9D STD $029D 410F: 73 02 A6 COM $02A6 4112: A6 0E LDA +$0E,X 4114: 81 04 CMPA #$04 4116: 26 02 BNE $411A 4118: 6A 0E DEC +$0E,X 411A: 7E 72 20 JMP $7220 ------------------------------------------------ 411D: BD 71 28 JSR $7128 4120: E6 0E LDB +$0E,X 4122: BD 71 B1 JSR $71B1 4125: 7E 72 20 JMP $7220 ------------------------------------------------ 4128: FC 01 04 LDD $0104 412B: B3 01 02 SUBD $0102 412E: FD 01 04 STD $0104 4131: FC 01 02 LDD $0102 4134: BD 70 30 JSR $7030 4137: CC 00 00 LDD #$0000 413A: FD 01 02 STD $0102 413D: 7E 72 48 JMP $7248 ------------------------------------------------ 4140: 10 BE 02 91 LDY $0291 4144: CE 71 64 LDU #$7164 4147: BD 72 6F JSR $726F 414A: 10 BF 02 91 STY $0291 414E: EC 0C LDD +$0C,X 4150: 27 05 BEQ $4157 4152: F3 01 04 ADDD $0104 4155: 20 0C BRA $4163 ------------------------------------------------ 4157: FC 01 02 LDD $0102 415A: BD 70 30 JSR $7030 415D: CC 00 00 LDD #$0000 4160: FD 01 02 STD $0102 4163: 39 RTS ------------------------------------------------ 4164: 71 74 FDB $7174 4166: 71 8A FDB $718A 4168: 71 8A FDB $718A 416A: 71 71 FDB $7171 416C: 71 6E FDB $716E 416E: 71 6D FDB $716D 4170: 71 AD FDB $71AD 4172: 71 6E FDB $716E ------------------------------------------------ 4174: E6 0E LDB +$0E,X 4176: C1 04 CMPB #$04 4178: 26 02 BNE $417C 417A: 6A 0E DEC +$0E,X 417C: BD 71 95 JSR $7195 417F: E6 0E LDB +$0E,X 4181: BD 71 B1 JSR $71B1 4184: BD 71 06 JSR $7106 4187: 7E 74 71 JMP $7471 ------------------------------------------------ 418A: BD 71 95 JSR $7195 418D: E6 0E LDB +$0E,X 418F: BD 71 B1 JSR $71B1 4192: 7E 72 20 JMP $7220 ------------------------------------------------ 4195: FC 01 02 LDD $0102 4198: B3 01 04 SUBD $0104 419B: FD 01 02 STD $0102 419E: FC 01 04 LDD $0104 41A1: BD 70 30 JSR $7030 41A4: CC 00 00 LDD #$0000 41A7: FD 01 04 STD $0104 41AA: 7E 72 48 JMP $7248 ------------------------------------------------ 41AD: 73 02 BE COM $02BE 41B0: 39 RTS ------------------------------------------------ 41B1: 34 76 PSHS U,Y,X,B,A 41B3: 4F CLRA 41B4: F3 02 9F ADDD $029F 41B7: 7D 01 01 TST $0101 41BA: 26 2F BNE $41EB 41BC: 10 B3 02 8F CMPD $028F 41C0: 25 5C BCS $421E 41C2: 10 AE 02 LDY +$02,X 41C5: 1F 20 TFR Y,D 41C7: B3 01 21 SUBD $0121 41CA: 34 06 PSHS B,A 41CC: FC 01 21 LDD $0121 41CF: B3 02 8F SUBD $028F 41D2: 1F 01 TFR D,X 41D4: FC 01 21 LDD $0121 41D7: 10 BF 01 21 STY $0121 41DB: AD 9F FF E8 JSR [$FFE8] ; $D924 41DF: FC 02 8F LDD $028F 41E2: E3 E4 ADDD ,S 41E4: FD 02 8F STD $028F 41E7: 20 2D BRA $4216 ------------------------------------------------ 41E9: 20 33 BRA $421E ------------------------------------------------ 41EB: 10 A3 02 CMPD +$02,X 41EE: 25 2E BCS $421E 41F0: 10 BE 02 91 LDY $0291 41F4: 1F 20 TFR Y,D 41F6: B3 01 21 SUBD $0121 41F9: 34 06 PSHS B,A 41FB: FC 01 21 LDD $0121 41FE: A3 02 SUBD +$02,X 4200: 1F 01 TFR D,X 4202: FC 01 21 LDD $0121 4205: 10 BF 01 21 STY $0121 4209: AD 9F FF E8 JSR [$FFE8] ; $D924 420D: 8E 02 AF LDX #$02AF 4210: EC 02 LDD +$02,X 4212: E3 E4 ADDD ,S 4214: ED 02 STD +$02,X 4216: EC E1 LDD ,S++ 4218: F3 02 A1 ADDD $02A1 421B: FD 02 A1 STD $02A1 421E: 35 F6 PULS PC,U,Y,X,B,A ------------------------------------------------ 4220: 34 10 PSHS X 4222: E6 0E LDB +$0E,X 4224: 4F CLRA 4225: 1F 02 TFR D,Y 4227: 30 05 LEAX +$05,X 4229: FC 02 9F LDD $029F 422C: 34 06 PSHS B,A 422E: A6 80 LDA ,X+ 4230: 34 02 PSHS A 4232: EC 61 LDD +$01,S 4234: AD 9F FF EA JSR [$FFEA] ; $D90F 4238: C3 00 01 ADDD #$0001 423B: 32 61 LEAS +$01,S 423D: ED E4 STD ,S 423F: 31 3F LEAY -$01,Y 4241: 26 EB BNE $422E 4243: FD 02 9F STD $029F 4246: 35 96 PULS PC,X,B,A ------------------------------------------------ 4248: 7D 02 A6 TST $02A6 424B: 27 21 BEQ $426E 424D: 7F 02 A6 CLR $02A6 4250: FC 02 9D LDD $029D 4253: 32 7F LEAS -$01,S 4255: AD 9F FF EC JSR [$FFEC] ; $D8FC 4259: C3 00 01 ADDD #$0001 425C: A6 E4 LDA ,S 425E: 8A 80 ORA #$80 4260: A7 E4 STA ,S 4262: FC 02 9D LDD $029D 4265: AD 9F FF EA JSR [$FFEA] ; $D90F 4269: C3 00 01 ADDD #$0001 426C: 32 61 LEAS +$01,S 426E: 39 RTS ------------------------------------------------ 426F: 8E 02 AF LDX #$02AF 4272: 10 AF 02 STY +$02,X 4275: EF 84 STU ,X 4277: 7F 02 BE CLR $02BE 427A: B6 02 BE LDA $02BE 427D: 26 1D BNE $429C 427F: EC 02 LDD +$02,X 4281: 32 7F LEAS -$01,S 4283: AD 9F FF EC JSR [$FFEC] ; $D8FC 4287: C3 00 01 ADDD #$0001 428A: ED 02 STD +$02,X 428C: 35 02 PULS A 428E: A7 05 STA +$05,X 4290: B7 02 A5 STA $02A5 4293: BD 72 A0 JSR $72A0 4296: 8E 02 AF LDX #$02AF 4299: 7E 72 7A JMP $727A ------------------------------------------------ 429C: 10 AE 02 LDY +$02,X 429F: 39 RTS ------------------------------------------------ 42A0: 81 58 CMPA #$58 42A2: 24 05 BCC $42A9 42A4: BD 72 FF JSR $72FF 42A7: 20 48 BRA $42F1 ------------------------------------------------ 42A9: 81 F4 CMPA #$F4 42AB: 25 0C BCS $42B9 42AD: 26 05 BNE $42B4 42AF: BD 73 7E JSR $737E 42B2: 20 03 BRA $42B7 ------------------------------------------------ 42B4: BD 73 97 JSR $7397 42B7: 20 38 BRA $42F1 ------------------------------------------------ 42B9: 81 F0 CMPA #$F0 42BB: 24 0E BCC $42CB 42BD: 81 B0 CMPA #$B0 42BF: 25 05 BCS $42C6 42C1: BD 73 BD JSR $73BD 42C4: 20 03 BRA $42C9 ------------------------------------------------ 42C6: BD 73 4E JSR $734E 42C9: 20 26 BRA $42F1 ------------------------------------------------ 42CB: 81 F0 CMPA #$F0 42CD: 26 05 BNE $42D4 42CF: BD 74 5F JSR $745F 42D2: 20 1D BRA $42F1 ------------------------------------------------ 42D4: 81 F1 CMPA #$F1 42D6: 26 05 BNE $42DD 42D8: BD 74 1C JSR $741C 42DB: 20 14 BRA $42F1 ------------------------------------------------ 42DD: 81 F2 CMPA #$F2 42DF: 26 05 BNE $42E6 42E1: BD 74 5A JSR $745A 42E4: 20 0B BRA $42F1 ------------------------------------------------ 42E6: 81 F3 CMPA #$F3 42E8: 26 05 BNE $42EF 42EA: BD 74 4C JSR $744C 42ED: 20 02 BRA $42F1 ------------------------------------------------ 42EF: 11 3F SWI3 ------------------------------------------------ 42F1: 11 83 82 FF CMPU #$82FF 42F5: 25 05 BCS $42FC 42F7: BD D8 F3 JSR $D8F3 42FA: 20 02 BRA $42FE ------------------------------------------------ 42FC: AD C4 JSR ,U 42FE: 39 RTS ------------------------------------------------ 42FF: C6 03 LDB #$03 4301: E7 0E STB +$0E,X 4303: EC 02 LDD +$02,X 4305: 32 7F LEAS -$01,S 4307: AD 9F FF EC JSR [$FFEC] ; $D8FC 430B: C3 00 01 ADDD #$0001 430E: 32 7F LEAS -$01,S 4310: AD 9F FF EC JSR [$FFEC] ; $D8FC 4314: C3 00 01 ADDD #$0001 4317: ED 02 STD +$02,X 4319: EC E0 LDD ,S+ 431B: E7 06 STB +$06,X 431D: A7 07 STA +$07,X 431F: A7 0A STA +$0A,X 4321: C4 F8 ANDB #$F8 4323: 54 LSRB 4324: E7 09 STB +$09,X 4326: 35 04 PULS B 4328: C4 07 ANDB #$07 432A: E7 04 STB +$04,X 432C: 6D 0A TST +$0A,X 432E: 2B 15 BMI $4345 4330: 32 7F LEAS -$01,S 4332: EC 02 LDD +$02,X 4334: AD 9F FF EC JSR [$FFEC] ; $D8FC 4338: C3 00 01 ADDD #$0001 433B: ED 02 STD +$02,X 433D: 35 04 PULS B 433F: E7 08 STB +$08,X 4341: 6C 0E INC +$0E,X 4343: 20 01 BRA $4346 ------------------------------------------------ 4345: 5F CLRB 4346: 4F CLRA 4347: ED 0C STD +$0C,X 4349: EE 84 LDU ,X 434B: EE C4 LDU ,U 434D: 39 RTS ------------------------------------------------ 434E: EC 02 LDD +$02,X 4350: 32 7F LEAS -$01,S 4352: AD 9F FF EC JSR [$FFEC] ; $D8FC 4356: C3 00 01 ADDD #$0001 4359: ED 02 STD +$02,X 435B: 35 02 PULS A 435D: 4D TSTA 435E: 10 2B 00 8D LBMI $43EF 4362: C6 02 LDB #$02 4364: E7 0E STB +$0E,X 4366: A7 06 STA +$06,X 4368: A7 04 STA +$04,X 436A: A6 05 LDA +$05,X 436C: 80 43 SUBA #$43 436E: A7 09 STA +$09,X 4370: C6 40 LDB #$40 4372: E7 0A STB +$0A,X 4374: CC 00 00 LDD #$0000 4377: ED 0C STD +$0C,X 4379: EE 84 LDU ,X 437B: EE 42 LDU +$02,U 437D: 39 RTS ------------------------------------------------ 437E: C6 03 LDB #$03 4380: E7 0E STB +$0E,X 4382: EC 02 LDD +$02,X 4384: 32 7F LEAS -$01,S 4386: AD 9F FF EC JSR [$FFEC] ; $D8FC 438A: C3 00 01 ADDD #$0001 438D: ED 02 STD +$02,X 438F: 35 02 PULS A 4391: A7 0C STA +$0C,X 4393: A7 06 STA +$06,X 4395: 20 06 BRA $439D ------------------------------------------------ 4397: C6 02 LDB #$02 4399: E7 0E STB +$0E,X 439B: 6F 0C CLR +$0C,X 439D: EC 02 LDD +$02,X 439F: 32 7F LEAS -$01,S 43A1: AD 9F FF EC JSR [$FFEC] ; $D8FC 43A5: C3 00 01 ADDD #$0001 43A8: ED 02 STD +$02,X 43AA: 35 02 PULS A 43AC: A7 0D STA +$0D,X 43AE: 31 04 LEAY +$04,X 43B0: E6 0E LDB +$0E,X 43B2: A7 A5 STA B,Y 43B4: 86 FF LDA #$FF 43B6: A7 04 STA +$04,X 43B8: EE 84 LDU ,X 43BA: EE 46 LDU +$06,U 43BC: 39 RTS ------------------------------------------------ 43BD: C6 02 LDB #$02 43BF: E7 0E STB +$0E,X 43C1: A6 05 LDA +$05,X 43C3: 80 B0 SUBA #$B0 43C5: 1F 89 TFR A,B 43C7: 84 07 ANDA #$07 43C9: A7 04 STA +$04,X 43CB: C4 38 ANDB #$38 43CD: 54 LSRB 43CE: 54 LSRB 43CF: 54 LSRB 43D0: E7 09 STB +$09,X 43D2: EC 02 LDD +$02,X 43D4: 32 7F LEAS -$01,S 43D6: AD 9F FF EC JSR [$FFEC] ; $D8FC 43DA: C3 00 01 ADDD #$0001 43DD: ED 02 STD +$02,X 43DF: 35 02 PULS A 43E1: A7 06 STA +$06,X 43E3: A7 0A STA +$0A,X 43E5: CC 00 00 LDD #$0000 43E8: ED 0C STD +$0C,X 43EA: EE 84 LDU ,X 43EC: EE 44 LDU +$04,U 43EE: 39 RTS ------------------------------------------------ 43EF: A7 06 STA +$06,X 43F1: 84 07 ANDA #$07 43F3: A7 04 STA +$04,X 43F5: EC 02 LDD +$02,X 43F7: 32 7F LEAS -$01,S 43F9: AD 9F FF EC JSR [$FFEC] ; $D8FC 43FD: C3 00 01 ADDD #$0001 4400: ED 02 STD +$02,X 4402: 35 02 PULS A 4404: A7 07 STA +$07,X 4406: A7 0A STA +$0A,X 4408: A6 05 LDA +$05,X 440A: 80 43 SUBA #$43 440C: A7 09 STA +$09,X 440E: C6 03 LDB #$03 4410: E7 0E STB +$0E,X 4412: CC 00 00 LDD #$0000 4415: ED 0C STD +$0C,X 4417: EE 84 LDU ,X 4419: EE 42 LDU +$02,U 441B: 39 RTS ------------------------------------------------ 441C: EC 02 LDD +$02,X 441E: 32 7F LEAS -$01,S 4420: AD 9F FF EC JSR [$FFEC] ; $D8FC 4424: C3 00 01 ADDD #$0001 4427: 32 7F LEAS -$01,S 4429: AD 9F FF EC JSR [$FFEC] ; $D8FC 442D: C3 00 01 ADDD #$0001 4430: ED 02 STD +$02,X 4432: 35 04 PULS B 4434: 35 02 PULS A 4436: ED 06 STD +$06,X 4438: ED 09 STD +$09,X 443A: 86 03 LDA #$03 443C: A7 0E STA +$0E,X 443E: CC 00 00 LDD #$0000 4441: ED 0C STD +$0C,X 4443: 86 FF LDA #$FF 4445: A7 04 STA +$04,X 4447: EE 84 LDU ,X 4449: EE 4A LDU +$0A,U 444B: 39 RTS ------------------------------------------------ 444C: 86 01 LDA #$01 444E: A7 0E STA +$0E,X 4450: CC 00 00 LDD #$0000 4453: ED 0C STD +$0C,X 4455: EE 84 LDU ,X 4457: EE 4C LDU +$0C,U 4459: 39 RTS ------------------------------------------------ 445A: EE 84 LDU ,X 445C: EE 4E LDU +$0E,U 445E: 39 RTS ------------------------------------------------ 445F: 86 01 LDA #$01 4461: A7 0E STA +$0E,X 4463: CC 00 00 LDD #$0000 4466: ED 0C STD +$0C,X 4468: EE 84 LDU ,X 446A: EE 48 LDU +$08,U 446C: 39 RTS ------------------------------------------------ 446D: 39 RTS ------------------------------------------------ 446E: 11 3F SWI3 ------------------------------------------------ 4470: 39 RTS ------------------------------------------------ 4471: CE 02 AF LDU #$02AF 4474: EC 4C LDD +$0C,U 4476: 27 03 BEQ $447B 4478: 73 02 BE COM $02BE 447B: 39 RTS ------------------------------------------------ 447C: FC 01 02 LDD $0102 447F: 83 00 01 SUBD #$0001 4482: 34 06 PSHS B,A 4484: 34 06 PSHS B,A 4486: CC 00 00 LDD #$0000 4489: FD 01 04 STD $0104 448C: 7F 02 A6 CLR $02A6 448F: 4F CLRA 4490: D6 FC LDB $FC 4492: 54 LSRB 4493: C9 00 ADCB #$00 4495: CE 75 14 LDU #$7514 4498: 10 BE 02 8F LDY $028F 449C: AE E4 LDX ,S 449E: BF 01 09 STX $0109 44A1: BD 74 F8 JSR $74F8 44A4: 10 BF 02 8F STY $028F 44A8: ED E4 STD ,S 44AA: FC 01 04 LDD $0104 44AD: E3 62 ADDD +$02,S 44AF: FD 01 04 STD $0104 44B2: D6 FC LDB $FC 44B4: 4F CLRA 44B5: CE 75 24 LDU #$7524 44B8: 10 BE 02 91 LDY $0291 44BC: AE 62 LDX +$02,S 44BE: BF 01 09 STX $0109 44C1: BD 74 F8 JSR $74F8 44C4: 10 BF 02 91 STY $0291 44C8: ED 62 STD +$02,S 44CA: B6 02 A5 LDA $02A5 44CD: 81 F3 CMPA #$F3 44CF: 27 23 BEQ $44F4 44D1: FC 01 04 LDD $0104 44D4: A3 62 SUBD +$02,S 44D6: FD 01 04 STD $0104 44D9: D6 FC LDB $FC 44DB: 4F CLRA 44DC: 54 LSRB 44DD: CE 75 14 LDU #$7514 44E0: 10 BE 02 8F LDY $028F 44E4: AE E4 LDX ,S 44E6: BF 01 09 STX $0109 44E9: BD 74 F8 JSR $74F8 44EC: 10 BF 02 8F STY $028F 44F0: ED E4 STD ,S 44F2: 20 9B BRA $448F ------------------------------------------------ 44F4: 32 64 LEAS +$04,S 44F6: 4F CLRA 44F7: 39 RTS ------------------------------------------------ 44F8: 10 B3 01 09 CMPD $0109 44FC: 23 0E BLS $450C 44FE: B3 01 09 SUBD $0109 4501: FD 01 09 STD $0109 4504: BD 72 6F JSR $726F 4507: FC 01 09 LDD $0109 450A: 20 07 BRA $4513 ------------------------------------------------ 450C: 34 06 PSHS B,A 450E: FC 01 09 LDD $0109 4511: A3 E1 SUBD ,S++ 4513: 39 RTS ------------------------------------------------ 4514: 75 34 FDB $7534 4516: 74 6D FDB $746D ; RTS 4518: 74 6D FDB $746D ; RTS 451A: 75 53 FDB $7553 451C: 74 6D FDB $746D ; RTS 451E: 74 6D FDB $746D ; RTS 4520: 75 76 FDB $7576 4522: 74 6D FDB $746D ; RTS 4524: 75 6C FDB $756C 4526: 75 7A FDB $757A 4528: 75 7A FDB $757A 452A: 75 6C FDB $756C 452C: 74 6D FDB $746D ; RTS 452E: 74 6D FDB $746D ; RTS 4530: 75 76 FDB $7576 4532: 74 6D FDB $746D ; RTS ------------------------------------------------ 4534: A6 04 LDA +$04,X 4536: 91 F6 CMPA $F6 4538: 26 19 BNE $4553 453A: E6 07 LDB +$07,X 453C: C4 7F ANDB #$7F 453E: E7 07 STB +$07,X 4540: 86 03 LDA #$03 4542: A7 0E STA +$0E,X 4544: BD 75 84 JSR $7584 4547: 73 02 A6 COM $02A6 454A: FC 02 9F LDD $029F 454D: 83 00 01 SUBD #$0001 4550: FD 02 9D STD $029D 4553: EC 0C LDD +$0C,X 4555: 10 B3 01 09 CMPD $0109 4559: 24 07 BCC $4562 455B: FC 01 09 LDD $0109 455E: A3 0C SUBD +$0C,X 4560: 20 06 BRA $4568 ------------------------------------------------ 4562: B3 01 09 SUBD $0109 4565: 73 02 BE COM $02BE 4568: FD 01 09 STD $0109 456B: 39 RTS ------------------------------------------------ 456C: FC 01 04 LDD $0104 456F: E3 0C ADDD +$0C,X 4571: FD 01 04 STD $0104 4574: 20 DD BRA $4553 ------------------------------------------------ 4576: 73 02 BE COM $02BE 4579: 39 RTS ------------------------------------------------ 457A: A6 04 LDA +$04,X 457C: 91 F6 CMPA $F6 457E: 26 03 BNE $4583 4580: BD 75 84 JSR $7584 4583: 39 RTS ------------------------------------------------ 4584: 10 BE 02 9F LDY $029F 4588: 33 23 LEAU +$03,Y 458A: 11 B3 01 23 CMPU $0123 458E: 24 1C BCC $45AC 4590: 10 BF 01 1F STY $011F 4594: BD 75 B3 JSR $75B3 4597: 10 BE 01 1F LDY $011F 459B: E6 0E LDB +$0E,X 459D: 33 A5 LEAU B,Y 459F: 11 B3 01 23 CMPU $0123 45A3: 24 07 BCC $45AC 45A5: 10 BF 02 9F STY $029F 45A9: 7E 72 20 JMP $7220 ------------------------------------------------ 45AC: 32 6E LEAS +$0E,S 45AE: 86 FF LDA #$FF 45B0: 7E 74 F7 JMP $74F7 ------------------------------------------------ 45B3: FC 01 04 LDD $0104 45B6: 10 27 00 5F LBEQ $4619 45BA: 4D TSTA 45BB: 26 2A BNE $45E7 45BD: 34 04 PSHS B 45BF: 7D 02 A6 TST $02A6 45C2: 26 12 BNE $45D6 45C4: 86 F5 LDA #$F5 45C6: 34 02 PSHS A 45C8: FC 01 1F LDD $011F 45CB: AD 9F FF EA JSR [$FFEA] ; $D90F 45CF: C3 00 01 ADDD #$0001 45D2: 32 61 LEAS +$01,S 45D4: 20 06 BRA $45DC ------------------------------------------------ 45D6: FC 01 1F LDD $011F 45D9: 7F 02 A6 CLR $02A6 45DC: AD 9F FF EA JSR [$FFEA] ; $D90F 45E0: C3 00 01 ADDD #$0001 45E3: 32 61 LEAS +$01,S 45E5: 20 27 BRA $460E ------------------------------------------------ 45E7: 34 06 PSHS B,A 45E9: BD 72 48 JSR $7248 45EC: 86 F4 LDA #$F4 45EE: 34 02 PSHS A 45F0: FC 01 1F LDD $011F 45F3: AD 9F FF EA JSR [$FFEA] ; $D90F 45F7: C3 00 01 ADDD #$0001 45FA: 32 61 LEAS +$01,S 45FC: AD 9F FF EA JSR [$FFEA] ; $D90F 4600: C3 00 01 ADDD #$0001 4603: 32 61 LEAS +$01,S 4605: AD 9F FF EA JSR [$FFEA] ; $D90F 4609: C3 00 01 ADDD #$0001 460C: 32 61 LEAS +$01,S 460E: FD 01 1F STD $011F 4611: CC 00 00 LDD #$0000 4614: FD 01 04 STD $0104 4617: 20 03 BRA $461C ------------------------------------------------ 4619: BD 72 48 JSR $7248 461C: 39 RTS ------------------------------------------------ 461D: 34 06 PSHS B,A 461F: FD 02 A1 STD $02A1 4622: FC 01 21 LDD $0121 4625: 93 F0 SUBD $F0 4627: B3 02 C7 SUBD $02C7 462A: 1F 01 TFR D,X 462C: FC 01 21 LDD $0121 462F: AD 9F FF E8 JSR [$FFE8] ; $D924 4633: DC F0 LDD $F0 4635: F3 02 C7 ADDD $02C7 4638: FD 02 9F STD $029F 463B: E3 E4 ADDD ,S 463D: 1F 02 TFR D,Y 463F: FC 01 21 LDD $0121 4642: E3 E1 ADDD ,S++ 4644: FD 01 21 STD $0121 4647: CE 76 54 LDU #$7654 464A: BD 72 6F JSR $726F 464D: FC 02 9F LDD $029F 4650: FD 02 8F STD $028F 4653: 39 RTS ------------------------------------------------ 4654: 76 64 FDB $7664 4656: 76 93 FDB $7693 4658: 76 A9 FDB $76A9 465A: 72 20 FDB $7220 465C: 72 20 FDB $7220 465E: 72 20 FDB $7220 4660: 75 76 FDB $7576 4662: 74 6E FDB $746E ------------------------------------------------ 4664: A6 04 LDA +$04,X 4666: 91 F6 CMPA $F6 4668: 26 26 BNE $4690 466A: EC 09 LDD +$09,X 466C: 48 LSLA 466D: BA 02 C0 ORA $02C0 4670: CA 80 ORB #$80 4672: ED 06 STD +$06,X 4674: 86 03 LDA #$03 4676: A7 0E STA +$0E,X 4678: BD 72 20 JSR $7220 467B: EC 06 LDD +$06,X 467D: 84 F8 ANDA #$F8 467F: AA 04 ORA +$04,X 4681: A7 06 STA +$06,X 4683: 10 AE 0C LDY +$0C,X 4686: 27 06 BEQ $468E 4688: C4 7F ANDB #$7F 468A: 86 04 LDA #$04 468C: A7 0E STA +$0E,X 468E: E7 07 STB +$07,X 4690: 7E 72 20 JMP $7220 ------------------------------------------------ 4693: BD 72 20 JSR $7220 4696: A6 04 LDA +$04,X 4698: 91 F6 CMPA $F6 469A: 26 0C BNE $46A8 469C: A6 06 LDA +$06,X 469E: 84 80 ANDA #$80 46A0: BA 02 C0 ORA $02C0 46A3: A7 06 STA +$06,X 46A5: BD 72 20 JSR $7220 46A8: 39 RTS ------------------------------------------------ 46A9: BD 72 20 JSR $7220 46AC: A6 04 LDA +$04,X 46AE: 91 F6 CMPA $F6 46B0: 26 0F BNE $46C1 46B2: A6 09 LDA +$09,X 46B4: 48 LSLA 46B5: 48 LSLA 46B6: 48 LSLA 46B7: BA 02 C0 ORA $02C0 46BA: 8B B0 ADDA #$B0 46BC: A7 05 STA +$05,X 46BE: BD 72 20 JSR $7220 46C1: 39 RTS ------------------------------------------------ 46C2: CC 00 00 LDD #$0000 46C5: FD 02 A1 STD $02A1 46C8: 10 9E F0 LDY $F0 46CB: FC 02 C7 LDD $02C7 46CE: 31 AB LEAY D,Y 46D0: CE 76 DA LDU #$76DA 46D3: BD 72 6F JSR $726F 46D6: FC 02 A1 LDD $02A1 46D9: 39 RTS ------------------------------------------------ 46DA: 76 EA FDB $76EA 46DC: 76 EA FDB $76EA 46DE: 76 EA FDB $76EA 46E0: 74 6D FDB $746D 46E2: 74 6D FDB $746D 46E4: 74 6D FDB $746D 46E6: 75 76 FDB $7576 46E8: 74 6D FDB $746D ------------------------------------------------ 46EA: A6 04 LDA +$04,X 46EC: 91 F6 CMPA $F6 46EE: 26 10 BNE $4700 46F0: A6 05 LDA +$05,X 46F2: E6 0E LDB +$0E,X 46F4: C1 04 CMPB #$04 46F6: 26 01 BNE $46F9 46F8: 5A DECB 46F9: 4F CLRA 46FA: F3 02 A1 ADDD $02A1 46FD: FD 02 A1 STD $02A1 4700: 39 RTS ------------------------------------------------ 4701: 10 9E F0 LDY $F0 4704: FC 02 C7 LDD $02C7 4707: 31 AB LEAY D,Y ; [$02C7]+[$F0] 4709: 10 BF 02 9F STY $029F 470D: CE 77 17 LDU #$7717 4710: BD 72 6F JSR $726F 4713: 7F 01 01 CLR $0101 4716: 39 RTS ------------------------------------------------ 4717: 77 2D FDB $772D 4719: 77 42 FDB $7742 471B: 77 27 FDB $7727 471D: 77 27 FDB $7727 471F: 77 27 FDB $7727 4721: 77 27 FDB $7727 4723: 75 76 FDB $7576 4725: 74 6E FDB $746E ------------------------------------------------ 4727: EC 02 LDD +$02,X 4729: FD 02 9F STD $029F 472C: 39 RTS ------------------------------------------------ 472D: A6 04 LDA +$04,X 472F: 91 F6 CMPA $F6 4731: 26 0B BNE $473E 4733: A6 05 LDA +$05,X 4735: 8D 24 BSR $475B 4737: A7 05 STA +$05,X 4739: BD 72 20 JSR $7220 473C: 20 03 BRA $4741 ------------------------------------------------ 473E: BD 77 27 JSR $7727 4741: 39 RTS ------------------------------------------------ 4742: A6 04 LDA +$04,X 4744: 91 F6 CMPA $F6 4746: 26 0F BNE $4757 4748: A6 05 LDA +$05,X 474A: 80 58 SUBA #$58 474C: 8D 0D BSR $475B 474E: 8B 58 ADDA #$58 4750: A7 05 STA +$05,X 4752: BD 72 20 JSR $7220 4755: 20 03 BRA $475A ------------------------------------------------ 4757: BD 77 27 JSR $7727 475A: 39 RTS ------------------------------------------------ 475B: BB 01 01 ADDA $0101 475E: 2A 04 BPL $4764 4760: 8B 58 ADDA #$58 4762: 20 06 BRA $476A ------------------------------------------------ 4764: 81 58 CMPA #$58 4766: 25 02 BCS $476A 4768: 80 58 SUBA #$58 476A: 39 RTS ------------------------------------------------ 476B: CE 77 98 LDU #$7798 476E: CC 00 00 LDD #$0000 4771: FD 01 04 STD $0104 4774: 10 9E F0 LDY $F0 4777: FC 02 C7 LDD $02C7 477A: 31 AB LEAY D,Y 477C: 10 BF 01 1F STY $011F 4780: BD 78 2F JSR $782F 4783: 7F 02 A6 CLR $02A6 4786: BD 72 6F JSR $726F 4789: EC 02 LDD +$02,X 478B: 83 00 01 SUBD #$0001 478E: FD 02 8F STD $028F 4791: FC 01 1F LDD $011F 4794: FD 02 9F STD $029F 4797: 39 RTS ------------------------------------------------ 4798: 77 A8 FDB $77A8 479A: 77 A8 FDB $77A8 479C: 77 A8 FDB $77A8 479E: 77 BE FDB $77BE 47A0: 77 D8 FDB $77D8 47A2: 77 D8 FDB $77D8 47A4: 77 B8 FDB $77B8 47A6: 74 6E FDB $746E ------------------------------------------------ 47A8: A6 04 LDA +$04,X 47AA: B1 02 C0 CMPA $02C0 47AD: 27 05 BEQ $47B4 47AF: BD 77 D8 JSR $77D8 47B2: 20 03 BRA $47B7 ------------------------------------------------ 47B4: BD 77 BE JSR $77BE 47B7: 39 RTS ------------------------------------------------ 47B8: BD 75 B3 JSR $75B3 47BB: 7E 75 76 JMP $7576 ------------------------------------------------ 47BE: AE 0C LDX +$0C,X 47C0: 27 15 BEQ $47D7 47C2: FC 01 04 LDD $0104 47C5: C3 00 01 ADDD #$0001 47C8: 2A 06 BPL $47D0 47CA: BD 75 B3 JSR $75B3 47CD: CC 00 01 LDD #$0001 47D0: FD 01 04 STD $0104 47D3: 30 1F LEAX -$01,X 47D5: 20 E9 BRA $47C0 ------------------------------------------------ 47D7: 39 RTS ------------------------------------------------ 47D8: BD 75 B3 JSR $75B3 47DB: A6 05 LDA +$05,X 47DD: 81 58 CMPA #$58 47DF: 24 18 BCC $47F9 47E1: EC 0C LDD +$0C,X 47E3: 26 12 BNE $47F7 47E5: 73 02 A6 COM $02A6 47E8: A6 07 LDA +$07,X 47EA: 84 7F ANDA #$7F 47EC: A7 07 STA +$07,X 47EE: FC 01 1F LDD $011F 47F1: C3 00 02 ADDD #$0002 47F4: FD 02 9D STD $029D 47F7: 20 03 BRA $47FC ------------------------------------------------ 47F9: BD 72 48 JSR $7248 47FC: FC 01 1F LDD $011F 47FF: FD 02 9F STD $029F 4802: BD 72 20 JSR $7220 4805: FC 02 9F LDD $029F 4808: FD 01 1F STD $011F 480B: 39 RTS ------------------------------------------------ 480C: CE 78 12 LDU #$7812 480F: 7E 77 6E JMP $776E ------------------------------------------------ 4812: 77 D8 FDB $77D8 4814: 78 22 FDB $7822 4816: 77 A8 FDB $77A8 4818: 77 BE FDB $77BE 481A: 77 D8 FDB $77D8 481C: 77 D8 FDB $77D8 481E: 77 B8 FDB $77B8 4820: 74 6E FDB $746E ------------------------------------------------ 4822: 6D 06 TST +$06,X 4824: 2A 05 BPL $482B 4826: BD 77 A8 JSR $77A8 4829: 20 03 BRA $482E ------------------------------------------------ 482B: BD 77 D8 JSR $77D8 482E: 39 RTS ------------------------------------------------ 482F: FC 01 23 LDD $0123 4832: B3 01 1F SUBD $011F 4835: 24 0B BCC $4842 4837: FC 01 1F LDD $011F 483A: FD 01 23 STD $0123 483D: CC 00 00 LDD #$0000 4840: 20 25 BRA $4867 ------------------------------------------------ 4842: 34 06 PSHS B,A 4844: FC 01 25 LDD $0125 4847: B3 02 CE SUBD $02CE 484A: 10 B3 01 23 CMPD $0123 484E: 24 15 BCC $4865 4850: 10 B3 01 1F CMPD $011F 4854: 23 0A BLS $4860 4856: FD 01 23 STD $0123 4859: B3 01 1F SUBD $011F 485C: ED E4 STD ,S 485E: 20 05 BRA $4865 ------------------------------------------------ 4860: CC 00 00 LDD #$0000 4863: ED E4 STD ,S 4865: 35 06 PULS B,A 4867: FD 02 AC STD $02AC 486A: 39 RTS ------------------------------------------------ 486B: FD 02 A1 STD $02A1 486E: FC 02 A7 LDD $02A7 4871: 7D 02 BF TST $02BF 4874: 26 05 BNE $487B 4876: F3 01 06 ADDD $0106 4879: 20 03 BRA $487E ------------------------------------------------ 487B: B3 01 06 SUBD $0106 487E: FD 02 A7 STD $02A7 4881: BD 7B 6A JSR $7B6A 4884: BD 78 BA JSR $78BA 4887: 7F 02 A6 CLR $02A6 488A: 0F FE CLR $FE 488C: CC 00 00 LDD #$0000 488F: FD 01 02 STD $0102 4892: FD 01 04 STD $0104 4895: CC FF FF LDD #$FFFF 4898: 10 BE 02 8F LDY $028F 489C: CE 78 AA LDU #$78AA 489F: FD 02 8F STD $028F 48A2: BD 72 6F JSR $726F 48A5: 0F FE CLR $FE 48A7: 7E 78 E6 JMP $78E6 ------------------------------------------------ 48AA: 79 07 FDB $7907 48AA: 79 4E FDB $794E 48AA: 79 CC FDB $79CC 48AA: 7A 20 FDB $7A20 48AA: 74 6D FDB $746D 48AA: 74 6D FDB $746D 48AA: 79 9D FDB $799D 48AA: 74 6D FDB $746D ------------------------------------------------ 48BA: FC 02 A1 LDD $02A1 48BD: 34 06 PSHS B,A 48BF: FC 01 21 LDD $0121 48C2: 93 F0 SUBD $F0 48C4: B3 02 C7 SUBD $02C7 48C7: 1F 01 TFR D,X 48C9: FC 01 21 LDD $0121 48CC: AD 9F FF E8 JSR [$FFE8] ; $D924 48D0: DC F0 LDD $F0 48D2: F3 02 C7 ADDD $02C7 48D5: FD 02 9F STD $029F 48D8: E3 E4 ADDD ,S 48DA: FD 02 8F STD $028F 48DD: FC 01 21 LDD $0121 48E0: E3 E1 ADDD ,S++ 48E2: FD 01 21 STD $0121 48E5: 39 RTS ------------------------------------------------ 48E6: DC F0 LDD $F0 48E8: 32 7F LEAS -$01,S 48EA: AD 9F FF EC JSR [$FFEC] ; $D8FC 48EE: C3 00 01 ADDD #$0001 48F1: 32 7F LEAS -$01,S 48F3: AD 9F FF EC JSR [$FFEC] ; $D8FC 48F7: C3 00 01 ADDD #$0001 48FA: 35 04 PULS B 48FC: 35 02 PULS A 48FE: D3 F0 ADDD $F0 4900: F3 02 A1 ADDD $02A1 4903: FD 02 8F STD $028F 4906: 39 RTS ------------------------------------------------ 4907: 7D 02 BF TST $02BF 490A: 2B 34 BMI $4940 490C: E6 0A LDB +$0A,X 490E: C4 7F ANDB #$7F 4910: 26 2E BNE $4940 4912: AD 9F FF E2 JSR [$FFE2] ; $8479 4916: A6 04 LDA +$04,X 4918: 84 07 ANDA #$07 491A: E6 0A LDB +$0A,X 491C: C4 7F ANDB #$7F 491E: ED 24 STD +$04,Y 4920: A6 05 LDA +$05,X 4922: C6 40 LDB #$40 4924: ED 26 STD +$06,Y 4926: 7D 01 17 TST $0117 4929: 2B 08 BMI $4933 492B: FE 01 19 LDU $0119 492E: 10 AF C4 STY ,U 4931: 20 04 BRA $4937 ------------------------------------------------ 4933: 10 BF 01 17 STY $0117 4937: 10 BF 01 19 STY $0119 493B: CE FF FF LDU #$FFFF 493E: EF A4 STU ,Y 4940: BD 7A 11 JSR $7A11 4943: 7D 02 BF TST $02BF 4946: 2B 03 BMI $494B 4948: BD 71 06 JSR $7106 494B: 7E 7A 20 JMP $7A20 ------------------------------------------------ 494E: 6D 06 TST +$06,X 4950: 2B 3F BMI $4991 4952: CE 02 AF LDU #$02AF 4955: 8E 01 17 LDX #$0117 4958: 10 AE 84 LDY ,X 495B: 2B 30 BMI $498D 495D: 10 8C 80 00 CMPY #$8000 4961: 24 28 BCC $498B 4963: A6 24 LDA +$04,Y 4965: E6 26 LDB +$06,Y 4967: CB 58 ADDB #$58 4969: 10 A3 44 CMPD +$04,U 496C: 26 13 BNE $4981 496E: EC A4 LDD ,Y 4970: ED 84 STD ,X 4972: 2A 03 BPL $4977 4974: BF 01 19 STX $0119 4977: AD 9F FF E4 JSR [$FFE4] ; $849F 497B: 10 8E FF FF LDY #$FFFF 497F: 20 08 BRA $4989 ------------------------------------------------ 4981: 30 A4 LEAX ,Y 4983: 10 AE A4 LDY ,Y 4986: 2A 01 BPL $4989 4988: 39 RTS ------------------------------------------------ 4989: 20 D2 BRA $495D ------------------------------------------------ 498B: 20 01 BRA $498E ------------------------------------------------ 498D: 39 RTS ------------------------------------------------ 498E: 8E 02 AF LDX #$02AF 4991: BD 7A 11 JSR $7A11 4994: 7D 02 BF TST $02BF 4997: 2B 03 BMI $499C 4999: BD 72 20 JSR $7220 499C: 39 RTS ------------------------------------------------ 499D: FC 01 04 LDD $0104 49A0: 27 08 BEQ $49AA 49A2: 83 00 01 SUBD #$0001 49A5: CE 00 01 LDU #$0001 49A8: 20 03 BRA $49AD ------------------------------------------------ 49AA: CE 00 00 LDU #$0000 49AD: FD 01 04 STD $0104 49B0: 34 40 PSHS U 49B2: BD 7A 11 JSR $7A11 49B5: 35 40 PULS U 49B7: FF 01 04 STU $0104 49BA: BD 7A F0 JSR $7AF0 49BD: BD 7B 36 JSR $7B36 49C0: 73 02 BE COM $02BE 49C3: FC 01 04 LDD $0104 49C6: BD 70 30 JSR $7030 49C9: 7E 72 20 JMP $7220 ------------------------------------------------ 49CC: BD 7A 11 JSR $7A11 49CF: 7D 02 BF TST $02BF 49D2: 2B 06 BMI $49DA 49D4: BD 79 DB JSR $79DB 49D7: BD 72 20 JSR $7220 49DA: 39 RTS ------------------------------------------------ 49DB: A6 04 LDA +$04,X 49DD: E6 09 LDB +$09,X 49DF: C1 01 CMPB #$01 49E1: 26 2D BNE $4A10 49E3: C6 01 LDB #$01 49E5: 81 00 CMPA #$00 49E7: 27 04 BEQ $49ED 49E9: 58 LSLB 49EA: 4A DECA 49EB: 20 F8 BRA $49E5 ------------------------------------------------ 49ED: A6 0A LDA +$0A,X 49EF: 84 40 ANDA #$40 49F1: 26 0F BNE $4A02 49F3: 34 04 PSHS B 49F5: D4 FE ANDB $FE 49F7: 26 02 BNE $49FB 49F9: 35 94 PULS PC,X,B ------------------------------------------------ 49FB: 35 04 PULS B 49FD: 53 COMB 49FE: D4 FE ANDB $FE 4A00: 20 0C BRA $4A0E ------------------------------------------------ 4A02: 34 04 PSHS B 4A04: D4 FE ANDB $FE 4A06: 27 02 BEQ $4A0A 4A08: 35 94 PULS PC,X,B ------------------------------------------------ 4A0A: 35 04 PULS B 4A0C: DA FE ORB $FE 4A0E: D7 FE STB $FE 4A10: 39 RTS ------------------------------------------------ 4A11: FC 01 04 LDD $0104 4A14: BD 70 30 JSR $7030 4A17: CC 00 00 LDD #$0000 4A1A: FD 01 04 STD $0104 4A1D: 7E 72 48 JMP $7248 ------------------------------------------------ 4A20: 8E 02 AF LDX #$02AF 4A23: FC 01 02 LDD $0102 4A26: 2B 39 BMI $4A61 4A28: A3 0C SUBD +$0C,X 4A2A: 1F 02 TFR D,Y 4A2C: BD 7A E7 JSR $7AE7 4A2F: 10 8C 00 00 CMPY #$0000 4A33: 2E 28 BGT $4A5D 4A35: 26 05 BNE $4A3C 4A37: 7D 02 BF TST $02BF 4A3A: 2B 21 BMI $4A5D 4A3C: FE 01 09 LDU $0109 4A3F: 33 5F LEAU -$01,U 4A41: FF 01 09 STU $0109 4A44: 2A 09 BPL $4A4F 4A46: BD 7A 72 JSR $7A72 4A49: FF 01 06 STU $0106 4A4C: 2A 01 BPL $4A4F 4A4E: 39 RTS ------------------------------------------------ 4A4F: 34 06 PSHS B,A 4A51: F3 01 02 ADDD $0102 4A54: FD 01 02 STD $0102 4A57: 35 06 PULS B,A 4A59: 31 AB LEAY D,Y 4A5B: 20 D2 BRA $4A2F ------------------------------------------------ 4A5D: 10 BF 01 02 STY $0102 4A61: 8E 02 AF LDX #$02AF 4A64: 7D 02 BF TST $02BF 4A67: 2B 08 BMI $4A71 4A69: EC 0C LDD +$0C,X 4A6B: F3 01 04 ADDD $0104 4A6E: FD 01 04 STD $0104 4A71: 39 RTS ------------------------------------------------ 4A72: 34 06 PSHS B,A 4A74: 7D 02 BF TST $02BF 4A77: 2B 13 BMI $4A8C 4A79: 34 20 PSHS Y 4A7B: FC 01 02 LDD $0102 4A7E: F3 01 04 ADDD $0104 4A81: BD 70 30 JSR $7030 4A84: BD 7A F0 JSR $7AF0 4A87: BD 7B 36 JSR $7B36 4A8A: 35 20 PULS Y 4A8C: 7D 02 BF TST $02BF 4A8F: 26 27 BNE $4AB8 4A91: 10 BF 01 04 STY $0104 4A95: BD 7A E7 JSR $7AE7 4A98: BD 70 30 JSR $7030 4A9B: 10 BE 01 06 LDY $0106 4A9F: 31 3F LEAY -$01,Y 4AA1: 10 BF 01 06 STY $0106 4AA5: 26 EE BNE $4A95 4AA7: CC 00 00 LDD #$0000 4AAA: B3 01 04 SUBD $0104 4AAD: FD 01 04 STD $0104 4AB0: CE FF FF LDU #$FFFF 4AB3: FF 01 02 STU $0102 4AB6: 20 2D BRA $4AE5 ------------------------------------------------ 4AB8: 2B 15 BMI $4ACF 4ABA: 73 02 BF COM $02BF 4ABD: FE 01 06 LDU $0106 4AC0: 33 5F LEAU -$01,U 4AC2: FF 01 09 STU $0109 4AC5: CC 00 00 LDD #$0000 4AC8: 1F 03 TFR D,U 4ACA: FD 01 04 STD $0104 4ACD: 20 16 BRA $4AE5 ------------------------------------------------ 4ACF: 10 BF 01 04 STY $0104 4AD3: 73 02 BF COM $02BF 4AD6: CC 00 00 LDD #$0000 4AD9: B3 01 04 SUBD $0104 4ADC: FD 01 04 STD $0104 4ADF: CE FF FF LDU #$FFFF 4AE2: FF 01 02 STU $0102 4AE5: 35 86 PULS PC,B,A ------------------------------------------------ 4AE7: FE 01 0F LDU $010F 4AEA: A6 42 LDA +$02,U 4AEC: C6 06 LDB #$06 4AEE: 3D MUL 4AEF: 39 RTS ------------------------------------------------ 4AF0: 34 70 PSHS U,Y,X 4AF2: 10 BE 01 17 LDY $0117 4AF6: 10 8C 80 00 CMPY #$8000 4AFA: 24 2F BCC $4B2B 4AFC: E6 24 LDB +$04,Y 4AFE: 34 04 PSHS B 4B00: A6 26 LDA +$06,Y 4B02: 8B 58 ADDA #$58 4B04: 34 02 PSHS A 4B06: BD 72 48 JSR $7248 4B09: FC 02 9F LDD $029F 4B0C: AD 9F FF EA JSR [$FFEA] ; $D90F 4B10: C3 00 01 ADDD #$0001 4B13: 32 61 LEAS +$01,S 4B15: AD 9F FF EA JSR [$FFEA] ; $D90F 4B19: C3 00 01 ADDD #$0001 4B1C: 32 61 LEAS +$01,S 4B1E: FD 02 9F STD $029F 4B21: EE A4 LDU ,Y 4B23: AD 9F FF E4 JSR [$FFE4] ; $849F 4B27: 31 C4 LEAY ,U 4B29: 20 CB BRA $4AF6 ------------------------------------------------ 4B2B: CC FF FF LDD #$FFFF 4B2E: FD 01 17 STD $0117 4B31: FD 01 19 STD $0119 4B34: 35 F0 PULS PC,U,Y,X ------------------------------------------------ 4B36: 34 70 PSHS U,Y,X 4B38: 86 07 LDA #$07 4B3A: 34 02 PSHS A 4B3C: 08 FE LSL $FE 4B3E: 24 22 BCC $4B62 4B40: 6F E2 CLR ,-S 4B42: 86 08 LDA #$08 4B44: AA 61 ORA +$01,S 4B46: 8B B0 ADDA #$B0 4B48: 34 02 PSHS A 4B4A: FC 02 9F LDD $029F 4B4D: AD 9F FF EA JSR [$FFEA] ; $D90F 4B51: C3 00 01 ADDD #$0001 4B54: 32 61 LEAS +$01,S 4B56: AD 9F FF EA JSR [$FFEA] ; $D90F 4B5A: C3 00 01 ADDD #$0001 4B5D: 32 61 LEAS +$01,S 4B5F: FD 02 9F STD $029F 4B62: 6A E4 DEC ,S 4B64: 2A D6 BPL $4B3C 4B66: 32 61 LEAS +$01,S 4B68: 35 F0 PULS PC,U,Y,X ------------------------------------------------ 4B6A: 34 06 PSHS B,A 4B6C: FC 02 A7 LDD $02A7 4B6F: C3 00 01 ADDD #$0001 4B72: 34 06 PSHS B,A 4B74: DC F0 LDD $F0 4B76: C3 00 02 ADDD #$0002 4B79: AD 9F FF EA JSR [$FFEA] ; $D90F 4B7D: C3 00 01 ADDD #$0001 4B80: 32 61 LEAS +$01,S 4B82: AD 9F FF EA JSR [$FFEA] ; $D90F 4B86: C3 00 01 ADDD #$0001 4B89: 32 61 LEAS +$01,S 4B8B: 35 86 PULS PC,B,A ------------------------------------------------ 4B8D: 48 LSLA 4B8E: 8E 01 27 LDX #$0127 4B91: EC 86 LDD A,X 4B93: 1F 02 TFR D,Y 4B95: 32 7F LEAS -$01,S 4B97: AD 9F FF EC JSR [$FFEC] ; $D8FC 4B9B: C3 00 01 ADDD #$0001 4B9E: 32 7F LEAS -$01,S 4BA0: AD 9F FF EC JSR [$FFEC] ; $D8FC 4BA4: C3 00 01 ADDD #$0001 4BA7: 35 04 PULS B 4BA9: 35 02 PULS A 4BAB: B3 02 C7 SUBD $02C7 4BAE: 83 00 01 SUBD #$0001 4BB1: 34 06 PSHS B,A 4BB3: FC 01 23 LDD $0123 4BB6: B3 01 21 SUBD $0121 4BB9: 10 A3 E4 CMPD ,S 4BBC: 10 25 00 E6 LBCS $4CA6 4BC0: 1F 20 TFR Y,D 4BC2: C3 00 07 ADDD #$0007 4BC5: 32 7F LEAS -$01,S 4BC7: AD 9F FF EC JSR [$FFEC] ; $D8FC 4BCB: C3 00 01 ADDD #$0001 4BCE: 35 02 PULS A 4BD0: 84 7F ANDA #$7F 4BD2: B1 00 F7 CMPA $00F7 4BD5: 10 26 00 C6 LBNE $4C9F 4BD9: 1F 20 TFR Y,D 4BDB: C3 00 02 ADDD #$0002 4BDE: 32 7F LEAS -$01,S 4BE0: AD 9F FF EC JSR [$FFEC] ; $D8FC 4BE4: C3 00 01 ADDD #$0001 4BE7: 32 7F LEAS -$01,S 4BE9: AD 9F FF EC JSR [$FFEC] ; $D8FC 4BED: C3 00 01 ADDD #$0001 4BF0: 35 04 PULS B 4BF2: 35 02 PULS A 4BF4: F3 02 A7 ADDD $02A7 4BF7: 10 83 03 E7 CMPD #$03E7 4BFB: 10 24 00 99 LBCC $4C98 4BFF: BD 7D 41 JSR $7D41 4C02: D3 F0 ADDD $F0 4C04: 83 00 01 SUBD #$0001 4C07: 34 06 PSHS B,A 4C09: FC 01 21 LDD $0121 4C0C: A3 E1 SUBD ,S++ 4C0E: 1F 01 TFR D,X 4C10: FC 01 21 LDD $0121 4C13: AD 9F FF E8 JSR [$FFE8] ; $D924 4C17: FC 01 21 LDD $0121 4C1A: E3 E4 ADDD ,S 4C1C: FD 01 21 STD $0121 4C1F: EC E4 LDD ,S 4C21: FD 02 A1 STD $02A1 4C24: BD 7D 41 JSR $7D41 4C27: D3 F0 ADDD $F0 4C29: 83 00 01 SUBD #$0001 4C2C: 10 9C F0 CMPY $F0 4C2F: 23 1B BLS $4C4C 4C31: 34 06 PSHS B,A 4C33: EC 62 LDD +$02,S 4C35: 31 AB LEAY D,Y 4C37: FC 02 C7 LDD $02C7 4C3A: 30 AB LEAX D,Y 4C3C: 1F 10 TFR X,D 4C3E: A3 E4 SUBD ,S 4C40: ED E4 STD ,S 4C42: EC 62 LDD +$02,S 4C44: 1E 10 EXG X,D 4C46: AD 9F FF E6 JSR [$FFE6] ; $D939 4C4A: 20 16 BRA $4C62 ------------------------------------------------ 4C4C: 34 20 PSHS Y 4C4E: A3 E4 SUBD ,S 4C50: B3 02 C7 SUBD $02C7 4C53: ED E4 STD ,S 4C55: 1F 20 TFR Y,D 4C57: AE 62 LDX +$02,S 4C59: F3 02 C7 ADDD $02C7 4C5C: E3 62 ADDD +$02,S 4C5E: AD 9F FF E8 JSR [$FFE8] ; $D924 4C62: 32 64 LEAS +$04,S 4C64: BD 7C AC JSR $7CAC 4C67: BD 7C C9 JSR $7CC9 4C6A: 1F 20 TFR Y,D 4C6C: C3 00 02 ADDD #$0002 4C6F: 32 7F LEAS -$01,S 4C71: AD 9F FF EC JSR [$FFEC] ; $D8FC 4C75: C3 00 01 ADDD #$0001 4C78: 32 7F LEAS -$01,S 4C7A: AD 9F FF EC JSR [$FFEC] ; $D8FC 4C7E: C3 00 01 ADDD #$0001 4C81: 35 04 PULS B 4C83: 35 02 PULS A 4C85: F3 02 A7 ADDD $02A7 4C88: FD 02 A7 STD $02A7 4C8B: BD 7B 6A JSR $7B6A 4C8E: FC 02 8F LDD $028F 4C91: FD 02 9F STD $029F 4C94: 4F CLRA 4C95: 5F CLRB 4C96: 20 05 BRA $4C9D ------------------------------------------------ 4C98: 32 62 LEAS +$02,S 4C9A: 4F CLRA 4C9B: C6 02 LDB #$02 4C9D: 20 05 BRA $4CA4 ------------------------------------------------ 4C9F: 32 62 LEAS +$02,S 4CA1: 4F CLRA 4CA2: C6 01 LDB #$01 4CA4: 20 05 BRA $4CAB ------------------------------------------------ 4CA6: 32 62 LEAS +$02,S 4CA8: 86 FF LDA #$FF 4CAA: 5F CLRB 4CAB: 39 RTS ------------------------------------------------ 4CAC: 34 20 PSHS Y 4CAE: 10 9E F0 LDY $F0 4CB1: 31 25 LEAY +$05,Y 4CB3: 1F 20 TFR Y,D 4CB5: 6F E2 CLR ,-S 4CB7: AD 9F FF EA JSR [$FFEA] ; $D90F 4CBB: C3 00 01 ADDD #$0001 4CBE: AD 9F FF EA JSR [$FFEA] ; $D90F 4CC2: C3 00 01 ADDD #$0001 4CC5: 32 61 LEAS +$01,S 4CC7: 35 A0 PULS PC,Y ------------------------------------------------ 4CC9: 34 20 PSHS Y 4CCB: 31 29 LEAY +$09,Y 4CCD: 9E F0 LDX $F0 4CCF: 30 09 LEAX +$09,X 4CD1: C6 07 LDB #$07 4CD3: F7 02 C0 STB $02C0 4CD6: 4F CLRA 4CD7: F6 02 C9 LDB $02C9 4CDA: CB 03 ADDB #$03 4CDC: 34 06 PSHS B,A 4CDE: 32 7F LEAS -$01,S 4CE0: 1F 20 TFR Y,D 4CE2: AD 9F FF EC JSR [$FFEC] ; $D8FC 4CE6: C3 00 01 ADDD #$0001 4CE9: 6D E4 TST ,S 4CEB: 2B 45 BMI $4D32 4CED: 34 10 PSHS X 4CEF: 86 07 LDA #$07 4CF1: B0 02 C0 SUBA $02C0 4CF4: BD 7D 59 JSR $7D59 4CF7: 6D 02 TST +$02,X 4CF9: 35 10 PULS X 4CFB: 2A 35 BPL $4D32 4CFD: 1F 10 TFR X,D 4CFF: AD 9F FF EA JSR [$FFEA] ; $D90F 4D03: C3 00 01 ADDD #$0001 4D06: 33 21 LEAU +$01,Y 4D08: 1F 30 TFR U,D 4D0A: AD 9F FF EC JSR [$FFEC] ; $D8FC 4D0E: C3 00 01 ADDD #$0001 4D11: 33 01 LEAU +$01,X 4D13: 1F 30 TFR U,D 4D15: AD 9F FF EA JSR [$FFEA] ; $D90F 4D19: C3 00 01 ADDD #$0001 4D1C: 33 22 LEAU +$02,Y 4D1E: 1F 30 TFR U,D 4D20: AD 9F FF EC JSR [$FFEC] ; $D8FC 4D24: C3 00 01 ADDD #$0001 4D27: 33 02 LEAU +$02,X 4D29: 1F 30 TFR U,D 4D2B: AD 9F FF EA JSR [$FFEA] ; $D90F 4D2F: C3 00 01 ADDD #$0001 4D32: EC 61 LDD +$01,S 4D34: 31 AB LEAY D,Y 4D36: 30 8B LEAX D,X 4D38: 7A 02 C0 DEC $02C0 4D3B: 26 A3 BNE $4CE0 4D3D: 32 63 LEAS +$03,S 4D3F: 35 A0 PULS PC,Y ------------------------------------------------ 4D41: DC F0 LDD $F0 4D43: 32 7F LEAS -$01,S 4D45: AD 9F FF EC JSR [$FFEC] ; $D8FC 4D49: C3 00 01 ADDD #$0001 4D4C: 32 7F LEAS -$01,S 4D4E: AD 9F FF EC JSR [$FFEC] ; $D8FC 4D52: C3 00 01 ADDD #$0001 4D55: 35 04 PULS B 4D57: 35 82 PULS PC,A ------------------------------------------------ 4D59: 8E 02 D4 LDX #$02D4 4D5C: 4C INCA 4D5D: C6 1B LDB #$1B 4D5F: 3D MUL 4D60: 30 8B LEAX D,X 4D62: 39 RTS ------------------------------------------------ 4D63: 34 06 PSHS B,A 4D65: 10 8E 02 95 LDY #$0295 4D69: CC FF FF LDD #$FFFF 4D6C: FD 02 95 STD $0295 4D6F: FC 01 1F LDD $011F 4D72: E0 25 SUBB +$05,Y 4D74: 82 00 SBCA #$00 4D76: A3 26 SUBD +$06,Y 4D78: 1F 01 TFR D,X 4D7A: FC 01 1F LDD $011F 4D7D: AD 9F FF E8 JSR [$FFE8] ; $D924 4D81: E3 E4 ADDD ,S 4D83: FD 02 8F STD $028F 4D86: 35 06 PULS B,A 4D88: FD 02 A1 STD $02A1 4D8B: 7F 02 A6 CLR $02A6 4D8E: EC 22 LDD +$02,Y 4D90: 27 6B BEQ $4DFD 4D92: A6 24 LDA +$04,Y 4D94: 81 58 CMPA #$58 4D96: 24 2F BCC $4DC7 4D98: AE 26 LDX +$06,Y 4D9A: 30 03 LEAX +$03,X 4D9C: 1F 10 TFR X,D 4D9E: 32 7F LEAS -$01,S 4DA0: AD 9F FF EC JSR [$FFEC] ; $D8FC 4DA4: C3 00 01 ADDD #$0001 4DA7: A6 24 LDA +$04,Y 4DA9: 34 02 PSHS A 4DAB: EC 26 LDD +$06,Y 4DAD: 1F 01 TFR D,X 4DAF: AD 9F FF EA JSR [$FFEA] ; $D90F 4DB3: C3 00 01 ADDD #$0001 4DB6: 32 61 LEAS +$01,S 4DB8: 30 02 LEAX +$02,X 4DBA: BF 02 9D STX $029D 4DBD: 30 01 LEAX +$01,X 4DBF: 73 02 A6 COM $02A6 4DC2: 4F CLRA 4DC3: 35 04 PULS B 4DC5: 20 34 BRA $4DFB ------------------------------------------------ 4DC7: 81 F4 CMPA #$F4 4DC9: 26 1D BNE $4DE8 4DCB: EC 26 LDD +$06,Y 4DCD: C3 00 01 ADDD #$0001 4DD0: 32 7F LEAS -$01,S 4DD2: AD 9F FF EC JSR [$FFEC] ; $D8FC 4DD6: C3 00 01 ADDD #$0001 4DD9: 32 7F LEAS -$01,S 4DDB: AD 9F FF EC JSR [$FFEC] ; $D8FC 4DDF: C3 00 01 ADDD #$0001 4DE2: 35 04 PULS B 4DE4: 35 02 PULS A 4DE6: 20 11 BRA $4DF9 ------------------------------------------------ 4DE8: EC 26 LDD +$06,Y 4DEA: C3 00 01 ADDD #$0001 4DED: 32 7F LEAS -$01,S 4DEF: AD 9F FF EC JSR [$FFEC] ; $D8FC 4DF3: C3 00 01 ADDD #$0001 4DF6: 4F CLRA 4DF7: 35 04 PULS B 4DF9: AE 26 LDX +$06,Y 4DFB: 20 50 BRA $4E4D ------------------------------------------------ 4DFD: 34 20 PSHS Y 4DFF: 8E 02 AF LDX #$02AF 4E02: A6 24 LDA +$04,Y 4E04: A7 05 STA +$05,X 4E06: 10 AE 26 LDY +$06,Y 4E09: 31 21 LEAY +$01,Y 4E0B: 10 AF 02 STY +$02,X 4E0E: CE C8 49 LDU #$C849 4E11: EF 84 STU ,X 4E13: BD 72 A0 JSR $72A0 4E16: 35 20 PULS Y 4E18: EC 0C LDD +$0C,X 4E1A: 34 06 PSHS B,A 4E1C: A6 04 LDA +$04,X 4E1E: AE 26 LDX +$06,Y 4E20: 91 F6 CMPA $F6 4E22: 27 27 BEQ $4E4B 4E24: EC E1 LDD ,S++ 4E26: 10 26 FF 66 LBNE $4D90 4E2A: 34 06 PSHS B,A 4E2C: A6 24 LDA +$04,Y 4E2E: 34 02 PSHS A 4E30: EC 26 LDD +$06,Y 4E32: AD 9F FF EA JSR [$FFEA] ; $D90F 4E36: C3 00 01 ADDD #$0001 4E39: E6 25 LDB +$05,Y 4E3B: 35 02 PULS A 4E3D: 81 58 CMPA #$58 4E3F: 24 08 BCC $4E49 4E41: 33 02 LEAU +$02,X 4E43: FF 02 9D STU $029D 4E46: 73 02 A6 COM $02A6 4E49: 30 85 LEAX B,X 4E4B: 35 06 PULS B,A 4E4D: FD 01 02 STD $0102 4E50: BF 02 9F STX $029F 4E53: FC 01 21 LDD $0121 4E56: F3 02 A1 ADDD $02A1 4E59: FD 01 21 STD $0121 4E5C: FD 02 91 STD $0291 4E5F: EC 22 LDD +$02,Y 4E61: 7E 70 00 JMP $7000 ------------------------------------------------ 4E64: D6 F2 LDB $F2 4E66: 8E 01 C7 LDX #$01C7 4E69: 6F 85 CLR B,X 4E6B: FE 02 A7 LDU $02A7 4E6E: 33 41 LEAU +$01,U 4E70: 34 40 PSHS U 4E72: DC F0 LDD $F0 4E74: C3 00 02 ADDD #$0002 4E77: AD 9F FF EA JSR [$FFEA] ; $D90F 4E7B: C3 00 01 ADDD #$0001 4E7E: 32 61 LEAS +$01,S 4E80: AD 9F FF EA JSR [$FFEA] ; $D90F 4E84: C3 00 01 ADDD #$0001 4E87: 32 61 LEAS +$01,S 4E89: DC F0 LDD $F0 4E8B: F3 02 C7 ADDD $02C7 4E8E: FD 02 9F STD $029F 4E91: FC 01 1F LDD $011F 4E94: B3 02 9F SUBD $029F 4E97: 1F 01 TFR D,X 4E99: FC 01 25 LDD $0125 4E9C: B3 01 1F SUBD $011F 4E9F: 34 06 PSHS B,A 4EA1: FC 01 1F LDD $011F 4EA4: AD 9F FF E8 JSR [$FFE8] ; $D924 4EA8: FC 01 21 LDD $0121 4EAB: E3 E4 ADDD ,S 4EAD: FD 01 21 STD $0121 4EB0: EC E4 LDD ,S 4EB2: FD 02 A1 STD $02A1 4EB5: FC 01 25 LDD $0125 4EB8: B3 01 21 SUBD $0121 4EBB: 10 A3 E4 CMPD ,S 4EBE: 25 54 BCS $4F14 4EC0: AE E4 LDX ,S 4EC2: 1F 10 TFR X,D 4EC4: F3 01 21 ADDD $0121 4EC7: FD 01 1F STD $011F 4ECA: FC 01 21 LDD $0121 4ECD: B3 02 9F SUBD $029F 4ED0: 1F 02 TFR D,Y 4ED2: EC E4 LDD ,S 4ED4: F3 02 9F ADDD $029F 4ED7: FD 02 9F STD $029F 4EDA: 10 AF E4 STY ,S 4EDD: FC 01 21 LDD $0121 4EE0: AD 9F FF E6 JSR [$FFE6] ; $D939 4EE4: FC 01 1F LDD $011F 4EE7: B3 01 21 SUBD $0121 4EEA: ED E4 STD ,S 4EEC: FC 01 21 LDD $0121 4EEF: B3 02 9F SUBD $029F 4EF2: 1F 01 TFR D,X 4EF4: FC 01 21 LDD $0121 4EF7: AD 9F FF E8 JSR [$FFE8] ; $D924 4EFB: FC 02 A1 LDD $02A1 4EFE: E3 E4 ADDD ,S 4F00: FD 02 A1 STD $02A1 4F03: FC 01 1F LDD $011F 4F06: FD 01 21 STD $0121 4F09: FC 01 25 LDD $0125 4F0C: B3 01 21 SUBD $0121 4F0F: 10 A3 E4 CMPD ,S 4F12: 20 AA BRA $4EBE ------------------------------------------------ 4F14: 10 AE E4 LDY ,S 4F17: 1F 01 TFR D,X 4F19: FC 01 21 LDD $0121 4F1C: B3 02 9F SUBD $029F 4F1F: ED E4 STD ,S 4F21: FC 01 21 LDD $0121 4F24: AD 9F FF E6 JSR [$FFE6] ; $D939 4F28: 1F 20 TFR Y,D 4F2A: F3 02 9F ADDD $029F 4F2D: FD 02 8F STD $028F 4F30: 32 62 LEAS +$02,S 4F32: FC 01 25 LDD $0125 4F35: B3 01 21 SUBD $0121 4F38: F3 02 9F ADDD $029F 4F3B: FD 02 9F STD $029F 4F3E: 39 RTS ------------------------------------------------ 4F3F: BE 01 0F LDX $010F 4F42: FD 02 93 STD $0293 4F45: E6 04 LDB +$04,X 4F47: 5D TSTB 4F48: 26 04 BNE $4F4E 4F4A: 86 01 LDA #$01 4F4C: 20 01 BRA $4F4F ------------------------------------------------ 4F4E: 4F CLRA 4F4F: FD 01 02 STD $0102 4F52: 1F 20 TFR Y,D 4F54: 32 7F LEAS -$01,S 4F56: 10 B3 01 02 CMPD $0102 4F5A: 25 33 BCS $4F8F 4F5C: 1F 02 TFR D,Y 4F5E: FC 02 93 LDD $0293 4F61: AD 9F FF EC JSR [$FFEC] ; $D8FC 4F65: C3 00 01 ADDD #$0001 4F68: 32 7F LEAS -$01,S 4F6A: AD 9F FF EC JSR [$FFEC] ; $D8FC 4F6E: C3 00 01 ADDD #$0001 4F71: EC E4 LDD ,S 4F73: 1E 89 EXG A,B 4F75: C3 00 00 ADDD #$0000 4F78: 26 06 BNE $4F80 4F7A: 32 62 LEAS +$02,S 4F7C: 1F 20 TFR Y,D 4F7E: 20 11 BRA $4F91 ------------------------------------------------ 4F80: F3 02 93 ADDD $0293 4F83: FD 02 93 STD $0293 4F86: 32 61 LEAS +$01,S 4F88: 1F 20 TFR Y,D 4F8A: B3 01 02 SUBD $0102 4F8D: 20 C7 BRA $4F56 ------------------------------------------------ 4F8F: 32 61 LEAS +$01,S 4F91: 1F 02 TFR D,Y 4F93: FC 02 93 LDD $0293 4F96: 83 00 05 SUBD #$0005 4F99: 10 93 F0 CMPD $F0 4F9C: 26 05 BNE $4FA3 4F9E: F3 02 C7 ADDD $02C7 4FA1: 20 03 BRA $4FA6 ------------------------------------------------ 4FA3: C3 00 07 ADDD #$0007 4FA6: 39 RTS ------------------------------------------------ 4FA7: 1E 02 EXG D,Y 4FA9: 10 BF 02 CC STY $02CC 4FAD: 10 BF 02 8F STY $028F 4FB1: 34 06 PSHS B,A 4FB3: CC 00 00 LDD #$0000 4FB6: FD 01 02 STD $0102 4FB9: EC E4 LDD ,S 4FBB: 10 83 15 55 CMPD #$1555 4FBF: 25 08 BCS $4FC9 4FC1: 83 15 55 SUBD #$1555 4FC4: CE 15 55 LDU #$1555 4FC7: 20 05 BRA $4FCE ------------------------------------------------ 4FC9: CC 00 00 LDD #$0000 4FCC: EE E4 LDU ,S 4FCE: ED E4 STD ,S 4FD0: 34 40 PSHS U 4FD2: E6 61 LDB +$01,S 4FD4: 86 06 LDA #$06 4FD6: 3D MUL 4FD7: 34 06 PSHS B,A 4FD9: E6 62 LDB +$02,S 4FDB: 86 06 LDA #$06 4FDD: 3D MUL 4FDE: 1F 98 TFR B,A 4FE0: 5F CLRB 4FE1: E3 E1 ADDD ,S++ 4FE3: 32 62 LEAS +$02,S 4FE5: B3 01 02 SUBD $0102 4FE8: FD 01 02 STD $0102 4FEB: CE D1 A7 LDU #$D1A7 4FEE: 10 BE 02 8F LDY $028F 4FF2: BD 72 6F JSR $726F 4FF5: 10 BF 02 8F STY $028F 4FF9: EC E4 LDD ,S 4FFB: 26 BC BNE $4FB9 4FFD: 32 62 LEAS +$02,S 4FFF: 39 RTS ------------------------------------------------ --- menu text ---------------------------------- ------------------------------------------------ 5000: 45 4E 53 4F 4E 49 51 8A 53 51 2D 38 30 92 43 52 ENSONIQ.SQ-80.CR 5010: 4F 53 53 20 57 41 56 45 20 53 59 4E 54 48 45 53 OSS WAVE SYNTHES 5020: 49 5A 45 52 43 41 4C 49 42 52 41 54 49 4E 47 20 IZERCALIBRATING 5030: 4B 45 59 42 4F 41 52 44 20 2D 20 44 4F 20 4E 4F KEYBOARD - DO NO 5040: 54 20 54 4F 55 43 48 20 4B 45 59 53 00 86 53 4F T TOUCH KEYS..SO 5050: 46 54 20 52 45 53 45 54 20 2D 20 53 59 53 54 45 FT RESET - SYSTE 5060: 4D 20 45 52 52 4F 52 AE 50 52 45 53 53 20 41 4E M ERROR.PRESS AN 5070: 59 20 42 55 54 54 4F 4E 20 54 4F 20 43 4F 4E 54 Y BUTTON TO CONT 5080: 49 4E 55 45 00 45 4E 53 4F 4E 49 51 8A 53 51 2D INUE.ENSONIQ.SQ- 5090: 38 30 93 53 59 4E 54 48 45 53 49 5A 45 52 2F 53 80.SYNTHESIZER/S 50A0: 45 51 55 45 4E 43 45 52 B2 53 4F 46 54 57 41 52 EQUENCER.SOFTWAR 50B0: 45 20 56 45 52 53 49 4F 4E C4 2E C8 2D 00 D6 88 E VERSION...-... 50C0: 2A 2A 20 57 52 49 54 49 4E 47 20 4E 45 57 20 50 ** WRITING NEW P 50D0: 52 4F 47 52 41 4D 20 2A 2A 00 D6 4D 49 44 49 20 ROGRAM **..MIDI 50E0: 2D 20 4C 4F 41 44 95 4F 4E 4C 59 20 45 53 51 2D - LOAD.ONLY ESQ- 50F0: 31 20 53 45 51 20 44 41 54 41 46 52 4F 4D 20 4D 1 SEQ DATAFROM M 5100: 49 52 41 47 45 B7 49 4E 54 20 50 52 4F 47 20 42 IRAGE.INT PROG B 5110: 41 4E 4B 53 20 2B 20 53 45 51 20 44 41 54 41 00 ANKS + SEQ DATA. 5120: D6 4D 49 44 49 88 43 55 52 52 45 4E 54 20 50 52 .MIDI.CURRENT PR 5130: 4F 47 52 41 4D A8 53 45 4E 44 B1 49 4E 54 20 50 OGRAM.SEND.INT P 5140: 52 4F 47 20 42 41 4E 4B 53 C3 53 45 51 20 54 4F ROG BANKS.SEQ TO 5150: 20 53 51 2D 38 30 00 D6 4D 49 44 49 20 53 45 4E SQ-80..MIDI SEN 5160: 44 20 54 4F 20 53 51 2D 38 30 98 43 55 52 52 45 D TO SQ-80.CURRE 5170: 4E 54 20 53 45 51 55 45 4E 43 45 BE 41 4C 4C 20 NT SEQUENCE.ALL 5180: 53 45 51 55 45 4E 43 45 52 20 44 41 54 41 00 D6 SEQUENCER DATA.. 5190: 54 41 50 45 A8 4C 4F 41 44 00 D6 54 41 50 45 A8 TAPE.LOAD..TAPE. 51A0: 53 41 56 45 00 D6 54 41 50 45 A8 56 45 52 49 46 SAVE..TAPE.VERIF 51B0: 59 00 87 53 45 51 55 45 4E 43 45 52 2D 94 4F 4E Y..SEQUENCER-.ON 51C0: 45 20 53 45 51 9D 2D A0 41 4C 4C 20 53 45 51 B0 E SEQ.-.ALL SEQ. 51D0: 50 52 4F 47 52 41 4D 53 2D BB 49 4E 54 20 42 41 PROGRAMS-.INT BA 51E0: 4E 4B 53 00 D6 86 2A 20 4D 49 44 49 20 44 41 54 NKS...* MIDI DAT 51F0: 41 20 42 45 49 4E 47 20 54 52 41 4E 53 46 45 52 A BEING TRANSFER 5200: 52 45 44 20 2A 00 88 2A 20 4D 49 44 49 20 50 52 RED *..* MIDI PR 5210: 4F 43 45 44 55 52 45 20 43 4F 4D 50 4C 45 54 45 OCEDURE COMPLETE 5220: 20 2A 00 84 2A 20 54 41 52 47 45 54 20 53 59 53 *..* TARGET SYS 5230: 54 45 4D 20 4E 4F 54 20 52 45 53 50 4F 4E 44 49 TEM NOT RESPONDI 5240: 4E 47 20 2A 00 8F D0 45 52 52 4F 52 20 41 4C 45 NG *...ERROR ALE 5250: 52 54 D1 AA 2A 20 4F 4E 4C 59 20 53 45 51 55 45 RT..* ONLY SEQUE 5260: 4E 43 45 20 44 41 54 41 20 43 41 4E 20 42 45 20 NCE DATA CAN BE 5270: 4C 4F 41 44 45 44 20 2A 00 2A 20 4E 4F 54 20 45 LOADED *.* NOT E 5280: 4E 4F 55 47 48 20 4D 45 4D 4F 52 59 20 54 4F 20 NOUGH MEMORY TO 5290: 4C 4F 41 44 20 53 45 51 55 45 4E 43 45 20 2A 00 LOAD SEQUENCE *. 52A0: AB 2A 20 4E 4F 20 53 45 51 55 45 4E 43 45 20 4C .* NO SEQUENCE L 52B0: 4F 43 41 54 49 4F 4E 53 20 41 56 41 49 4C 41 42 OCATIONS AVAILAB 52C0: 4C 45 20 2A 00 82 2A 20 44 41 54 41 20 54 52 41 LE *..* DATA TRA 52D0: 4E 53 4D 49 54 54 45 44 20 2D 20 43 48 45 43 4B NSMITTED - CHECK 52E0: 20 52 45 43 45 49 56 45 52 20 2A 00 D6 8A 2A 20 RECEIVER *...* 52F0: 53 41 56 49 4E 47 20 44 41 54 41 20 54 4F 20 54 SAVING DATA TO T 5300: 41 50 45 20 2A 00 D6 88 2A 20 52 45 41 44 49 4E APE *...* READIN 5310: 47 20 44 41 54 41 20 46 52 4F 4D 20 54 41 50 45 G DATA FROM TAPE 5320: 20 2A 00 88 2A 20 54 41 50 45 20 50 52 4F 43 45 *..* TAPE PROCE 5330: 44 55 52 45 20 43 4F 4D 50 4C 45 54 45 20 2A 00 DURE COMPLETE *. 5340: 8F D0 45 52 52 4F 52 20 41 4C 45 52 54 D1 AB 2A ..ERROR ALERT..* 5350: 20 54 41 50 45 20 4E 4F 54 20 53 54 41 52 54 45 TAPE NOT STARTE 5360: 44 20 4F 4E 20 4C 45 41 44 45 52 20 54 4F 4E 45 D ON LEADER TONE 5370: 20 2A 00 91 D0 57 41 52 4E 49 4E 47 D1 AB 2A 20 *...WARNING..* 5380: 44 41 54 41 20 45 52 52 4F 52 20 46 52 4F 4D 20 DATA ERROR FROM 5390: 54 41 50 45 20 57 41 53 20 46 49 58 45 44 20 2A TAPE WAS FIXED * 53A0: 00 91 D0 57 41 52 4E 49 4E 47 D1 AA 2A 20 56 45 ...WARNING..* VE 53B0: 52 49 46 59 20 46 41 49 4C 45 44 20 2D 20 49 4E RIFY FAILED - IN 53C0: 56 41 4C 49 44 20 54 41 50 45 20 44 41 54 41 20 VALID TAPE DATA 53D0: 2A 00 8A D0 46 41 54 41 4C 20 45 52 52 4F 52 53 *...FATAL ERRORS 53E0: 20 44 45 54 45 43 54 45 44 D1 AD 2A 20 53 45 51 DETECTED..* SEQ 53F0: 55 45 4E 43 45 52 20 4D 45 4D 4F 52 59 20 49 53 UENCER MEMORY IS 5400: 20 43 4C 45 41 52 45 44 20 2A 00 8F D0 45 52 52 CLEARED *...ERR 5410: 4F 52 20 41 4C 45 52 54 D1 AA 2A 20 49 4E 43 4F OR ALERT..* INCO 5420: 52 52 45 43 54 20 54 59 50 45 20 4F 46 20 44 41 RRECT TYPE OF DA 5430: 54 41 20 4F 4E 20 54 41 50 45 20 2A 00 8A D0 46 TA ON TAPE *...F 5440: 41 54 41 4C 20 45 52 52 4F 52 53 20 44 45 54 45 ATAL ERRORS DETE 5450: 43 54 45 44 D1 AD 2A 20 41 4C 4C 20 49 4E 54 45 CTED..* ALL INTE 5460: 52 4E 41 4C 20 50 52 4F 47 52 41 4D 53 20 52 45 RNAL PROGRAMS RE 5470: 53 45 54 20 2A 00 8F D0 45 52 52 4F 52 20 41 4C SET *...ERROR AL 5480: 45 52 54 D1 AA 2A 20 53 45 51 55 45 4E 43 45 20 ERT..* SEQUENCE 5490: 4C 4F 41 44 20 46 41 49 4C 45 44 20 2D 20 54 41 LOAD FAILED - TA 54A0: 50 45 20 45 52 52 4F 52 20 2A 00 D6 89 2A 20 50 PE ERROR *...* P 54B0: 52 4F 47 52 41 4D 53 20 42 45 49 4E 47 20 43 4F ROGRAMS BEING CO 54C0: 50 49 45 44 20 2A 00 D6 43 4F 50 59 20 50 52 4F PIED *..COPY PRO 54D0: 47 52 41 4D 53 20 46 52 4F 4D A3 2A 59 45 53 2A GRAMS FROM.*YES* 54E0: CB 2A 20 4E 4F 2A 93 00 D6 8C D0 2A 20 43 41 52 .* NO*.....* CAR 54F0: 54 52 49 44 47 45 20 45 52 52 4F 52 20 2A D1 00 TRIDGE ERROR *.. 5500: B2 4E 4F 20 43 41 52 54 52 49 44 47 45 20 49 4E .NO CARTRIDGE IN 5510: 53 54 41 4C 4C 45 44 00 AC 43 41 52 54 20 41 20 STALLED..CART A 5520: 42 41 4E 4B 20 50 52 4F 47 52 41 4D 53 20 44 4F BANK PROGRAMS DO 5530: 20 4E 4F 54 20 45 58 49 53 54 00 AC 43 41 52 54 NOT EXIST..CART 5540: 20 42 20 42 41 4E 4B 20 50 52 4F 47 52 41 4D 53 B BANK PROGRAMS 5550: 20 44 4F 20 4E 4F 54 20 45 58 49 53 54 00 B2 49 DO NOT EXIST..I 5560: 4C 4C 45 47 41 4C 20 43 41 52 54 52 49 44 47 45 LLEGAL CARTRIDGE 5570: 20 54 59 50 45 00 D6 85 57 52 49 54 45 20 46 41 TYPE...WRITE FA 5580: 49 4C 45 44 20 2D 20 43 48 45 43 4B 20 43 41 52 ILED - CHECK CAR 5590: 54 52 49 44 47 45 00 D6 52 41 44 20 53 4F 46 54 TRIDGE..RAD SOFT 55A0: 57 41 52 45 20 42 59 20 41 4C 45 58 2F 42 49 4C WARE BY ALEX/BIL 55B0: 4C 2F 4A 4F 48 4E 2F 4D 41 52 43 2F 4D 41 54 53 L/JOHN/MARC/MATS 55C0: 48 44 57 52 20 41 4C 2F 42 4F 42 2F 47 41 52 59 HDWR AL/BOB/GARY 55D0: 2F 4A 4F 4E 2F 54 4F 4D 20 45 4E 53 4F 4E 49 51 /JON/TOM ENSONIQ 55E0: 20 3C 43 3E 31 39 38 37 00 D6 45 52 41 53 45 20 1987..ERASE 55F0: 41 4C 4C 20 4D 45 4D 4F 52 59 20 41 4E 44 20 52 ALL MEMORY AND R 5600: 45 49 4E 49 54 49 41 4C 49 5A 45 20 20 2A 59 45 EINITIALIZE *YE 5610: 53 2A CB 2A 20 4E 4F 2A 00 D6 82 D0 57 41 52 4E S*.* NO*....WARN 5620: 49 4E 47 D1 8B 2D 2D 20 42 41 54 54 45 52 59 20 ING..-- BATTERY 5630: 56 4F 4C 54 41 47 45 20 49 53 20 4C 4F 57 AA 53 VOLTAGE IS LOW.S 5640: 41 56 45 20 44 41 54 41 20 41 4E 44 20 43 4F 4E AVE DATA AND CON 5650: 53 55 4C 54 20 4F 57 4E 45 52 53 20 4D 41 4E 55 SULT OWNERS MANU 5660: 41 4C 00 D6 4B 45 45 50 20 46 49 52 53 54 20 54 AL..KEEP FIRST T 5670: 52 41 43 4B 20 2D 97 42 41 52 53 A3 2A 59 45 53 RACK -.BARS.*YES 5680: 2A CB 2A 20 4E 4F 2A 00 D6 87 2A 20 53 45 51 55 *.* NO*...* SEQU 5690: 45 4E 43 45 52 20 4D 45 4D 4F 52 59 20 49 53 20 ENCER MEMORY IS 56A0: 46 55 4C 4C 20 2A A8 45 52 41 53 45 20 53 45 51 FULL *.ERASE SEQ 56B0: 55 45 4E 43 45 53 20 4F 52 20 53 4F 4E 47 53 20 UENCES OR SONGS 56C0: 54 4F 20 43 4F 4E 54 49 4E 55 45 2E 2E 2E 00 D6 TO CONTINUE..... 56D0: 50 4C 41 59 20 4F 52 49 47 49 4E 41 4C 20 54 52 PLAY ORIGINAL TR 56E0: 41 43 4B 9A 50 4C 41 59 20 4E 45 57 20 54 52 41 ACK.PLAY NEW TRA 56F0: 43 4B 4B 45 45 50 20 4F 52 49 47 49 4E 41 4C 20 CKKEEP ORIGINAL 5700: 54 52 41 43 4B C2 4B 45 45 50 20 4E 45 57 20 54 TRACK.KEEP NEW T 5710: 52 41 43 4B 00 D6 4C 4F 43 41 54 45 9A 53 45 51 RACK..LOCATE.SEQ 5720: 3D A1 42 41 52 3D AD 54 4D 50 3D BC 47 4F 54 4F =.BAR=.TMP=.GOTO 5730: C3 42 41 43 4B 55 50 CB 42 45 47 49 4E 00 8E 53 .BACKUP.BEGIN..S 5740: 54 45 50 3D 95 2E 00 8D 54 52 41 43 4B 3D 00 4E TEP=....TRACK=.N 5750: 4F 4E 45 00 D6 8E 4C 4F 43 41 54 49 4E 47 2E 2E ONE...LOCATING.. 5760: 2E 00 D6 43 52 45 41 54 45 88 4E 45 57 20 53 45 ...CREATE.NEW SE 5770: 51 93 4E 45 57 20 53 4F 4E 47 9E 46 52 45 45 3D Q.NEW SONG.FREE= 5780: AF 45 52 41 53 45 20 53 45 51 BA 45 52 41 53 45 .ERASE SEQ.ERASE 5790: 20 53 4F 4E 47 C7 45 52 41 53 45 20 41 4C 4C 00 SONG.ERASE ALL. 57A0: D6 89 2A 20 53 41 56 49 4E 47 20 4E 45 57 20 54 ..* SAVING NEW T 57B0: 52 41 43 4B 20 44 41 54 41 20 2A 00 45 44 49 54 RACK DATA *.EDIT 57C0: 88 53 45 4C 45 43 54 20 54 59 50 45 20 4F 46 20 .SELECT TYPE OF 57D0: 45 44 49 54 49 4E 47 AE 53 4F 4E 47 B5 53 45 51 EDITING.SONG.SEQ 57E0: BB 54 52 41 43 4B C3 53 54 45 50 CA 2A 45 58 49 .TRACK.STEP.*EXI 57F0: 54 2A 00 8A 2A 20 4E 4F 20 53 4F 4E 47 20 49 53 T*..* NO SONG IS 5800: 20 53 45 4C 45 43 54 45 44 20 2A 00 85 2A 20 4E SELECTED *..* N 5810: 4F 20 44 41 54 41 20 49 4E 20 53 45 4C 45 43 54 O DATA IN SELECT 5820: 45 44 20 53 45 51 55 45 4E 43 45 20 2A 00 53 45 ED SEQUENCE *.SE 5830: 4C 45 43 54 20 53 45 51 55 45 4E 43 45 20 49 4E LECT SEQUENCE IN 5840: 20 4E 45 58 54 20 53 4F 4E 47 20 53 54 45 50 A3 NEXT SONG STEP. 5850: 2A 59 45 53 2A CB 2A 20 4E 4F 2A 00 45 44 49 54 *YES*.* NO*.EDIT 5860: 8C 53 54 45 50 3D 94 54 52 3D 9B 53 45 51 3D A2 .STEP=.TR=.SEQ=. 5870: 52 45 50 3D A8 53 4F 4E 47 AE 49 4E 53 45 52 54 REP=.SONG.INSERT 5880: B6 44 45 4C 45 54 45 BE 50 52 45 56 C4 4E 45 58 .DELETE.PREV.NEX 5890: 54 CA 2A 45 58 49 54 2A 00 43 4F 50 59 20 53 45 T.*EXIT*.COPY SE 58A0: 51 2D 8C 54 4F 20 53 45 51 2D 00 41 50 50 45 4E Q-.TO SEQ-.APPEN 58B0: 44 20 53 45 51 2D 8E 54 4F 20 45 4E 44 20 4F 46 D SEQ-.TO END OF 58C0: 20 53 45 51 2D 00 87 42 41 52 53 91 53 45 51 2D SEQ-..BARS.SEQ- 58D0: 98 41 54 20 42 41 52 A8 46 49 52 53 54 3D 30 30 .AT BAR.FIRST=00 58E0: 31 20 4C 41 53 54 3D CA 2A 4E 45 58 54 2A 00 53 1 LAST=.*NEXT*.S 58F0: 45 51 2D 87 49 53 8E 42 41 52 53 20 4C 4F 4E 47 EQ-.IS.BARS LONG 5900: B3 42 41 52 53 20 41 54 20 42 41 52 00 A3 2A 59 .BARS AT BAR..*Y 5910: 45 53 2A CB 2A 20 4E 4F 2A 00 D6 83 2A 20 53 45 ES*.* NO*...* SE 5920: 51 55 45 4E 43 45 20 4C 45 4E 47 54 48 20 43 41 QUENCE LENGTH CA 5930: 4E 4E 4F 54 20 42 45 20 43 48 41 4E 47 45 44 20 NNOT BE CHANGED 5940: 2A 00 84 2A 20 54 41 52 47 45 54 20 53 45 51 55 *..* TARGET SEQU 5950: 45 4E 43 45 20 41 4C 52 45 41 44 59 20 45 58 49 ENCE ALREADY EXI 5960: 53 54 53 20 2A AF 45 52 41 53 45 20 49 54 20 4F STS *.ERASE IT O 5970: 52 20 53 45 4C 45 43 54 20 41 4E 4F 54 48 45 52 R SELECT ANOTHER 5980: 00 D6 82 2A 20 53 45 51 55 45 4E 43 45 20 54 4F ...* SEQUENCE TO 5990: 20 41 50 50 45 4E 44 20 44 4F 45 53 20 4E 4F 54 APPEND DOES NOT 59A0: 20 45 58 49 53 54 20 2A AE 43 52 45 41 54 45 20 EXIST *.CREATE 59B0: 49 54 20 4F 52 20 53 45 4C 45 43 54 20 41 4E 4F IT OR SELECT ANO 59C0: 54 48 45 52 00 86 2A 20 53 45 51 55 45 4E 43 45 THER..* SEQUENCE 59D0: 20 43 41 4E 4E 4F 54 20 42 45 20 41 50 50 45 4E CANNOT BE APPEN 59E0: 44 45 44 20 2A 00 AB 54 49 4D 45 20 53 49 47 4E DED *..TIME SIGN 59F0: 41 54 55 52 45 53 20 41 52 45 20 49 4E 43 4F 4D ATURES ARE INCOM 5A00: 50 41 54 49 42 4C 45 00 AD 52 45 53 55 4C 54 20 PATIBLE..RESULT 5A10: 49 53 20 4D 4F 52 45 20 54 48 41 4E 20 39 39 39 IS MORE THAN 999 5A20: 20 42 41 52 53 00 45 44 49 54 20 54 52 41 43 4B BARS.EDIT TRACK 5A30: 2D 8E 54 52 41 4E 53 50 4F 53 45 99 52 45 4D 2D -.TRANSPOSE.REM- 5A40: 43 54 52 4C 53 AC 51 55 41 4E 54 49 5A 45 B6 45 CTRLS.QUANTIZE.E 5A50: 52 41 53 45 BD 4D 45 52 47 45 C4 43 4F 50 59 CA RASE.MERGE.COPY. 5A60: 2A 45 58 49 54 2A 00 43 4F 50 59 20 54 52 41 43 *EXIT*.COPY TRAC 5A70: 4B 8D 54 4F 20 54 52 41 43 4B 00 4D 45 52 47 45 K.TO TRACK.MERGE 5A80: 20 54 52 41 43 4B 8E 49 4E 54 4F 20 54 52 41 43 TRACK.INTO TRAC 5A90: 4B 00 54 52 41 4E 53 50 4F 53 45 20 54 52 41 43 K.TRANSPOSE TRAC 5AA0: 4B 93 42 59 9B 53 54 45 50 53 00 45 52 41 53 45 K.BY.STEPS.ERASE 5AB0: 20 41 4E 44 20 55 4E 44 45 46 49 4E 45 20 54 52 AND UNDEFINE TR 5AC0: 41 43 4B 00 52 45 4D 4F 56 45 20 43 4F 4E 54 52 ACK.REMOVE CONTR 5AD0: 4F 4C 4C 45 52 53 20 46 52 4F 4D 20 54 52 41 43 OLLERS FROM TRAC 5AE0: 4B 00 51 55 41 4E 54 49 5A 45 20 54 52 41 43 4B K.QUANTIZE TRACK 5AF0: 91 54 4F 9A 4E 4F 54 45 53 00 87 2A 20 54 41 52 .TO.NOTES..* TAR 5B00: 47 45 54 20 54 52 41 43 4B 20 49 53 20 4E 4F 54 GET TRACK IS NOT 5B10: 20 45 4D 50 54 59 20 2A AD 45 52 41 53 45 20 54 EMPTY *.ERASE T 5B20: 52 41 43 4B 20 4F 52 20 53 45 4C 45 43 54 20 41 RACK OR SELECT A 5B30: 4E 4F 54 48 45 52 00 89 2A 20 51 55 41 4E 54 49 NOTHER..* QUANTI 5B40: 5A 45 20 4E 4F 54 20 50 4F 53 53 49 42 4C 45 20 ZE NOT POSSIBLE 5B50: 2A B4 55 53 45 20 53 4D 41 4C 4C 45 52 20 56 41 *.USE SMALLER VA 5B60: 4C 55 45 00 45 44 49 54 85 54 52 41 43 4B 8F 53 LUE.EDIT.TRACK.S 5B70: 54 45 50 3D 9A 54 49 4D 45 3D A2 2E A5 2E AB 50 TEP=.TIME=.....P 5B80: 55 4E 43 48 3D B2 49 4E B7 4F 55 54 BD 53 54 45 UNCH=.IN.OUT.STE 5B90: 50 C3 43 4C 4F 43 4B CA 2A 45 58 49 54 2A 00 89 P.CLOCK.*EXIT*.. 5BA0: 2A 20 45 44 49 54 49 4E 47 20 53 45 51 55 45 4E * EDITING SEQUEN 5BB0: 43 45 20 44 41 54 41 20 2A D0 B6 50 4C 45 41 53 CE DATA *..PLEAS 5BC0: 45 20 57 41 49 54 2E 2E 2E 00 8B 2A 20 4E 4F 20 E WAIT.....* NO 5BD0: 54 52 41 43 4B 20 53 45 4C 45 43 54 45 44 20 2A TRACK SELECTED * 5BE0: 00 D8 BC D0 47 4F 54 4F D1 CA 2A 45 58 49 54 2A ....GOTO..*EXIT* 5BF0: 00 C1 42 41 52 3D 00 C1 53 54 45 50 3D 00 D6 43 ..BAR=..STEP=..C 5C00: 52 45 41 54 45 20 20 4E 45 57 20 53 45 51 55 45 REATE NEW SEQUE 5C10: 4E 43 45 A3 2A 59 45 53 2A B0 54 49 4D 45 20 53 NCE.*YES*.TIME S 5C20: 49 47 4E 41 54 55 52 45 20 3D CB 2A 20 4E 4F 2A IGNATURE =.* NO* 5C30: 00 D6 43 52 45 41 54 45 20 20 4E 45 57 20 53 4F ..CREATE NEW SO 5C40: 4E 47 A3 2A 59 45 53 2A 4D 4F 56 45 20 43 55 52 NG.*YES*MOVE CUR 5C50: 53 4F 52 2D 20 20 4C 45 46 54 BD 52 49 47 48 54 SOR- LEFT.RIGHT 5C60: CB 2A 20 4E 4F 2A 00 D6 D0 45 52 41 53 45 D1 20 .* NO*...ERASE. 5C70: 45 58 49 53 54 49 4E 47 A3 2A 59 45 53 2A CB 2A EXISTING.*YES*.* 5C80: 20 4E 4F 2A 00 20 53 45 51 20 00 53 4F 4E 47 20 NO*. SEQ .SONG 5C90: 00 41 4C 4C 20 53 45 51 55 45 4E 43 45 53 20 41 .ALL SEQUENCES A 5CA0: 4E 44 20 53 4F 4E 47 53 00 D6 53 41 56 45 20 43 ND SONGS..SAVE C 5CB0: 48 41 4E 47 45 53 20 54 4F 20 4F 4C 44 20 53 45 HANGES TO OLD SE 5CC0: 51 55 45 4E 43 45 A3 2A 59 45 53 2A CB 2A 20 4E QUENCE.*YES*.* N 5CD0: 4F 2A 00 45 4E 56 85 4C 31 3D 8C 4C 32 3D 93 4C O*.ENV.L1=.L2=.L 5CE0: 33 3D 9A 4C 56 3D A2 54 31 56 3D AD 54 31 3D B4 3=.LV=.T1V=.T1=. 5CF0: 54 32 3D BB 54 33 3D C2 54 34 3D CA 54 4B 3D 00 T2=.T3=.T4=.TK=. 5D00: 4C 46 4F 85 46 52 45 51 3D 8D 52 45 53 45 54 3D LFO.FREQ=.RESET= 5D10: 97 48 55 4D 41 4E 3D A1 57 41 56 3D AD 4C 31 3D .HUMAN=.WAV=.L1= 5D20: B3 44 45 4C 41 59 3D BC 4C 32 3D C7 4D 4F 44 3D .DELAY=.L2=.MOD= 5D30: 00 4F 53 43 85 4F 43 54 3D 8C 53 45 4D 49 3D 94 .OSC.OCT=.SEMI=. 5D40: 46 49 4E 45 3D 9D 57 41 56 45 3D AD 4D 4F 44 53 FINE=.WAVE=.MODS 5D50: 3D BB 2A C9 2A 00 44 43 41 85 4C 45 56 45 4C 3D =.*.*.DCA.LEVEL= 5D60: 9C 4F 55 54 50 55 54 3D AD 4D 4F 44 53 3D BB 2A .OUTPUT=.MODS=.* 5D70: C9 2A 00 44 43 41 34 20 46 49 4E 41 4C 20 56 4F .*.DCA4 FINAL VO 5D80: 4C 55 4D 45 96 50 41 4E 20 3D AD 4D 4F 44 3D 20 LUME.PAN =.MOD= 5D90: 45 4E 56 34 20 2A BE 4D 4F 44 3D C9 2A 00 46 49 ENV4 *.MOD=.*.FI 5DA0: 4C 54 85 46 52 45 51 3D 90 52 45 53 3C 51 3E 3D LT.FREQ=.RES= 5DB0: 9B 4B 45 59 42 44 20 2A AD 4D 4F 44 53 3D BB 2A .KEYBD *.MODS=.* 5DC0: C9 2A 00 4D 4F 44 45 85 53 59 4E 43 3D 8D 41 4D .*.MODE.SYNC=.AM 5DD0: 3D 93 4D 4F 4E 4F 3D A0 47 4C 49 44 45 3D AD 52 =.MONO=.GLIDE=.R 5DE0: 45 53 54 41 52 54 2D B6 56 43 3D BC 45 4E 56 3D ESTART-.VC=.ENV= 5DF0: C3 4F 53 43 3D CA 43 59 43 3D 00 53 50 4C 49 54 .OSC=.CYC=.SPLIT 5E00: 2F 4C 41 59 45 52 3D 98 4C 41 59 45 52 3D AC 53 /LAYER=.LAYER=.S 5E10: 50 4C 49 54 3D C0 53 50 4C 49 54 2D 4B 45 59 3D PLIT=.SPLIT-KEY= 5E20: 00 4D 41 53 54 45 52 88 54 55 4E 45 3D 92 4B 42 .MASTER.TUNE=.KB 5E30: 44 3D 9D 54 4F 55 43 48 3D AD 50 45 44 41 4C 3D D=.TOUCH=.PEDAL= 5E40: B8 42 45 4E 44 2D 20 52 41 4E 47 45 3D C7 4D 4F .BEND- RANGE=.MO 5E50: 44 45 3D 00 4D 49 44 49 20 43 48 41 4E 3D 8D 4F DE=.MIDI CHAN=.O 5E60: 56 46 4C 3D 95 58 43 54 52 4C 3D 9E 50 52 45 53 VFL=.XCTRL=.PRES 5E70: 53 3D AD 4D 4F 44 45 3D B9 45 4E 41 42 4C 45 3D S=.MODE=.ENABLE= 5E80: 4B 45 59 00 43 4F 4E 54 52 4F 4C 89 4D 45 54 52 KEY.CONTROL.METR 5E90: 4F 4E 4F 4D 45 3D 99 53 59 4E 43 3D AE 43 4C 49 ONOME=.SYNC=.CLI 5EA0: 43 4B 3D B8 43 4F 55 4E 54 4F 46 46 3D C8 4C 4F CK=.COUNTOFF=.LO 5EB0: 4F 50 3D 00 D6 57 52 49 54 45 20 50 52 4F 47 52 OP=..WRITE PROGR 5EC0: 41 4D 93 4E 45 57 20 4E 41 4D 45 3D AD 2A 45 58 AM.NEW NAME=.*EX 5ED0: 49 54 2A B5 4D 4F 56 45 20 43 55 52 53 4F 52 2D IT*.MOVE CURSOR- 5EE0: C3 4C 45 46 54 CA 52 49 47 48 54 00 D6 52 45 50 .LEFT.RIGHT..REP 5EF0: 4C 41 43 45 20 45 44 49 54 20 50 52 4F 47 52 41 LACE EDIT PROGRA 5F00: 4D 20 57 49 54 48 A3 2A 59 45 53 2A 43 55 52 52 M WITH.*YES*CURR 5F10: 45 4E 54 20 50 52 4F 47 52 41 4D 20 42 45 46 4F ENT PROGRAM BEFO 5F20: 52 45 20 57 52 49 54 49 4E 47 CB 2A 20 4E 4F 2A RE WRITING.* NO* 5F30: 00 D6 53 54 4F 52 41 47 45 8F 2D 20 53 45 4C 45 ..STORAGE.- SELE 5F40: 43 54 20 54 59 50 45 20 2D B1 43 41 52 54 52 49 CT TYPE -.CARTRI 5F50: 44 47 45 BD 44 49 53 4B C4 4D 49 44 49 CB 54 41 DGE.DISK.MIDI.TA 5F60: 50 45 00 D6 41 4E 41 4C 4F 47 20 4B 4E 4F 42 3D PE..ANALOG KNOB= 5F70: 90 50 45 44 3D 98 50 54 43 48 3D A1 4D 4F 44 3D .PED=.PTCH=.MOD= 5F80: A8 54 45 53 54 53 AF 46 49 4C 54 3D B8 42 41 54 .TESTS.FILT=.BAT 5F90: 3D C0 50 52 53 3D CA 2A 52 45 41 44 2A 00 A8 2A =.PRS=.*READ*..* 5FA0: 43 2A 00 A8 20 20 20 00 A8 57 52 49 54 45 00 A8 C*.. ..WRITE.. 5FB0: 45 44 49 54 20 00 57 41 56 00 EDIT .WAV ------------------------------------------------ --- spare -------------------------------------- ------------------------------------------------ 5FBA: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................ 5FCA: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................ 5FDA: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................ 5FEA: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................ 5FFA: FF FF FF FF FF FF ...... --- accessed by $b7a3 6000: 7E 7F 7C 78 7E 7F 7F 7F 7F 7F 78 7F 7C 7E 78 40 ~.|x~.....x.|~x@ 6010: 40 40 40 40 60 78 78 78 60 70 78 78 7F 7E 60 70 @@@@xxx.~ 6020: 60 60 78 7F 40 7F 40 60 7F --- 75 waveform entries (4 byte each) 6029: 00 00 00 00 .... 602D: 88 85 06 08 .... 6031: 8F 8C 06 08 .... 6035: 96 93 06 08 .... 6039: 9D 9A 06 06 .... 603D: A6 A2 06 00 .... 6041: B0 AD 05 00 .... 6045: B7 B4 05 00 .... 6049: BE BB 05 00 .... 604D: C5 C2 06 28 ...( 6051: CD CA 05 00 .... 6055: 8A 85 07 00 .... 6059: 93 8D 09 12 .... 605D: 9D 97 09 13 .... 6061: A5 A1 07 14 .... 6065: B0 AD 05 00 .... 6069: B9 B3 08 00 .... 606D: BF BC 05 00 .... 6071: CB C7 09 17 .... 6075: 89 85 06 0A .... 6079: 91 8C 07 0B .... 607D: 99 94 07 0C .... 6081: A2 9D 0B 23 ...# 6085: B5 B5 05 15 .... 6089: BD BD 03 08 .... 608D: C3 C3 05 16 .... 6091: CB CB 03 08 .... 6095: 8A 85 07 10 .... 6099: 90 8D 05 10 .... 609D: 98 93 07 10 .... 60A1: A6 A0 08 00 .... 60A5: B9 B6 05 10 .... 60A9: C0 BC 06 10 .... 60AD: C7 C3 06 10 .... 60B1: CE CA 06 10 .... 60B5: 8B 85 08 05 .... 60B9: A3 9C 0A 12 .... 60BD: B5 B5 05 15 .... 60C1: BD BD 03 08 .... 60C5: C3 C3 05 16 .... 60C9: CB CB 03 08 .... 60CD: B9 B9 02 05 .... 60D1: 9C 96 08 03 .... 60D5: C3 C3 05 15 .... 60D9: CB CB 03 09 .... 60DD: 8A 85 08 07 .... 60E1: 97 90 09 02 .... 60E5: A3 A3 03 05 .... 60E9: B5 B5 05 15 .... 60ED: BD BD 03 09 .... 60F1: C3 C3 05 16 .... 60F5: CB CB 03 09 .... 60F9: 8C 80 0F 12 .... 60FD: 90 90 06 1C .... 6101: 9E 98 09 12 .... 6105: A2 A2 06 1C .... 6109: B2 AC 0B 1E .... 610D: B8 B8 06 1C .... 6111: CA C0 0D 01 .... 6115: 8D 88 08 0D .... 6119: A3 9D 0B 22 ..." 611D: B3 AD 09 26 ...& 6121: C4 BE 08 04 .... 6125: CC C7 09 24 ...$ 6129: 8A 85 07 0E .... 612D: 92 8D 07 0F .... 6131: 9B 95 08 25 ...% 6135: A4 9E 0A 20 ... 6139: B2 AD 0A 18 .... 613D: C3 B9 17 1F .... 6141: 93 89 0F 1A .... 6145: 9E 99 0F 19 .... 6149: B4 AE 09 11 .... 614D: C1 B8 0E 21 ...! 6151: CD C8 08 11 .... 6155: 96 92 09 27 ...' --- accessed by $b6f9 (menu related) 6159: 01 02 03 04 05 06 07 08 09 0A .......... 6163: 0B FF 0C 0D 0E 0F 10 11 00 12 .......... 616D: 13 14 15 FF 16 00 17 18 19 1A .......... 6177: 23 00 00 FF 24 00 25 26 27 28 #...$.%&'( 6181: 00 00 FF 2A 00 FF 29 00 2B 2C ...*..).+, 618B: 2D FF 2E FF 2F 00 30 31 32 33 -.../.0123 6195: 1B 1C 1D 00 1E 00 1F 20 21 22 ....... !" 619F: 34 FF 35 36 37 38 FF 39 FF 3A 4.5678.9.: 61A9: FF 3B 4B FF 3C 3D 00 FF 3E 3F .;K.<=..>? 61B3: 40 41 FF 42 43 FF 44 FF FF 45 @A.BC.D..E 61BD: FF FF 46 FF 47 FF 48 FF 49 4A ..F.G.H.IJ 61C7: 00 01 02 03 04 05 06 07 08 09 .......... 61D1: 0A 0B 0C 0D 0E 0F 10 11 12 13 .......... 61DB: 14 15 16 17 18 19 1A 1B 1C 1D .......... 61E5: 1E 1F 20 21 22 23 24 25 26 27 .. !"#$%&' 61EF: 28 FF 29 2A 2B 2C 2D 2E FF 2F (.)*+,-../ 61F9: 30 FF 31 32 33 34 35 36 FF 37 0.123456.7 6203: 38 FF 39 3A 3B 3C 3D 3E FF 3F 8.9:;<=>.? 620D: 40 41 42 FF 43 FF 44 45 46 47 @AB.C.DEFG 6217: 48 49 4A FF 4B FF 4C 4D 4E 4F HIJ.K.LMNO 6221: 50 51 52 FF 53 FF 54 55 56 57 PQR.S.TUVW 622B: 58 FF FF FF 59 FF 5A 5B 5C 5D X...Y.Z[\] 6235: 5E FF FF FF 5F FF 60 61 62 63 ^..._.bc 623F: 64 FF FF FF 65 FF 66 67 68 69 d...e.fghi 6249: FF FF FF 6B FF FF 6A FF 6C 6D ...k..j.lm 6253: 6E FF 6F FF 70 FF 71 72 73 74 n.o.p.qrst 625D: 78 75 77 FF 76 FF 79 7A 7B 7C xuw.v.yz{| 6267: 7D FF 7E 7F 80 81 FF 82 FF 83 }.~....... 6271: FF 84 94 FF 85 86 FF FF 87 88 .......... 627B: 89 8A FF 8B 8C FF 8D FF FF 8E .......... 6285: FF FF 8F FF 90 FF 91 FF 92 93 .......... --- accessed by $a62d (word, no irq allowed during access) 628F: 01 2A 01 2B 01 2C 01 2D 01 2E 01 2F 01 30 01 31 .*.+.,.-.../.0.1 629F: 01 32 01 33 02 2A 02 2B 02 2C 02 2D 02 2E 02 2F .2.3.*.+.,.-.../ 62AF: 02 30 02 31 02 32 02 33 03 2A 03 2B 03 2C 03 2D .0.1.2.3.*.+.,.- 62BF: 03 2E 03 2F 03 30 03 31 03 32 03 33 04 2A 04 2B .../.0.1.2.3.*.+ 62CF: 04 2C 04 2D 04 2E 04 2F 04 30 04 31 04 32 04 33 .,.-.../.0.1.2.3 62DF: 05 2A 05 2B 05 2D 05 2E 05 2F 05 30 05 31 05 33 .*.+.-.../.0.1.3 62EF: 06 2A 06 2B 06 2D 06 2E 06 2F 06 30 06 31 06 33 .*.+.-.../.0.1.3 62FF: 07 2A 07 2B 07 2D 07 2E 07 2F 07 30 07 31 07 33 .*.+.-.../.0.1.3 630F: 08 2A 08 2B 08 2C 08 2E 08 30 08 31 08 32 08 33 .*.+.,...0.1.2.3 631F: 09 2A 09 2B 09 2C 09 2E 09 30 09 31 09 32 09 33 .*.+.,...0.1.2.3 632F: 0A 2A 0A 2B 0A 2C 0A 2E 0A 30 0A 31 0A 32 0A 33 .*.+.,...0.1.2.3 633F: 0B 2A 0B 2E 0B 30 0B 31 0B 32 0B 33 0C 2A 0C 2E .*...0.1.2.3.*.. 634F: 0C 30 0C 31 0C 32 0C 33 0D 2A 0D 2E 0D 30 0D 31 .0.1.2.3.*...0.1 635F: 0D 32 0D 33 0E 30 0E 2D 0E 32 0E 33 0F 2A 0F 2C .2.3.0.-.2.3.*., 636F: 0F 2E 0F 30 0F 31 0F 32 0F 33 10 2B 10 2E 10 2C ...0.1.2.3.+..., 637F: 10 2A 10 30 10 31 10 32 10 33 11 2A 11 2C 11 2D .*.0.1.2.3.*.,.- 638F: 11 2E 11 2F 11 31 11 33 12 2B 12 2E 12 2F 12 32 .../.1.3.+.../.2 639F: 12 33 13 2A 13 2B 13 2D 13 2E 13 30 13 33 14 2C .3.*.+.-...0.3., 63AF: 14 2E 14 30 14 32 14 33 12 2D ...0.2.3.- ------------------------------------------------ --- menu text ---------------------------------- ------------------------------------------------ 63B9: 20 20 20 53 41 57 20 SAW 63C0: 20 42 45 4C 4C 20 20 53 49 4E 45 53 51 55 41 52 BELL SINESQUAR 63D0: 45 20 50 55 4C 53 45 4E 4F 49 53 45 31 4E 4F 49 E PULSENOISE1NOI 63E0: 53 45 32 4E 4F 49 53 45 33 20 20 42 41 53 53 20 SE2NOISE3 BASS 63F0: 50 49 41 4E 4F 45 4C 20 50 4E 4F 56 4F 49 43 45 PIANOEL PNOVOICE 6400: 31 56 4F 49 43 45 32 20 20 4B 49 43 4B 20 20 52 1VOICE2 KICK R 6410: 45 45 44 20 4F 52 47 41 4E 53 59 4E 54 48 31 53 EED ORGANSYNTH1S 6420: 59 4E 54 48 32 53 59 4E 54 48 33 46 4F 52 4D 54 YNTH2SYNTH3FORMT 6430: 31 46 4F 52 4D 54 32 46 4F 52 4D 54 33 46 4F 52 1FORMT2FORMT3FOR 6440: 4D 54 34 46 4F 52 4D 54 35 50 55 4C 53 45 32 53 MT4FORMT5PULSE2S 6450: 51 52 20 20 32 34 20 4F 43 54 53 20 50 52 49 4D QR 24 OCTS PRIM 6460: 45 42 41 53 53 20 32 45 20 50 4E 4F 32 4F 43 54 EBASS 2E PNO2OCT 6470: 41 56 45 20 4F 43 54 2B 35 53 41 57 20 20 32 54 AVE OCT+5SAW 2T 6480: 52 49 41 4E 47 52 45 45 44 20 32 52 45 45 44 20 RIANGREED 2REED 6490: 33 47 52 49 54 20 31 47 52 49 54 20 32 47 52 49 3GRIT 1GRIT 2GRI 64A0: 54 20 33 47 4C 49 4E 54 31 47 4C 49 4E 54 32 47 T 3GLINT1GLINT2G 64B0: 4C 49 4E 54 33 20 20 43 4C 41 56 20 42 52 41 53 LINT3 CLAV BRAS 64C0: 53 53 54 52 49 4E 47 44 49 47 49 54 31 44 49 47 SSTRINGDIGIT1DIG 64D0: 49 54 32 42 45 4C 4C 20 32 20 41 4C 49 45 4E 42 IT2BELL 2 ALIENB 64E0: 52 45 41 54 48 56 4F 49 43 45 33 20 53 54 45 41 REATHVOICE3 STEA 64F0: 4D 20 4D 45 54 41 4C 20 43 48 49 4D 45 42 4F 57 M METAL CHIMEBOW 6500: 49 4E 47 50 49 43 4B 20 31 50 49 43 4B 20 32 4D INGPICK 1PICK 2M 6510: 41 4C 4C 45 54 20 20 53 4C 41 50 20 50 4C 49 4E ALLET SLAP PLIN 6520: 4B 20 50 4C 55 43 4B 20 50 4C 55 4E 4B 20 43 4C K PLUCK PLUNK CL 6530: 49 43 4B 20 43 48 49 46 46 20 54 48 55 4D 50 4C ICK CHIFF THUMPL 6540: 4F 47 44 52 4D 4B 49 43 4B 20 32 20 53 4E 41 52 OGDRMKICK 2 SNAR 6550: 45 54 4F 4D 54 4F 4D 48 49 2D 48 41 54 44 52 55 ETOMTOMHI-HATDRU 6560: 4D 53 31 44 52 55 4D 53 32 44 52 55 4D 53 33 44 MS1DRUMS2DRUMS3D 6570: 52 55 4D 53 34 44 52 55 4D 53 35 54 52 49 53 41 RUMS4DRUMS5TRISA 6580: 57 53 51 52 4E 4F 49 20 4C 46 4F 31 20 4C 46 4F WSQRNOI LFO1 LFO 6590: 32 20 4C 46 4F 33 20 45 4E 56 31 20 45 4E 56 32 2 LFO3 ENV1 ENV2 65A0: 20 45 4E 56 33 20 45 4E 56 34 20 20 56 45 4C 56 ENV3 ENV4 VELV 65B0: 45 4C 2D 58 20 20 4B 42 44 20 4B 42 44 32 57 48 EL-X KBD KBD2WH 65C0: 45 45 4C 50 45 44 41 4C 58 43 54 52 4C 50 52 45 EELPEDALXCTRLPRE 65D0: 53 53 2A 4F 46 46 2A 20 4F 4D 4E 49 20 50 4F 4C SS*OFF* OMNI POL 65E0: 59 4D 55 4C 54 49 20 4D 4F 4E 4F 20 20 49 4E 54 YMULTI MONO INT 65F0: 45 52 4E 41 4C 4D 49 44 49 20 43 4C 4F 43 4B 20 ERNALMIDI CLOCK 6600: 54 41 50 45 20 53 59 4E 43 4F 46 46 20 4F 4E 31 TAPE SYNCOFF ON1 6610: 2F 34 20 20 31 2F 34 54 20 31 2F 38 20 20 31 2F /4 1/4T 1/8 1/ 6620: 38 54 20 31 2F 31 36 20 31 2F 31 36 54 31 2F 33 8T 1/16 1/16T1/3 6630: 32 20 31 2F 33 32 54 20 49 4E 54 43 52 54 41 43 2 1/32T INTCRTAC 6640: 52 54 42 20 53 45 51 53 4F 4E 47 20 20 4F 46 46 RTB SEQSONG OFF 6650: 20 20 4F 46 46 4C 4F 57 45 52 55 50 50 45 52 20 OFFLOWERUPPER 6660: 45 56 45 4E 54 53 20 4F 4E 4C 59 20 53 2B 43 4F EVENTS ONLY S+CO 6670: 4E 54 52 4F 4C 4C 45 52 53 53 2B 43 54 2B 50 52 NTROLLERSS+CT+PR 6680: 4F 47 43 48 4E 47 53 2B 43 54 2B 50 43 2B 53 4E OGCHNGS+CT+PC+SN 6690: 47 53 4C 53 2B 43 54 2B 50 43 2B 53 53 2B 53 58 GSLS+CT+PC+SS+SX 66A0: 20 4F 46 46 43 48 41 4E 20 4B 45 59 20 4E 4F 4E OFFCHAN KEY NON 66B0: 45 51 55 49 45 54 43 4C 49 43 4B 53 4F 46 54 4D EQUIETCLICKSOFTM 66C0: 45 44 20 46 49 52 4D 48 41 52 44 20 41 4C 4C 48 ED FIRMHARD ALLH 66D0: 45 4C 44 2D 53 45 51 2D 4C 4F 43 41 4C 4D 49 44 ELD-SEQ-LOCALMID 66E0: 49 20 42 4F 54 48 20 20 31 2F 38 20 31 2F 34 20 I BOTH 1/8 1/4 66F0: 32 2F 38 20 33 2F 38 20 32 2F 34 20 34 2F 38 20 2/8 3/8 2/4 4/8 6700: 35 2F 38 20 33 2F 34 20 36 2F 38 20 37 2F 38 20 5/8 3/4 6/8 7/8 6710: 34 2F 34 20 38 2F 38 20 39 2F 38 20 35 2F 34 31 4/4 8/8 9/8 5/41 6720: 30 2F 38 31 31 2F 38 20 36 2F 34 31 32 2F 38 31 0/811/8 6/412/81 6730: 33 2F 38 20 37 2F 34 31 34 2F 38 31 35 2F 38 20 3/8 7/414/815/8 6740: 38 2F 34 31 36 2F 38 31 37 2F 38 20 39 2F 34 31 8/416/817/8 9/41 6750: 38 2F 38 31 39 2F 38 31 30 2F 34 32 30 2F 38 32 8/819/810/420/82 6760: 31 2F 38 53 54 4F 50 50 4C 41 59 4F 44 55 42 52 1/8STOPPLAYODUBR 6770: 45 43 20 52 45 43 20 53 4E 47 53 53 4E 47 50 41 EC REC SNGSSNGPA 6780: 55 44 53 41 55 44 50 4D 4F 44 56 4F 4C 58 58 58 UDSAUDPMODVOLXXX 6790: 50 52 47 42 4E 4B 41 4C 4C 4F 4E 45 53 59 53 8A PRGBNKALLONESYS. 67A0: 43 41 4C 49 42 52 41 54 49 4E 47 20 4B 45 59 42 CALIBRATING KEYB 67B0: 4F 41 52 44 B3 44 4F 20 4E 4F 54 20 54 4F 55 43 OARD.DO NOT TOUC 67C0: 48 20 4B 45 59 53 00 87 4B 45 59 42 4F 41 52 44 H KEYS..KEYBOARD 67D0: 20 50 52 4F 43 45 53 53 4F 52 20 45 52 52 4F 52 PROCESSOR ERROR 67E0: 20 30 32 B4 53 45 52 56 49 43 45 20 52 45 51 55 02.SERVICE REQU 67F0: 49 52 45 44 00 87 4B 45 59 42 4F 41 52 44 20 50 IRED..KEYBOARD P 6800: 52 4F 43 45 53 53 4F 52 20 45 52 52 4F 52 20 30 ROCESSOR ERROR 0 6810: 31 B2 52 45 2D 43 41 4C 49 42 52 41 54 45 20 4B 1.RE-CALIBRATE K 6820: 45 59 42 4F 41 52 44 00 43 41 4C 49 42 52 41 54 EYBOARD.CALIBRAT 6830: 49 4F 4E 20 46 41 49 4C 45 44 20 2D 20 54 55 4E ION FAILED - TUN 6840: 45 20 41 47 41 49 4E A3 2A 59 45 53 2A 20 52 45 E AGAIN.*YES* RE 6850: 4C 45 41 53 45 20 41 4C 4C 20 4B 45 59 53 CB 2A LEASE ALL KEYS.* 6860: 20 4E 4F 2A 00 8A 4B 45 59 42 4F 41 52 44 20 49 NO*..KEYBOARD I 6870: 53 20 44 49 53 41 42 4C 45 44 00 52 45 4E 41 4D S DISABLED.RENAM 6880: 45 20 53 4F 4E 47 A8 4D 4F 56 45 20 43 55 52 53 E SONG.MOVE CURS 6890: 4F 52 2D 20 20 4C 45 46 54 BD 52 49 47 48 54 CA OR- LEFT.RIGHT. 68A0: 2A 45 58 49 54 2A 00 AA 41 44 44 00 82 41 44 44 *EXIT*..ADD..ADD 68B0: 8D 54 4F 00 A8 44 45 4C 45 54 45 00 80 44 45 4C .TO..DELETE..DEL 68C0: 45 54 45 8C 46 52 4F 4D 00 45 44 49 54 20 53 45 ETE.FROM.EDIT SE 68D0: 51 55 45 4E 43 45 2D 96 42 41 52 53 AD 41 50 50 QUENCE-.BARS.APP 68E0: 45 4E 44 B6 41 44 44 BC 44 45 4C 45 54 45 C4 43 END.ADD.DELETE.C 68F0: 4F 50 59 CA 2A 45 58 49 54 2A 00 54 41 50 45 8D OPY.*EXIT*.TAPE. 6900: 2D 20 53 45 4C 45 43 54 20 46 55 4E 43 54 49 4F - SELECT FUNCTIO 6910: 4E 20 2D B5 4C 4F 41 44 BC 53 41 56 45 C3 56 45 N -.LOAD.SAVE.VE 6920: 52 49 46 59 00 4D 49 44 49 8D 2D 20 53 45 4C 45 RIFY.MIDI.- SELE 6930: 43 54 20 46 55 4E 43 54 49 4F 4E 20 2D B5 4C 4F CT FUNCTION -.LO 6940: 41 44 C4 53 45 4E 44 00 44 49 53 4B 8D 2D 20 53 AD.SEND.DISK.- S 6950: 45 4C 45 43 54 20 46 55 4E 43 54 49 4F 4E 20 2D ELECT FUNCTION - 6960: AD 44 45 4C 45 54 45 B6 53 41 56 45 BD 4C 4F 41 .DELETE.SAVE.LOA 6970: 44 C4 43 4F 50 59 CA 46 4F 52 4D 41 54 00 D8 AF D.COPY.FORMAT... 6980: 53 41 56 45 20 4E 45 57 20 46 49 4C 45 C1 55 50 SAVE NEW FILE.UP 6990: 44 41 54 45 20 4F 4C 44 20 46 49 4C 45 00 87 52 DATE OLD FILE..R 69A0: 45 41 44 49 4E 47 20 44 49 52 45 43 54 4F 52 59 EADING DIRECTORY 69B0: 20 46 52 4F 4D 20 44 49 53 4B 2E 2E 2E 00 8B 41 FROM DISK.....A 69C0: 43 43 45 53 53 49 4E 47 20 44 49 53 4B 20 44 52 CCESSING DISK DR 69D0: 49 56 45 2E 2E 2E 00 45 4D 50 54 59 20 46 49 4C IVE....EMPTY FIL 69E0: 45 46 4F 52 4D 41 54 20 44 49 53 4B 20 49 4E 53 EFORMAT DISK INS 69F0: 45 52 54 45 44 20 49 4E 20 44 52 49 56 45 A8 41 ERTED IN DRIVE.A 6A00: 4C 4C 20 44 49 53 4B 20 46 49 4C 45 53 20 57 49 LL DISK FILES WI 6A10: 4C 4C 20 42 45 20 45 52 41 53 45 44 00 8C 46 4F LL BE ERASED..FO 6A20: 52 4D 41 54 54 49 4E 47 20 44 49 53 4B 2E 2E 2E RMATTING DISK... 6A30: 00 8A 2D 20 53 45 4C 45 43 54 20 44 49 53 4B 20 ..- SELECT DISK 6A40: 46 49 4C 45 20 54 59 50 45 20 2D AE 53 59 53 2D FILE TYPE -.SYS- 6A50: 45 58 20 20 4F 4E 45 2F 53 45 51 2F 41 4C 4C 20 EX ONE/SEQ/ALL 6A60: 20 42 41 4E 4B 20 20 50 52 4F 47 52 41 4D 80 00 BANK PROGRAM.. 6A70: 4C 4F 41 44 00 53 41 56 45 00 44 45 4C 45 54 45 LOAD.SAVE.DELETE 6A80: 00 55 50 44 41 54 45 00 94 41 53 A8 46 49 4C 45 .UPDATE..AS.FILE 6A90: 3D B3 43 55 52 53 4F 52 2D 20 20 4C 45 46 54 20 =.CURSOR- LEFT 6AA0: 20 52 49 47 48 54 00 96 44 49 53 4B 20 46 49 4C RIGHT..DISK FIL 6AB0: 45 A8 46 49 4C 45 3D BF 54 59 50 45 3D 00 20 41 E.FILE=.TYPE=. A 6AC0: 4C 4C 20 53 45 51 20 44 41 54 41 20 00 49 4E 54 LL SEQ DATA .INT 6AD0: 20 50 52 4F 47 20 42 41 4E 4B 53 00 20 53 59 53 PROG BANKS. SYS 6AE0: 2D 45 58 20 44 41 54 41 20 20 00 43 55 52 52 45 -EX DATA .CURRE 6AF0: 4E 54 20 53 45 51 2D 00 20 4F 4E 45 20 53 45 51 NT SEQ-. ONE SEQ 6B00: 55 45 4E 43 45 20 00 8F 2A 20 57 41 52 4E 49 4E UENCE ..* WARNIN 6B10: 47 20 2A AC 41 4C 4C 20 53 45 51 55 45 4E 43 45 G *.ALL SEQUENCE 6B20: 52 20 44 41 54 41 20 57 49 4C 4C 20 42 45 20 4C R DATA WILL BE L 6B30: 4F 53 54 00 84 4E 4F 54 45 20 2D 20 53 45 51 55 OST..NOTE - SEQU 6B40: 45 4E 43 45 52 20 49 53 20 52 45 49 4E 49 54 49 ENCER IS REINITI 6B50: 41 4C 49 5A 45 44 00 52 45 41 44 59 20 54 4F 20 ALIZED.READY TO 6B60: 52 45 43 45 49 56 45 20 4D 49 44 49 20 53 59 53 RECEIVE MIDI SYS 6B70: 2D 45 58 20 44 41 54 41 C4 53 54 41 52 54 CC 51 -EX DATA.START.Q 6B80: 55 49 54 00 53 59 53 2D 45 58 20 4D 45 53 53 41 UIT.SYS-EX MESSA 6B90: 47 45 20 53 54 41 54 55 53 20 3D 20 57 41 49 54 GE STATUS = WAIT 6BA0: 49 4E 47 A8 46 52 45 45 3D C4 53 41 56 45 CC 51 ING.FREE=.SAVE.Q 6BB0: 55 49 54 00 98 52 45 43 45 49 56 49 4E 47 20 00 UIT..RECEIVING . 6BC0: 98 43 4F 4D 50 4C 45 54 45 20 20 00 98 49 4E 43 .COMPLETE ..INC 6BD0: 4F 4D 50 4C 45 54 45 00 D7 53 59 53 2D 45 58 20 OMPLETE..SYS-EX 6BE0: 4D 45 4D 4F 52 59 20 49 53 20 46 55 4C 4C 00 52 MEMORY IS FULL.R 6BF0: 45 41 44 59 20 54 4F 20 54 52 41 4E 53 4D 49 54 EADY TO TRANSMIT 6C00: 20 4D 49 44 49 20 53 59 53 2D 45 58 20 44 41 54 MIDI SYS-EX DAT 6C10: 41 C4 53 45 4E 44 CC 51 55 49 54 00 86 54 52 41 A.SEND.QUIT..TRA 6C20: 4E 53 4D 49 54 54 49 4E 47 20 4D 49 44 49 20 53 NSMITTING MIDI S 6C30: 59 53 2D 45 58 20 44 41 54 41 2E 2E 2E 00 86 53 YS-EX DATA.....S 6C40: 59 53 54 45 4D 20 45 52 52 4F 52 20 2D 20 53 59 YSTEM ERROR - SY 6C50: 53 2D 45 58 20 44 41 54 41 20 4C 4F 53 54 00 53 S-EX DATA LOST.S 6C60: 41 56 45 20 43 55 52 52 45 4E 54 20 50 52 4F 47 AVE CURRENT PROG 6C70: 52 41 4D 20 41 53 00 4C 4F 41 44 20 45 44 49 54 RAM AS.LOAD EDIT 6C80: 20 50 52 4F 47 52 41 4D 20 57 49 54 48 00 44 45 PROGRAM WITH.DE 6C90: 4C 45 54 45 20 50 52 4F 47 52 41 4D 20 46 49 4C LETE PROGRAM FIL 6CA0: 45 00 55 50 44 41 54 45 20 50 52 4F 47 52 41 4D E.UPDATE PROGRAM 6CB0: 20 46 49 4C 45 00 AD 50 52 4F 47 52 41 4D 20 46 FILE..PROGRAM F 6CC0: 49 4C 45 3D 00 ILE=. ------------------------------------------------ --- disk status message vectors ---------------- ------------------------------------------------ 6CC5: 7D 55 FDB $7D55 ; FDC failure 6CC7: 7D 55 FDB $7D55 ; FDC failure 6CC9: 7C FB FDB $7CFB ; disk unreadable 6CCB: 7C E9 FDB $7CE9 ; no disk 6CCD: 7D 3C FDB $7D3C ; write protection 6CCF: 7D 7C FDB $7D7C ; disk unusable 6CD1: 7D A3 FDB $7DA3 ; disk damaged 6CD3: 7D 1E FDB $7D1E ; section filled 6CD5: 7D CA FDB $7DCA ; disk change 6CD7: 7D F2 FDB $7DF2 ; empty access 6CD9: 7E 1A FDB $7E1A ; incorrect file type 6CDB: 7E 42 FDB $7E42 ; out of memory 6CDD: 7E 87 FDB $7E87 ; sequencer full 6CDF: 7E A8 FDB $7EA8 ; no sysex data 6CE1: 7E 6A FDB $7E6A ; disk formatted 6CE3: 7F A7 FDB $7FA7 ; stopped copy 6CE5: 7F 98 FDB $7F98 ; copy complete 6CE7: 7E CA FDB $7ECA ; not SQ80 disk ------------------------------------------------ --- disk status 3: no disk --------------------- ------------------------------------------------ 6CE9: 8C 4E 4F 20 44 49 53 4B 20 49 4E 20 44 52 49 56 .NO DISK IN DRIV 6CF9: 45 00 E. ------------------------------------------------ --- disk status 2: disk unreadable ------------- ------------------------------------------------ 6CFB: 84 44 49 53 4B 20 49 53 20 55 4E 52 45 41 44 41 .DISK IS UNREADA 6D0B: 42 4C 45 20 4F 52 20 55 4E 46 4F 52 4D 41 54 54 BLE OR UNFORMATT 6D1B: 45 44 00 ED. ------------------------------------------------ --- disk status 7: section filled -------------- ------------------------------------------------ 6D1E: 86 4E 4F 20 55 4E 55 53 45 44 20 46 49 4C 45 53 .NO UNUSED FILES 6D2E: 20 4F 46 20 54 48 41 54 20 54 59 50 45 00 OF THAT TYPE. ------------------------------------------------ --- disk status 4: write protection ------------ ------------------------------------------------ 6D3C: 89 44 49 53 4B 20 49 53 20 57 52 49 54 45 2D 50 .DISK IS WRITE-P 6D4C: 52 4F 54 45 43 54 45 44 00 ROTECTED. ------------------------------------------------ --- disk status 0/1: FDC failure --------------- ------------------------------------------------ 6D55: 44 49 53 4B 20 43 4F 4E 54 52 4F 4C 4C 45 52 20 DISK CONTROLLER 6D65: 45 52 52 4F 52 20 2D 20 43 4F 4E 53 55 4C 54 20 ERROR - CONSULT 6D75: 4D 41 4E 55 41 4C 00 MANUAL. ------------------------------------------------ --- disk status 5: disk unusable --------------- ------------------------------------------------ 6D7C: 44 49 53 4B 20 46 4F 52 4D 41 54 20 46 41 49 4C DISK FORMAT FAIL 6D8C: 55 52 45 20 2D 20 44 49 53 4B 20 49 53 20 55 4E URE - DISK IS UN 6D9C: 55 53 41 42 4C 45 00 USABLE. ------------------------------------------------ --- disk status 6: disk damaged ---------------- ------------------------------------------------ 6DA3: 44 49 53 4B 20 49 53 20 44 41 4D 41 47 45 44 20 DISK IS DAMAGED 6DB3: 2D 20 44 41 54 41 20 45 52 52 4F 52 53 20 44 45 - DATA ERRORS DE 6DC3: 54 45 43 54 45 44 00 TECTED. ------------------------------------------------ --- disk status 8: disk change ----------------- ------------------------------------------------ 6DCA: 44 49 53 4B 20 43 48 41 4E 47 45 20 44 45 54 45 DISK CHANGE DETE 6DDA: 43 54 45 44 20 2D 20 52 45 2D 45 4E 54 45 52 20 CTED - RE-ENTER 6DEA: 43 4F 4D 4D 41 4E 44 00 COMMAND. ------------------------------------------------ --- disk status 9: empty access ---------------- ------------------------------------------------ 6DF2: 55 4E 55 53 45 44 20 4F 52 20 45 4D 50 54 59 20 UNUSED OR EMPTY 6E02: 46 49 4C 45 20 43 41 4E 4E 4F 54 20 42 45 20 41 FILE CANNOT BE A 6E12: 43 43 45 53 53 45 44 00 CCESSED. ------------------------------------------------ --- disk status 10: incorrect file type -------- ------------------------------------------------ 6E1A: 43 4F 4D 4D 41 4E 44 20 43 41 4E 43 45 4C 4C 45 COMMAND CANCELLE 6E2A: 44 20 2D 20 49 4E 43 4F 52 52 45 43 54 20 46 49 D - INCORRECT FI 6E3A: 4C 45 20 54 59 50 45 00 LE TYPE. ------------------------------------------------ --- disk status 11: out of memory -------------- ------------------------------------------------ 6E42: 4E 4F 54 20 45 4E 4F 55 47 48 20 46 52 45 45 20 NOT ENOUGH FREE 6E52: 4D 45 4D 4F 52 59 20 54 4F 20 4C 4F 41 44 20 53 MEMORY TO LOAD S 6E62: 45 51 55 45 4E 43 45 00 EQUENCE. ------------------------------------------------ --- disk status 14: disk formatted ------------- ------------------------------------------------ 6E6B: 44 49 53 4B 20 46 4F 52 4D 41 54 54 45 44 20 DISK FORMATTED 6E7A: 53 55 43 43 45 53 53 46 55 4C 4C 59 00 SUCCESSFULLY. ------------------------------------------------ --- disk status 12: sequencer full ------------- ------------------------------------------------ 6E87: 85 4E 4F 20 53 45 51 55 45 4E 43 45 20 4C 4F 43 .NO SEQUENCE LOC 6E97: 41 54 49 4F 4E 53 20 41 56 41 49 4C 41 42 4C 45 ATIONS AVAILABLE 6EA7: 00 . ------------------------------------------------ --- disk status 13: no sysex data -------------- ------------------------------------------------ 6EA8: 84 4E 4F 20 53 59 53 2D 45 58 20 44 41 54 41 20 .NO SYS-EX DATA 6EB8: 48 41 53 20 42 45 45 4E 20 52 45 43 4F 52 44 45 HAS BEEN RECORDE 6EC8: 44 00 D. ------------------------------------------------ --- disk status 17: not sq80 disk -------------- ------------------------------------------------ 6ECA: 8C 4E 4F 54 20 41 4E 20 53 51 2D 38 30 20 44 49 .NOT AN SQ-80 DI 6EDA: 53 4B 00 SK. ------------------------------------------------ --- DISK/COPY menu: insert destination (1st) --- ------------------------------------------------ 6EDD: 49 4E 53 45 52 54 20 46 4F 52 4D 41 54 54 45 44 INSERT FORMATTED 6EED: A2 2A 20 4F 4B 20 2A 44 45 53 54 49 4E 41 54 49 .* OK *DESTINATI 6EFD: 4F 4E 20 44 49 53 4B CA 2A 51 55 49 54 2A 00 ON DISK.*QUIT*. ------------------------------------------------ --- DISK/COPY menu: insert source -------------- ------------------------------------------------ 6F0C: 49 4E 53 45 52 54 20 53 4F 55 52 43 45 20 44 49 INSERT SOURCE DI 6F1C: 53 4B A2 2A 20 4F 4B 20 2A 20 57 52 49 54 45 2D SK.* OK * WRITE- 6F2C: 50 52 4F 54 45 43 54 45 44 CA 2A 51 55 49 54 2A PROTECTED.*QUIT* 6F3C: 00 . ------------------------------------------------ --- DISK/COPY menu: insert destination disk ---- ------------------------------------------------ 6F3D: 49 4E 53 45 52 54 20 44 45 53 54 49 4E 41 54 49 INSERT DESTINATI 6F4D: 4F 4E 20 44 49 53 4B A2 2A 20 4F 4B 20 2A CA 2A ON DISK.* OK *.* 6F5D: 51 55 49 54 2A 00 QUIT*. ------------------------------------------------ --- DISK/COPY menu: disk is not source --------- ------------------------------------------------ 6F63: 44 49 53 4B 20 49 53 20 4E 4F 54 20 53 4F 55 52 DISK IS NOT SOUR 6F73: 43 45 20 44 49 53 4B 00 CE DISK. ------------------------------------------------ --- DISK/COPY menu: disk is not destination ---- ------------------------------------------------ 6F7B: 44 49 53 4B 20 49 53 20 4E 4F 54 20 44 45 53 54 DISK IS NOT DEST 6F8B: 49 4E 41 54 49 4F 4E 20 44 49 53 4B 00 INATION DISK. ------------------------------------------------ --- disk status 16: copy complete -------------- ------------------------------------------------ 6F98: 8E 43 4F 50 59 20 43 4F 4D 50 4C 45 54 45 00 .COPY COMPLETE. ------------------------------------------------ --- disk status 15: stopped copy --------------- ------------------------------------------------ 6FA7: 87 43 4F 50 59 20 54 45 52 4D 49 4E 41 54 45 44 .COPY TERMINATED 6FB7: 20 49 4E 43 4F 4D 50 4C 45 54 45 00 INCOMPLETE. ------------------------------------------------ --- menu: load bank with sequence data --------- ------------------------------------------------ 6FC3: 4C 4F 41 44 20 49 4E 54 45 52 4E 41 4C 20 50 52 LOAD INTERNAL PR 6FD3: 4F 47 52 41 4D 53 A3 2A 59 45 53 2A 41 4C 4F 4E OGRAMS.*YES*ALON 6FE3: 47 20 57 49 54 48 20 53 45 51 55 45 4E 43 45 20 G WITH SEQUENCE 6FF3: 44 41 54 41 CB 2A 20 4E 4F 2A 00 DATA.* NO*. ------------------------------------------------ 6FFE: FF FF ------------------------------------------------ --- oscillator pitch values (hi/lo) ------------ --- 128 keys with a resolution of 10/key ------- ------------------------------------------------ 7000: 00 1C 00 1C 00 1C 00 1C 00 1C 00 1C 00 1D 00 1D ................ 7010: 00 1D 00 1D 00 1D 00 1D 00 1D 00 1D 00 1D 00 1E ................ 7020: 00 1E 00 1E 00 1E 00 1E 00 1E 00 1E 00 1E 00 1E ................ 7030: 00 1E 00 1F 00 1F 00 1F 00 1F 00 1F 00 1F 00 1F ................ 7040: 00 1F 00 20 00 20 00 20 00 20 00 20 00 20 00 20 ... . . . . . . 7050: 00 20 00 20 00 21 00 21 00 21 00 21 00 21 00 21 . . .!.!.!.!.!.! 7060: 00 21 00 21 00 21 00 22 00 22 00 22 00 22 00 22 .!.!.!."."."."." 7070: 00 22 00 22 00 22 00 23 00 23 00 23 00 23 00 23 .".".".#.#.#.#.# 7080: 00 23 00 23 00 23 00 24 00 24 00 24 00 24 00 24 .#.#.#.$.$.$.$.$ 7090: 00 24 00 24 00 25 00 25 00 25 00 25 00 25 00 25 .$.$.%.%.%.%.%.% 70A0: 00 25 00 25 00 26 00 26 00 26 00 26 00 26 00 26 .%.%.&.&.&.&.&.& 70B0: 00 26 00 27 00 27 00 27 00 27 00 27 00 27 00 27 .&.'.'.'.'.'.'.' 70C0: 00 28 00 28 00 28 00 28 00 28 00 28 00 28 00 29 .(.(.(.(.(.(.(.) 70D0: 00 29 00 29 00 29 00 29 00 29 00 29 00 2A 00 2A .).).).).).).*.* 70E0: 00 2A 00 2A 00 2A 00 2A 00 2B 00 2B 00 2B 00 2B .*.*.*.*.+.+.+.+ 70F0: 00 2B 00 2B 00 2B 00 2C 00 2C 00 2C 00 2C 00 2C .+.+.+.,.,.,.,., 7100: 00 2C 00 2D 00 2D 00 2D 00 2D 00 2D 00 2D 00 2E .,.-.-.-.-.-.-.. 7110: 00 2E 00 2E 00 2E 00 2E 00 2E 00 2F 00 2F 00 2F .........../././ 7120: 00 2F 00 2F 00 2F 00 30 00 30 00 30 00 30 00 30 ./././.0.0.0.0.0 7130: 00 30 00 31 00 31 00 31 00 31 00 31 00 31 00 32 .0.1.1.1.1.1.1.2 7140: 00 32 00 32 00 32 00 32 00 33 00 33 00 33 00 33 .2.2.2.2.3.3.3.3 7150: 00 33 00 33 00 34 00 34 00 34 00 34 00 34 00 35 .3.3.4.4.4.4.4.5 7160: 00 35 00 35 00 35 00 35 00 36 00 36 00 36 00 36 .5.5.5.5.6.6.6.6 7170: 00 36 00 37 00 37 00 37 00 37 00 37 00 38 00 38 .6.7.7.7.7.7.8.8 7180: 00 38 00 38 00 38 00 39 00 39 00 39 00 39 00 39 .8.8.8.9.9.9.9.9 7190: 00 3A 00 3A 00 3A 00 3A 00 3A 00 3B 00 3B 00 3B .:.:.:.:.:.;.;.; 71A0: 00 3B 00 3B 00 3C 00 3C 00 3C 00 3C 00 3D 00 3D .;.;.<.<.<.<.=.= 71B0: 00 3D 00 3D 00 3D 00 3E 00 3E 00 3E 00 3E 00 3F .=.=.=.>.>.>.>.? 71C0: 00 3F 00 3F 00 3F 00 3F 00 40 00 40 00 40 00 40 .?.?.?.?.@.@.@.@ 71D0: 00 41 00 41 00 41 00 41 00 42 00 42 00 42 00 42 .A.A.A.A.B.B.B.B 71E0: 00 43 00 43 00 43 00 43 00 43 00 44 00 44 00 44 .C.C.C.C.C.D.D.D 71F0: 00 44 00 45 00 45 00 45 00 45 00 46 00 46 00 46 .D.E.E.E.E.F.F.F 7200: 00 46 00 47 00 47 00 47 00 47 00 48 00 48 00 48 .F.G.G.G.G.H.H.H 7210: 00 49 00 49 00 49 00 49 00 4A 00 4A 00 4A 00 4A .I.I.I.I.J.J.J.J 7220: 00 4B 00 4B 00 4B 00 4B 00 4C 00 4C 00 4C 00 4D .K.K.K.K.L.L.L.M 7230: 00 4D 00 4D 00 4D 00 4E 00 4E 00 4E 00 4F 00 4F .M.M.M.N.N.N.O.O 7240: 00 4F 00 4F 00 50 00 50 00 50 00 51 00 51 00 51 .O.O.P.P.P.Q.Q.Q 7250: 00 51 00 52 00 52 00 52 00 53 00 53 00 53 00 53 .Q.R.R.R.S.S.S.S 7260: 00 54 00 54 00 54 00 55 00 55 00 55 00 56 00 56 .T.T.T.U.U.U.V.V 7270: 00 56 00 57 00 57 00 57 00 58 00 58 00 58 00 58 .V.W.W.W.X.X.X.X 7280: 00 59 00 59 00 59 00 5A 00 5A 00 5A 00 5B 00 5B .Y.Y.Y.Z.Z.Z.[.[ 7290: 00 5B 00 5C 00 5C 00 5C 00 5D 00 5D 00 5D 00 5E .[.\.\.\.].].].^ 72A0: 00 5E 00 5E 00 5F 00 5F 00 5F 00 60 00 60 00 60 .^.^._._._.'.'.' 72B0: 00 61 00 61 00 62 00 62 00 62 00 63 00 63 00 63 .a.a.b.b.b.c.c.c 72C0: 00 64 00 64 00 64 00 65 00 65 00 65 00 66 00 66 .d.d.d.e.e.e.f.f 72D0: 00 67 00 67 00 67 00 68 00 68 00 68 00 69 00 69 .g.g.g.h.h.h.i.i 72E0: 00 6A 00 6A 00 6A 00 6B 00 6B 00 6B 00 6C 00 6C .j.j.j.k.k.k.l.l 72F0: 00 6D 00 6D 00 6D 00 6E 00 6E 00 6F 00 6F 00 6F .m.m.m.n.n.o.o.o 7300: 00 70 00 70 00 71 00 71 00 71 00 72 00 72 00 73 .p.p.q.q.q.r.r.s 7310: 00 73 00 74 00 74 00 74 00 75 00 75 00 76 00 76 .s.t.t.t.u.u.v.v 7320: 00 77 00 77 00 77 00 78 00 78 00 79 00 79 00 7A .w.w.w.x.x.y.y.z 7330: 00 7A 00 7A 00 7B 00 7B 00 7C 00 7C 00 7D 00 7D .z.z.{.{.|.|.}.} 7340: 00 7E 00 7E 00 7E 00 7F 00 7F 00 80 00 80 00 81 .~.~.~.......... 7350: 00 81 00 82 00 82 00 83 00 83 00 84 00 84 00 85 ................ 7360: 00 85 00 85 00 86 00 86 00 87 00 87 00 88 00 88 ................ 7370: 00 89 00 89 00 8A 00 8A 00 8B 00 8B 00 8C 00 8C ................ 7380: 00 8D 00 8D 00 8E 00 8E 00 8F 00 8F 00 90 00 91 ................ 7390: 00 91 00 92 00 92 00 93 00 93 00 94 00 94 00 95 ................ 73A0: 00 95 00 96 00 96 00 97 00 97 00 98 00 99 00 99 ................ 73B0: 00 9A 00 9A 00 9B 00 9B 00 9C 00 9C 00 9D 00 9E ................ 73C0: 00 9E 00 9F 00 9F 00 A0 00 A0 00 A1 00 A2 00 A2 ................ 73D0: 00 A3 00 A3 00 A4 00 A5 00 A5 00 A6 00 A6 00 A7 ................ 73E0: 00 A8 00 A8 00 A9 00 A9 00 AA 00 AB 00 AB 00 AC ................ 73F0: 00 AC 00 AD 00 AE 00 AE 00 AF 00 B0 00 B0 00 B1 ................ 7400: 00 B2 00 B2 00 B3 00 B3 00 B4 00 B5 00 B5 00 B6 ................ 7410: 00 B7 00 B7 00 B8 00 B9 00 B9 00 BA 00 BB 00 BB ................ 7420: 00 BC 00 BD 00 BD 00 BE 00 BF 00 C0 00 C0 00 C1 ................ 7430: 00 C2 00 C2 00 C3 00 C4 00 C4 00 C5 00 C6 00 C7 ................ 7440: 00 C7 00 C8 00 C9 00 C9 00 CA 00 CB 00 CC 00 CC ................ 7450: 00 CD 00 CE 00 CF 00 CF 00 D0 00 D1 00 D2 00 D2 ................ 7460: 00 D3 00 D4 00 D5 00 D5 00 D6 00 D7 00 D8 00 D9 ................ 7470: 00 D9 00 DA 00 DB 00 DC 00 DC 00 DD 00 DE 00 DF ................ 7480: 00 E0 00 E1 00 E1 00 E2 00 E3 00 E4 00 E5 00 E5 ................ 7490: 00 E6 00 E7 00 E8 00 E9 00 EA 00 EA 00 EB 00 EC ................ 74A0: 00 ED 00 EE 00 EF 00 F0 00 F0 00 F1 00 F2 00 F3 ................ 74B0: 00 F4 00 F5 00 F6 00 F7 00 F7 00 F8 00 F9 00 FA ................ 74C0: 00 FB 00 FC 00 FD 00 FE 00 FF 01 00 01 01 01 02 ................ 74D0: 01 02 01 03 01 04 01 05 01 06 01 07 01 08 01 09 ................ 74E0: 01 0A 01 0B 01 0C 01 0D 01 0E 01 0F 01 10 01 11 ................ 74F0: 01 12 01 13 01 14 01 15 01 16 01 17 01 18 01 19 ................ 7500: 01 1A 01 1B 01 1C 01 1D 01 1E 01 1F 01 20 01 21 ............. .! 7510: 01 22 01 23 01 24 01 25 01 26 01 27 01 28 01 2A .".#.$.%.&.'.(.* 7520: 01 2B 01 2C 01 2D 01 2E 01 2F 01 30 01 31 01 32 .+.,.-.../.0.1.2 7530: 01 33 01 34 01 36 01 37 01 38 01 39 01 3A 01 3B .3.4.6.7.8.9.:.; 7540: 01 3C 01 3E 01 3F 01 40 01 41 01 42 01 43 01 44 .<.>.?.@.A.B.C.D 7550: 01 46 01 47 01 48 01 49 01 4A 01 4C 01 4D 01 4E .F.G.H.I.J.L.M.N 7560: 01 4F 01 50 01 52 01 53 01 54 01 55 01 57 01 58 .O.P.R.S.T.U.W.X 7570: 01 59 01 5A 01 5B 01 5D 01 5E 01 5F 01 61 01 62 .Y.Z.[.].^._.a.b 7580: 01 63 01 64 01 66 01 67 01 68 01 6A 01 6B 01 6C .c.d.f.g.h.j.k.l 7590: 01 6E 01 6F 01 70 01 71 01 73 01 74 01 76 01 77 .n.o.p.q.s.t.v.w 75A0: 01 78 01 7A 01 7B 01 7C 01 7E 01 7F 01 80 01 82 .x.z.{.|.~...... 75B0: 01 83 01 85 01 86 01 87 01 89 01 8A 01 8C 01 8D ................ 75C0: 01 8F 01 90 01 91 01 93 01 94 01 96 01 97 01 99 ................ 75D0: 01 9A 01 9C 01 9D 01 9F 01 A0 01 A2 01 A3 01 A5 ................ 75E0: 01 A6 01 A8 01 A9 01 AB 01 AC 01 AE 01 B0 01 B1 ................ 75F0: 01 B3 01 B4 01 B6 01 B7 01 B9 01 BB 01 BC 01 BE ................ 7600: 01 BF 01 C1 01 C3 01 C4 01 C6 01 C8 01 C9 01 CB ................ 7610: 01 CD 01 CE 01 D0 01 D2 01 D3 01 D5 01 D7 01 D8 ................ 7620: 01 DA 01 DC 01 DD 01 DF 01 E1 01 E3 01 E4 01 E6 ................ 7630: 01 E8 01 EA 01 EB 01 ED 01 EF 01 F1 01 F3 01 F4 ................ 7640: 01 F6 01 F8 01 FA 01 FC 01 FE 01 FF 02 01 02 03 ................ 7650: 02 05 02 07 02 09 02 0B 02 0C 02 0E 02 10 02 12 ................ 7660: 02 14 02 16 02 18 02 1A 02 1C 02 1E 02 20 02 22 ............. ." 7670: 02 24 02 26 02 28 02 2A 02 2C 02 2E 02 30 02 32 .$.&.(.*.,...0.2 7680: 02 34 02 36 02 38 02 3A 02 3C 02 3E 02 40 02 42 .4.6.8.:.<.>.@.B 7690: 02 44 02 46 02 48 02 4B 02 4D 02 4F 02 51 02 53 .D.F.H.K.M.O.Q.S 76A0: 02 55 02 57 02 5A 02 5C 02 5E 02 60 02 62 02 64 .U.W.Z.\.^..b.d 76B0: 02 67 02 69 02 6B 02 6D 02 70 02 72 02 74 02 76 .g.i.k.m.p.r.t.v 76C0: 02 79 02 7B 02 7D 02 80 02 82 02 84 02 87 02 89 .y.{.}.......... 76D0: 02 8B 02 8E 02 90 02 92 02 95 02 97 02 9A 02 9C ................ 76E0: 02 9E 02 A1 02 A3 02 A6 02 A8 02 AB 02 AD 02 B0 ................ 76F0: 02 B2 02 B4 02 B7 02 BA 02 BC 02 BF 02 C1 02 C4 ................ 7700: 02 C6 02 C9 02 CB 02 CE 02 D1 02 D3 02 D6 02 D8 ................ 7710: 02 DB 02 DE 02 E0 02 E3 02 E6 02 E8 02 EB 02 EE ................ 7720: 02 F0 02 F3 02 F6 02 F9 02 FB 02 FE 03 01 03 04 ................ 7730: 03 06 03 09 03 0C 03 0F 03 12 03 15 03 17 03 1A ................ 7740: 03 1D 03 20 03 23 03 26 03 29 03 2C 03 2F 03 32 ... .#.&.).,./.2 7750: 03 35 03 38 03 3A 03 3D 03 40 03 43 03 47 03 4A .5.8.:.=.@.C.G.J 7760: 03 4D 03 50 03 53 03 56 03 59 03 5C 03 5F 03 62 .M.P.S.V.Y.\._.b 7770: 03 65 03 68 03 6C 03 6F 03 72 03 75 03 78 03 7C .e.h.l.o.r.u.x.| 7780: 03 7F 03 82 03 85 03 89 03 8C 03 8F 03 92 03 96 ................ 7790: 03 99 03 9C 03 A0 03 A3 03 A6 03 AA 03 AD 03 B1 ................ 77A0: 03 B4 03 B7 03 BB 03 BE 03 C2 03 C5 03 C9 03 CC ................ 77B0: 03 D0 03 D3 03 D7 03 DA 03 DE 03 E2 03 E5 03 E9 ................ 77C0: 03 EC 03 F0 03 F4 03 F7 03 FB 03 FF 04 02 04 06 ................ 77D0: 04 0A 04 0E 04 11 04 15 04 19 04 1D 04 20 04 24 ............. .$ 77E0: 04 28 04 2C 04 30 04 34 04 38 04 3B 04 3F 04 43 .(.,.0.4.8.;.?.C 77F0: 04 47 04 4B 04 4F 04 53 04 57 04 5B 04 5F 04 63 .G.K.O.S.W.[._.c 7800: 04 67 04 6B 04 70 04 74 04 78 04 7C 04 80 04 84 .g.k.p.t.x.|.... 7810: 04 88 04 8D 04 91 04 95 04 99 04 9E 04 A2 04 A6 ................ 7820: 04 AA 04 AF 04 B3 04 B7 04 BC 04 C0 04 C5 04 C9 ................ 7830: 04 CD 04 D2 04 D6 04 DB 04 DF 04 E4 04 E8 04 ED ................ 7840: 04 F1 04 F6 04 FB 04 FF 05 04 05 09 05 0D 05 12 ................ 7850: 05 17 05 1B 05 20 05 25 05 29 05 2E 05 33 05 38 ..... .%.)...3.8 7860: 05 3D 05 42 05 46 05 4B 05 50 05 55 05 5A 05 5F .=.B.F.K.P.U.Z._ 7870: 05 64 05 69 05 6E 05 73 05 78 05 7D 05 82 05 87 .d.i.n.s.x.}.... 7880: 05 8C 05 92 05 97 05 9C 05 A1 05 A6 05 AC 05 B1 ................ 7890: 05 B6 05 BB 05 C1 05 C6 05 CB 05 D1 05 D6 05 DB ................ 78A0: 05 E1 05 E6 05 EC 05 F1 05 F7 05 FC 06 02 06 07 ................ 78B0: 06 0D 06 13 06 18 06 1E 06 24 06 29 06 2F 06 35 .........$.)./.5 78C0: 06 3A 06 40 06 46 06 4C 06 52 06 57 06 5D 06 63 .:.@.F.L.R.W.].c 78D0: 06 69 06 6F 06 75 06 7B 06 81 06 87 06 8D 06 93 .i.o.u.{........ 78E0: 06 99 06 9F 06 A5 06 AC 06 B2 06 B8 06 BE 06 C4 ................ 78F0: 06 CB 06 D1 06 D7 06 DE 06 E4 06 EA 06 F1 06 F7 ................ 7900: 06 FE 07 04 07 0B 07 11 07 18 07 1E 07 25 07 2B .............%.+ 7910: 07 32 07 39 07 3F 07 46 07 4D 07 54 07 5A 07 61 .2.9.?.F.M.T.Z.a 7920: 07 68 07 6F 07 76 07 7D 07 84 07 8B 07 92 07 99 .h.o.v.}........ 7930: 07 A0 07 A7 07 AE 07 B5 07 BC 07 C3 07 CA 07 D2 ................ 7940: 07 D9 07 E0 07 E7 07 EF 07 F6 07 FD 08 05 08 0C ................ 7950: 08 14 08 1B 08 23 08 2A 08 32 08 39 08 41 08 49 .....#.*.2.9.A.I 7960: 08 50 08 58 08 60 08 67 08 6F 08 77 08 7F 08 87 .P.X..g.o.w.... 7970: 08 8F 08 97 08 9E 08 A6 08 AE 08 B6 08 BF 08 C7 ................ 7980: 08 CF 08 D7 08 DF 08 E7 08 F0 08 F8 09 00 09 08 ................ 7990: 09 11 09 19 09 22 09 2A 09 33 09 3B 09 44 09 4C .....".*.3.;.D.L 79A0: 09 55 09 5D 09 66 09 6F 09 78 09 80 09 89 09 92 .U.].f.o.x...... 79B0: 09 9B 09 A4 09 AD 09 B6 09 BF 09 C8 09 D1 09 DA ................ 79C0: 09 E3 09 EC 09 F5 09 FE 0A 08 0A 11 0A 1A 0A 24 ...............$ 79D0: 0A 2D 0A 36 0A 40 0A 49 0A 53 0A 5D 0A 66 0A 70 .-.6.@.I.S.].f.p 79E0: 0A 79 0A 83 0A 8D 0A 97 0A A0 0A AA 0A B4 0A BE .y.............. 79F0: 0A C8 0A D2 0A DC 0A E6 0A F0 0A FA 0B 04 0B 0F ................ 7A00: 0B 19 0B 23 0B 2D 0B 38 0B 42 0B 4D 0B 57 0B 62 ...#.-.8.B.M.W.b 7A10: 0B 6C 0B 77 0B 81 0B 8C 0B 97 0B A1 0B AC 0B B7 .l.w............ 7A20: 0B C2 0B CD 0B D8 0B E3 0B EE 0B F9 0C 04 0C 0F ................ 7A30: 0C 1A 0C 25 0C 30 0C 3C 0C 47 0C 52 0C 5E 0C 69 ...%.0.<.G.R.^.i 7A40: 0C 75 0C 80 0C 8C 0C 97 0C A3 0C AF 0C BB 0C C6 .u.............. 7A50: 0C D2 0C DE 0C EA 0C F6 0D 02 0D 0E 0D 1A 0D 26 ...............& 7A60: 0D 32 0D 3F 0D 4B 0D 57 0D 63 0D 70 0D 7C 0D 89 .2.?.K.W.c.p.|.. 7A70: 0D 95 0D A2 0D AF 0D BB 0D C8 0D D5 0D E1 0D EE ................ 7A80: 0D FB 0E 08 0E 15 0E 22 0E 2F 0E 3C 0E 4A 0E 57 ......."./.<.J.W 7A90: 0E 64 0E 71 0E 7F 0E 8C 0E 9A 0E A7 0E B5 0E C2 .d.q............ 7AA0: 0E D0 0E DE 0E EC 0E F9 0F 07 0F 15 0F 23 0F 31 .............#.1 7AB0: 0F 3F 0F 4D 0F 5B 0F 6A 0F 78 0F 86 0F 95 0F A3 .?.M.[.j.x...... 7AC0: 0F B2 0F C0 0F CF 0F DD 0F EC 0F FB 10 0A 10 18 ................ 7AD0: 10 27 10 36 10 45 10 54 10 63 10 73 10 82 10 91 .'.6.E.T.c.s.... 7AE0: 10 A0 10 B0 10 BF 10 CF 10 DE 10 EE 10 FE 11 0D ................ 7AF0: 11 1D 11 2D 11 3D 11 4D 11 5D 11 6D 11 7D 11 8D ...-.=.M.].m.}.. 7B00: 11 9E 11 AE 11 BE 11 CF 11 DF 11 F0 12 00 12 11 ................ 7B10: 12 22 12 32 12 43 12 54 12 65 12 76 12 87 12 99 .".2.C.T.e.v.... 7B20: 12 AA 12 BB 12 CC 12 DE 12 EF 13 01 13 12 13 24 ...............$ 7B30: 13 36 13 48 13 59 13 6B 13 7D 13 8F 13 A1 13 B4 .6.H.Y.k.}...... 7B40: 13 C6 13 D8 13 EA 13 FD 14 0F 14 22 14 35 14 47 ...........".5.G 7B50: 14 5A 14 6D 14 80 14 93 14 A6 14 B9 14 CC 14 DF .Z.m............ 7B60: 14 F3 15 06 15 1A 15 2D 15 41 15 54 15 68 15 7C .......-.A.T.h.| 7B70: 15 90 15 A4 15 B8 15 CC 15 E0 15 F4 16 09 16 1D ................ 7B80: 16 32 16 46 16 5B 16 70 16 84 16 99 16 AE 16 C3 .2.F.[.p........ 7B90: 16 D8 16 ED 17 03 17 18 17 2D 17 43 17 58 17 6E .........-.C.X.n 7BA0: 17 84 17 99 17 AF 17 C5 17 DB 17 F1 18 07 18 1E ................ 7BB0: 18 34 18 4A 18 61 18 77 18 8E 18 A5 18 BC 18 D3 .4.J.a.w........ 7BC0: 18 E9 19 01 19 18 19 2F 19 46 19 5E 19 75 19 8D ......./.F.^.u.. 7BD0: 19 A4 19 BC 19 D4 19 EC 1A 04 1A 1C 1A 34 1A 4C .............4.L 7BE0: 1A 65 1A 7D 1A 96 1A AE 1A C7 1A E0 1A F9 1B 12 .e.}............ 7BF0: 1B 2B 1B 44 1B 5D 1B 76 1B 90 1B A9 1B C3 1B DD .+.D.].v........ 7C00: 1B F6 1C 10 1C 2A 1C 44 1C 5F 1C 79 1C 93 1C AE .....*.D._.y.... 7C10: 1C C8 1C E3 1C FE 1D 18 1D 33 1D 4E 1D 6A 1D 85 .........3.N.j.. 7C20: 1D A0 1D BC 1D D7 1D F3 1E 0E 1E 2A 1E 46 1E 62 ...........*.F.b 7C30: 1E 7E 1E 9B 1E B7 1E D3 1E F0 1F 0D 1F 29 1F 46 .~...........).F 7C40: 1F 63 1F 80 1F 9D 1F BB 1F D8 1F F5 20 13 20 31 .c.......... . 1 7C50: 20 4F 20 6C 20 8B 20 A9 20 C7 20 E5 21 04 21 22 O l . . . .!.!" 7C60: 21 41 21 60 21 7F 21 9E 21 BD 21 DC 21 FB 22 1B !A!!.!.!.!.!.". 7C70: 22 3A 22 5A 22 7A 22 9A 22 BA 22 DA 22 FA 23 1B ":"Z"z".".".".#. 7C80: 23 3B 23 5C 23 7C 23 9D 23 BE 23 DF 24 01 24 22 #;#\#|#.#.#.$.$" 7C90: 24 43 24 65 24 87 24 A8 24 CA 24 ED 25 0F 25 31 $C$e$.$.$.$.%.%1 7CA0: 25 53 25 76 25 99 25 BB 25 DE 26 01 26 25 26 48 %S%v%.%.%.&.&%&H 7CB0: 26 6B 26 8F 26 B3 26 D7 26 FA 27 1F 27 43 27 67 &k&.&.&.&.'.'C'g 7CC0: 27 8C 27 B0 27 D5 27 FA 28 1F 28 44 28 69 28 8F '.'.'.'.(.(D(i(. 7CD0: 28 B4 28 DA 29 00 29 26 29 4C 29 72 29 98 29 BF (.(.).)&)L)r).). 7CE0: 29 E6 2A 0C 2A 33 2A 5A 2A 82 2A A9 2A D0 2A F8 ).*.*3*Z*.*.*.*. 7CF0: 2B 20 2B 48 2B 70 2B 98 2B C0 2B E9 2C 12 2C 3A + +H+p+.+.+.,.,: 7D00: 2C 63 2C 8C 2C B6 2C DF 2D 09 2D 32 2D 5C 2D 86 ,c,.,.,.-.-2-\-. 7D10: 2D B0 2D DB 2E 05 2E 30 2E 5A 2E 85 2E B0 2E DC -.-....0.Z...... 7D20: 2F 07 2F 33 2F 5E 2F 8A 2F B6 2F E2 30 0F 30 3B /./3/^/././.0.0; 7D30: 30 68 30 95 30 C2 30 EF 31 1C 31 4A 31 77 31 A5 0h0.0.0.1.1J1w1. 7D40: 31 D3 32 01 32 2F 32 5E 32 8D 32 BB 32 EA 33 19 1.2.2/2^2.2.2.3. 7D50: 33 49 33 78 33 A8 33 D8 34 08 34 38 34 68 34 99 3I3x3.3.4.484h4. 7D60: 34 C9 34 FA 35 2B 35 5D 35 8E 35 C0 35 F1 36 23 4.4.5+5]5.5.5.6# 7D70: 36 55 36 88 36 BA 36 ED 37 20 37 53 37 86 37 B9 6U6.6.6.7 7S7.7. 7D80: 37 ED 38 21 38 55 38 89 38 BD 38 F2 39 26 39 5B 7.8!8U8.8.8.9&9[ 7D90: 39 90 39 C6 39 FB 3A 31 3A 67 3A 9D 3A D3 3B 0A 9.9.9.:1:g:.:.;. 7DA0: 3B 40 3B 77 3B AE 3B E5 3C 1D 3C 55 3C 8C 3C C5 ;@;w;.;.<..>S>. 7DC0: 3E C6 3F 00 3F 3B 3F 75 3F B0 3F EB 40 26 40 62 >.?.?;?u?.?.@&@b 7DD0: 40 9D 40 D9 41 15 41 51 41 8E 41 CA 42 07 42 44 @.@.A.AQA.A.B.BD 7DE0: 42 82 42 BF 42 FD 43 3B 43 79 43 B8 43 F7 44 36 B.B.B.C;CyC.C.D6 7DF0: 44 75 44 B4 44 F4 45 34 45 74 45 B4 45 F4 46 35 DuD.D.E4EtE.E.F5 7E00: 46 76 46 B7 46 F9 47 3B 47 7D 47 BF 48 01 48 44 FvF.F.G;G}G.H.HD 7E10: 48 87 48 CA 49 0D 49 51 49 95 49 D9 4A 1D 4A 62 H.H.I.IQI.I.J.Jb 7E20: 4A A7 4A EC 4B 31 4B 77 4B BD 4C 03 4C 49 4C 90 J.J.K1KwK.L.LIL. 7E30: 4C D7 4D 1E 4D 65 4D AD 4D F5 4E 3D 4E 86 4E CE L.M.MeM.M.N=N.N. 7E40: 4F 17 4F 60 4F AA 4F F4 50 3E 50 88 50 D3 51 1D O.OO.P>P.P.Q. 7E50: 51 69 51 B4 52 00 52 4B 52 98 52 E4 53 31 53 7E QiQ.R.RKR.R.S1S~ 7E60: 53 CB 54 19 54 67 54 B5 55 03 55 52 55 A1 55 F0 S.T.TgT.U.URU.U. 7E70: 56 40 56 90 56 E0 57 30 57 81 57 D2 58 23 58 75 V@V.V.W0W.W.X#Xu 7E80: 58 C7 59 19 59 6B 59 BE 5A 11 5A 65 5A B8 5B 0C X.Y.YkY.Z.ZeZ.[. 7E90: 5B 61 5B B5 5C 0A 5C 5F 5C B5 5D 0B 5D 61 5D B7 [a[.\.\_\.].]a]. 7EA0: 5E 0E 5E 65 5E BD 5F 14 5F 6C 5F C5 60 1D 60 76 ^.^e^._._l_.. 7EB0: 60 D0 61 29 61 83 61 DE 62 38 62 93 62 EE 63 4A .a)a.a.b8b.b.cJ 7EC0: 63 A6 64 02 64 5F 64 BC 65 19 65 77 65 D5 66 33 c.d.d_d.e.ewe.f3 7ED0: 66 91 66 F0 67 50 67 AF 68 0F 68 70 68 D0 69 31 f.f.gPg.h.hph.i1 7EE0: 69 93 69 F5 6A 57 6A B9 6B 1C 6B 7F 6B E3 6C 47 i.i.jWj.k.k.k.lG 7EF0: 6C AB 6D 0F 6D 74 6D DA 6E 3F 6E A6 6F 0C 6F 73 l.m.mtm.n?n.o.os 7F00: 6F DA 70 42 70 A9 71 12 71 7A 71 E4 72 4D 72 B7 o.pBp.q.qzq.rMr. 7F10: 73 21 73 8C 73 F7 74 62 74 CE 75 3A 75 A6 76 13 s!s.s.tbt.u:u.v. 7F20: 76 81 76 EE 77 5C 77 CB 78 3A 78 A9 79 19 79 89 v.v.w\w.x:x.y.y. 7F30: 79 FA 7A 6A 7A DC 7B 4E 7B C0 7C 32 7C A5 7D 19 y.zjz.{N{.|2|.}. 7F40: 7D 8D 7E 01 7E 75 7E EB 7F 60 7F D6 80 4C 80 C3 }.~.~u~.....L.. 7F50: 81 3A 81 B2 82 2A 82 A3 83 1C 83 95 84 0F 84 89 .:...*.......... 7F60: 85 04 85 7F 85 FA 86 76 86 F3 87 70 87 ED 88 6B .......v...p...k 7F70: 88 E9 89 68 89 E7 8A 67 8A E7 8B 68 8B E9 8C 6B ...h...g...h...k 7F80: 8C ED 8D 6F 8D F2 8E 75 8E F9 8F 7E 90 02 90 88 ...o...u...~.... 7F90: 91 0E 91 94 92 1B 92 A2 93 2A 93 B2 94 3B 94 C4 .........*...;.. 7EA0: 5E 0E 5E 65 5E BD 5F 14 5F 6C 5F C5 60 1D 60 76 ^.^e^._._l_.. 7EB0: 60 D0 61 29 61 83 61 DE 62 38 62 93 62 EE 63 4A .a)a.a.b8b.b.cJ 7EC0: 63 A6 64 02 64 5F 64 BC 65 19 65 77 65 D5 66 33 c.d.d_d.e.ewe.f3 7ED0: 66 91 66 F0 67 50 67 AF 68 0F 68 70 68 D0 69 31 f.f.gPg.h.hph.i1 7EE0: 69 93 69 F5 6A 57 6A B9 6B 1C 6B 7F 6B E3 6C 47 i.i.jWj.k.k.k.lG 7EF0: 6C AB 6D 0F 6D 74 6D DA 6E 3F 6E A6 6F 0C 6F 73 l.m.mtm.n?n.o.os 7F00: 6F DA 70 42 70 A9 71 12 71 7A 71 E4 72 4D 72 B7 o.pBp.q.qzq.rMr. 7F10: 73 21 73 8C 73 F7 74 62 74 CE 75 3A 75 A6 76 13 s!s.s.tbt.u:u.v. 7F20: 76 81 76 EE 77 5C 77 CB 78 3A 78 A9 79 19 79 89 v.v.w\w.x:x.y.y. 7F30: 79 FA 7A 6A 7A DC 7B 4E 7B C0 7C 32 7C A5 7D 19 y.zjz.{N{.|2|.}. 7F40: 7D 8D 7E 01 7E 75 7E EB 7F 60 7F D6 80 4C 80 C3 }.~.~u~.....L.. 7F50: 81 3A 81 B2 82 2A 82 A3 83 1C 83 95 84 0F 84 89 .:...*.......... 7F60: 85 04 85 7F 85 FA 86 76 86 F3 87 70 87 ED 88 6B .......v...p...k 7F70: 88 E9 89 68 89 E7 8A 67 8A E7 8B 68 8B E9 8C 6B ...h...g...h...k 7F80: 8C ED 8D 6F 8D F2 8E 75 8E F9 8F 7E 90 02 90 88 ...o...u...~.... 7F90: 91 0E 91 94 92 1B 92 A2 93 2A 93 B2 94 3B 94 C4 .........*...;.. 7FA0: 95 4E 95 D8 96 63 96 EE 97 7A 98 06 98 93 99 20 .N...c...z..... 7FB0: 99 AE 9A 3C 9A CB 9B 5A 9B EA 9C 7A 9D 0B 9D 9D ...<...Z...z.... 7FC0: 9E 2F 9E C1 9F 54 9F E7 A0 7C A1 10 A1 A5 A2 3B ./...T...|.....; 7FD0: A2 D1 A3 68 A3 FF A4 97 A5 2F A5 C8 A6 62 A6 FC ...h...../...b.. 7FE0: A7 96 A8 32 A8 CD A9 6A AA 06 AA A4 AB 42 AB E0 ...2...j.....B.. 7FF0: AC 80 AD 1F AD C0 AE 60 AF 02 AF A4 B0 47 B0 EA .......'.....G..