/*
   Chassis polysynth framework

   Copyright 2024 Gordon JC Pearce <gordonjcp@gjcp.net>

   Permission to use, copy, modify, and/or distribute this software for any
   purpose with or without fee is hereby granted, provided that the above
   copyright notice and this permission notice appear in all copies.

   THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
   WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
   MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
   SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
   WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
   OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
   CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*/

#include "ic1.hpp"
#include <cstdio>

// Disassembly of assigner.bin, 8192 bytes [0x0 to 0x1fff]
// coldstart
// 0000: 4e 9a       JRE     $009C
// 0002: 00          NOP     
// 0003: 00          NOP     

// NMI handler
// 0004: aa          EI      
// 0005: 62          RETI    
// 0006: 00          NOP     
// 0007: 00          NOP     

// ; bit patterns used for Note On
// 0008: 01 02 04 08 10 20 40 80
// ; bit patterns used for Note Off
// 0010: fe fd fb f7 ef df bf 7f

// 0018: 00 00 00 00 00 00 00 00    

// timer handler
// 0020: 20 cb       INRW    $FFCB_timerCounter
// 0022: c3          JR      $0026
// 0023: 54 4b 05    JMP     $054B
// 0026: aa          EI      
// 0027: 62          RETI  

// serial handler
// 0028: 54 95 05    JMP     $0595
// 002b: 00          NOP     
// 002c: 00          NOP     
// 002d: 00          NOP     
// 002e: 00          NOP     
// 002f: 00          NOP     

// table of values referenced at 0x088c
// likely to be something to do with
// patch data addresses
// 0030: 9c 97 94 90 9d 9a 95 93
// 0038: 9e 98 96 91 9b 99 9f 92

// LED code numbers for numbers " 1" to "16"
// used for MIDI channel display
// 0040: f1 f2 f3 f4 f5 f6 f7 f8
// 0048: f9 1a 11 12 13 14 15 16

// LED bitfield table for symbols
// <top bar> 1 2 3 4 5 6 7
// 8 9 0 c E P r <space>
// 0050: 01 60 c7 e5 6c ad af e8
// 0058: ef ed eb 07 8f ce 07 00

// LED bitfield table for transpose values
// 25 in total
// C C. d d. E F F. G G. A A. B
// 0060: 8b 9b 67 77 8f 8e 9e ab
// 0068: bb ee fe 2f 8b 9b 67 77
// 0070: 8f 8e 9e ab bb ee fe 2f 8b

// start of code proper
// 0079: 69 00       MVI     A,$00
// 007b: 4d c1       MOV     PB,A
// 007d: 4d c5       MOV     PF,A
// 007f: 63 cc       STAW    $FFCC  // something to do with ADC
// 0081: 63 cd       STAW    $FFCD  // something to do with ADC
// 0083: 63 c0       STAW    $FFC0_runningStatus
// 0085: 63 b7       STAW    $FFB7  // set to zero for Manual
// 0087: 64 02 fd    MVI     PC,$FD
// 008a: aa          EI      
// 008b: 75 cd 08    EQIW    $FFCD,$08
// 008e: fc          JR      $008B
// 008f: 71 b8 2a    MVIW    $FFB8,$2A
// 0092: 7c 54       CALF    $0C54
// 0094: 75 cd 10    EQIW    $FFCD,$10
// 0097: fc          JR      $0094
// 0098: 7b 81       CALF    $0B81
// 009a: 4e 71       JRE     $010D

// startup
// 009c: 69 0e       MVI     A,$0E
// 009e: 4d d0       MOV     MM,A
// 00a0: 69 0e       MVI     A,$0E
// 00a2: 4d c9       MOV     SMH,A
// 00a4: 69 4e       MVI     A,$4E
// 00a6: 4d ca       MOV     SML,A
// 00a8: 64 80 08    MVI     ANM,$08
// 00ab: 68 ff       MVI     V,$FF
// 00ad: 10          EXA     
// 00ae: 68 ff       MVI     V,$FF
// 00b0: 04 ff ff    LXI     SP,$FFFF
// 00b3: 69 00       MVI     A,$00
// 00b5: 34 00 ff    LXI     HL,$FF00
// 00b8: 3d          STAX    (HL+)
// 00b9: 74 7f 00    EQI     L,$00
// 00bc: fb          JR      $00B8
// 00bd: 69 03       MVI     A,$03
// 00bf: 4d d1       MOV     MCC,A
// 00c1: 69 3a       MVI     A,$3A
// 00c3: 4d d4       MOV     MC,A
// 00c5: 69 00       MVI     A,$00
// 00c7: 4d d3       MOV     MB,A
// 00c9: 4d d7       MOV     MF,A
// 00cb: 4d c5       MOV     PF,A
// 00cd: 4d c1       MOV     PB,A
// 00cf: 69 ff       MVI     A,$FF
// 00d1: 4d d2       MOV     MA,A
// 00d3: 71 bc 08    MVIW    $FFBC,$08
// 00d6: 7b 81       CALF    $0B81
// 00d8: 71 c8 42    MVIW    $FFC8,$42
// 00db: 24 ff 1f    LXI     DE,$1FFF
// 00de: 4a de       MVIX    DE,$DE
// 00e0: 4c c0       MOV     A,PA
// 00e2: 63 a8       STAW    $FFA8_midiSwitch
// 00e4: 07 01       ANI     A,$01
// 00e6: 63 b6       STAW    $FFB6
// 00e8: 4a dd       MVIX    DE,$DD
// 00ea: 4c c0       MOV     A,PA
// 00ec: 63 a7       STAW    $FFA7
// 00ee: 4a e8       MVIX    DE,$E8
// 00f0: 64 06 00    MVI     MKH,$00
// 00f3: aa          EI      
// 00f4: 75 cd 10    EQIW    $FFCD,$10
// 00f7: fc          JR      $00F4
// 00f8: 71 b8 2a    MVIW    $FFB8,$2A
// 00fb: 7c 47       CALF    $0C47
// 00fd: 78 43       CALF    $0843_sendOmniOffPoly
// 00ff: 71 ba 20    MVIW    $FFBA,$20
// 0102: 71 bb 01    MVIW    $FFBB,$01
// 0105: 58 b6       BIT     0,$FFB6
// 0107: 71 ba 10    MVIW    $FFBA,$10
// 010a: 71 be 0c    MVIW    $FFBE,$0C
// 010d: 7b 9a       CALF    $0B9A
// 010f: 78 28       CALF    $0828
// 0111: 58 a8       BIT     0,$FFA8_midiSwitch
// 0113: c7          JR      $011B
// 0114: 55 87 40    OFFIW   $FF87,$40
// 0117: c3          JR      $011B
// 0118: 55 a8 08    OFFIW   $FFA8_midiSwitch,$08 (MIDI Ch)
// 011b: 4e 75       JRE     $0192
// 011d: 7b 70       CALF    $0B70_stopAllNotes
// 011f: 7b 9e       CALF    $0B9E
// 0121: 7b 81       CALF    $0B81
// 0123: 7d 33       CALF    $0D33
// 0125: 78 00       CALF    $0800
// 0127: 24 ff 1f    LXI     DE,$1FFF
// 012a: 34 50 ff    LXI     HL,$FF50
// 012d: 6a e8       MVI     B,$E8
// 012f: 0a          MOV     A,B
// 0130: 3a          STAX    (DE)
// 0131: 00          NOP     
// 0132: 00          NOP     
// 0133: 4c c0       MOV     A,PA
// 0135: 3b          STAX    (HL)
// 0136: 0a          MOV     A,B
// 0137: 17 10       ORI     A,$10
// 0139: 3a          STAX    (DE)
// 013a: 32          INX     HL
// 013b: 42          INR     B
// 013c: 48 0b       SK      HC
// 013e: f0          JR      $012F
// 013f: 34 50 ff    LXI     HL,$FF50
// 0142: 6a 07       MVI     B,$07
// 0144: 24 00 00    LXI     DE,$0000
// 0147: 2d          LDAX    (HL+)
// 0148: 67 00       NEI     A,$00
// 014a: ca          JR      $0155
// 014b: 6b 07       MVI     C,$07
// 014d: 48 01       SLRC    A
// 014f: c1          JR      $0151
// 0150: cb          JR      $015C
// 0151: 22          INX     DE
// 0152: 53          DCR     C
// 0153: f9          JR      $014D
// 0154: c3          JR      $0158
// 0155: 74 45 08    ADI     E,$08
// 0158: 52          DCR     B
// 0159: ed          JR      $0147
// 015a: 4e 21       JRE     $017D
// 015c: 0d          MOV     A,E
// 015d: 36 0c       SUINB   A,$0C
// 015f: 46 0c       ADI     A,$0C
// 0161: 37 25       LTI     A,$25
// 0163: 66 0c       SUI     A,$0C
// 0165: 37 19       LTI     A,$19
// 0167: 66 0c       SUI     A,$0C
// 0169: 63 be       STAW    $FFBE
// 016b: 77 0c       EQI     A,$0C
// 016d: c7          JR      $0175
// 016e: 01 c8       LDAW    $FFC8
// 0170: 07 fe       ANI     A,$FE
// 0172: 63 c8       STAW    $FFC8
// 0174: c6          JR      $017B
// 0175: 01 c8       LDAW    $FFC8
// 0177: 17 01       ORI     A,$01
// 0179: 63 c8       STAW    $FFC8
// 017b: 78 00       CALF    $0800
// 017d: 24 ff 1f    LXI     DE,$1FFF
// 0180: 69 de       MVI     A,$DE
// 0182: 3a          STAX    (DE)
// 0183: 00          NOP     
// 0184: 00          NOP     
// 0185: 4c c0       MOV     A,PA
// 0187: 47 01       ONI     A,$01
// 0189: c2          JR      $018C
// 018a: 4f 9b       JRE     $0127
// 018c: 7d 3c       CALF    $0D3C
// 018e: 78 28       CALF    $0828
// 0190: 7b 9a       CALF    $0B9A
// 0192: 01 cd       LDAW    $FFCD
// 0194: 07 10       ANI     A,$10
// 0196: 74 f8 bf    EQAW    $FFBF
// 0199: 71 c0 00    MVIW    $FFC0_runningStatus,$00
// 019c: 63 bf       STAW    $FFBF
// 019e: 24 ff 1f    LXI     DE,$1FFF
// 01a1: 34 50 ff    LXI     HL,$FF50
// 01a4: 6a e8       MVI     B,$E8
// 01a6: 0a          MOV     A,B
// 01a7: 3a          STAX    (DE)
// 01a8: 00          NOP     
// 01a9: 00          NOP     
// 01aa: 4c c0       MOV     A,PA
// 01ac: 1b          MOV     C,A
// 01ad: 77 00       EQI     A,$00
// 01af: 15 87 80    ORIW    $FF87,$80
// 01b2: 0a          MOV     A,B
// 01b3: 17 10       ORI     A,$10
// 01b5: 3a          STAX    (DE)
// 01b6: 0b          MOV     A,C
// 01b7: 70 93       XRAX    (HL)
// 01b9: 48 0c       SK      Z
// 01bb: 79 96       CALF    $0996
// 01bd: 0b          MOV     A,C
// 01be: 3d          STAX    (HL+)
// 01bf: 42          INR     B
// 01c0: 48 0b       SK      HC
// 01c2: e3          JR      $01A6
// 01c3: 55 87 80    OFFIW   $FF87,$80
// 01c6: d3          JR      $01DA
// 01c7: 5e 87       BIT     6,$FF87
// 01c9: d0          JR      $01DA
// 01ca: 69 f9       MVI     A,$F9
// 01cc: 79 e8       CALF    $09E8_sendToTx
// 01ce: 69 b0       MVI     A,$B0
// 01d0: 79 d5       CALF    $09D5
// 01d2: 69 7b       MVI     A,$7B
// 01d4: 79 e8       CALF    $09E8_sendToTx
// 01d6: 69 00       MVI     A,$00
// 01d8: 79 e8       CALF    $09E8_sendToTx
// 01da: 01 87       LDAW    $FF87
// 01dc: 48 21       SLR     A
// 01de: 63 87       STAW    $FF87
// 01e0: 6a 0d       MVI     B,$0D
// 01e2: 34 3d ff    LXI     HL,$FF3D
// 01e5: 24 57 ff    LXI     DE,$FF57
// 01e8: 71 d0 00    MVIW    $FFD0,$00
// 01eb: af 10       LDAX    (HL+$10)
// 01ed: 74 3a 03    LTI     B,$03
// 01f0: 74 3a 0b    LTI     B,$0B
// 01f3: c3          JR      $01F7
// 01f4: 70 9a       ORAX    (DE)
// 01f6: 23          DCX     DE
// 01f7: 1b          MOV     C,A
// 01f8: 70 93       XRAX    (HL)
// 01fa: 48 0c       SK      Z
// 01fc: 7a 18       CALF    $0A18
// 01fe: 0b          MOV     A,C
// 01ff: 3b          STAX    (HL)
// 0200: 33          DCX     HL
// 0201: 52          DCR     B
// 0202: e8          JR      $01EB
// 0203: 65 d0 ff    NEIW    $FFD0,$FF
// 0206: 7b 9e       CALF    $0B9E
// 0208: 24 ff 1f    LXI     DE,$1FFF
// 020b: 34 a4 ff    LXI     HL,$FFA4
// 020e: 6a da       MVI     B,$DA
// 0210: 0a          MOV     A,B
// 0211: 3a          STAX    (DE)
// 0212: 00          NOP     
// 0213: 00          NOP     
// 0214: 4c c0       MOV     A,PA
// 0216: 1b          MOV     C,A
// 0217: 0a          MOV     A,B
// 0218: 17 20       ORI     A,$20
// 021a: 3a          STAX    (DE)
// 021b: 0b          MOV     A,C
// 021c: 70 93       XRAX    (HL)
// 021e: bf 06       STAX    (HL+$06)
// 0220: 60 8b       ANA     A,C
// 0222: bf 0c       STAX    (HL+$0C)
// 0224: 0b          MOV     A,C
// 0225: 3d          STAX    (HL+)
// 0226: 42          INR     B
// 0227: 48 0b       SK      HC
// 0229: e6          JR      $0210
// 022a: 58 b6       BIT     0,$FFB6
// 022c: c2          JR      $022F
// 022d: 4e 3f       JRE     $026E
// 022f: 5b ae       BIT     3,$FFAE
// 0231: d6          JR      $0248
// 0232: 5b a8       BIT     3,$FFA8_midiSwitch ; MIDI CH button
// 0234: d1          JR      $0246
// 0235: 78 43       CALF    $0843_sendOmniOffPoly
// 0237: 7b 9a       CALF    $0B9A
// 0239: 78 28       CALF    $0828
// 023b: 7d 33       CALF    $0D33
// 023d: 01 bd       LDAW    $FFBD_midiChannel
// 023f: 34 40 00    LXI     HL,$0040
// 0242: ac          LDAX    (HL+A)
// 0243: 7d 45       CALF    $0D45
// 0245: c2          JR      $0248
// 0246: 7d 3c       CALF    $0D3C
// 0248: 5b a8       BIT     3,$FFA8_midiSwitch ; MIDI CH button
// 024a: 4e 4f       JRE     $029B
// 024c: 55 87 40    OFFIW   $FF87,$40
// 024f: db          JR      $026B
// 0250: 64 4a 08    ONI     PC,$08
// 0253: d7          JR      $026B
// 0254: 25 b0 00    GTIW    $FFB0,$00
// 0257: c7          JR      $025F
// 0258: 01 b0       LDAW    $FFB0
// 025a: 7c 9d       CALF    $0C9D
// 025c: 51          DCR     A
// 025d: 78 13       CALF    $0813
// 025f: 25 b1 00    GTIW    $FFB1,$00
// 0262: c8          JR      $026B
// 0263: 01 b1       LDAW    $FFB1
// 0265: 7c 9d       CALF    $0C9D
// 0267: 46 07       ADI     A,$07
// 0269: 78 13       CALF    $0813
// 026b: 54 5d 04    JMP     $045D
// 026e: 5b b4       BIT     3,$FFB4
// 0270: c2          JR      $0273
// 0271: 78 5c       CALF    $085C
// 0273: 01 a8       LDAW    $FFA8_midiSwitch
// 0275: 48 21       SLR     A
// 0277: 07 38       ANI     A,$38
// 0279: 1b          MOV     C,A
// 027a: 01 c8       LDAW    $FFC8
// 027c: 07 c7       ANI     A,$C7
// 027e: 60 9b       ORA     A,C
// 0280: 63 c8       STAW    $FFC8
// 0282: 75 ba 10    EQIW    $FFBA,$10
// 0285: cf          JR      $0295
// 0286: 59 cd       BIT     1,$FFCD
// 0288: c7          JR      $0290
// 0289: 5f b6       BIT     7,$FFB6
// 028b: 69 30       MVI     A,$30
// 028d: 7b 55       CALF    $0B55
// 028f: c5          JR      $0295
// 0290: 5f b6       BIT     7,$FFB6
// 0292: c2          JR      $0295
// 0293: 7b 70       CALF    $0B70_stopAllNotes
// 0295: 25 aa 00    GTIW    $FFAA,$00
// 0298: c2          JR      $029B
// 0299: 7b 70       CALF    $0B70_stopAllNotes
// 029b: 55 b5 38    OFFIW   $FFB5,$38
// 029e: 54 62 0d    JMP     $0D62
// 02a1: 59 b5       BIT     1,$FFB5
// 02a3: c4          JR      $02A8
// 02a4: 5c a9       BIT     4,$FFA9
// 02a6: 7c 47       CALF    $0C47
// 02a8: 5a af       BIT     2,$FFAF
// 02aa: 4e 20       JRE     $02CC
// 02ac: 5a a9       BIT     2,$FFA9
// 02ae: d0          JR      $02BF
// 02af: 7d 33       CALF    $0D33
// 02b1: 05 b6 fb    ANIW    $FFB6,$FB
// 02b4: 64 4a 10    ONI     PC,$10
// 02b7: cf          JR      $02C7
// 02b8: 69 00       MVI     A,$00
// 02ba: 63 b9       STAW    $FFB9
// 02bc: 7d 45       CALF    $0D45
// 02be: cd          JR      $02CC
// 02bf: 5a b6       BIT     2,$FFB6
// 02c1: 7d 3c       CALF    $0D3C
// 02c3: 05 b6 fb    ANIW    $FFB6,$FB
// 02c6: c5          JR      $02CC
// 02c7: 69 de       MVI     A,$DE
// 02c9: 40 45 0d    CALL    $0D45
// 02cc: 5f b4       BIT     7,$FFB4
// 02ce: 4e 2f       JRE     $02FF
// 02d0: 01 c8       LDAW    $FFC8
// 02d2: 16 c0       XRI     A,$C0
// 02d4: 63 c8       STAW    $FFC8
// 02d6: 58 b6       BIT     0,$FFB6
// 02d8: cc          JR      $02E5
// 02d9: 69 fd       MVI     A,$FD // select module board // select module board
// 02db: 79 e8       CALF    $09E8_sendToTx
// 02dd: 5e c8       BIT     6,$FFC8
// 02df: 69 86       MVI     A,$86
// 02e1: 69 87       MVI     A,$87
// 02e3: 79 e8       CALF    $09E8_sendToTx
// 02e5: 59 b6       BIT     1,$FFB6
// 02e7: 55 a9 04    OFFIW   $FFA9,$04
// 02ea: d4          JR      $02FF
// 02eb: 01 bb       LDAW    $FFBB
// 02ed: 74 98 ba    ORAW    $FFBA
// 02f0: 1b          MOV     C,A
// 02f1: 7c d0       CALF    $0CD0
// 02f3: 7c 93       CALF    $0C93
// 02f5: 55 a8 10    OFFIW   $FFA8_midiSwitch,$10 (MIDI Func2)
// 02f8: 79 29       CALF    $0929
// 02fa: 45 a8 30    ONIW    $FFA8_midiSwitch,$30 (MIDI Func1+2)
// 02fd: 78 f0       CALF    $08f0_sendSysexPatch
// 02ff: 45 b4 06    ONIW    $FFB4,$06
// 0302: d3          JR      $0316
// 0303: 7b 70       CALF    $0B70_stopAllNotes
// 0305: 7b 9e       CALF    $0B9E
// 0307: 7b 81       CALF    $0B81
// 0309: 01 a8       LDAW    $FFA8_midiSwitch
// 030b: 07 06       ANI     A,$06              ; Poly mode switches
// 030d: 1b          MOV     C,A
// 030e: 01 c8       LDAW    $FFC8
// 0310: 07 f9       ANI     A,$F9
// 0312: 60 9b       ORA     A,C
// 0314: 63 c8       STAW    $FFC8
// 0316: 25 b1 00    GTIW    $FFB1,$00
// 0319: 4e 41       JRE     $035C
// 031b: 01 b1       LDAW    $FFB1
// 031d: 7c 9d       CALF    $0C9D
// 031f: 07 0f       ANI     A,$0F
// 0321: 63 bb       STAW    $FFBB
// 0323: 5a a9       BIT     2,$FFA9
// 0325: 4e 20       JRE     $0347
// 0327: 64 4a 10    ONI     PC,$10
// 032a: 4e 7a       JRE     $03A6
// 032c: 5a b6       BIT     2,$FFB6
// 032e: c2          JR      $0331
// 032f: 4e 75       JRE     $03A6
// 0331: 01 b9       LDAW    $FFB9
// 0333: 07 f0       ANI     A,$F0
// 0335: 1a          MOV     B,A
// 0336: 74 98 bb    ORAW    $FFBB
// 0339: 7d 45       CALF    $0D45
// 033b: 01 bb       LDAW    $FFBB
// 033d: 63 b9       STAW    $FFB9
// 033f: 74 2a 00    GTI     B,$00
// 0342: d9          JR      $035C
// 0343: 7d 06       CALF    $0D06
// 0345: 4e 5f       JRE     $03A6
// 0347: 74 98 ba    ORAW    $FFBA
// 034a: 7d 45       CALF    $0D45
// 034c: 7c 3c       CALF    $0C3C
// 034e: 7c d0       CALF    $0CD0
// 0350: 7c 93       CALF    $0C93
// 0352: 55 a8 10    OFFIW   $FFA8_midiSwitch,$10 (MIDI Func2)
// 0355: 79 29       CALF    $0929
// 0357: 45 a8 30    ONIW    $FFA8_midiSwitch,$30 (MIDI Func1+2)
// 035a: 78 f0       CALF    $08f0_sendSysexPatch
// 035c: 25 b0 00    GTIW    $FFB0,$00
// 035f: 4e 45       JRE     $03A6
// 0361: 01 b0       LDAW    $FFB0
// 0363: 7c 9d       CALF    $0C9D
// 0365: 48 25       SLL     A
// 0367: 48 25       SLL     A
// 0369: 48 25       SLL     A
// 036b: 48 25       SLL     A
// 036d: 63 ba       STAW    $FFBA
// 036f: 5a a9       BIT     2,$FFA9
// 0371: df          JR      $0391
// 0372: 64 4a 10    ONI     PC,$10
// 0375: 4e 2f       JRE     $03A6
// 0377: 5a b6       BIT     2,$FFB6
// 0379: c2          JR      $037C
// 037a: 4e 2a       JRE     $03A6
// 037c: 01 b9       LDAW    $FFB9
// 037e: 07 0f       ANI     A,$0F
// 0380: 1a          MOV     B,A
// 0381: 74 98 ba    ORAW    $FFBA
// 0384: 7d 45       CALF    $0D45
// 0386: 01 ba       LDAW    $FFBA
// 0388: 63 b9       STAW    $FFB9
// 038a: 74 2a 00    GTI     B,$00
// 038d: d8          JR      $03A6
// 038e: 7d 06       CALF    $0D06
// 0390: d5          JR      $03A6
// 0391: 74 98 bb    ORAW    $FFBB
// 0394: 7d 45       CALF    $0D45
// 0396: 7c 3c       CALF    $0C3C
// 0398: 7c d0       CALF    $0CD0
// 039a: 7c 93       CALF    $0C93
// 039c: 55 a8 10    OFFIW   $FFA8_midiSwitch,$10 (MIDI Func2)
// 039f: 79 29       CALF    $0929
// 03a1: 45 a8 30    ONIW    $FFA8_midiSwitch,$30 (MIDI Func1+2)
// 03a4: 78 f0       CALF    $08f0_sendSysexPatch
// 03a6: 5a a9       BIT     2,$FFA9
// 03a8: 58 b5       BIT     0,$FFB5
// 03aa: 4e 28       JRE     $03D4
// 03ac: 59 b6       BIT     1,$FFB6
// 03ae: c6          JR      $03B5
// 03af: 7c 3c       CALF    $0C3C
// 03b1: 01 bb       LDAW    $FFBB
// 03b3: 1b          MOV     C,A
// 03b4: cb          JR      $03C0
// 03b5: 01 bb       LDAW    $FFBB
// 03b7: 37 08       LTI     A,$08
// 03b9: 69 00       MVI     A,$00
// 03bb: 46 01       ADI     A,$01
// 03bd: 63 bb       STAW    $FFBB
// 03bf: 1b          MOV     C,A
// 03c0: 01 ba       LDAW    $FFBA
// 03c2: 60 9b       ORA     A,C
// 03c4: 7d 45       CALF    $0D45
// 03c6: 7c d0       CALF    $0CD0
// 03c8: 7c 93       CALF    $0C93
// 03ca: 55 a8 10    OFFIW   $FFA8_midiSwitch,$10 (MIDI Func2)
// 03cd: 79 29       CALF    $0929
// 03cf: 45 a8 30    ONIW    $FFA8_midiSwitch,$30 (MIDI Func1+2)
// 03d2: 78 f0       CALF    $08f0_sendSysexPatch
// 03d4: 5f a3       BIT     7,$FFA3
// 03d6: 4e 32       JRE     $040A
// 03d8: 05 a3 7f    ANIW    $FFA3,$7F
// 03db: 01 c8       LDAW    $FFC8
// 03dd: 07 3f       ANI     A,$3F
// 03df: 5e a3       BIT     6,$FFA3
// 03e1: c3          JR      $03E5
// 03e2: 17 80       ORI     A,$80
// 03e4: c2          JR      $03E7
// 03e5: 17 40       ORI     A,$40
// 03e7: 63 c8       STAW    $FFC8
// 03e9: 01 a3       LDAW    $FFA3
// 03eb: 1b          MOV     C,A
// 03ec: 07 07       ANI     A,$07
// 03ee: 41          INR     A
// 03ef: 63 bb       STAW    $FFBB
// 03f1: 0b          MOV     A,C
// 03f2: 07 38       ANI     A,$38
// 03f4: 48 25       SLL     A
// 03f6: 46 10       ADI     A,$10
// 03f8: 63 ba       STAW    $FFBA
// 03fa: 74 98 bb    ORAW    $FFBB
// 03fd: 7d 45       CALF    $0D45
// 03ff: 7c 3c       CALF    $0C3C
// 0401: 7c d0       CALF    $0CD0
// 0403: 7c 93       CALF    $0C93
// 0405: 55 a3 80    OFFIW   $FFA3,$80
// 0408: 4f ce       JRE     $03D8
// 040a: 4c c2       MOV     A,PC
// 040c: 1b          MOV     C,A
// 040d: 74 90 bc    XRAW    $FFBC
// 0410: 07 08       ANI     A,$08
// 0412: 48 0c       SK      Z
// 0414: 7b a9       CALF    $0BA9
// 0416: 0b          MOV     A,C
// 0417: 63 bc       STAW    $FFBC
// 0419: 5b b6       BIT     3,$FFB6
// 041b: cb          JR      $0427
// 041c: 05 b6 f7    ANIW    $FFB6,$F7
// 041f: 69 fd       MVI     A,$FD // select module board // select module board
// 0421: 79 e8       CALF    $09E8_sendToTx
// 0423: 69 87       MVI     A,$87
// 0425: 79 e8       CALF    $09E8_sendToTx
// 0427: 5c b6       BIT     4,$FFB6
// 0429: cb          JR      $0435
// 042a: 05 b6 ef    ANIW    $FFB6,$EF
// 042d: 69 fd       MVI     A,$FD // select module board // select module board
// 042f: 79 e8       CALF    $09E8_sendToTx
// 0431: 69 86       MVI     A,$86
// 0433: 79 e8       CALF    $09E8_sendToTx
// 0435: 5f a1       BIT     7,$FFA1
// 0437: cb          JR      $0443
// 0438: 01 a1       LDAW    $FFA1
// 043a: 07 7f       ANI     A,$7F
// 043c: 63 a1       STAW    $FFA1
// 043e: 6a a0       MVI     B,$A0
// 0440: 78 37       CALF    $0837
// 0442: cd          JR      $0450
// 0443: 5f a0       BIT     7,$FFA0
// 0445: ca          JR      $0450
// 0446: 01 a0       LDAW    $FFA0
// 0448: 07 7f       ANI     A,$7F
// 044a: 63 a0       STAW    $FFA0
// 044c: 6a a1       MVI     B,$A1
// 044e: 78 37       CALF    $0837
// 0450: 5f a2       BIT     7,$FFA2
// 0452: ca          JR      $045D
// 0453: 01 a2       LDAW    $FFA2
// 0455: 07 7f       ANI     A,$7F
// 0457: 63 a2       STAW    $FFA2
// 0459: 6a a2       MVI     B,$A2
// 045b: 78 37       CALF    $0837
// 045d: 25 b2 00    GTIW    $FFB2,$00
// 0460: 4e 22       JRE     $0484
// 0462: 59 b6       BIT     1,$FFB6
// 0464: 7d 5b       CALF    $0D5B
// 0466: 55 b2 07    OFFIW   $FFB2,$07
// 0469: 7b cc       CALF    $0BCC
// 046b: 55 b2 18    OFFIW   $FFB2,$18
// 046e: 7b da       CALF    $0BDA
// 0470: 55 b2 e0    OFFIW   $FFB2,$E0
// 0473: 7b eb       CALF    $0BEB
// 0475: 7b f9       CALF    $0BF9
// 0477: 55 a8 30    OFFIW   $FFA8_midiSwitch,$30 (MIDI Func1+2)
// 047a: c9          JR      $0484
// 047b: 01 c7       LDAW    $FFC7
// 047d: 07 7f       ANI     A,$7F
// 047f: 1b          MOV     C,A
// 0480: 6d a0       MVI     E,$A0
// 0482: 78 d6       CALF    $08D6
// 0484: 25 ad 00    GTIW    $FFAD,$00
// 0487: d5          JR      $049D
// 0488: 01 a7       LDAW    $FFA7
// 048a: 59 b6       BIT     1,$FFB6
// 048c: 7c 0c       CALF    $0C0C
// 048e: 7c 29       CALF    $0C29
// 0490: 55 a8 30    OFFIW   $FFA8_midiSwitch,$30 (MIDI Func1+2)
// 0493: c9          JR      $049D
// 0494: 01 8f       LDAW    $FF8F_switches2
// 0496: 07 1f       ANI     A,$1F
// 0498: 1b          MOV     C,A
// 0499: 6d a1       MVI     E,$A1
// 049b: 78 d6       CALF    $08D6
// 049d: 6a 00       MVI     B,$00
// 049f: 24 58 ff    LXI     DE,$FF58
// 04a2: 34 6c ff    LXI     HL,$FF6C
// 04a5: 2a          LDAX    (DE)
// 04a6: 70 b3       SUBNBX  (HL)
// 04a8: 48 3a       NEGA    
// 04aa: 19          MOV     EAL,A
// 04ab: 37 02       LTI     A,$02
// 04ad: 78 7e       CALF    $087E
// 04af: 22          INX     DE
// 04b0: 32          INX     HL
// 04b1: 42          INR     B
// 04b2: 74 7a 10    EQI     B,$10
// 04b5: ef          JR      $04A5
// 04b6: 2a          LDAX    (DE)
// 04b7: 70 b3       SUBNBX  (HL)
// 04b9: 48 3a       NEGA    
// 04bb: 37 02       LTI     A,$02
// 04bd: 79 55       CALF    $0955
// 04bf: 22          INX     DE
// 04c0: 32          INX     HL
// 04c1: 01 6b       LDAW    $FF6B
// 04c3: 27 80       GTI     A,$80
// 04c5: 69 7f       MVI     A,$7F
// 04c7: 69 00       MVI     A,$00
// 04c9: 1b          MOV     C,A
// 04ca: 74 f8 7f    EQAW    $FF7F
// 04cd: 79 7e       CALF    $097E
// 04cf: 55 4f 04    OFFIW   $FF4F,$04
// 04d2: 54 11 01    JMP     $0111
// 04d5: 25 ce 00    GTIW    $FFCE,$00
// 04d8: d7          JR      $04F0
// 04d9: 7d 5b       CALF    $0D5B
// 04db: 24 90 ff    LXI     DE,$FF90_patchRam
// 04de: 6a 07       MVI     B,$07
// 04e0: 01 ce       LDAW    $FFCE
// 04e2: 1b          MOV     C,A
// 04e3: 48 2a       CLC     
// 04e5: 48 03       SLRC    C
// 04e7: c2          JR      $04EA
// 04e8: 79 47       CALF    $0947
// 04ea: 22          INX     DE
// 04eb: 52          DCR     B
// 04ec: f8          JR      $04E5
// 04ed: 71 ce 00    MVIW    $FFCE,$00
// 04f0: 25 cf 00    GTIW    $FFCF,$00
// 04f3: d7          JR      $050B
// 04f4: 7d 5b       CALF    $0D5B
// 04f6: 24 98 ff    LXI     DE,$FF98
// 04f9: 6a 07       MVI     B,$07
// 04fb: 01 cf       LDAW    $FFCF
// 04fd: 1b          MOV     C,A
// 04fe: 48 2a       CLC     
// 0500: 48 03       SLRC    C
// 0502: c2          JR      $0505
// 0503: 79 47       CALF    $0947
// 0505: 22          INX     DE
// 0506: 52          DCR     B
// 0507: f8          JR      $0500
// 0508: 71 cf 00    MVIW    $FFCF,$00
// 050b: 5d b6       BIT     5,$FFB6
// 050d: d0          JR      $051E
// 050e: 05 b6 df    ANIW    $FFB6,$DF
// 0511: 7d 5b       CALF    $0D5B
// 0513: 01 8e       LDAW    $FF8E_switches1
// 0515: 57 60       OFFI    A,$60
// 0517: c4          JR      $051C
// 0518: 17 80       ORI     A,$80
// 051a: 63 8e       STAW    $FF8E_switches1
// 051c: 7b f9       CALF    $0BF9
// 051e: 5e b6       BIT     6,$FFB6
// 0520: cc          JR      $052D
// 0521: 05 b6 bf    ANIW    $FFB6,$BF
// 0524: 7d 5b       CALF    $0D5B
// 0526: 71 b7 00    MVIW    $FFB7,$00
// 0529: 01 8f       LDAW    $FF8F_switches2
// 052b: 7c 29       CALF    $0C29
// 052d: 58 b6       BIT     0,$FFB6
// 052f: 54 11 01    JMP     $0111
// 0532: 6a 05       MVI     B,$05
// 0534: 34 8d ff    LXI     HL,$FF8D
// 0537: 2f          LDAX    (HL-)
// 0538: 47 80       ONI     A,$80
// 053a: c5          JR      $0540
// 053b: 52          DCR     B
// 053c: fa          JR      $0537
// 053d: 69 00       MVI     A,$00
// 053f: c2          JR      $0542
// 0540: 0a          MOV     A,B
// 0541: 41          INR     A
// 0542: 34 50 00    LXI     HL,$0050
// 0545: ac          LDAX    (HL+A)
// 0546: 63 c6       STAW    $FFC6
// 0548: 54 11 01    JMP     $0111
// 054b: 10          EXA     
// 054c: 11          EXX     
// 054d: 64 c8 08    ONI     ANM,$08
// 0550: d1          JR      $0562
// 0551: 34 68 ff    LXI     HL,$FF68
// 0554: 78 71       CALF    $0871
// 0556: 01 c5       LDAW    $FFC5
// 0558: 4d c1       MOV     PB,A
// 055a: 64 05 00    MVI     PF,$00
// 055d: 64 80 00    MVI     ANM,$00
// 0560: 4e 2b       JRE     $058D
// 0562: 6e ff       MVI     H,$FF
// 0564: 01 cc       LDAW    $FFCC
// 0566: 46 58       ADI     A,$58
// 0568: 1f          MOV     L,A
// 0569: 78 71       CALF    $0871
// 056b: 01 cc       LDAW    $FFCC
// 056d: 46 04       ADI     A,$04
// 056f: 48 0b       SK      HC
// 0571: cc          JR      $057E
// 0572: 71 cc 00    MVIW    $FFCC,$00
// 0575: 20 cd       INRW    $FFCD
// 0577: 00          NOP     
// 0578: 64 80 08    MVI     ANM,$08
// 057b: 69 fc       MVI     A,$FC
// 057d: d1          JR      $058F
// 057e: 63 cc       STAW    $FFCC
// 0580: 48 01       SLRC    A
// 0582: 48 01       SLRC    A
// 0584: 46 c5       ADI     A,$C5
// 0586: 1f          MOV     L,A
// 0587: 2b          LDAX    (HL)
// 0588: 4d c1       MOV     PB,A
// 058a: 64 45 40    ADI     PF,$40
// 058d: 69 f7       MVI     A,$F7
// 058f: 63 cb       STAW    $FFCB_timerCounter_timerCounter
// 0591: 10          EXA     
// 0592: 11          EXX     
// 0593: aa          EI      
// 0594: 62          RETI

// Serial Interrupt Handler
// 0595: 10          EXA     
// 0596: 11          EXX     
// 0597: 64 5e 04    OFFI    MKH,$04    // if the TX interrupt is masked
// 059a: c5          JR      $05A0      // skip jumping to 05a0
// 059b: 48 49       SKIT    FSR        // skip if RX interrupt is set, and clear
// 059d: 54 af 07    JMP     $07AF      // handle the TX interrupt
// 05a0: 48 6b       SKNIT   ER         // skip if the error flag is not set
// 05a2: 4e 6f       JRE     $0613      // handle serial error
// 05a4: 4c d9       MOV     A,RXB      // fetch received byte
// 05a6: 47 80       ONI     A,$80      // is it a status byte?
// 05a8: 4e 70       JRE     $061A      // no, handle value
// 05aa: 37 f0       LTI     A,$F0      // skip if < $f0
// 05ac: 4e 50       JRE     $05FE      // handle sysex
// 05ae: 1a          MOV     B,A        // save byte
// 05af: 05 4f 33    ANIW    $FF4F,$33  // bits 0, 1, 4, 5 left
// 05b2: 5d 4f       BIT     5,$FF4F    // 
// 05b4: c4          JR      $05B9      // 
// 05b5: 74 e0 bd    SUBW    $FFBD_midiChannel      // subtract MIDI channel
// 05b8: c2          JR      $05BB
// 05b9: 07 f0       ANI     A,$F0      // mask off channel
// 05bb: 67 90       NEI     A,$90
// 05bd: c2          JR      $05C0      // handle Note On
// 05be: 67 80       NEI     A,$80
// 05c0: 4e 25       JRE     $05E7      // handle Note Off
// 05c2: 67 b0       NEI     A,$B0
// 05c4: d7          JR      $05DC      // handle Control Change
// 05c5: 5d a8       BIT     5,$FFA8_midiSwitch    // MIDI Func 2
// 05c7: 4e 2a       JRE     $05F3      // handle patch change etc
// 05c9: 75 a2 00    EQIW    $FFA2,$00  // these are something to do with pitch bend
// 05cc: 71 a2 80    MVIW    $FFA2,$80
// 05cf: 75 a1 00    EQIW    $FFA1,$00
// 05d2: 71 a1 80    MVIW    $FFA1,$80
// 05d5: 75 a0 00    EQIW    $FFA0,$00
// 05d8: 71 a0 80    MVIW    $FFA0,$80
// 05db: d3          JR      $05EF      // restore registers and return from interrupt      // restore registers and return from interrupt

// handle control change
// 05dc: 1b          MOV     C,A            // save A
// 05dd: 0a          MOV     A,B            // original status byte
// 05de: 07 0f       ANI     A,$0F          // mask off MIDI channel
// 05e0: 74 e8 bd    NEAW    $FFBD_midiChannel
// 05e3: 15 4f 40    ORIW    $FF4F,$40      // not the right channel
// 05e6: 0b          MOV     A,C            // restore A
// 05e7: 71 3f 01    MVIW    $FF3F_midiByteCount,$01  // expect two bytes
// 05ea: 63 4e       STAW    $FF4E_midiStatusByte      // save status byte
// 05ec: 15 4f 80    ORIW    $FF4F,$80  // parser status?
// 
// return from interrupt
// 05ef: 10          EXA     
// 05f0: 11          EXX     
// 05f1: aa          EI      
// 05f2: 62          RETI
//
// 
// 05f3: 67 c0       NEI     A,$C0
// 05f5: c4          JR      $05FA      // handle patch change
// 05f6: 77 e0       EQI     A,$E0
// 05f8: f6          JR      $05EF      // restore registers and return from interrupt
// 05f9: ed          JR      $05E7      // handle pitch bend
// 
// expect patch change or sysex
// 05fa: 71 3f 00    MVIW    $FF3F_midiByteCount,$00  // one additional byte
// 05fd: ec          JR      $05EA      // store the status byte
// 05fe: 37 f8       LTI     A,$F8      // anything past sysex end $f7?
// 0600: ee          JR      $05EF      // restore registers and return from interrupt
// 0601: 77 f0       EQI     A,$F0
// 0603: d1          JR      $0615      // not sysex start
// 0604: 55 a8 30    OFFIW   $FFA8_midiSwitch,$30 (MIDI Func1+2)
// 0607: cd          JR      $0615      // not in sysex mode
// 0608: 05 4f f3    ANIW    $FF4F,$F3  
// 060b: 15 4f 04    ORIW    $FF4F,$04
// 060e: 71 3f 00    MVIW    $FF3F_midiByteCount,$00  // one additional byte
// 0611: 4f d7       JRE     $05EA      // store status and return

// handle serial error
// 0613: 4c d9       MOV     A,RXB
// 0615: 05 4f 33    ANIW    $FF4F,$33
// 0618: 4f d5       JRE     $05EF      // restore registers and return from interrupt

// 061a: 5f 4f       BIT     7,$FF4F    // are we looking for a value or status?
// 061c: fb          JR      $0618      // value, return
// 061d: 1b          MOV     C,A
// 061e: 5a 4f       BIT     2,$FF4F
// 0620: 4e 8f       JRE     $06B1      // multibyte message
// 0622: 5b 4f       BIT     3,$FF4F
// 0624: 4e 53       JRE     $0679      // single byte
// 0626: 5c 4f       BIT     4,$FF4F
// 0628: 4e 41       JRE     $066B
// 062a: 01 3f       LDAW    $FF3F_midiByteCount
// 062c: 37 10       LTI     A,$10
// 062e: 4e 20       JRE     $0650
// 0630: 1a          MOV     B,A
// 0631: 0b          MOV     A,C
// 0632: 34 90 ff    LXI     HL,$FF90_patchRam
// 0635: bd          STAX    (HL+B)
// 0636: 34 08 00    LXI     HL,$0008
// 0639: 0a          MOV     A,B
// 063a: 07 07       ANI     A,$07
// 063c: ac          LDAX    (HL+A)
// 063d: 34 cf ff    LXI     HL,$FFCF
// 0640: 74 4a 08    ONI     B,$08
// 0643: 34 ce ff    LXI     HL,$FFCE
// 0646: 70 9b       ORAX    (HL)
// 0648: 3b          STAX    (HL)
// 0649: 20 3f       INRW    $FF3F_midiByteCount
// 064b: 00          NOP     
// 064c: 10          EXA     
// 064d: 11          EXX     
// 064e: aa          EI      
// 064f: 62          RETI    
// 0650: 67 10       NEI     A,$10
// 0652: ca          JR      $065D
// 0653: 67 11       NEI     A,$11
// 0655: ce          JR      $0664
// 0656: 05 4f 33    ANIW    $FF4F,$33
// 0659: 71 3f 00    MVIW    $FF3F_midiByteCount,$00
// 065c: ef          JR      $064C
// 065d: 0b          MOV     A,C
// 065e: 63 8e       STAW    $FF8E_switches1
// 0660: 15 b6 20    ORIW    $FFB6,$20
// 0663: e5          JR      $0649
// 0664: 0b          MOV     A,C
// 0665: 63 8f       STAW    $FF8F_switches2
// 0667: 15 b6 40    ORIW    $FFB6,$40
// 066a: f8          JR      $0663
// 066b: 55 3f 01    OFFIW   $FF3F_midiByteCount,$01
// 066e: c3          JR      $0672
// 066f: 63 3e       STAW    $FF3E
// 0671: f1          JR      $0663
// 0672: 01 3e       LDAW    $FF3E
// 0674: 27 11       GTI     A,$11
// 0676: 4f b4       JRE     $062C
// 0678: ea          JR      $0663
// 0679: 75 3f 00    EQIW    $FF3F_midiByteCount,$00
// 067c: c6          JR      $0683
// 067d: 77 41       EQI     A,$41
// 067f: 4f d5       JRE     $0656
// 0681: 4f c6       JRE     $0649
// 0683: 75 3f 01    EQIW    $FF3F_midiByteCount,$01
// 0686: d4          JR      $069B
// 0687: 77 30       EQI     A,$30
// 0689: c5          JR      $068F
// 068a: 15 4f 10    ORIW    $FF4F,$10
// 068d: 4f ba       JRE     $0649
// 068f: 67 31       NEI     A,$31
// 0691: f8          JR      $068A
// 0692: 77 32       EQI     A,$32
// 0694: 4f c0       JRE     $0656
// 0696: 05 4f ef    ANIW    $FF4F,$EF
// 0699: 4f ae       JRE     $0649
// 069b: 75 3f 02    EQIW    $FF3F_midiByteCount,$02
// 069e: ca          JR      $06A9
// 069f: 74 f8 bd    EQAW    $FFBD_midiChannel
// 06a2: 4f b2       JRE     $0656
// 06a4: 55 4f 10    OFFIW   $FF4F,$10
// 06a7: 4f a0       JRE     $0649
// 06a9: 15 4f 08    ORIW    $FF4F,$08
// 06ac: 71 3f 00    MVIW    $FF3F_midiByteCount,$00
// 06af: 4f 9b       JRE     $064C
// 06b1: 30 3f       DCRW    $FF3F_midiByteCount
// 06b3: 4e 59       JRE     $070E
// 06b5: 25 4e 91    GTIW    $FF4E_midiStatusByte,$91
// 06b8: d1          JR      $06CA
// 06b9: 65 4e b0    NEIW    $FF4E_midiStatusByte,$B0
// 06bc: 4e 54       JRE     $0712
// 06be: 65 4e c0    NEIW    $FF4E_midiStatusByte,$C0
// 06c1: 4e bd       JRE     $0780
// 06c3: 65 4e e0    NEIW    $FF4E_midiStatusByte,$E0
// 06c6: 4e c7       JRE     $078F
// 06c8: 4f 8c       JRE     $0656
// 06ca: 01 3e       LDAW    $FF3E
// 06cc: 27 17       GTI     A,$17
// 06ce: 4e 36       JRE     $0706
// 06d0: 37 6d       LTI     A,$6D
// 06d2: 4e 36       JRE     $070A
// 06d4: 74 e0 be    SUBW    $FFBE
// 06d7: 1a          MOV     B,A
// 06d8: 48 22       SLR     B
// 06da: 48 22       SLR     B
// 06dc: 48 22       SLR     B
// 06de: 07 07       ANI     A,$07
// 06e0: 75 4e 90    EQIW    $FF4E_midiStatusByte,$90
// 06e3: d5          JR      $06F9
// 06e4: 74 6b 00    NEI     C,$00
// 06e7: d1          JR      $06F9
// 06e8: 34 08 00    LXI     HL,$0008
// 06eb: ac          LDAX    (HL+A)
// 06ec: 1b          MOV     C,A
// 06ed: 34 40 ff    LXI     HL,$FF40
// 06f0: ad          LDAX    (HL+B)
// 06f1: 60 9b       ORA     A,C
// 06f3: bd          STAX    (HL+B)
// 06f4: 71 3f 01    MVIW    $FF3F_midiByteCount,$01
// 06f7: 4f 53       JRE     $064C
// 06f9: 34 10 00    LXI     HL,$0010
// 06fc: ac          LDAX    (HL+A)
// 06fd: 1b          MOV     C,A
// 06fe: 34 40 ff    LXI     HL,$FF40
// 0701: ad          LDAX    (HL+B)
// 0702: 60 8b       ANA     A,C
// 0704: bd          STAX    (HL+B)
// 0705: ee          JR      $06F4
// 0706: 46 0c       ADI     A,$0C
// 0708: 4f c2       JRE     $06CC
// 070a: 66 0c       SUI     A,$0C
// 070c: 4f c2       JRE     $06D0
// 070e: 63 3e       STAW    $FF3E
// 0710: 4f 3a       JRE     $064C
// 0712: 01 3e       LDAW    $FF3E
// 0714: 27 7a       GTI     A,$7A
// 0716: 4e 35       JRE     $074D
// 0718: 45 4f 40    ONIW    $FF4F,$40
// 071b: 4f d7       JRE     $06F4
// 071d: 67 7b       NEI     A,$7B
// 071f: 4e 51       JRE     $0772
// 0721: 47 02       ONI     A,$02
// 0723: c8          JR      $072C
// 0724: 05 4f fd    ANIW    $FF4F,$FD
// 0727: 47 01       ONI     A,$01
// 0729: 4e 4d       JRE     $0778
// 072b: c8          JR      $0734
// 072c: 05 4f fe    ANIW    $FF4F,$FE
// 072f: 47 01       ONI     A,$01
// 0731: 15 4f 01    ORIW    $FF4F,$01
// 0734: 69 03       MVI     A,$03
// 0736: 74 88 4f    ANAW    $FF4F
// 0739: 15 4f 20    ORIW    $FF4F,$20
// 073c: 77 01       EQI     A,$01
// 073e: 05 4f df    ANIW    $FF4F,$DF
// 0741: 6a 0d       MVI     B,$0D
// 0743: 69 00       MVI     A,$00
// 0745: 34 40 ff    LXI     HL,$FF40
// 0748: 3d          STAX    (HL+)
// 0749: 52          DCR     B
// 074a: fd          JR      $0748
// 074b: 4f a7       JRE     $06F4
// 074d: 77 40       EQI     A,$40
// 074f: ce          JR      $075E
// 0750: 74 6b 00    NEI     C,$00
// 0753: c5          JR      $0759
// 0754: 15 b6 10    ORIW    $FFB6,$10
// 0757: 4f 9b       JRE     $06F4
// 0759: 15 b6 08    ORIW    $FFB6,$08
// 075c: 4f 96       JRE     $06F4
// 075e: 77 01       EQI     A,$01
// 0760: 4f 92       JRE     $06F4
// 0762: 55 a8 20    OFFIW   $FFA8_midiSwitch,$20 (MIDI Func1)
// 0765: c7          JR      $076D
// 0766: 0b          MOV     A,C
// 0767: 17 80       ORI     A,$80
// 0769: 63 a2       STAW    $FFA2
// 076b: 4f 87       JRE     $06F4
// 076d: 71 a2 80    MVIW    $FFA2,$80
// 0770: 4f 82       JRE     $06F4
// 0772: 5d 4f       BIT     5,$FF4F
// 0774: 4f 7e       JRE     $06F4
// 0776: 4f c9       JRE     $0741
// 0778: 74 7b 01    EQI     C,$01
// 077b: 15 4f 02    ORIW    $FF4F,$02
// 077e: 4f b4       JRE     $0734
// 0780: 55 a8 20    OFFIW   $FFA8_midiSwitch,$20 (MIDI Func1)
// 0783: c5          JR      $0789
// 0784: 0b          MOV     A,C
// 0785: 17 80       ORI     A,$80
// 0787: 63 a3       STAW    $FFA3
// 0789: 71 3f 00    MVIW    $FF3F_midiByteCount,$00
// 078c: 54 4c 06    JMP     $064C
// 078f: 55 a8 20    OFFIW   $FFA8_midiSwitch,$20 (MIDI Func1)
// 0792: d7          JR      $07AA
// 0793: 0b          MOV     A,C
// 0794: 18          MOV     EAH,A
// 0795: 01 3e       LDAW    $FF3E
// 0797: 48 25       SLL     A
// 0799: 19          MOV     EAL,A
// 079a: 48 a4       DSLL    EA
// 079c: 08          MOV     A,EAH
// 079d: 47 80       ONI     A,$80
// 079f: c4          JR      $07A4
// 07a0: 63 a1       STAW    $FFA1
// 07a2: 4f 50       JRE     $06F4
// 07a4: 16 ff       XRI     A,$FF
// 07a6: 63 a0       STAW    $FFA0
// 07a8: 4f 4a       JRE     $06F4
// 07aa: 71 a1 80    MVIW    $FFA1,$80
// 07ad: 4f 45       JRE     $06F4
// 07af: 01 c1       LDAW    $FFC1
// 07b1: 74 f8 c2    EQAW    $FFC2
// 07b4: 4e 25       JRE     $07DB
// 07b6: 64 1e 04    ORI     MKH,$04
// 07b9: 11          EXX     
// 07ba: 10          EXA     
// 07bb: aa          EI      
// 07bc: 62          RETI    
// 07bd: 1b          MOV     C,A
// 07be: 4c c2       MOV     A,PC
// 07c0: 60 93       XRA     A,C
// 07c2: 47 04       ONI     A,$04
// 07c4: ca          JR      $07CF
// 07c5: 69 d0       MVI     A,$D0
// 07c7: 48 49       SKIT    FSR
// 07c9: c3          JR      $07CD
// 07ca: 54 a0 05    JMP     $05A0
// 07cd: 41          INR     A
// 07ce: f8          JR      $07C7
// 07cf: 0f          MOV     A,L
// 07d0: 37 30       LTI     A,$30
// 07d2: 69 00       MVI     A,$00
// 07d4: 63 c1       STAW    $FFC1
// 07d6: 0b          MOV     A,C
// 07d7: 4d c2       MOV     PC,A
// 07d9: 4f d4       JRE     $07AF
// 07db: 6e ff       MVI     H,$FF
// 07dd: 1f          MOV     L,A
// 07de: 2d          LDAX    (HL+)
// 07df: 67 fd       NEI     A,$FD
// 07e1: 4f da       JRE     $07BD
// 07e3: 67 f9       NEI     A,$F9
// 07e5: 4f d6       JRE     $07BD
// 07e7: 48 4a       SKIT    FST
// 07e9: cd          JR      $07F7
// 07ea: 4d d8       MOV     TXB,A
// 07ec: 0f          MOV     A,L
// 07ed: 37 30       LTI     A,$30
// 07ef: 69 00       MVI     A,$00
// 07f1: 63 c1       STAW    $FFC1
// 07f3: 11          EXX     
// 07f4: 10          EXA     
// 07f5: aa          EI      
// 07f6: 62          RETI    
// 07f7: 33          DCX     HL
// 07f8: fa          JR      $07F3
// 07f9: 00          NOP     
// 07fa: 00          NOP     
// 07fb: 00          NOP     
// 07fc: 00          NOP     
// 07fd: 00          NOP     
// 07fe: 00          NOP     
// 07ff: 00          NOP     
// 0800: 01 be       LDAW    $FFBE
// 0802: 37 0c       LTI     A,$0C
// 0804: c4          JR      $0809
// 0805: 71 c5 04    MVIW    $FFC5,$04
// 0808: c3          JR      $080C
// 0809: 71 c5 00    MVIW    $FFC5,$00
// 080c: 34 60 00    LXI     HL,$0060
// 080f: ac          LDAX    (HL+A)
// 0810: 63 c6       STAW    $FFC6
// 0812: b8          RET     
// 0813: 05 4f dc    ANIW    $FF4F,$DC
// 0816: 15 4f 21    ORIW    $FF4F,$21
// 0819: 63 bd       STAW    $FFBD_midiChannel
// 081b: 34 40 00    LXI     HL,$0040
// 081e: ac          LDAX    (HL+A)
// 081f: 7d 45       CALF    $0D45
// 0821: 78 43       CALF    $0843_sendOmniOffPoly
// 0823: 7b 9a       CALF    $0B9A
// 0825: 78 28       CALF    $0828
// 0827: b8          RET     
// 0828: 69 80       MVI     A,$80
// 082a: 63 a1       STAW    $FFA1
// 082c: 63 a2       STAW    $FFA2
// 082e: 69 fd       MVI     A,$FD // select module board
// 0830: 79 e8       CALF    $09E8_sendToTx
// 0832: 69 87       MVI     A,$87
// 0834: 79 e8       CALF    $09E8_sendToTx
// 0836: b8          RET     
// 0837: 1b          MOV     C,A
// 0838: 69 fd       MVI     A,$FD // select module board
// 083a: 79 e8       CALF    $09E8_sendToTx
// 083c: 0a          MOV     A,B
// 083d: 79 e8       CALF    $09E8_sendToTx
// 083f: 0b          MOV     A,C
// 0840: 79 e8       CALF    $09E8_sendToTx
// 0842: b8          RET

// send Omni Off Poly
// 0843: 69 f9       MVI     A,$F9
// 0845: 79 e8       CALF    $09E8_sendToTx
// 0847: 69 b0       MVI     A,$B0
// 0849: 79 d5       CALF    $09D5
// 084b: 69 7c       MVI     A,$7C
// 084d: 79 e8       CALF    $09E8_sendToTx
// 084f: 69 00       MVI     A,$00
// 0851: 79 e8       CALF    $09E8_sendToTx
// 0853: 69 7f       MVI     A,$7F
// 0855: 79 e8       CALF    $09E8_sendToTx
// 0857: 69 00       MVI     A,$00
// 0859: 79 e8       CALF    $09E8_sendToTx
// 085b: b8          RET     
// 085c: 69 fd       MVI     A,$FD // select module board
// 085e: 79 e8       CALF    $09E8_sendToTx
// 0860: 69 8f       MVI     A,$8F
// 0862: 79 e8       CALF    $09E8_sendToTx
// 0864: 69 5f       MVI     A,$5F
// 0866: 79 e8       CALF    $09E8_sendToTx
// 0868: 69 a3       MVI     A,$A3
// 086a: 79 e8       CALF    $09E8_sendToTx
// 086c: 69 00       MVI     A,$00
// 086e: 79 e8       CALF    $09E8_sendToTx
// 0870: b8          RET     
// 0871: 4c e0       MOV     A,CR0
// 0873: 3d          STAX    (HL+)
// 0874: 4c e1       MOV     A,CR1
// 0876: 3d          STAX    (HL+)
// 0877: 4c e2       MOV     A,CR2
// 0879: 3d          STAX    (HL+)
// 087a: 4c e3       MOV     A,CR3
// 087c: 3b          STAX    (HL)
// 087d: b8          RET     
// 087e: 78 c3       CALF    $08C3
// 0880: 59 b6       BIT     1,$FFB6
// 0882: 4e 23       JRE     $08A7
// 0884: 55 c5 10    OFFIW   $FFC5,$10
// 0887: df          JR      $08A7
// 0888: b3          PUSH    HL
// 0889: b2          PUSH    DE
// 088a: 6c ff       MVI     D,$FF
// 088c: 34 30 00    LXI     HL,$0030
// 088f: ad          LDAX    (HL+B)
// 0890: 1d          MOV     E,A
// 0891: 0b          MOV     A,C
// 0892: 3a          STAX    (DE)
// 0893: 69 fd       MVI     A,$FD // select module board
// 0895: 79 e8       CALF    $09E8_sendToTx
// 0897: 0d          MOV     A,E
// 0898: 79 e8       CALF    $09E8_sendToTx
// 089a: 0b          MOV     A,C
// 089b: 79 e8       CALF    $09E8_sendToTx
// 089d: 45 a8 30    ONIW    $FFA8_midiSwitch,$30 (MIDI Func1+2)
// 08a0: 78 d6       CALF    $08D6
// 08a2: a2          POP     DE
// 08a3: a3          POP     HL
// 08a4: 2a          LDAX    (DE)
// 08a5: 3b          STAX    (HL)
// 08a6: b8          RET     
// 08a7: b3          PUSH    HL
// 08a8: b2          PUSH    DE
// 08a9: 6c ff       MVI     D,$FF
// 08ab: 34 30 00    LXI     HL,$0030
// 08ae: ad          LDAX    (HL+B)
// 08af: 1d          MOV     E,A
// 08b0: 2a          LDAX    (DE)
// 08b1: 57 80       OFFI    A,$80
// 08b3: c9          JR      $08BD
// 08b4: 09          MOV     A,EAL
// 08b5: 37 10       LTI     A,$10
// 08b7: c3          JR      $08BB
// 08b8: a2          POP     DE
// 08b9: a3          POP     HL
// 08ba: b8          RET     
// 08bb: 7d 5b       CALF    $0D5B
// 08bd: 0b          MOV     A,C
// 08be: 17 80       ORI     A,$80
// 08c0: 3a          STAX    (DE)
// 08c1: 4f d0       JRE     $0893
// 08c3: 2a          LDAX    (DE)
// 08c4: 36 04       SUINB   A,$04
// 08c6: 69 00       MVI     A,$00
// 08c8: 27 f2       GTI     A,$F2
// 08ca: c7          JR      $08D2
// 08cb: 1b          MOV     C,A
// 08cc: 66 f2       SUI     A,$F2
// 08ce: 60 a3       ADDNC   A,C
// 08d0: 69 ff       MVI     A,$FF
// 08d2: 48 21       SLR     A
// 08d4: 1b          MOV     C,A
// 08d5: b8          RET     
// 08d6: 6c 32       MVI     D,$32
// 08d8: 79 15       CALF    $0915_sendSysexHeader
// 08da: 0d          MOV     A,E
// 08db: 66 90       SUI     A,$90
// 08dd: 07 7f       ANI     A,$7F
// 08df: 79 e8       CALF    $09E8_sendToTx
// 08e1: 0b          MOV     A,C
// 08e2: 79 e8       CALF    $09E8_sendToTx
// 08e4: 69 f7       MVI     A,$F7
// 08e6: 79 e6       CALF    $09E6_setRunningStatus
// 08e8: b8          RET     
// 08e9: 6c 31       MVI     D,$31
// 08eb: 79 15       CALF    $0915_sendSysexHeader
// 08ed: 69 00       MVI     A,$00
// 08ef: c6          JR      $08F6

// sendSysexPatch
// 08f0: 6c 30       MVI     D,$30
// 08f2: 79 15       CALF    $0915_sendSysexHeader
// 08f4: 79 36       CALF    $0936
// 08f6: 79 e8       CALF    $09E8_sendToTx
// 08f8: 6a 0f       MVI     B,$0F
// 08fa: 34 90 ff    LXI     HL,$FF90_patchRam
// 08fd: 2d          LDAX    (HL+)
// 08fe: 07 7f       ANI     A,$7F
// 0900: 79 e8       CALF    $09E8_sendToTx
// 0902: 52          DCR     B
// 0903: f9          JR      $08FD
// 0904: 01 8e       LDAW    $FF8E_switches1
// 0906: 07 7f       ANI     A,$7F
// 0908: 79 e8       CALF    $09E8_sendToTx
// 090a: 01 8f       LDAW    $FF8F_switches2
// 090c: 07 1f       ANI     A,$1F
// 090e: 79 e8       CALF    $09E8_sendToTx
// 0910: 69 f7       MVI     A,$F7
// 0912: 79 e8       CALF    $09E8_sendToTx
// 0914: b8          RET

// sendSysexHeader
// 0915: 69 f9       MVI     A,$F9
// 0917: 79 e8       CALF    $09E8_sendToTx
// 0919: 69 f0       MVI     A,$F0
// 091b: 79 e6       CALF    $09E6_setRunningStatus
// 091d: 69 41       MVI     A,$41
// 091f: 79 e8       CALF    $09E8_sendToTx
// 0921: 0c          MOV     A,D
// 0922: 79 e8       CALF    $09E8_sendToTx
// 0924: 01 bd       LDAW    $FFBD_midiChannel
// 0926: 79 e8       CALF    $09E8_sendToTx
// 0928: b8          RET     
// 0929: 69 f9       MVI     A,$F9
// 092b: 79 e8       CALF    $09E8_sendToTx
// 092d: 69 c0       MVI     A,$C0
// 092f: 79 d5       CALF    $09D5
// 0931: 79 36       CALF    $0936
// 0933: 79 e8       CALF    $09E8_sendToTx
// 0935: b8          RET     
// 0936: 01 bb       LDAW    $FFBB
// 0938: 51          DCR     A
// 0939: 1b          MOV     C,A
// 093a: 01 ba       LDAW    $FFBA
// 093c: 66 10       SUI     A,$10
// 093e: 48 21       SLR     A
// 0940: 60 9b       ORA     A,C
// 0942: 5e c8       BIT     6,$FFC8
// 0944: 17 40       ORI     A,$40
// 0946: b8          RET     
// 0947: 69 fd       MVI     A,$FD // select module board
// 0949: 79 e8       CALF    $09E8_sendToTx
// 094b: 0d          MOV     A,E
// 094c: 79 e8       CALF    $09E8_sendToTx
// 094e: 2a          LDAX    (DE)
// 094f: 07 7f       ANI     A,$7F
// 0951: 3a          STAX    (DE)
// 0952: 79 e8       CALF    $09E8_sendToTx
// 0954: b8          RET     
// 0955: 55 a8 20    OFFIW   $FFA8_midiSwitch,$20 (MIDI Func1)
// 0958: b8          RET     
// 0959: 2a          LDAX    (DE)
// 095a: 3b          STAX    (HL)
// 095b: 44 00 00    LXI     EA,$0000
// 095e: 35 6a 80    LTIW    $FF6A,$80
// 0961: 16 ff       XRI     A,$FF
// 0963: 18          MOV     EAH,A
// 0964: 48 a0       DSLR    EA
// 0966: 48 a0       DSLR    EA
// 0968: 69 f9       MVI     A,$F9
// 096a: 79 e8       CALF    $09E8_sendToTx
// 096c: 69 e0       MVI     A,$E0
// 096e: 79 dc       CALF    $09DC
// 0970: 09          MOV     A,EAL
// 0971: 48 21       SLR     A
// 0973: 79 e8       CALF    $09E8_sendToTx
// 0975: 08          MOV     A,EAH
// 0976: 25 6a 80    GTIW    $FF6A,$80
// 0979: 17 40       ORI     A,$40
// 097b: 79 e8       CALF    $09E8_sendToTx
// 097d: b8          RET     
// 097e: 0b          MOV     A,C
// 097f: 63 7f       STAW    $FF7F
// 0981: 55 a8 20    OFFIW   $FFA8_midiSwitch,$20 (MIDI Func1)
// 0984: b8          RET     
// 0985: 1b          MOV     C,A
// 0986: 69 f9       MVI     A,$F9
// 0988: 79 e8       CALF    $09E8_sendToTx
// 098a: 69 b0       MVI     A,$B0
// 098c: 79 d5       CALF    $09D5
// 098e: 69 01       MVI     A,$01
// 0990: 79 e8       CALF    $09E8_sendToTx
// 0992: 0b          MOV     A,C
// 0993: 79 e8       CALF    $09E8_sendToTx
// 0995: b8          RET     
// 0996: 19          MOV     EAL,A
// 0997: 0a          MOV     A,B
// 0998: 07 07       ANI     A,$07
// 099a: 7a 0d       CALF    $0A0D
// 099c: b3          PUSH    HL
// 099d: b1          PUSH    BC
// 099e: 6a 00       MVI     B,$00
// 09a0: 09          MOV     A,EAL
// 09a1: 1b          MOV     C,A
// 09a2: 48 03       SLRC    C
// 09a4: d5          JR      $09BA
// 09a5: 34 08 00    LXI     HL,$0008
// 09a8: ad          LDAX    (HL+B)
// 09a9: 74 c8 c3    ONAW    $FFC3
// 09ac: c7          JR      $09B4
// 09ad: 79 c2       CALF    $09C2
// 09af: 69 40       MVI     A,$40
// 09b1: 79 e8       CALF    $09E8_sendToTx
// 09b3: c6          JR      $09BA
// 09b4: 79 c2       CALF    $09C2
// 09b6: 69 00       MVI     A,$00
// 09b8: 79 e8       CALF    $09E8_sendToTx
// 09ba: 42          INR     B
// 09bb: 74 7a 08    EQI     B,$08
// 09be: e3          JR      $09A2
// 09bf: a1          POP     BC
// 09c0: a3          POP     HL
// 09c1: b8          RET     
// 09c2: 69 f9       MVI     A,$F9
// 09c4: 79 e8       CALF    $09E8_sendToTx
// 09c6: 69 90       MVI     A,$90
// 09c8: 79 dc       CALF    $09DC
// 09ca: 08          MOV     A,EAH
// 09cb: 60 9a       ORA     A,B
// 09cd: 46 18       ADI     A,$18
// 09cf: 74 c0 be    ADDW    $FFBE
// 09d2: 79 e8       CALF    $09E8_sendToTx
// 09d4: b8          RET

// 09d5: 74 c0 bd    ADDW    $FFBD_midiChannel
// 09d8: 71 c0 00    MVIW    $FFC0_runningStatus,$00
// 09db: cc          JR      $09E8_sendToTx
// 09dc: 47 80       ONI     A,$80
// 09de: c9          JR      $09E8_sendToTx
// 09df: 74 c0 bd    ADDW    $FFBD_midiChannel
// 09e2: 74 e8 c0    NEAW    $FFC0_runningStatus
// 09e5: b8          RET

// set running status
// 09e6: 63 c0       STAW    $FFC0_runningStatus
// send to TX
// 09e8: b3          PUSH    HL
// 09e9: b1          PUSH    BC
// 09ea: b2          PUSH    DE
// 09eb: 1b          MOV     C,A
// 09ec: 01 c2       LDAW    $FFC2
// 09ee: 41          INR     A
// 09ef: 67 30       NEI     A,$30
// 09f1: 69 00       MVI     A,$00
// 09f3: 74 e8 c1    NEAW    $FFC1
// 09f6: fc          JR      $09F3
// 09f7: 1d          MOV     E,A
// 09f8: 01 c2       LDAW    $FFC2
// 09fa: 34 00 ff    LXI     HL,$FF00
// 09fd: 1a          MOV     B,A
// 09fe: 0b          MOV     A,C
// 09ff: bd          STAX    (HL+B)
// 0a00: 0d          MOV     A,E
// 0a01: 64 1e 07    ORI     MKH,$07
// 0a04: 63 c2       STAW    $FFC2
// 0a06: 64 0e f8    ANI     MKH,$F8
// 0a09: a2          POP     DE
// 0a0a: a1          POP     BC
// 0a0b: a3          POP     HL
// 0a0c: b8          RET     
// 0a0d: 48 25       SLL     A
// 0a0f: 48 25       SLL     A
// 0a11: 48 25       SLL     A
// 0a13: 18          MOV     EAH,A
// 0a14: 0b          MOV     A,C
// 0a15: 63 c3       STAW    $FFC3
// 0a17: b8          RET     
// 0a18: 19          MOV     EAL,A
// 0a19: 0a          MOV     A,B
// 0a1a: 7a 0d       CALF    $0A0D
// 0a1c: b3          PUSH    HL
// 0a1d: b1          PUSH    BC
// 0a1e: 6a 07       MVI     B,$07
// 0a20: 09          MOV     A,EAL
// 0a21: 1b          MOV     C,A
// 0a22: 34 08 00    LXI     HL,$0008
// 0a25: 48 07       SLLC    C
// 0a27: 4e 37       JRE     $0A60
// 0a29: ad          LDAX    (HL+B)
// 0a2a: 74 c8 c3    ONAW    $FFC3
// 0a2d: 4e 23       JRE     $0A52
// 0a2f: 08          MOV     A,EAH
// 0a30: 60 9a       ORA     A,B
// 0a32: 59 c8       BIT     1,$FFC8
// 0a34: da          JR      $0A4F
// 0a35: 5a c8       BIT     2,$FFC8
// 0a37: c7          JR      $0A3F
// 0a38: 58 b6       BIT     0,$FFB6
// 0a3a: c7          JR      $0A42
// 0a3b: 7a 88       CALF    $0A88
// 0a3d: 4e 21       JRE     $0A60
// 0a3f: 58 b6       BIT     0,$FFB6
// 0a41: ca          JR      $0A4C
// 0a42: 75 d0 00    EQIW    $FFD0,$00
// 0a45: da          JR      $0A60
// 0a46: 7b 55       CALF    $0B55
// 0a48: 71 d0 80    MVIW    $FFD0,$80
// 0a4b: d4          JR      $0A60
// 0a4c: 7a af       CALF    $0AAF
// 0a4e: d1          JR      $0A60
// 0a4f: 7a 76       CALF    $0A76
// 0a51: ce          JR      $0A60
// 0a52: 08          MOV     A,EAH
// 0a53: 60 9a       ORA     A,B
// 0a55: 59 c8       BIT     1,$FFC8
// 0a57: c6          JR      $0A5E
// 0a58: 5a c8       BIT     2,$FFC8
// 0a5a: cb          JR      $0A66
// 0a5b: 58 b6       BIT     0,$FFB6
// 0a5d: cb          JR      $0A69
// 0a5e: 7b 30       CALF    $0B30
// 0a60: 52          DCR     B
// 0a61: 4f c2       JRE     $0A25
// 0a63: a1          POP     BC
// 0a64: a3          POP     HL
// 0a65: b8          RET     
// 0a66: 58 b6       BIT     0,$FFB6
// 0a68: ca          JR      $0A73
// 0a69: 75 d0 00    EQIW    $FFD0,$00
// 0a6c: f3          JR      $0A60
// 0a6d: 7b 70       CALF    $0B70_stopAllNotes
// 0a6f: 71 d0 ff    MVIW    $FFD0,$FF
// 0a72: ed          JR      $0A60
// 0a73: 7a f8       CALF    $0AF8
// 0a75: ea          JR      $0A60
// 0a76: b3          PUSH    HL
// 0a77: b1          PUSH    BC
// 0a78: 1b          MOV     C,A
// 0a79: 6a 05       MVI     B,$05
// 0a7b: 34 88 ff    LXI     HL,$FF88
// 0a7e: 2b          LDAX    (HL)
// 0a7f: 57 80       OFFI    A,$80
// 0a81: dc          JR      $0A9E
// 0a82: 32          INX     HL
// 0a83: 52          DCR     B
// 0a84: f9          JR      $0A7E
// 0a85: a1          POP     BC
// 0a86: a3          POP     HL
// 0a87: b8          RET     
// 0a88: b3          PUSH    HL
// 0a89: b1          PUSH    BC
// 0a8a: 6e ff       MVI     H,$FF
// 0a8c: 1b          MOV     C,A
// 0a8d: 01 86       LDAW    $FF86
// 0a8f: 41          INR     A
// 0a90: 77 8e       EQI     A,$8E
// 0a92: c2          JR      $0A95
// 0a93: 69 88       MVI     A,$88
// 0a95: 63 86       STAW    $FF86
// 0a97: 1f          MOV     L,A
// 0a98: 2b          LDAX    (HL)
// 0a99: 57 80       OFFI    A,$80
// 0a9b: c2          JR      $0A9E
// 0a9c: 52          DCR     B
// 0a9d: ef          JR      $0A8D
// 0a9e: 69 fd       MVI     A,$FD // select module board
// 0aa0: 79 e8       CALF    $09E8_sendToTx
// 0aa2: 0f          MOV     A,L
// 0aa3: 79 e8       CALF    $09E8_sendToTx
// 0aa5: 0b          MOV     A,C
// 0aa6: 3b          STAX    (HL)
// 0aa7: 74 c0 be    ADDW    $FFBE
// 0aaa: 79 e8       CALF    $09E8_sendToTx
// 0aac: a1          POP     BC
// 0aad: a3          POP     HL
// 0aae: b8          RET     
// 0aaf: b3          PUSH    HL
// 0ab0: b1          PUSH    BC
// 0ab1: b2          PUSH    DE
// 0ab2: 1b          MOV     C,A
// 0ab3: 6a 05       MVI     B,$05
// 0ab5: 6c ff       MVI     D,$FF
// 0ab7: 34 85 ff    LXI     HL,$FF85
// 0aba: 2b          LDAX    (HL)
// 0abb: 1d          MOV     E,A
// 0abc: 2a          LDAX    (DE)
// 0abd: 57 80       OFFI    A,$80
// 0abf: ca          JR      $0ACA
// 0ac0: a2          POP     DE
// 0ac1: a1          POP     BC
// 0ac2: a3          POP     HL
// 0ac3: b8          RET     
// 0ac4: 2b          LDAX    (HL)
// 0ac5: 1d          MOV     E,A
// 0ac6: 2a          LDAX    (DE)
// 0ac7: 47 80       ONI     A,$80
// 0ac9: c8          JR      $0AD2
// 0aca: 07 7f       ANI     A,$7F
// 0acc: 60 eb       NEA     A,C
// 0ace: d1          JR      $0AE0
// 0acf: 33          DCX     HL
// 0ad0: 52          DCR     B
// 0ad1: f2          JR      $0AC4
// 0ad2: 32          INX     HL
// 0ad3: 2b          LDAX    (HL)
// 0ad4: 1d          MOV     E,A
// 0ad5: 0b          MOV     A,C
// 0ad6: ce          JR      $0AE5
// 0ad7: 33          DCX     HL
// 0ad8: af 01       LDAX    (HL+$01)
// 0ada: 1b          MOV     C,A
// 0adb: 2b          LDAX    (HL)
// 0adc: bf 01       STAX    (HL+$01)
// 0ade: 0b          MOV     A,C
// 0adf: 3b          STAX    (HL)
// 0ae0: 52          DCR     B
// 0ae1: f5          JR      $0AD7
// 0ae2: 2a          LDAX    (DE)
// 0ae3: 07 7f       ANI     A,$7F
// 0ae5: 3a          STAX    (DE)
// 0ae6: 74 c0 be    ADDW    $FFBE
// 0ae9: 1b          MOV     C,A
// 0aea: 69 fd       MVI     A,$FD // select module board
// 0aec: 79 e8       CALF    $09E8_sendToTx
// 0aee: 0d          MOV     A,E
// 0aef: 79 e8       CALF    $09E8_sendToTx
// 0af1: 0b          MOV     A,C
// 0af2: 79 e8       CALF    $09E8_sendToTx
// 0af4: a2          POP     DE
// 0af5: a1          POP     BC
// 0af6: a3          POP     HL
// 0af7: b8          RET     
// 0af8: b3          PUSH    HL
// 0af9: b1          PUSH    BC
// 0afa: b2          PUSH    DE
// 0afb: 1b          MOV     C,A
// 0afc: 6a 05       MVI     B,$05
// 0afe: 6c ff       MVI     D,$FF
// 0b00: 34 80 ff    LXI     HL,$FF80
// 0b03: 2b          LDAX    (HL)
// 0b04: 1d          MOV     E,A
// 0b05: 2a          LDAX    (DE)
// 0b06: 07 7f       ANI     A,$7F
// 0b08: 60 eb       NEA     A,C
// 0b0a: d0          JR      $0B1B
// 0b0b: 32          INX     HL
// 0b0c: 52          DCR     B
// 0b0d: f5          JR      $0B03
// 0b0e: a2          POP     DE
// 0b0f: a1          POP     BC
// 0b10: a3          POP     HL
// 0b11: b8          RET     
// 0b12: 2b          LDAX    (HL)
// 0b13: 1b          MOV     C,A
// 0b14: af 01       LDAX    (HL+$01)
// 0b16: 3b          STAX    (HL)
// 0b17: 0b          MOV     A,C
// 0b18: bf 01       STAX    (HL+$01)
// 0b1a: 32          INX     HL
// 0b1b: 52          DCR     B
// 0b1c: f5          JR      $0B12
// 0b1d: 2a          LDAX    (DE)
// 0b1e: 17 80       ORI     A,$80
// 0b20: 3a          STAX    (DE)
// 0b21: 0d          MOV     A,E
// 0b22: 66 08       SUI     A,$08
// 0b24: 1b          MOV     C,A
// 0b25: 69 fd       MVI     A,$FD // select module board
// 0b27: 79 e8       CALF    $09E8_sendToTx
// 0b29: 0b          MOV     A,C
// 0b2a: 79 e8       CALF    $09E8_sendToTx
// 0b2c: a2          POP     DE
// 0b2d: a1          POP     BC
// 0b2e: a3          POP     HL
// 0b2f: b8          RET     
// 0b30: b3          PUSH    HL
// 0b31: b1          PUSH    BC
// 0b32: 1b          MOV     C,A
// 0b33: 6a 05       MVI     B,$05
// 0b35: 34 88 ff    LXI     HL,$FF88
// 0b38: 2b          LDAX    (HL)
// 0b39: 47 80       ONI     A,$80
// 0b3b: c6          JR      $0B42
// 0b3c: 32          INX     HL
// 0b3d: 52          DCR     B
// 0b3e: f9          JR      $0B38
// 0b3f: a1          POP     BC
// 0b40: a3          POP     HL
// 0b41: b8          RET     
// 0b42: 60 eb       NEA     A,C
// 0b44: c1          JR      $0B46
// 0b45: f6          JR      $0B3C
// 0b46: 17 80       ORI     A,$80
// 0b48: 3b          STAX    (HL)
// 0b49: 69 fd       MVI     A,$FD // select module board
// 0b4b: 79 e8       CALF    $09E8_sendToTx
// 0b4d: 0f          MOV     A,L
// 0b4e: 66 08       SUI     A,$08
// 0b50: 79 e8       CALF    $09E8_sendToTx
// 0b52: a1          POP     BC
// 0b53: a3          POP     HL
// 0b54: b8          RET     
// 0b55: b3          PUSH    HL
// 0b56: b1          PUSH    BC
// 0b57: 74 c0 be    ADDW    $FFBE
// 0b5a: 1b          MOV     C,A
// 0b5b: 6a 05       MVI     B,$05
// 0b5d: 34 88 ff    LXI     HL,$FF88
// 0b60: 69 fd       MVI     A,$FD // select module board
// 0b62: 79 e8       CALF    $09E8_sendToTx
// 0b64: 0f          MOV     A,L
// 0b65: 79 e8       CALF    $09E8_sendToTx
// 0b67: 0b          MOV     A,C
// 0b68: 79 e8       CALF    $09E8_sendToTx
// 0b6a: 32          INX     HL
// 0b6b: 52          DCR     B
// 0b6c: f7          JR      $0B64
// 0b6d: a1          POP     BC
// 0b6e: a3          POP     HL
// 0b6f: b8          RET     

// stop all notes
// 0b70: b1          PUSH    BC
// 0b71: 6b 80       MVI     C,$80          // first "voice off"
// 0b73: 6a 05       MVI     B,$05          // six voices
// 0b75: 69 fd       MVI     A,$FD // select module board          // send to module board
// 0b77: 79 e8       CALF    $09E8_sendToTx
// 0b79: 0b          MOV     A,C
// 0b7a: 79 e8       CALF    $09E8_sendToTx
// 0b7c: 43          INR     C
// 0b7d: 52          DCR     B
// 0b7e: fa          JR      $0B79
// 0b7f: a1          POP     BC
// 0b80: b8          RET 

// 0b81: 34 88 ff    LXI     HL,$FF88
// 0b84: 6a 05       MVI     B,$05
// 0b86: 69 80       MVI     A,$80
// 0b88: 3d          STAX    (HL+)
// 0b89: 52          DCR     B
// 0b8a: fd          JR      $0B88
// 0b8b: 34 80 ff    LXI     HL,$FF80
// 0b8e: 6a 05       MVI     B,$05
// 0b90: 69 88       MVI     A,$88
// 0b92: 3d          STAX    (HL+)
// 0b93: 41          INR     A
// 0b94: 52          DCR     B
// 0b95: fc          JR      $0B92
// 0b96: 71 86 88    MVIW    $FF86,$88
// 0b99: b8          RET     
// 0b9a: 34 40 ff    LXI     HL,$FF40
// 0b9d: c3          JR      $0BA1
// 0b9e: 34 30 ff    LXI     HL,$FF30
// 0ba1: 6a 0d       MVI     B,$0D
// 0ba3: 69 00       MVI     A,$00
// 0ba5: 3d          STAX    (HL+)
// 0ba6: 52          DCR     B
// 0ba7: fd          JR      $0BA5
// 0ba8: b8          RET     
// 0ba9: 69 fd       MVI     A,$FD // select module board // select module board
// 0bab: 79 e8       CALF    $09E8_sendToTx
// 0bad: 0b          MOV     A,C
// 0bae: 47 08       ONI     A,$08
// 0bb0: 69 86       MVI     A,$86
// 0bb2: 69 87       MVI     A,$87
// 0bb4: 79 e8       CALF    $09E8_sendToTx
// 0bb6: 69 f9       MVI     A,$F9
// 0bb8: 79 e8       CALF    $09E8_sendToTx
// 0bba: 69 b0       MVI     A,$B0
// 0bbc: 79 d5       CALF    $09D5
// 0bbe: 69 40       MVI     A,$40
// 0bc0: 79 e8       CALF    $09E8_sendToTx
// 0bc2: 0b          MOV     A,C
// 0bc3: 47 08       ONI     A,$08
// 0bc5: 69 7f       MVI     A,$7F
// 0bc7: 69 00       MVI     A,$00
// 0bc9: 79 e8       CALF    $09E8_sendToTx
// 0bcb: b8          RET     
// 0bcc: 01 b2       LDAW    $FFB2
// 0bce: 07 07       ANI     A,$07
// 0bd0: 1a          MOV     B,A
// 0bd1: 01 8e       LDAW    $FF8E_switches1
// 0bd3: 07 f8       ANI     A,$F8
// 0bd5: 60 9a       ORA     A,B
// 0bd7: 63 8e       STAW    $FF8E_switches1
// 0bd9: b8          RET     
// 0bda: 01 b2       LDAW    $FFB2
// 0bdc: 74 90 8e    XRAW    $FF8E_switches1
// 0bdf: 07 18       ANI     A,$18
// 0be1: 1a          MOV     B,A
// 0be2: 01 8e       LDAW    $FF8E_switches1
// 0be4: 07 e7       ANI     A,$E7
// 0be6: 60 9a       ORA     A,B
// 0be8: 63 8e       STAW    $FF8E_switches1
// 0bea: b8          RET     
// 0beb: 01 b2       LDAW    $FFB2
// 0bed: 07 e0       ANI     A,$E0
// 0bef: 1a          MOV     B,A
// 0bf0: 01 8e       LDAW    $FF8E_switches1
// 0bf2: 07 1f       ANI     A,$1F
// 0bf4: 60 9a       ORA     A,B
// 0bf6: 63 8e       STAW    $FF8E_switches1
// 0bf8: b8          RET     
// 0bf9: 63 c7       STAW    $FFC7
// 0bfb: 16 ff       XRI     A,$FF
// 0bfd: 07 7f       ANI     A,$7F
// 0bff: 1b          MOV     C,A
// 0c00: 69 fd       MVI     A,$FD // select module board // select module board
// 0c02: 79 e8       CALF    $09E8_sendToTx
// 0c04: 69 8e       MVI     A,$8E
// 0c06: 79 e8       CALF    $09E8_sendToTx
// 0c08: 0b          MOV     A,C
// 0c09: 79 e8       CALF    $09E8_sendToTx
// 0c0b: b8          RET     
// 0c0c: 7d 5b       CALF    $0D5B
// 0c0e: 55 ad 18    OFFIW   $FFAD,$18
// 0c11: 15 ad 18    ORIW    $FFAD,$18
// 0c14: 01 b7       LDAW    $FFB7
// 0c16: 74 98 ad    ORAW    $FFAD
// 0c19: 63 b7       STAW    $FFB7
// 0c1b: 16 ff       XRI     A,$FF
// 0c1d: 74 88 8f    ANAW    $FF8F_switches2
// 0c20: 1a          MOV     B,A
// 0c21: 01 a7       LDAW    $FFA7
// 0c23: 74 88 b7    ANAW    $FFB7
// 0c26: 60 9a       ORA     A,B
// 0c28: b8          RET     
// 0c29: 63 8f       STAW    $FF8F_switches2
// 0c2b: 16 ff       XRI     A,$FF
// 0c2d: 07 1f       ANI     A,$1F
// 0c2f: 1b          MOV     C,A
// 0c30: 69 fd       MVI     A,$FD // select module board // select module board
// 0c32: 79 e8       CALF    $09E8_sendToTx
// 0c34: 69 8f       MVI     A,$8F
// 0c36: 79 e8       CALF    $09E8_sendToTx
// 0c38: 0b          MOV     A,C
// 0c39: 79 e8       CALF    $09E8_sendToTx
// 0c3b: b8          RET     
// 0c3c: 59 b6       BIT     1,$FFB6
// 0c3e: c7          JR      $0C46
// 0c3f: 01 8e       LDAW    $FF8E_switches1
// 0c41: 63 b8       STAW    $FFB8
// 0c43: 05 b6 fd    ANIW    $FFB6,$FD
// 0c46: b8          RET     
// 0c47: 71 b7 00    MVIW    $FFB7,$00
// 0c4a: 71 c5 04    MVIW    $FFC5,$04
// 0c4d: 71 c6 04    MVIW    $FFC6,$04
// 0c50: 01 c7       LDAW    $FFC7
// 0c52: 59 b6       BIT     1,$FFB6
// 0c54: 01 b8       LDAW    $FFB8
// 0c56: 63 8e       STAW    $FF8E_switches1
// 0c58: 7b f9       CALF    $0BF9
// 0c5a: 01 a7       LDAW    $FFA7
// 0c5c: 63 8f       STAW    $FF8F_switches2
// 0c5e: 7c 29       CALF    $0C29
// 0c60: 6a 00       MVI     B,$00
// 0c62: 24 58 ff    LXI     DE,$FF58
// 0c65: 34 6c ff    LXI     HL,$FF6C
// 0c68: 78 c3       CALF    $08C3
// 0c6a: b3          PUSH    HL
// 0c6b: b2          PUSH    DE
// 0c6c: 6c ff       MVI     D,$FF
// 0c6e: 34 30 00    LXI     HL,$0030
// 0c71: ad          LDAX    (HL+B)
// 0c72: 1d          MOV     E,A
// 0c73: 0b          MOV     A,C
// 0c74: 3a          STAX    (DE)
// 0c75: a2          POP     DE
// 0c76: a3          POP     HL
// 0c77: 2a          LDAX    (DE)
// 0c78: 3b          STAX    (HL)
// 0c79: 22          INX     DE
// 0c7a: 32          INX     HL
// 0c7b: 42          INR     B
// 0c7c: 74 7a 10    EQI     B,$10
// 0c7f: e8          JR      $0C68
// 0c80: 34 90 ff    LXI     HL,$FF90_patchRam
// 0c83: 6a 0f       MVI     B,$0F
// 0c85: 2d          LDAX    (HL+)
// 0c86: 79 e8       CALF    $09E8_sendToTx
// 0c88: 52          DCR     B
// 0c89: fb          JR      $0C85
// 0c8a: 45 a8 30    ONIW    $FFA8_midiSwitch,$30 (MIDI Func1+2)
// 0c8d: 78 e9       CALF    $08E9
// 0c8f: 15 b6 02    ORIW    $FFB6,$02
// 0c92: b8          RET     
// 0c93: 71 b7 00    MVIW    $FFB7,$00
// 0c96: 05 c5 ef    ANIW    $FFC5,$EF
// 0c99: 05 c6 ef    ANIW    $FFC6,$EF
// 0c9c: b8          RET     
// 0c9d: 6a 01       MVI     B,$01
// 0c9f: 48 01       SLRC    A
// 0ca1: c2          JR      $0CA4
// 0ca2: 0a          MOV     A,B
// 0ca3: b8          RET     
// 0ca4: 42          INR     B
// 0ca5: f9          JR      $0C9F
// 0ca6: b8          RET     
// 0ca7: 58 b6       BIT     0,$FFB6
// 0ca9: c8          JR      $0CB2
// 0caa: 6e 0f       MVI     H,$0F
// 0cac: 07 f0       ANI     A,$F0
// 0cae: 46 70       ADI     A,$70
// 0cb0: 1f          MOV     L,A
// 0cb1: dd          JR      $0CCF
// 0cb2: 01 bb       LDAW    $FFBB
// 0cb4: 51          DCR     A
// 0cb5: 1b          MOV     C,A
// 0cb6: 01 ba       LDAW    $FFBA
// 0cb8: 66 10       SUI     A,$10
// 0cba: 48 21       SLR     A
// 0cbc: 60 9b       ORA     A,C
// 0cbe: 5e c8       BIT     6,$FFC8
// 0cc0: 17 40       ORI     A,$40
// 0cc2: 44 00 02    LXI     EA,$0200
// 0cc5: 19          MOV     EAL,A
// 0cc6: 48 a4       DSLL    EA
// 0cc8: 48 a4       DSLL    EA
// 0cca: 48 a4       DSLL    EA
// 0ccc: 48 a4       DSLL    EA
// 0cce: b7          DMOV    HL,EA
// 0ccf: b8          RET     
// 0cd0: 69 fd       MVI     A,$FD // select module board // select module board
// 0cd2: 79 e8       CALF    $09E8_sendToTx
// 0cd4: 69 90       MVI     A,$90
// 0cd6: 79 e8       CALF    $09E8_sendToTx
// 0cd8: 0b          MOV     A,C
// 0cd9: 7c a7       CALF    $0CA7
// 0cdb: 24 90 ff    LXI     DE,$FF90_patchRam
// 0cde: 7c f1       CALF    $0CF1
// 0ce0: 0b          MOV     A,C
// 0ce1: 63 8e       STAW    $FF8E_switches1
// 0ce3: 7b f9       CALF    $0BF9
// 0ce5: 69 98       MVI     A,$98
// 0ce7: 79 e8       CALF    $09E8_sendToTx
// 0ce9: 7c f1       CALF    $0CF1
// 0ceb: 0b          MOV     A,C
// 0cec: 63 8f       STAW    $FF8F_switches2
// 0cee: 7c 29       CALF    $0C29
// 0cf0: b8          RET     
// 0cf1: 6a 07       MVI     B,$07
// 0cf3: 6b 00       MVI     C,$00
// 0cf5: 2d          LDAX    (HL+)
// 0cf6: 48 2a       CLC     
// 0cf8: 57 80       OFFI    A,$80
// 0cfa: 48 2b       STC     
// 0cfc: 48 33       RLR     C
// 0cfe: 07 7f       ANI     A,$7F
// 0d00: 3c          STAX    (DE+)
// 0d01: 79 e8       CALF    $09E8_sendToTx
// 0d03: 52          DCR     B
// 0d04: f0          JR      $0CF5
// 0d05: b8          RET     
// 0d06: 0b          MOV     A,C
// 0d07: 63 b9       STAW    $FFB9
// 0d09: 7c a7       CALF    $0CA7
// 0d0b: 24 90 ff    LXI     DE,$FF90_patchRam
// 0d0e: 01 8e       LDAW    $FF8E_switches1
// 0d10: 1b          MOV     C,A
// 0d11: 7d 25       CALF    $0D25
// 0d13: 01 8f       LDAW    $FF8F_switches2
// 0d15: 1b          MOV     C,A
// 0d16: 7d 25       CALF    $0D25
// 0d18: 15 b6 04    ORIW    $FFB6,$04
// 0d1b: 7c 3c       CALF    $0C3C
// 0d1d: 01 b9       LDAW    $FFB9
// 0d1f: 1b          MOV     C,A
// 0d20: 7c d0       CALF    $0CD0
// 0d22: 7c 93       CALF    $0C93
// 0d24: b8          RET     
// 0d25: 6a 07       MVI     B,$07
// 0d27: 2c          LDAX    (DE+)
// 0d28: 07 7f       ANI     A,$7F
// 0d2a: 48 03       SLRC    C
// 0d2c: c2          JR      $0D2F
// 0d2d: 17 80       ORI     A,$80
// 0d2f: 3d          STAX    (HL+)
// 0d30: 52          DCR     B
// 0d31: f5          JR      $0D27
// 0d32: b8          RET     
// 0d33: 01 c5       LDAW    $FFC5
// 0d35: 63 c9       STAW    $FFC9
// 0d37: 01 c6       LDAW    $FFC6
// 0d39: 63 ca       STAW    $FFCA
// 0d3b: b8          RET     
// 0d3c: 01 c9       LDAW    $FFC9
// 0d3e: 63 c5       STAW    $FFC5
// 0d40: 01 ca       LDAW    $FFCA
// 0d42: 63 c6       STAW    $FFC6
// 0d44: b8          RET     
// 0d45: 34 50 00    LXI     HL,$0050
// 0d48: 1b          MOV     C,A
// 0d49: 48 21       SLR     A
// 0d4b: 48 21       SLR     A
// 0d4d: 48 21       SLR     A
// 0d4f: 48 21       SLR     A
// 0d51: ac          LDAX    (HL+A)
// 0d52: 63 c5       STAW    $FFC5
// 0d54: 0b          MOV     A,C
// 0d55: 07 0f       ANI     A,$0F
// 0d57: ac          LDAX    (HL+A)
// 0d58: 63 c6       STAW    $FFC6
// 0d5a: b8          RET     
// 0d5b: 15 c5 10    ORIW    $FFC5,$10
// 0d5e: 15 c6 10    ORIW    $FFC6,$10
// 0d61: b8          RET     
// 0d62: 07 38       ANI     A,$38
// 0d64: 5f c8       BIT     7,$FFC8
// 0d66: 17 04       ORI     A,$04
// 0d68: 63 d1       STAW    $FFD1
// 0d6a: 64 05 ff    MVI     PF,$FF
// 0d6d: 4d c1       MOV     PB,A
// 0d6f: 24 ff 1f    LXI     DE,$1FFF
// 0d72: 4a df       MVIX    DE,$DF
// 0d74: 7b 70       CALF    $0B70_stopAllNotes
// 0d76: 69 87       MVI     A,$87
// 0d78: 79 e8       CALF    $09E8_sendToTx
// 0d7a: 6a ff       MVI     B,$FF
// 0d7c: 48 2d       MUL     A
// 0d7e: 52          DCR     B
// 0d7f: fc          JR      $0D7C
// 0d80: ba          DI      
// 0d81: 64 01 00    MVI     PB,$00
// 0d84: 64 05 c0    MVI     PF,$C0
// 0d87: 05 d1 3c    ANIW    $FFD1,$3C
// 0d8a: 55 d1 20    OFFIW   $FFD1,$20
// 0d8d: 4e 69       JRE     $0DF8
// 0d8f: 55 d1 10    OFFIW   $FFD1,$10
// 0d92: 4e 6d       JRE     $0E01
// 0d94: 45 d1 08    ONIW    $FFD1,$08
// 0d97: 4e f7       JRE     $0E90
// 0d99: 64 85 bf    MVI     TMM,$BF
// 0d9c: 48 42       SKIT    FT1
// 0d9e: 00          NOP     
// 0d9f: 64 01 08    MVI     PB,$08
// 0da2: 44 00 24    LXI     EA,$2400
// 0da5: 5a d1       BIT     2,$FFD1
// 0da7: 44 00 28    LXI     EA,$2800
// 0daa: 34 00 20    LXI     HL,$2000
// 0dad: 5a d1       BIT     2,$FFD1
// 0daf: 34 00 24    LXI     HL,$2400
// 0db2: 24 c0 00    LXI     DE,$00C0
// 0db5: 15 d1 01    ORIW    $FFD1,$01
// 0db8: 69 01       MVI     A,$01
// 0dba: 4d db       MOV     TM1,A
// 0dbc: 64 8d 7f    ANI     TMM,$7F
// 0dbf: 7e b4       CALF    $0EB4
// 0dc1: 69 4a       MVI     A,$4A
// 0dc3: 1a          MOV     B,A
// 0dc4: 60 44       ADD     D,A
// 0dc6: 7f 07       CALF    $0F07
// 0dc8: 7e f0       CALF    $0EF0
// 0dca: 69 55       MVI     A,$55
// 0dcc: 1a          MOV     B,A
// 0dcd: 60 44       ADD     D,A
// 0dcf: 7f 07       CALF    $0F07
// 0dd1: 7e f0       CALF    $0EF0
// 0dd3: 7f 01       CALF    $0F01
// 0dd5: 2d          LDAX    (HL+)
// 0dd6: 1a          MOV     B,A
// 0dd7: 60 44       ADD     D,A
// 0dd9: 7f 07       CALF    $0F07
// 0ddb: 7e f0       CALF    $0EF0
// 0ddd: 74 ff       DEQ     EA,HL
// 0ddf: f3          JR      $0DD3
// 0de0: 0c          MOV     A,D
// 0de1: 1a          MOV     B,A
// 0de2: 7f 07       CALF    $0F07
// 0de4: 6a aa       MVI     B,$AA
// 0de6: 7f 07       CALF    $0F07
// 0de8: 6a aa       MVI     B,$AA
// 0dea: 7f 07       CALF    $0F07
// 0dec: 5e d1       BIT     6,$FFD1
// 0dee: c4          JR      $0DF3
// 0def: 7e b4       CALF    $0EB4
// 0df1: 4e 9d       JRE     $0E90
// 0df3: 15 d1 40    ORIW    $FFD1,$40
// 0df6: 4f a1       JRE     $0D99
// 0df8: 64 4a 10    ONI     PC,$10
// 0dfb: 4e 9f       JRE     $0E9C
// 0dfd: 64 01 20    MVI     PB,$20
// 0e00: c3          JR      $0E04
// 0e01: 64 01 10    MVI     PB,$10
// 0e04: 5a d1       BIT     2,$FFD1
// 0e06: ca          JR      $0E11
// 0e07: 64 11 40    XRI     PB,$40
// 0e0a: 34 00 20    LXI     HL,$2000
// 0e0d: 44 00 24    LXI     EA,$2400
// 0e10: c9          JR      $0E1A
// 0e11: 64 11 80    XRI     PB,$80
// 0e14: 34 00 24    LXI     HL,$2400
// 0e17: 44 00 28    LXI     EA,$2800
// 0e1a: 64 85 b7    MVI     TMM,$B7
// 0e1d: 69 0d       MVI     A,$0D
// 0e1f: 4d da       MOV     TM0,A
// 0e21: 69 1e       MVI     A,$1E
// 0e23: 4d db       MOV     TM1,A
// 0e25: 15 d1 01    ORIW    $FFD1,$01
// 0e28: 64 4a 20    ONI     PC,$20
// 0e2b: 05 d1 fe    ANIW    $FFD1,$FE
// 0e2e: 48 41       SKIT    FT0
// 0e30: 00          NOP     
// 0e31: 48 42       SKIT    FT1
// 0e33: 00          NOP     
// 0e34: 6b ff       MVI     C,$FF
// 0e36: 64 8d 6f    ANI     TMM,$6F
// 0e39: 7f 38       CALF    $0F38
// 0e3b: 48 0a       SK      CY
// 0e3d: f6          JR      $0E34
// 0e3e: 7e f0       CALF    $0EF0
// 0e40: 53          DCR     C
// 0e41: f7          JR      $0E39
// 0e42: 15 d1 02    ORIW    $FFD1,$02
// 0e45: 14 00 80    LXI     BC,$8000
// 0e48: 7f 38       CALF    $0F38
// 0e4a: 48 1a       SKN     CY
// 0e4c: 4e 30       JRE     $0E7E
// 0e4e: 6b 00       MVI     C,$00
// 0e50: 7f 27       CALF    $0F27
// 0e52: 77 4a       EQI     A,$4A
// 0e54: d3          JR      $0E68
// 0e55: 60 43       ADD     C,A
// 0e57: 7f 18       CALF    $0F18
// 0e59: 77 55       EQI     A,$55
// 0e5b: cc          JR      $0E68
// 0e5c: 60 43       ADD     C,A
// 0e5e: 7f 18       CALF    $0F18
// 0e60: 60 43       ADD     C,A
// 0e62: 45 d1 10    ONIW    $FFD1,$10
// 0e65: c5          JR      $0E6B
// 0e66: 70 fd       EQAX    (HL+)
// 0e68: 4e 22       JRE     $0E8C
// 0e6a: c5          JR      $0E70
// 0e6b: 64 4a 10    ONI     PC,$10
// 0e6e: dd          JR      $0E8C
// 0e6f: 3d          STAX    (HL+)
// 0e70: 74 ff       DEQ     EA,HL
// 0e72: eb          JR      $0E5E
// 0e73: 7f 18       CALF    $0F18
// 0e75: 60 fb       EQA     A,C
// 0e77: d4          JR      $0E8C
// 0e78: 7f 18       CALF    $0F18
// 0e7a: 77 aa       EQI     A,$AA
// 0e7c: cf          JR      $0E8C
// 0e7d: d2          JR      $0E90
// 0e7e: 5c d1       BIT     4,$FFD1
// 0e80: 7e fb       CALF    $0EFB
// 0e82: 7e f0       CALF    $0EF0
// 0e84: 13          DCX     BC
// 0e85: 0b          MOV     A,C
// 0e86: 60 9a       ORA     A,B
// 0e88: 77 00       EQI     A,$00
// 0e8a: 4f bc       JRE     $0E48
// 0e8c: 15 d1 80    ORIW    $FFD1,$80
// 0e8f: c3          JR      $0E93
// 0e90: 05 d1 7f    ANIW    $FFD1,$7F
// 0e93: 64 01 00    MVI     PB,$00
// 0e96: 64 85 bf    MVI     TMM,$BF
// 0e99: 5f d1       BIT     7,$FFD1
// 0e9b: d1          JR      $0EAD
// 0e9c: 69 ce       MVI     A,$CE
// 0e9e: 5f d1       BIT     7,$FFD1
// 0ea0: 69 de       MVI     A,$DE
// 0ea2: 7d 45       CALF    $0D45
// 0ea4: 04 ff ff    LXI     SP,$FFFF
// 0ea7: 64 80 08    MVI     ANM,$08
// 0eaa: 54 79 00    JMP     $0079
// 0ead: 71 c5 04    MVIW    $FFC5,$04
// 0eb0: 71 c6 04    MVIW    $FFC6,$04
// 0eb3: f0          JR      $0EA4
// 0eb4: 6a 18       MVI     B,$18
// 0eb6: 6b ff       MVI     C,$FF
// 0eb8: 7e d5       CALF    $0ED5
// 0eba: 7e f0       CALF    $0EF0
// 0ebc: 53          DCR     C
// 0ebd: fa          JR      $0EB8
// 0ebe: 7f 01       CALF    $0F01
// 0ec0: 52          DCR     B
// 0ec1: f4          JR      $0EB6
// 0ec2: b8          RET     
// 0ec3: 0d          MOV     A,E
// 0ec4: 58 d1       BIT     0,$FFD1
// 0ec6: c8          JR      $0ECF
// 0ec7: 16 c0       XRI     A,$C0
// 0ec9: 1d          MOV     E,A
// 0eca: 69 05       MVI     A,$05
// 0ecc: 7e e7       CALF    $0EE7
// 0ece: b8          RET     
// 0ecf: 15 d1 01    ORIW    $FFD1,$01
// 0ed2: 16 80       XRI     A,$80
// 0ed4: f4          JR      $0EC9
// 0ed5: 0d          MOV     A,E
// 0ed6: 58 d1       BIT     0,$FFD1
// 0ed8: cb          JR      $0EE4
// 0ed9: 05 d1 fe    ANIW    $FFD1,$FE
// 0edc: 16 80       XRI     A,$80
// 0ede: 1d          MOV     E,A
// 0edf: 69 14       MVI     A,$14
// 0ee1: 7e e7       CALF    $0EE7
// 0ee3: b8          RET     
// 0ee4: 16 c0       XRI     A,$C0
// 0ee6: f7          JR      $0EDE
// 0ee7: 48 42       SKIT    FT1
// 0ee9: fd          JR      $0EE7
// 0eea: 4d db       MOV     TM1,A
// 0eec: 0d          MOV     A,E
// 0eed: 4d c2       MOV     PC,A
// 0eef: b8          RET     
// 0ef0: 5a d1       BIT     2,$FFD1
// 0ef2: c4          JR      $0EF7
// 0ef3: 64 11 40    XRI     PB,$40
// 0ef6: b8          RET     
// 0ef7: 64 11 80    XRI     PB,$80
// 0efa: b8          RET     
// 0efb: 64 4a 10    ONI     PC,$10
// 0efe: 4f 8c       JRE     $0E8C
// 0f00: b8          RET     
// 0f01: 64 48 06    ONI     PA,$06
// 0f04: b8          RET     
// 0f05: 4f 89       JRE     $0E90
// 0f07: 6b 07       MVI     C,$07
// 0f09: 7e c3       CALF    $0EC3
// 0f0b: 48 02       SLRC    B
// 0f0d: c3          JR      $0F11
// 0f0e: 7e d5       CALF    $0ED5
// 0f10: c2          JR      $0F13
// 0f11: 7e c3       CALF    $0EC3
// 0f13: 53          DCR     C
// 0f14: f6          JR      $0F0B
// 0f15: 7e d5       CALF    $0ED5
// 0f17: b8          RET     
// 0f18: 5a d1       BIT     2,$FFD1
// 0f1a: c4          JR      $0F1F
// 0f1b: 64 11 40    XRI     PB,$40
// 0f1e: c3          JR      $0F22
// 0f1f: 64 11 80    XRI     PB,$80
// 0f22: 7f 38       CALF    $0F38
// 0f24: 48 1a       SKN     CY
// 0f26: ce          JR      $0F35
// 0f27: 69 00       MVI     A,$00
// 0f29: 6a 07       MVI     B,$07
// 0f2b: 7f 38       CALF    $0F38
// 0f2d: 48 31       RLR     A
// 0f2f: 52          DCR     B
// 0f30: fa          JR      $0F2B
// 0f31: 7f 38       CALF    $0F38
// 0f33: 48 0a       SK      CY
// 0f35: 4f 55       JRE     $0E8C
// 0f37: b8          RET     
// 0f38: 7f 01       CALF    $0F01
// 0f3a: 58 d1       BIT     0,$FFD1
// 0f3c: cc          JR      $0F49
// 0f3d: 05 d1 fe    ANIW    $FFD1,$FE
// 0f40: 64 4a 20    ONI     PC,$20
// 0f43: d1          JR      $0F55
// 0f44: 48 62       SKNIT   FT1
// 0f46: 7f 64       CALF    $0F64
// 0f48: f7          JR      $0F40
// 0f49: 15 d1 01    ORIW    $FFD1,$01
// 0f4c: 64 5a 20    OFFI    PC,$20
// 0f4f: c5          JR      $0F55
// 0f50: 48 62       SKNIT   FT1
// 0f52: 7f 64       CALF    $0F64
// 0f54: f7          JR      $0F4C
// 0f55: 48 41       SKIT    FT0
// 0f57: c9          JR      $0F61
// 0f58: 48 2b       STC     
// 0f5a: 64 95 90    XRI     TMM,$90
// 0f5d: 64 95 90    XRI     TMM,$90
// 0f60: b8          RET     
// 0f61: 48 2a       CLC     
// 0f63: f6          JR      $0F5A
// 0f64: 55 d1 02    OFFIW   $FFD1,$02
// 0f67: 4f 23       JRE     $0E8C
// 0f69: 64 95 90    XRI     TMM,$90
// 0f6c: 64 95 90    XRI     TMM,$90
// 0f6f: 48 41       SKIT    FT0
// 0f71: 00          NOP     
// 0f72: 6b ff       MVI     C,$FF
// 0f74: 5c d1       BIT     4,$FFD1
// 0f76: 7e fb       CALF    $0EFB
// 0f78: 7f 01       CALF    $0F01
// 0f7a: 7e f0       CALF    $0EF0
// 0f7c: b8          RET     
// 0f7d: 00          NOP     
// 0f7e: 00          NOP     
// 0f7f: 00          NOP     
// 0f80: 40 80 00    CALL    $0080
// 0f83: 00          NOP     
// 0f84: 00          NOP     
// 0f85: ff          JR      $0F85
// 0f86: 00          NOP     
// 0f87: 00          NOP     
// 0f88: 00          NOP     
// 0f89: 7f 40       CALF    $0F40
// 0f8b: 00          NOP     
// 0f8c: 80          CALT    ($0080)
// 0f8d: 00          NOP     
// 0f8e: 00          NOP     
// 0f8f: 00          NOP     
// 0f90: 40 80 00    CALL    $0080
// 0f93: 00          NOP     
// 0f94: 00          NOP     
// 0f95: ff          JR      $0F95
// 0f96: 00          NOP     
// 0f97: 00          NOP     
// 0f98: 00          NOP     
// 0f99: 7f 40       CALF    $0F40
// 0f9b: 00          NOP     
// 0f9c: 80          CALT    ($0080)
// 0f9d: 7f 00       CALF    $0F00
// 0f9f: 7f 40       CALF    $0F40
// 0fa1: 80          CALT    ($0080)
// 0fa2: 00          NOP     
// 0fa3: 00          NOP     
// 0fa4: 00          NOP     
// 0fa5: b1          PUSH    BC
// 0fa6: 7f 00       CALF    $0F00
// 0fa8: 00          NOP     
// 0fa9: 7f 40       CALF    $0F40
// 0fab: 00          NOP     
// 0fac: 80          CALT    ($0080)
// 0fad: 7f 00       CALF    $0F00
// 0faf: 00          NOP     
// 0fb0: 40 80 00    CALL    $0080
// 0fb3: 00          NOP     
// 0fb4: 80          CALT    ($0080)
// 0fb5: ff          JR      $0FB5
// 0fb6: 00          NOP     
// 0fb7: 00          NOP     
// 0fb8: 00          NOP     
// 0fb9: 7f 40       CALF    $0F40
// 0fbb: 00          NOP     
// 0fbc: 80          CALT    ($0080)
// 0fbd: 7f 00       CALF    $0F00
// 0fbf: 00          NOP     
// 0fc0: 40 80 00    CALL    $0080
// 0fc3: 80          CALT    ($0080)
// 0fc4: 00          NOP     
// 0fc5: ff          JR      $0FC5
// 0fc6: 00          NOP     
// 0fc7: 00          NOP     
// 0fc8: 80          CALT    ($0080)
// 0fc9: 7f 40       CALF    $0F40
// 0fcb: 00          NOP     
// 0fcc: 80          CALT    ($0080)
// 0fcd: 7f 00       CALF    $0F00
// 0fcf: 00          NOP     
// 0fd0: 40 80 00    CALL    $0080
// 0fd3: 00          NOP     
// 0fd4: 7f ff       CALF    $0FFF
// 0fd6: 00          NOP     
// 0fd7: 00          NOP     
// 0fd8: 00          NOP     
// 0fd9: 7f 40       CALF    $0F40
// 0fdb: 00          NOP     
// 0fdc: 80          CALT    ($0080)
// 0fdd: 7f 00       CALF    $0F00
// 0fdf: 00          NOP     
// 0fe0: 40 80 00    CALL    $0080
// 0fe3: 00          NOP     
// 0fe4: 00          NOP     
// 0fe5: ff          JR      $0FE5
// 0fe6: 7f 00       CALF    $0F00
// 0fe8: 00          NOP     
// 0fe9: 7f 40       CALF    $0F40
// 0feb: 00          NOP     
// 0fec: 80          CALT    ($0080)
// 0fed: 7f 00       CALF    $0F00
// 0fef: 00          NOP     
// 0ff0: 40 80 00    CALL    $0080
// 0ff3: 80          CALT    ($0080)
// 0ff4: 00          NOP     
// 0ff5: ff          JR      $0FF5
// 0ff6: 00          NOP     
// 0ff7: 00          NOP     
// 0ff8: 00          NOP     
// 0ff9: 7f 40       CALF    $0F40
// 0ffb: 00          NOP     
// 0ffc: 8a          CALT    ($0094)
// 0ffd: 00          NOP     
// 0ffe: 0a          MOV     A,B
// 0fff: 00          NOP