Difference between revisions of "Disassembly:Werbetextcassette electronic partner"

From veswiki
Jump to: navigation, search
 
(One intermediate revision by the same user not shown)
Line 673: Line 673:
 
                 CI  $ff                ; 0c14 25 ff
 
                 CI  $ff                ; 0c14 25 ff
 
                 BF  $4,A0c1b            ; 0c16 94 04
 
                 BF  $4,A0c1b            ; 0c16 94 04
                 DCI  A0e00              ; 0c18 2a 0e 00
+
                 DCI  A0e00              ; 0c18 2a 0e 00   DC0 pointing to graphics
A0c1b:          PI  $071d              ; 0c1b 28 07 1d
+
A0c1b:          PI  $071d              ; 0c1b 28 07 1d   using bios drawing routine
 
                 LIS  $7                  ; 0c1e 77
 
                 LIS  $7                  ; 0c1e 77
 
                 AS  $1                  ; 0c1f c1
 
                 AS  $1                  ; 0c1f c1
 
                 LR  $1,A                ; 0c20 51
 
                 LR  $1,A                ; 0c20 51
                 PI  $011e              ; 0c21 28 01 1e
+
                 PI  $011e              ; 0c21 28 01 1e   popk bios routine
 
                 PK                      ; 0c24 0c
 
                 PK                      ; 0c24 0c
 
A0c25:          LR  K,P                ; 0c25 08
 
A0c25:          LR  K,P                ; 0c25 08
Line 834: Line 834:
  
 
                 .byte $ff                 
 
                 .byte $ff                 
                 LI   $20                ; 0dfc 20 20
+
                 .byte "   "
                 LI  $ff                ; 0dfe 20 ff
+
                 .byte $ff
 +
 
 +
                 ; Block of graphics starting here
 
A0e00:          LR  A,KU                ; 0e00 00
 
A0e00:          LR  A,KU                ; 0e00 00
 
                 LR  A,KU                ; 0e01 00
 
                 LR  A,KU                ; 0e01 00
Line 1,030: Line 1,032:
 
                 AM                      ; 0ee9 88
 
                 AM                      ; 0ee9 88
 
                 NS  $8                  ; 0eea f8
 
                 NS  $8                  ; 0eea f8
                 AM                      ; 0eeb 88
+
                 AM                      ; 0eeb 88
 
A0eec:          AM                      ; 0eec 88
 
A0eec:          AM                      ; 0eec 88
 
                 AM                      ; 0eed 88
 
                 AM                      ; 0eed 88
Line 1,304: Line 1,306:
 
                 NS  (IS)-              ; 1060 fe
 
                 NS  (IS)-              ; 1060 fe
 
                 NS  $3                  ; 1061 f3
 
                 NS  $3                  ; 1061 f3
                LI  $45                ; 1062 20 45
+
 
                LR  A,(IS)              ; 1064 4c
+
                 .byte " ELECTRONIC-"
                LR  A,$5                ; 1065 45
+
 
                LR  A,$3                ; 1066 43
+
                 .byte  $fe              ; 106e fe
                LR  $4,A                ; 1067 54
+
    
                LR  $2,A                ; 1068 52
+
                 .byte "   PARTNER"
                 .byte   $4f               
+
 
                LR  A,(IS)-             ; 106a 4e
+
                 .byte   $fe              ; 1079 fe
                LR  A,$9                ; 106b 49
+
                 .byte   $f1              ; 107a f1
                LR  A,$3                ; 106c 43
+
 
                 .byte  $2d               
+
                 .byte " BIETEN MEHR"
                NS  (IS)-              ; 106e fe
+
 
                LI   $20                ; 106f 20 20
 
                 LI   $50                ; 1071 20 50
 
                LR  A,$1                ; 1073 41
 
                LR  $2,A                ; 1074 52
 
                 LR   $4,A                ; 1075 54
 
                LR  A,(IS)-            ; 1076 4e
 
                LR  A,$5                ; 1077 45
 
                LR  $2,A                ; 1078 52
 
                NS  (IS)-              ; 1079 fe
 
                 NS   $1                  ; 107a f1
 
                LI  $42                ; 107b 20 42
 
                LR  A,$9                ; 107d 49
 
                 LR  A,$5                ; 107e 45
 
                LR  $4,A                ; 107f 54
 
                LR  A,$5                ; 1080 45
 
                LR  A,(IS)-            ; 1081 4e
 
                LI  $4d                ; 1082 20 4d
 
                LR  A,$5                ; 1084 45
 
                LR  A,$8                ; 1085 48
 
                LR  $2,A                ; 1086 52
 
 
                 .byte  $ff                 
 
                 .byte  $ff                 
 
                 .byte  $ff                 
 
                 .byte  $ff                 
Line 1,345: Line 1,327:
 
                 .byte  $ff                 
 
                 .byte  $ff                 
 
                 .byte  $ff                 
 
                 .byte  $ff                 
                LI  $20                ; 1090 20 20
+
 
                LI  $20                ; 1092 20 20
+
                 .byte "            UNSER NEUES PARTNERANGEBOT = "
                LI  $20                ; 1094 20 20
+
                 .byte "HOHE LEISTUNG / GZNSTIGER PREIS            "
                LI  $20                ; 1096 20 20
+
 
                LI  $20                ; 1098 20 20
 
                LI  $20                ; 109a 20 20
 
                LR  $5,A                ; 109c 55
 
                LR  A,(IS)-            ; 109d 4e
 
                LR  $3,A                ; 109e 53
 
                LR  A,$5                ; 109f 45
 
                LR  $2,A                ; 10a0 52
 
                LI  $4e                ; 10a1 20 4e
 
                LR  A,$5                ; 10a3 45
 
                LR  $5,A                ; 10a4 55
 
                LR  A,$5                ; 10a5 45
 
                LR  $3,A                ; 10a6 53
 
                LI  $50                ; 10a7 20 50
 
                LR  A,$1                ; 10a9 41
 
                LR  $2,A                ; 10aa 52
 
                LR  $4,A                ; 10ab 54
 
                LR  A,(IS)-            ; 10ac 4e
 
                LR  A,$5                ; 10ad 45
 
                LR  $2,A                ; 10ae 52
 
                LR  A,$1                ; 10af 41
 
                LR  A,(IS)-            ; 10b0 4e
 
                LR  A,$7                ; 10b1 47
 
                LR  A,$5                ; 10b2 45
 
                LR  A,$2                ; 10b3 42
 
                 .byte   $4f               
 
                LR  $4,A                ; 10b5 54
 
                LI  $3d                ; 10b6 20 3d
 
                LI  $48                ; 10b8 20 48
 
                 .byte   $4f               
 
                LR  A,$8                ; 10bb 48
 
                LR  A,$5                ; 10bc 45
 
                LI  $4c                ; 10bd 20 4c
 
                LR  A,$5                ; 10bf 45
 
                LR  A,$9                ; 10c0 49
 
                LR  $3,A                ; 10c1 53
 
                LR  $4,A                ; 10c2 54
 
                LR  $5,A                ; 10c3 55
 
                LR  A,(IS)-            ; 10c4 4e
 
                LR  A,$7                ; 10c5 47
 
                LI  $2f                ; 10c6 20 2f
 
                LI  $47                ; 10c8 20 47
 
                LR  $a,A                ; 10ca 5a
 
                LR  A,(IS)-            ; 10cb 4e
 
                LR  $3,A                ; 10cc 53
 
                LR  $4,A                ; 10cd 54
 
                LR  A,$9                ; 10ce 49
 
                LR  A,$7                ; 10cf 47
 
                LR  A,$5                ; 10d0 45
 
                LR  $2,A                ; 10d1 52
 
                LI  $50                ; 10d2 20 50
 
                LR  $2,A                ; 10d4 52
 
                LR  A,$5                ; 10d5 45
 
                LR  A,$9                ; 10d6 49
 
                LR  $3,A                ; 10d7 53
 
                LI  $20                ; 10d8 20 20
 
                LI  $20                ; 10da 20 20
 
                LI  $20                ; 10dc 20 20
 
                LI  $20                ; 10de 20 20
 
                LI  $20                ; 10e0 20 20
 
                LI  $20                ; 10e2 20 20
 
 
                 .byte  $ff                 
 
                 .byte  $ff                 
 
                 .byte  $ff                 
 
                 .byte  $ff                 
Line 1,437: Line 1,359:
 
                 .byte  $ff                 
 
                 .byte  $ff                 
 
                 .byte  $ff                 
 
                 .byte  $ff                 
                 NS   $a                  ; 1100 fa
+
                 .byte   $fa              ; 1100 fa
                 NS   $1                  ; 1101 f1
+
                 .byte   $f1              ; 1101 f1
                 DS   (IS)-              ; 1102 3e
+
                 .byte   $3e              ; 1102 3e
                 NS   $3                  ; 1103 f3
+
                 .byte   $f3              ; 1103 f3
                LR  A,$5                ; 1104 45
+
 
                LR  A,(IS)              ; 1105 4c
+
                 .byte "ELECTRONIC-"
                LR  A,$5                ; 1106 45
+
 
                LR  A,$3                ; 1107 43
+
                 .byte $f1              ; 110f f1
                LR  $4,A                ; 1108 54
+
                 .byte  $3c              ; 1110 3c "<"
                LR  $2,A                ; 1109 52
+
                 .byte  $fe               ; 1111 fe
                 .byte   $4f               
+
                 .byte  $3e               ; 1112 3e ">"
                LR  A,(IS)-             ; 110b 4e
+
                 .byte  "  "              ; 1113 20 20
                LR  A,$9                ; 110c 49
+
                 .byte  $f3              ; 1115 f3
                LR  A,$3                ; 110d 43
+
 
                 .byte   $2d               
+
                 .byte "PARTNER  "
                NS  $1                  ; 110f f1
+
                 .byte  $f1              ; 111f f1
                 DS  (IS)                ; 1110 3c
+
                 .byte  $3c              ; 1120 3c
                 NS  (IS)-               ; 1111 fe
+
                 .byte  $fe               ; 1121 fe
                 DS  (IS)-               ; 1112 3e
+
                 .byte  $f2              ; 1122 f2
                 LI  $20                ; 1113 20 20
+
 
                 NS  $3                  ; 1115 f3
+
                 .byte "MIETVORTEILE:"
                LR  $0,A                ; 1116 50
+
                 .byte $fc              ; 1130 fc
                 LR  A,$1                ; 1117 41
+
                 .byte  $fe               ; 1131 fe
                 LR  $2,A                ; 1118 52
+
                 .byte  $f1              ; 1132 f1
                LR  $4,A                ; 1119 54
+
                 .byte " VERGLEICHEN"
                LR  A,(IS)-            ; 111a 4e
+
                 .byte  $fe               ; 113f fe
                LR  A,$5                ; 111b 45
+
                 .byte "  SIE BITTE!"
                LR  $2,A                ; 111c 52
+
                 .byte  $fc
                LI  $20                ; 111d 20 20
+
                 .byte  $f9              ; 114d f9
                NS  $1                  ; 111f f1
+
                 .byte  $fb              ; 114e fb
                 DS  (IS)                ; 1120 3c
+
                 .byte "OHNE KAPITAL-"
                 NS  (IS)-               ; 1121 fe
+
                 .byte  $fe              ; 115c fe
                 NS  $2                  ; 1122 f2
+
                 .byte "AUFWAND ... "
                LR  A,(IS)+            ; 1123 4d
+
                 .byte  $fc             ; 1169 fc
                 LR  A,$9                ; 1124 49
+
                 .byte   $f9              ; 116a f9
                LR  A,$5                ; 1125 45
+
                 .byte   $fb              ; 116b fb
                LR  $4,A                ; 1126 54
+
                 .byte " SOFORT EIN  "
                LR  $6,A                ; 1127 56
+
                 .byte  $fe              ; 1179 fe
                 .byte   $4f               
+
                 .byte "NEUES GERXT"      ; X shown as Ä on screen (A umlaut)
                LR  $2,A                ; 1129 52
+
                 .byte   $fc              ; 1185 fc
                LR  $4,A                ; 112a 54
+
                 .byte   $f9              ; 1186 f9
                LR  A,$5                ; 112b 45
+
                 .byte   $fb              ; 1187 fb
                LR  A,$9                ; 112c 49
+
                 .byte " REPARATUR-"
                LR  A,(IS)              ; 112d 4c
+
                 .byte  $fe              ; 1193 fe
                LR  A,$5                ; 112e 45
+
                 .byte "  KOSTEN.. "
                DS  $a                  ; 112f 3a
+
                 .byte  $fc
                NS  (IS)                ; 1130 fc
+
                 .byte  $fb              ; 11a0 fb
                 NS  (IS)-               ; 1131 fe
+
                 .byte   $f9              ; 11a1 f9
                 NS  $1                  ; 1132 f1
+
                 .byte " ENTFALLEN "
                 LI  $56                ; 1133 20 56
+
                 .byte   $fe
                 LR  A,$5                ; 1135 45
+
                 .byte   $20
                LR  $2,A                ; 1136 52
+
                 .byte   $f2
                LR  A,$7                ; 1137 47
+
                 .byte "========="
                LR  A,(IS)              ; 1138 4c
+
                 .byte   $f1              ; 11b9 f1
                LR  A,$5                ; 1139 45
+
                 .byte   $fb              ; 11ba fb
                LR  A,$9                ; 113a 49
+
                 .byte   $f9              ; 11bb f9
                LR  A,$3                ; 113b 43
+
                 .byte   $fc              ; 11bc fc
                LR  A,$8                ; 113c 48
+
                 .byte "ERSTKLASSIGER"
                LR  A,$5                ; 113d 45
+
                 .byte   $fe             ; 11ca fe
                LR  A,(IS)-            ; 113e 4e
+
                 .byte "BLIT\SERVICE"    ; \ shown as Z on screen
                NS  (IS)-               ; 113f fe
+
                 .byte   $fc             ; 11d7 fc
                 LI  $20                ; 1140 20 20
+
 
                 LR  $3,A                ; 1142 53
 
                LR  A,$9                ; 1143 49
 
                LR  A,$5                ; 1144 45
 
                LI  $42                ; 1145 20 42
 
                LR  A,$9                ; 1147 49
 
                LR  $4,A                ; 1148 54
 
                LR  $4,A                ; 1149 54
 
                LR  A,$5                ; 114a 45
 
                NI  $fc                ; 114b 21 fc
 
                 NS  $9                  ; 114d f9
 
                 NS  $b                  ; 114e fb
 
                 .byte   $4f               
 
                LR  A,$8                ; 1150 48
 
                LR  A,(IS)-             ; 1151 4e
 
                LR  A,$5                ; 1152 45
 
                LI  $4b                ; 1153 20 4b
 
                LR  A,$1                ; 1155 41
 
                LR  $0,A                ; 1156 50
 
                LR  A,$9                ; 1157 49
 
                LR  $4,A                ; 1158 54
 
                LR  A,$1                ; 1159 41
 
                LR  A,(IS)              ; 115a 4c
 
                 .byte  $2d               
 
                NS  (IS)-              ; 115c fe
 
                LR  A,$1                ; 115d 41
 
                LR  $5,A                ; 115e 55
 
                LR  A,$6                ; 115f 46
 
                LR  $7,A                ; 1160 57
 
                LR  A,$1                ; 1161 41
 
                LR  A,(IS)-            ; 1162 4e
 
                LR  A,$4                ; 1163 44
 
                LI  $2e                ; 1164 20 2e
 
                 .byte   $2e               
 
                 .byte   $2e               
 
                LI   $fc                 ; 1168 20 fc
 
                 NS   $9                  ; 116a f9
 
                 NS   $b                  ; 116b fb
 
                 LI  $53                ; 116c 20 53
 
                 .byte  $4f               
 
                LR  A,$6                ; 116f 46
 
                 .byte   $4f               
 
                LR  $2,A                ; 1171 52
 
                LR  $4,A                ; 1172 54
 
                LI  $45                ; 1173 20 45
 
                LR  A,$9                ; 1175 49
 
                LR  A,(IS)-            ; 1176 4e
 
                LI  $20                ; 1177 20 20
 
                NS  (IS)-              ; 1179 fe
 
                LR  A,(IS)-            ; 117a 4e
 
                 LR   A,$5                ; 117b 45
 
                LR  $5,A                ; 117c 55
 
                LR  A,$5                ; 117d 45
 
                LR  $3,A                ; 117e 53
 
                LI  $47                ; 117f 20 47
 
                LR  A,$5                ; 1181 45
 
                LR  $2,A                ; 1182 52
 
                LR  $8,A                ; 1183 58
 
                LR  $4,A                ; 1184 54
 
                NS  (IS)                ; 1185 fc
 
                 NS   $9                  ; 1186 f9
 
                 NS   $b                  ; 1187 fb
 
                 LI  $52                ; 1188 20 52
 
                LR  A,$5                ; 118a 45
 
                LR  $0,A                ; 118b 50
 
                LR  A,$1                ; 118c 41
 
                LR  $2,A                ; 118d 52
 
                LR  A,$1                ; 118e 41
 
                LR  $4,A                ; 118f 54
 
                LR  $5,A                ; 1190 55
 
                LR  $2,A                ; 1191 52
 
                 .byte  $2d               
 
                NS  (IS)-              ; 1193 fe
 
                LI  $20                ; 1194 20 20
 
                LR  A,$b                ; 1196 4b
 
                 .byte   $4f               
 
                LR  $3,A                ; 1198 53
 
                LR  $4,A                ; 1199 54
 
                LR  A,$5                ; 119a 45
 
                LR  A,(IS)-            ; 119b 4e
 
                 .byte  $2e               
 
                 .byte  $2e               
 
                LI  $fc                ; 119e 20 fc
 
                NS  $b                  ; 11a0 fb
 
                 NS   $9                  ; 11a1 f9
 
                 LI  $45                ; 11a2 20 45
 
                 LR  A,(IS)-            ; 11a4 4e
 
                LR   $4,A                ; 11a5 54
 
                 LR   A,$6                ; 11a6 46
 
                LR  A,$1                ; 11a7 41
 
                LR  A,(IS)              ; 11a8 4c
 
                LR  A,(IS)              ; 11a9 4c
 
                LR  A,$5                ; 11aa 45
 
                LR  A,(IS)-            ; 11ab 4e
 
                LI  $fe                ; 11ac 20 fe
 
                 LI   $f2                ; 11ae 20 f2
 
                 DS  (IS)+              ; 11b0 3d
 
                 DS  (IS)+              ; 11b1 3d
 
                DS  (IS)+              ; 11b2 3d
 
                DS  (IS)+              ; 11b3 3d
 
                DS  (IS)+              ; 11b4 3d
 
                DS  (IS)+              ; 11b5 3d
 
                DS  (IS)+              ; 11b6 3d
 
                DS  (IS)+              ; 11b7 3d
 
                DS  (IS)+              ; 11b8 3d
 
                NS   $1                  ; 11b9 f1
 
                 NS   $b                  ; 11ba fb
 
                 NS   $9                  ; 11bb f9
 
                 NS   (IS)                ; 11bc fc
 
                 LR  A,$5                ; 11bd 45
 
                 LR   $2,A                ; 11be 52
 
                LR  $3,A                ; 11bf 53
 
                LR  $4,A                ; 11c0 54
 
                LR  A,$b                ; 11c1 4b
 
                LR  A,(IS)             ; 11c2 4c
 
                LR  A,$1                ; 11c3 41
 
                LR  $3,A                ; 11c4 53
 
                LR  $3,A                ; 11c5 53
 
                LR  A,$9                ; 11c6 49
 
                LR  A,$7                ; 11c7 47
 
                LR  A,$5                ; 11c8 45
 
                LR  $2,A                ; 11c9 52
 
                NS  (IS)-              ; 11ca fe
 
                 LR  A,$2                ; 11cb 42
 
                 LR  A,(IS)              ; 11cc 4c
 
                LR   A,$9                ; 11cd 49
 
                LR  $4,A                ; 11ce 54
 
                LR  (IS),A             ; 11cf 5c
 
                LR  $3,A                ; 11d0 53
 
                LR  A,$5                ; 11d1 45
 
                LR  $2,A                ; 11d2 52
 
                LR  $6,A                ; 11d3 56
 
                LR  A,$9                ; 11d4 49
 
                LR  A,$3                ; 11d5 43
 
                LR  A,$5                ; 11d6 45
 
                NS  (IS)                ; 11d7 fc
 
 
                 .byte  $ff                 
 
                 .byte  $ff                 
 
                 .byte  $ff                 
 
                 .byte  $ff                 

Latest revision as of 23:49, 17 November 2013


Reset: equ $0000

org $0800

CartridgeStart: LR   $5,A                ; 0800 55         Cartridge marker
                LR   K,P                 ; 0801 08         is skipped
CartridgeEntry: LI   $d6                 ; 0802 20 d6      Palette and color for clear screen
                LR   $3,A                ; 0804 53
                PI   $00d0               ; 0805 28 00 d0   BIOS_CLEAR_SCREEN
                LI   $8c                 ; 0808 20 8c      Load red "T" in r0
                LR   $0,A                ; 080a 50
                PI   $0099               ; 080b 28 00 99   BIOS_PROMPTS
                LR   A,$4                ; 080e 44         Button presses stored in r4 from prompts routine.
                CI   $01                 ; 080f 25 01      Button 1?
                BT   4,A0824             ; 0811 84 12
                CI   $02                 ; 0813 25 02      Button 2?
                BT   4,A0821             ; 0815 84 0b
                CI   $04                 ; 0817 25 04      Button 4?
                BT   4,A081e             ; 0819 84 04
                JMP  A0a44               ; 081b 29 0a 44   So it's button 3 then...
A081e:          JMP  A098b               ; 081e 29 09 8b   Button 4 has been pressed
A0821:          JMP  A1000               ; 0821 29 10 00   Button 2 has been pressed
A0824:          LI   $d6                 ; 0824 20 d6      Button 1 pressed, palette and color for clear screen
                LR   $3,A                ; 0826 53
                PI   $00d0               ; 0827 28 00 d0   BIOS_CLEAR_SCREEN
                LIS  $6                  ; 082a 76
                LR   $4,A                ; 082b 54
                LI   $40                 ; 082c 20 40
                LR   $3,A                ; 082e 53
                LI   $38                 ; 082f 20 38
                LR   $2,A                ; 0831 52
A0832:          LIS  $f                  ; 0832 7f
                LR   $1,A                ; 0833 51
                DCI  A1200               ; 0834 2a 12 00
                PI   $071d               ; 0837 28 07 1d
                LI   $15                 ; 083a 20 15
                LR   $1,A                ; 083c 51
                PI   $071d               ; 083d 28 07 1d
                LI   $1b                 ; 0840 20 1b
                LR   $1,A                ; 0842 51
                PI   $071d               ; 0843 28 07 1d
                DS   $2                  ; 0846 32
                LR   A,$2                ; 0847 42
                CI   $30                 ; 0848 25 30
                BF   $4,A0832            ; 084a 94 e7
                LI   $68                 ; 084c 20 68
                LR   $1,A                ; 084e 51
                LIS  $7                  ; 084f 77
                LR   $4,A                ; 0850 54
A0851:          LI   $29                 ; 0851 20 29
                LR   $2,A                ; 0853 52
                LI   $80                 ; 0854 20 80
                LR   $3,A                ; 0856 53
                DCI  A1236               ; 0857 2a 12 36
                PI   $071d               ; 085a 28 07 1d
                LI   $c0                 ; 085d 20 c0
                LR   $3,A                ; 085f 53
                LI   $30                 ; 0860 20 30
                LR   $2,A                ; 0862 52
                PI   $071d               ; 0863 28 07 1d
                LI   $37                 ; 0866 20 37
                LR   $2,A                ; 0868 52
                PI   $071d               ; 0869 28 07 1d
                LIS  $4                  ; 086c 74
                LR   $5,A                ; 086d 55
                PI   $008f               ; 086e 28 00 8f
                LI   $30                 ; 0871 20 30
                LR   $2,A                ; 0873 52
                PI   $071d               ; 0874 28 07 1d
                LI   $37                 ; 0877 20 37
                LR   $2,A                ; 0879 52
                PI   $071d               ; 087a 28 07 1d
                LIS  $4                  ; 087d 74
                LR   $5,A                ; 087e 55
                PI   $008f               ; 087f 28 00 8f
                DS   $1                  ; 0882 31
                LR   A,$1                ; 0883 41
                CI   $20                 ; 0884 25 20
                BF   $4,A0851            ; 0886 94 ca
                LI   $c0                 ; 0888 20 c0
                LR   $3,A                ; 088a 53
                LI   $30                 ; 088b 20 30
                LR   $2,A                ; 088d 52
                LI   $37                 ; 088e 20 37
                LR   $2,A                ; 0890 52
                LIS  $f                  ; 0891 7f
                LR   $0,A                ; 0892 50
                LIS  $6                  ; 0893 76
                LR   $4,A                ; 0894 54
A0895:          LIS  $0                  ; 0895 70
                LR   $3,A                ; 0896 53
A0897:          DCI  A1212               ; 0897 2a 12 12
                LI   $25                 ; 089a 20 25
                LR   $2,A                ; 089c 52
                PI   A0a90               ; 089d 28 0a 90
                LI   $2b                 ; 08a0 20 2b
                LR   $2,A                ; 08a2 52
                PI   A0a90               ; 08a3 28 0a 90
                LI   $40                 ; 08a6 20 40
                LR   $5,A                ; 08a8 55
                PI   $008f               ; 08a9 28 00 8f
                LR   A,$3                ; 08ac 43
                CI   $80                 ; 08ad 25 80
                LI   $80                 ; 08af 20 80
                LR   $3,A                ; 08b1 53
                BF   $4,A0897            ; 08b2 94 e4
                DS   $0                  ; 08b4 30
                BF   $4,A0895            ; 08b5 94 df
                LISL 1                   ; 08b7 69
                LISU 2                   ; 08b8 62
                LI   $30                 ; 08b9 20 30
                LR   (IS)+,A             ; 08bb 5d
                LISL 3                   ; 08bc 6b
                LI   $12                 ; 08bd 20 12
                LR   (IS)+,A             ; 08bf 5d
                LI   $79                 ; 08c0 20 79
                LR   (IS),A              ; 08c2 5c
                LI   $28                 ; 08c3 20 28
                LR   $2,A                ; 08c5 52
                PI   A0abc               ; 08c6 28 0a bc
                LI   $f8                 ; 08c9 20 f8
                LR   $2,A                ; 08cb 52
A08cc:          LIS  $0                  ; 08cc 70
                LR   $0,A                ; 08cd 50
A08ce:          LI   $48                 ; 08ce 20 48
                LR   $1,A                ; 08d0 51
                LI   $c0                 ; 08d1 20 c0
                NS   $0                  ; 08d3 f0
                LR   $3,A                ; 08d4 53
                PI   A0afe               ; 08d5 28 0a fe
                LI   $40                 ; 08d8 20 40
                NS   $0                  ; 08da f0
                LR   $3,A                ; 08db 53
                PI   A0afe               ; 08dc 28 0a fe
                LI   $80                 ; 08df 20 80
                NS   $0                  ; 08e1 f0
                LR   $3,A                ; 08e2 53
                PI   A0afe               ; 08e3 28 0a fe
                LI   $4c                 ; 08e6 20 4c
                LR   $1,A                ; 08e8 51
                LIS  $3                  ; 08e9 73
                AS   $2                  ; 08ea c2
                LR   $2,A                ; 08eb 52
                LI   $80                 ; 08ec 20 80
                NS   $0                  ; 08ee f0
                LR   $3,A                ; 08ef 53
                PI   A0afe               ; 08f0 28 0a fe
                LI   $c0                 ; 08f3 20 c0
                NS   $0                  ; 08f5 f0
                LR   $3,A                ; 08f6 53
                PI   A0afe               ; 08f7 28 0a fe
                LI   $fd                 ; 08fa 20 fd
                AS   $2                  ; 08fc c2
                LR   $2,A                ; 08fd 52
                LR   A,$0                ; 08fe 40
                CI   $00                 ; 08ff 25 00
                BF   $4,A090b            ; 0901 94 09
                LIS  $1                  ; 0903 71
                AS   $2                  ; 0904 c2
                LR   $2,A                ; 0905 52
                LI   $c0                 ; 0906 20 c0
                LR   $0,A                ; 0908 50
                BF   $0,A08ce            ; 0909 90 c4
A090b:          LIS  $f                  ; 090b 7f
                LR   $5,A                ; 090c 55
                PI   $008f               ; 090d 28 00 8f
                LR   A,$2                ; 0910 42
                CI   $0c                 ; 0911 25 0c
                BF   $4,A08cc            ; 0913 94 b8
                LISL 6                   ; 0915 6e
                LISU 2                   ; 0916 62
                LIS  $d                  ; 0917 7d
                LR   (IS)+,A             ; 0918 5d
                LI   $2c                 ; 0919 20 2c
                LR   (IS),A              ; 091b 5c
                LISL 1                   ; 091c 69
                LI   $10                 ; 091d 20 10
                LR   (IS),A              ; 091f 5c
                PI   A0abc               ; 0920 28 0a bc
                LISL 3                   ; 0923 6b
                LISU 2                   ; 0924 62
                LIS  $c                  ; 0925 7c
                LR   (IS),A              ; 0926 5c
                LI   $20                 ; 0927 20 20
                LR   $2,A                ; 0929 52
                LI   $40                 ; 092a 20 40
                LR   $3,A                ; 092c 53
                PI   A0c44               ; 092d 28 0c 44
                PI   A0abc               ; 0930 28 0a bc
                PI   A0939               ; 0933 28 09 39
                JMP  A0824               ; 0936 29 08 24
A0939:          LR   K,P                 ; 0939 08
                PI   $0107               ; 093a 28 01 07
                LI   $d6                 ; 093d 20 d6
                LR   $3,A                ; 093f 53
                PI   $00d0               ; 0940 28 00 d0
                PI   A0abc               ; 0943 28 0a bc
                LIS  $f                  ; 0946 7f
                LR   $0,A                ; 0947 50
                LIS  $8                  ; 0948 78
                LR   $4,A                ; 0949 54
A094a:          LIS  $0                  ; 094a 70
                LR   $3,A                ; 094b 53
A094c:          DCI  A1259               ; 094c 2a 12 59
                LI   $1b                 ; 094f 20 1b
                LR   $1,A                ; 0951 51
                LI   $10                 ; 0952 20 10
                LR   $2,A                ; 0954 52
                PI   $071d               ; 0955 28 07 1d
                LI   $23                 ; 0958 20 23
                LR   $1,A                ; 095a 51
                PI   $071d               ; 095b 28 07 1d
                LI   $18                 ; 095e 20 18
                LR   $2,A                ; 0960 52
                LI   $1b                 ; 0961 20 1b
                LR   $1,A                ; 0963 51
                PI   $071d               ; 0964 28 07 1d
                LI   $23                 ; 0967 20 23
                LR   $1,A                ; 0969 51
                PI   $071d               ; 096a 28 07 1d
                LI   $40                 ; 096d 20 40
                LR   $5,A                ; 096f 55
                PI   $008f               ; 0970 28 00 8f
                LR   A,$3                ; 0973 43
                CI   $80                 ; 0974 25 80
                LI   $80                 ; 0976 20 80
                LR   $3,A                ; 0978 53
                BF   $4,A094c            ; 0979 94 d2
                DS   $0                  ; 097b 30
                BF   $4,A094a            ; 097c 94 cd
                LI   $2b                 ; 097e 20 2b
                LR   $2,A                ; 0980 52
                LI   $c0                 ; 0981 20 c0
                LR   $3,A                ; 0983 53
                PI   A0c44               ; 0984 28 0c 44
                PI   $011e               ; 0987 28 01 1e
                PK                       ; 098a 0c
A098b:          LI   $d0                 ; 098b 20 d0        Start here when button 4 was pressed.
                LR   $3,A                ; 098d 53
                PI   $00d0               ; 098e 28 00 d0
                LI   $d3                 ; 0991 20 d3
                LR   $3,A                ; 0993 53
                PI   $00d0               ; 0994 28 00 d0
                LI   $d6                 ; 0997 20 d6
                LR   $3,A                ; 0999 53
                PI   $00d0               ; 099a 28 00 d0
                LIS  $1                  ; 099d 71
                LR   $2,A                ; 099e 52
                LR   $4,A                ; 099f 54
                LI   $80                 ; 09a0 20 80
                LR   $3,A                ; 09a2 53
A09a3:          LIS  $4                  ; 09a3 74
                LR   $1,A                ; 09a4 51
A09a5:          DCI  $07b7               ; 09a5 2a 07 b7
                PI   $071d               ; 09a8 28 07 1d
                LIS  $1                  ; 09ab 71
                AS   $1                  ; 09ac c1
                LR   $1,A                ; 09ad 51
                CI   $80                 ; 09ae 25 80
                BF   $4,A09a5            ; 09b0 94 f4
                LIS  $1                  ; 09b2 71
                AS   $2                  ; 09b3 c2
                LR   $2,A                ; 09b4 52
                CI   $40                 ; 09b5 25 40
                BF   $4,A09a3            ; 09b7 94 eb
                LIS  $0                  ; 09b9 70
                LR   $3,A                ; 09ba 53
                LIS  $1                  ; 09bb 71
                LR   $4,A                ; 09bc 54
                LR   $2,A                ; 09bd 52
                LI   $2c                 ; 09be 20 2c
                LR   $0,A                ; 09c0 50
                LI   $4c                 ; 09c1 20 4c
                LR   $9,A                ; 09c3 59
                LISL 0                   ; 09c4 68
                LISU 2                   ; 09c5 62
                LIS  $3                  ; 09c6 73
                LR   (IS),A              ; 09c7 5c
A09c8:          LR   A,$0                ; 09c8 40
                LR   $1,A                ; 09c9 51
A09ca:          DCI  $07b7               ; 09ca 2a 07 b7
                PI   $071d               ; 09cd 28 07 1d
                LIS  $1                  ; 09d0 71
                AS   $1                  ; 09d1 c1
                LR   $1,A                ; 09d2 51
                COM                      ; 09d3 18
                AS   $9                  ; 09d4 c9
                BF   $4,A09ca            ; 09d5 94 f4
                LIS  $1                  ; 09d7 71
                AS   $2                  ; 09d8 c2
                LR   $2,A                ; 09d9 52
                CI   $40                 ; 09da 25 40
                BT   4,A09ea             ; 09dc 84 0d
                NS   (IS)                ; 09de fc
                BF   $4,A09c8            ; 09df 94 e8
                LIS  $1                  ; 09e1 71
                AS   $0                  ; 09e2 c0
                LR   $0,A                ; 09e3 50
                LI   $ff                 ; 09e4 20 ff
                AS   $9                  ; 09e6 c9
                LR   $9,A                ; 09e7 59
                BF   $0,A09c8            ; 09e8 90 df
A09ea:          LI   $1c                 ; 09ea 20 1c
                LR   $0,A                ; 09ec 50
                LIS  $1                  ; 09ed 71
                LR   $2,A                ; 09ee 52
                LI   $5c                 ; 09ef 20 5c
                LR   $9,A                ; 09f1 59
                LR   A,(IS)              ; 09f2 4c
                CI   $01                 ; 09f3 25 01
                LIS  $1                  ; 09f5 71
                LR   (IS),A              ; 09f6 5c
                BF   $4,A09c8            ; 09f7 94 d0
                LIS  $f                  ; 09f9 7f
                LR   $2,A                ; 09fa 52
                LI   $c0                 ; 09fb 20 c0
                LR   $3,A                ; 09fd 53
                PI   A0aa7               ; 09fe 28 0a a7
                LI   $14                 ; 0a01 20 14
                LR   $2,A                ; 0a03 52
                PI   A0aa7               ; 0a04 28 0a a7
                LI   $19                 ; 0a07 20 19
                LR   $2,A                ; 0a09 52
                PI   A0aa7               ; 0a0a 28 0a a7
                LIS  $0                  ; 0a0d 70
                LR   $5,A                ; 0a0e 55
                PI   $008f               ; 0a0f 28 00 8f
                LI   $d6                 ; 0a12 20 d6
                LR   $3,A                ; 0a14 53
                LISL 7                   ; 0a15 6f
                LISU 3                   ; 0a16 63
                LIS  $3                  ; 0a17 73
                LR   (IS),A              ; 0a18 5c
                PI   $00d0               ; 0a19 28 00 d0
                LISL 1                   ; 0a1c 69
                LISU 2                   ; 0a1d 62
                LIS  $f                  ; 0a1e 7f
                LR   (IS)+,A             ; 0a1f 5d
                LISL 3                   ; 0a20 6b
                LI   $10                 ; 0a21 20 10
                LR   (IS)+,A             ; 0a23 5d
                LI   $50                 ; 0a24 20 50
                LR   (IS),A              ; 0a26 5c
                LISL 6                   ; 0a27 6e
                LI   $10                 ; 0a28 20 10
                LR   (IS)+,A             ; 0a2a 5d
                LI   $90                 ; 0a2b 20 90
                LR   (IS),A              ; 0a2d 5c
                PI   A0abc               ; 0a2e 28 0a bc
                LI   $33                 ; 0a31 20 33
                LR   $2,A                ; 0a33 52
                PI   A0c44               ; 0a34 28 0c 44
                LISL 3                   ; 0a37 6b
                LISU 2                   ; 0a38 62
                LIS  $c                  ; 0a39 7c
                LR   (IS)+,A             ; 0a3a 5d
                LI   $f2                 ; 0a3b 20 f2
                LR   (IS),A              ; 0a3d 5c
                PI   A0939               ; 0a3e 28 09 39
                JMP  A098b               ; 0a41 29 09 8b
A0a44:          LI   $d3                 ; 0a44 20 d3
                LR   $3,A                ; 0a46 53
                PI   $00d0               ; 0a47 28 00 d0
                LI   $d0                 ; 0a4a 20 d0
                LR   $3,A                ; 0a4c 53
                PI   $00d0               ; 0a4d 28 00 d0
                LI   $d3                 ; 0a50 20 d3
                LR   $3,A                ; 0a52 53
                PI   $00d0               ; 0a53 28 00 d0
                LI   $d0                 ; 0a56 20 d0
                LR   $3,A                ; 0a58 53
                PI   $00d0               ; 0a59 28 00 d0
                LI   $d6                 ; 0a5c 20 d6
                LR   $3,A                ; 0a5e 53
                PI   $00d0               ; 0a5f 28 00 d0
                LISL 1                   ; 0a62 69
                LISU 2                   ; 0a63 62
                LI   $10                 ; 0a64 20 10
                LR   (IS),A              ; 0a66 5c
                LISL 3                   ; 0a67 6b
                LI   $11                 ; 0a68 20 11
                LR   (IS)+,A             ; 0a6a 5d
                LIS  $0                  ; 0a6b 70
                LR   (IS),A              ; 0a6c 5c
                PI   A0abc               ; 0a6d 28 0a bc
                LI   $d3                 ; 0a70 20 d3
                LR   $3,A                ; 0a72 53
                PI   $00d0               ; 0a73 28 00 d0
                LI   $d0                 ; 0a76 20 d0
                LR   $3,A                ; 0a78 53
                PI   $00d0               ; 0a79 28 00 d0
                LISL 3                   ; 0a7c 6b
                LISU 2                   ; 0a7d 62
                LIS  $c                  ; 0a7e 7c
                LR   (IS)+,A             ; 0a7f 5d
                LI   $f2                 ; 0a80 20 f2
                LR   (IS),A              ; 0a82 5c
                LISL 6                   ; 0a83 6e
                LIS  $d                  ; 0a84 7d
                LR   (IS)+,A             ; 0a85 5d
                LI   $53                 ; 0a86 20 53
                LR   (IS),A              ; 0a88 5c
                PI   A0939               ; 0a89 28 09 39
                BF   $0,A0a44            ; 0a8c 90 b7
A0a8e:          BF   $0,A0a8e            ; 0a8e 90 ff
A0a90:          LR   K,P                 ; 0a90 08
                PI   $0107               ; 0a91 28 01 07
                LIS  $f                  ; 0a94 7f
                LR   $1,A                ; 0a95 51
                PI   $071d               ; 0a96 28 07 1d
                LI   $15                 ; 0a99 20 15
                LR   $1,A                ; 0a9b 51
                PI   $071d               ; 0a9c 28 07 1d
                LI   $1b                 ; 0a9f 20 1b
                LR   $1,A                ; 0aa1 51
                PI   $071d               ; 0aa2 28 07 1d
                BF   $0,A0afa            ; 0aa5 90 54
A0aa7:          LR   K,P                 ; 0aa7 08
                PI   $0107               ; 0aa8 28 01 07
                LI   $18                 ; 0aab 20 18
                LR   $9,A                ; 0aad 59
                LI   $30                 ; 0aae 20 30
                LR   $1,A                ; 0ab0 51
A0ab1:          PI   A0ae9               ; 0ab1 28 0a e9
                LIS  $1                  ; 0ab4 71
                AS   $1                  ; 0ab5 c1
                LR   $1,A                ; 0ab6 51
                DS   $9                  ; 0ab7 39
                BF   $4,A0ab1            ; 0ab8 94 f8
                BF   $0,A0afa            ; 0aba 90 3f
A0abc:          JMP  A0b41               ; 0abc 29 0b 41
A0abf:          LR   K,P                 ; 0abf 08
                PI   $0107               ; 0ac0 28 01 07
                LIS  $8                  ; 0ac3 78
                LR   $9,A                ; 0ac4 59
A0ac5:          PI   A0ae9               ; 0ac5 28 0a e9
                LIS  $1                  ; 0ac8 71
                AS   $1                  ; 0ac9 c1
                LR   $1,A                ; 0aca 51
                DS   $9                  ; 0acb 39
                BF   $4,A0ac5            ; 0acc 94 f8
                LI   $f8                 ; 0ace 20 f8
                AS   $1                  ; 0ad0 c1
                LR   $1,A                ; 0ad1 51
                BF   $0,A0afa            ; 0ad2 90 27
A0ad4:          LR   K,P                 ; 0ad4 08
                PI   $0107               ; 0ad5 28 01 07
                LIS  $7                  ; 0ad8 77
                LR   $9,A                ; 0ad9 59
A0ada:          PI   A0ae9               ; 0ada 28 0a e9
                LIS  $1                  ; 0add 71
                AS   $2                  ; 0ade c2
                LR   $2,A                ; 0adf 52
                DS   $9                  ; 0ae0 39
                BF   $4,A0ada            ; 0ae1 94 f8
                LI   $f9                 ; 0ae3 20 f9
                AS   $2                  ; 0ae5 c2
                LR   $2,A                ; 0ae6 52
                BF   $0,A0afa            ; 0ae7 90 12
A0ae9:          LR   K,P                 ; 0ae9 08
                PI   $0107               ; 0aea 28 01 07
                LR   A,$2                ; 0aed 42
                OI   $00                 ; 0aee 22 00
                BF   $1,A0afa            ; 0af0 91 09
                DCI  $0767               ; 0af2 2a 07 67
                LIS  $1                  ; 0af5 71
                LR   $4,A                ; 0af6 54
                PI   $071d               ; 0af7 28 07 1d
A0afa:          PI   $011e               ; 0afa 28 01 1e
                PK                       ; 0afd 0c
A0afe:          LR   K,P                 ; 0afe 08
                PI   $0107               ; 0aff 28 01 07
                PI   A0abf               ; 0b02 28 0a bf
                PI   A0ad4               ; 0b05 28 0a d4
                LIS  $7                  ; 0b08 77
                AS   $2                  ; 0b09 c2
                LR   $2,A                ; 0b0a 52
                PI   A0abf               ; 0b0b 28 0a bf
                LI   $f9                 ; 0b0e 20 f9
                AS   $2                  ; 0b10 c2
                LR   $2,A                ; 0b11 52
                LIS  $7                  ; 0b12 77
                AS   $1                  ; 0b13 c1
                LR   $1,A                ; 0b14 51
                PI   A0ad4               ; 0b15 28 0a d4
                LIS  $2                  ; 0b18 72
                AS   $1                  ; 0b19 c1
                LR   $1,A                ; 0b1a 51
                BF   $0,A0afa            ; 0b1b 90 de
                LIS  $5                  ; 0b1d 75
                LR   $3,A                ; 0b1e 53
                LR   $1,A                ; 0b1f 51
                LR   K,P                 ; 0b20 08
                PI   $0107               ; 0b21 28 01 07
                LIS  $0                  ; 0b24 70
                LR   $0,A                ; 0b25 50
                LIS  $8                  ; 0b26 78
                LR   $4,A                ; 0b27 54
A0b28:          PI   $0718               ; 0b28 28 07 18
                LIS  $8                  ; 0b2b 78
                AS   $1                  ; 0b2c c1
                LR   $1,A                ; 0b2d 51
                LISL 0                   ; 0b2e 68
                LISU 2                   ; 0b2f 62
                COM                      ; 0b30 18
                AS   (IS)+               ; 0b31 cd
                BT   1,A0b28             ; 0b32 81 f5
                LR   A,(IS)+             ; 0b34 4d
                LR   $1,A                ; 0b35 51
                LIS  $8                  ; 0b36 78
                AS   $2                  ; 0b37 c2
                LR   $2,A                ; 0b38 52
                COM                      ; 0b39 18
                AS   (IS)                ; 0b3a cc
                BT   1,A0b28             ; 0b3b 81 ec
A0b3d:          PI   $011e               ; 0b3d 28 01 1e
                PK                       ; 0b40 0c
A0b41:          LR   K,P                 ; 0b41 08
                PI   $0107               ; 0b42 28 01 07
A0b45:          LISL 3                   ; 0b45 6b
                LISU 2                   ; 0b46 62
                LR   A,(IS)+             ; 0b47 4d
                LR   QU,A                ; 0b48 06
                LR   A,(IS)              ; 0b49 4c
                LR   QL,A                ; 0b4a 07
                LR   DC,Q                ; 0b4b 0f
                LM                       ; 0b4c 16
                LR   $0,A                ; 0b4d 50
                LR   Q,DC                ; 0b4e 0e
                LR   A,QL                ; 0b4f 03
                LR   (IS)-,A             ; 0b50 5e
                LR   A,QU                ; 0b51 02
                LR   (IS),A              ; 0b52 5c
                LR   A,$0                ; 0b53 40
                CI   $ff                 ; 0b54 25 ff
                BT   4,A0b3d             ; 0b56 84 e6
                CI   $fe                 ; 0b58 25 fe
                BT   4,A0b7b             ; 0b5a 84 20
                CI   $fd                 ; 0b5c 25 fd
                BT   4,A0b89             ; 0b5e 84 2a
                CI   $fc                 ; 0b60 25 fc
                BT   4,A0b90             ; 0b62 84 2d
                CI   $fb                 ; 0b64 25 fb
                BT   4,A0b7e             ; 0b66 84 17
                CI   $fa                 ; 0b68 25 fa
                BT   4,A0b9a             ; 0b6a 84 2f
                CI   $f9                 ; 0b6c 25 f9
                BT   4,A0b83             ; 0b6e 84 14
                NI   $f0                 ; 0b70 21 f0
                CI   $f0                 ; 0b72 25 f0
                BT   4,A0ba0             ; 0b74 84 2b
                PI   A0c01               ; 0b76 28 0c 01
                BF   $0,A0b45            ; 0b79 90 cb
A0b7b:          LIS  $9                  ; 0b7b 79
                AS   $2                  ; 0b7c c2
                LR   $2,A                ; 0b7d 52
A0b7e:          LISL 1                   ; 0b7e 69
                LR   A,(IS)              ; 0b7f 4c
                LR   $1,A                ; 0b80 51
                BF   $0,A0b45            ; 0b81 90 c3
A0b83:          LI   $f7                 ; 0b83 20 f7
                AS   $2                  ; 0b85 c2
                LR   $2,A                ; 0b86 52
                BF   $0,A0b45            ; 0b87 90 bd
A0b89:          LIS  $0                  ; 0b89 70
                LR   $5,A                ; 0b8a 55
                PI   $008f               ; 0b8b 28 00 8f
                BF   $0,A0b45            ; 0b8e 90 b6
A0b90:          LIS  $3                  ; 0b90 73
                LR   $0,A                ; 0b91 50
A0b92:          PI   $008f               ; 0b92 28 00 8f
                DS   $0                  ; 0b95 30
                BF   $4,A0b92            ; 0b96 94 fb
                BF   $0,A0b45            ; 0b98 90 ac
A0b9a:          LIS  $f                  ; 0b9a 7f
                LR   $1,A                ; 0b9b 51
                LIS  $c                  ; 0b9c 7c
                LR   $2,A                ; 0b9d 52
                BF   $0,A0b45            ; 0b9e 90 a6
A0ba0:          LR   A,$0                ; 0ba0 40
                SL   1                   ; 0ba1 13
                SL   1                   ; 0ba2 13
                SL   4                   ; 0ba3 15
                LR   $3,A                ; 0ba4 53
                BF   $0,A0b45            ; 0ba5 90 9f
                LR   K,P                 ; 0ba7 08
                PI   $0107               ; 0ba8 28 01 07
                LR   DC,H                ; 0bab 10
                PI   A0c25               ; 0bac 28 0c 25
                LR   A,$4                ; 0baf 44
                INC                      ; 0bb0 1f
                LR   $4,A                ; 0bb1 54
                PI   $011e               ; 0bb2 28 01 1e
                PK                       ; 0bb5 0c
A0bb6:          LR   K,P                 ; 0bb6 08
                PI   $0107               ; 0bb7 28 01 07
                LR   Q,DC                ; 0bba 0e
                LISL 0                   ; 0bbb 68
                LISU 3                   ; 0bbc 63
                LIS  $5                  ; 0bbd 75
                LR   (IS)+,A             ; 0bbe 5d
                LR   (IS)+,A             ; 0bbf 5d
A0bc0:          LISL 2                   ; 0bc0 6a
                LISU 3                   ; 0bc1 63
                LR   DC,Q                ; 0bc2 0f
                LM                       ; 0bc3 16
                LR   Q,DC                ; 0bc4 0e
                LR   (IS),A              ; 0bc5 5c
A0bc6:          LISL 2                   ; 0bc6 6a
                LISU 3                   ; 0bc7 63
                LR   A,(IS)              ; 0bc8 4c
                LR   $3,A                ; 0bc9 53
                SL   1                   ; 0bca 13
                LR   (IS)+,A             ; 0bcb 5d
                LR   A,$3                ; 0bcc 43
                OI   $00                 ; 0bcd 22 00
                LR   A,(IS)              ; 0bcf 4c
                BF   $1,A0bd3            ; 0bd0 91 02
                LIS  $0                  ; 0bd2 70
A0bd3:          LR   $3,A                ; 0bd3 53
                DCI  $07b7               ; 0bd4 2a 07 b7
                LIS  $0                  ; 0bd7 70
                LR   $0,A                ; 0bd8 50
                PI   $0718               ; 0bd9 28 07 18
                LR   A,$4                ; 0bdc 44
                AS   $1                  ; 0bdd c1
                LR   $1,A                ; 0bde 51
                LISL 0                   ; 0bdf 68
                LISU 3                   ; 0be0 63
                DS   (IS)                ; 0be1 3c
                BF   $4,A0bc6            ; 0be2 94 e3
                LR   A,$4                ; 0be4 44
                SL   1                   ; 0be5 13
                SL   1                   ; 0be6 13
                AS   $4                  ; 0be7 c4
                COM                      ; 0be8 18
                AS   $1                  ; 0be9 c1
                INC                      ; 0bea 1f
                LR   $1,A                ; 0beb 51
                LIS  $5                  ; 0bec 75
                LR   (IS)+,A             ; 0bed 5d
                LR   A,$4                ; 0bee 44
                AS   $2                  ; 0bef c2
                LR   $2,A                ; 0bf0 52
                DS   (IS)+               ; 0bf1 3d
                BF   $4,A0bc0            ; 0bf2 94 cd
                LR   A,$4                ; 0bf4 44
                SL   1                   ; 0bf5 13
                SL   1                   ; 0bf6 13
                AS   $4                  ; 0bf7 c4
                COM                      ; 0bf8 18
                INC                      ; 0bf9 1f
                AS   $2                  ; 0bfa c2
                LR   $2,A                ; 0bfb 52
                LR   DC,Q                ; 0bfc 0f
                PI   $011e               ; 0bfd 28 01 1e
                PK                       ; 0c00 0c
A0c01:          LR   K,P                 ; 0c01 08
                PI   $0107               ; 0c02 28 01 07
                DCI  A0d20               ; 0c05 2a 0d 20
                LIS  $7                  ; 0c08 77
                LR   $4,A                ; 0c09 54
A0c0a:          LR   A,$0                ; 0c0a 40
                NI   $7f                 ; 0c0b 21 7f
                ADC                      ; 0c0d 8e
                DS   $4                  ; 0c0e 34
                BF   $4,A0c0a            ; 0c0f 94 fa
                LIS  $7                  ; 0c11 77
                LR   $4,A                ; 0c12 54
                LR   A,$0                ; 0c13 40
                CI   $ff                 ; 0c14 25 ff
                BF   $4,A0c1b            ; 0c16 94 04
                DCI  A0e00               ; 0c18 2a 0e 00   DC0 pointing to graphics
A0c1b:          PI   $071d               ; 0c1b 28 07 1d   using bios drawing routine
                LIS  $7                  ; 0c1e 77
                AS   $1                  ; 0c1f c1
                LR   $1,A                ; 0c20 51
                PI   $011e               ; 0c21 28 01 1e   popk bios routine
                PK                       ; 0c24 0c
A0c25:          LR   K,P                 ; 0c25 08
                PI   $0107               ; 0c26 28 01 07
A0c29:          PI   A0bb6               ; 0c29 28 0b b6
                LR   A,$4                ; 0c2c 44
                SL   1                   ; 0c2d 13
                SL   1                   ; 0c2e 13
                AS   $4                  ; 0c2f c4
                AS   $1                  ; 0c30 c1
                LR   $1,A                ; 0c31 51
                LISL 0                   ; 0c32 68
                LISU 2                   ; 0c33 62
                COM                      ; 0c34 18
                AS   (IS)+               ; 0c35 cd
                BT   1,A0c29             ; 0c36 81 f2
                LR   A,(IS)+             ; 0c38 4d
                LR   $1,A                ; 0c39 51
                LI   $ff                 ; 0c3a 20 ff
                LR   $5,A                ; 0c3c 55
                PI   $008f               ; 0c3d 28 00 8f
                PI   $011e               ; 0c40 28 01 1e
                PK                       ; 0c43 0c
A0c44:          LR   K,P                 ; 0c44 08
                PI   $0107               ; 0c45 28 01 07
A0c48:          LISU 3                   ; 0c48 63
                LISL 0                   ; 0c49 68
                LIS  $8                  ; 0c4a 78
                LR   (IS),A              ; 0c4b 5c
                LR   $1,A                ; 0c4c 51
A0c4d:          LIS  $d                  ; 0c4d 7d
                LR   $9,A                ; 0c4e 59
A0c4f:          PI   A0c7a               ; 0c4f 28 0c 7a
                PI   A0c01               ; 0c52 28 0c 01
                DS   $9                  ; 0c55 39
                BF   $4,A0c4f            ; 0c56 94 f8
                LISU 3                   ; 0c58 63
                LISL 0                   ; 0c59 68
                DS   (IS)                ; 0c5a 3c
                LR   A,(IS)              ; 0c5b 4c
                LR   $1,A                ; 0c5c 51
                CI   $02                 ; 0c5d 25 02
                BF   $4,A0c4d            ; 0c5f 94 ed
                LISU 2                   ; 0c61 62
                LISL 7                   ; 0c62 6f
                LR   A,(IS)              ; 0c63 4c
                INC                      ; 0c64 1f
                LR   (IS),A              ; 0c65 5c
                LR   A,$0                ; 0c66 40
                CI   $ff                 ; 0c67 25 ff
                BT   4,A0c6f             ; 0c69 84 05
                CI   $00                 ; 0c6b 25 00
                BF   $0,A0c48            ; 0c6d 90 da
A0c6f:          LISU 2                   ; 0c6f 62
                LISL 6                   ; 0c70 6e
                LIS  $d                  ; 0c71 7d
                LR   (IS)+,A             ; 0c72 5d
                LI   $53                 ; 0c73 20 53
                LR   (IS),A              ; 0c75 5c
                PI   $011e               ; 0c76 28 01 1e
                PK                       ; 0c79 0c
A0c7a:          LISU 2                   ; 0c7a 62
                LISL 6                   ; 0c7b 6e
                LR   A,(IS)+             ; 0c7c 4d
                LR   QU,A                ; 0c7d 06
                LR   A,(IS)              ; 0c7e 4c
                LR   QL,A                ; 0c7f 07
                LR   DC,Q                ; 0c80 0f
                LR   A,$9                ; 0c81 49
                COM                      ; 0c82 18
                AI   $0d                 ; 0c83 24 0d
                ADC                      ; 0c85 8e
                LM                       ; 0c86 16
                LR   $0,A                ; 0c87 50
                POP                      ; 0c88 1c
                LR   A,(IS)-             ; 0c89 4e
                LR   A,$5                ; 0c8a 45
                LR   $2,A                ; 0c8b 52

                .byte "OL[MPIA"          ; [ displayed as "Y" on screen  PART 1
                .byte $fe                ; seems to mean new row
                .byte " 1980"            ;   PART 1

                .byte   $fc              ; 0c9c fc
                .byte   $ff              ; 0c9d ff
                .byte   $fa              ; 0c9e fa
                .byte   $f1              ; 0c9f f1
                .byte   $fe              ; 0ca0 fe

                .byte "  NICHT"
                .byte $fe
                .byte "VERPASSEN"

                .byte   $fc              ; 0cb2 fc
                .byte   $fa              ; 0cb3 fa
                .byte   $f2              ; 0cb4 f2

                .byte "MIT DEM"

                .byte   $fe              ; 0cbc fe
                .byte   $f2              ; 0cbd f2

                .byte "EIGENEN"

                .byte   $fe              ; 0cc5 fe
                .byte   $f1              ; 0cc6 f1

                .byte "VIDEOGERXT"       ; X shown as Ä (A umlaut) on screen

                .byte   $fc              ; 0cd1 fc
                .byte   $fa              ; 0cd2 fa
                .byte   $f1              ; 0cd3 f1

                .byte "VON DEN"

                .byte   $fe              ; 0cdb fe

                .byte "VIDEO- "

                .byte   $fe

                .byte "SPE\IALISTEN"     ; "\" shown as Z on screen

                .byte   $fc              ; 0cf0 fc
                .byte   $ff              ; 0fc1 ff                 
                .byte   $fa              ; 0cf2 fa
                .byte   $f1              ; 0cf3 f1

                .byte "      ANRUF"
                .byte   $fe              ; 0cff fe
                .byte "      GENZGT"     ; Z shown as Ü on screen (U umlaut)                 
                .byte   $ff         
                .byte "GENZG"            ; Z shown as Ü on screen (U umlaut)
                .byte   $ff                 
                .byte "G"                ; 0d13 47
                .byte   $ff                 
                .byte "   GENZGT"        ; Z shown as Ü on screen (U umlaut)
                .byte   $ff                 
                .byte "G"                ; 0d1f 47
A0d20:          .byte "ENZG"
                .byte   $ff                 
                .byte "G"                ; 0d25 47
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte "G"                ; 0d29 47
                .byte   $ff                 
                .byte   $ff              
                .byte "         SPORT-SPIEL-SPANNUNG           "
                .byte $ff
                .byte "         () UNSER KUNDENDIENST IST SCHON UNTERWEGS             "
                .byte $ff
                .byte "          BEI UNS ERHALTEN SIE SCHECKHEFTGARANTIE = 700 * "
                .byte "VERBRIEFTE SICHERHEIT IM GAN\EN BUNDESGEBIET"  ; \ shown as Z

                .byte $ff                 
                .byte "   "
                .byte $ff  

                ; Block of graphics starting here
A0e00:          LR   A,KU                ; 0e00 00
                LR   A,KU                ; 0e01 00
                LR   A,KU                ; 0e02 00
                LR   A,KU                ; 0e03 00
                LR   A,KU                ; 0e04 00
                LR   A,KU                ; 0e05 00
                LR   A,KU                ; 0e06 00
                LI   $50                 ; 0e07 20 50
                LR   $0,A                ; 0e09 50
                LR   $0,A                ; 0e0a 50
                LI   $00                 ; 0e0b 20 00
                LI   $50                 ; 0e0d 20 50
                LR   $0,A                ; 0e0f 50
                LR   A,KU                ; 0e10 00
                LR   A,KU                ; 0e11 00
                LR   A,KU                ; 0e12 00
                LR   A,KU                ; 0e13 00
                LR   A,KU                ; 0e14 00
                LR   $0,A                ; 0e15 50
                NS   $8                  ; 0e16 f8
                LR   $0,A                ; 0e17 50
                LR   $0,A                ; 0e18 50
                LR   $0,A                ; 0e19 50
                NS   $8                  ; 0e1a f8
A0e1b:          LR   $0,A                ; 0e1b 50
                LI   $78                 ; 0e1c 20 78
                AS   $0                  ; 0e1e c0
                LIS  $0                  ; 0e1f 70
                PI   $f020               ; 0e20 28 f0 20
                AS   $0                  ; 0e23 c0
                AS   $8                  ; 0e24 c8
                LR   DC,H                ; 0e25 10
                LI   $40                 ; 0e26 20 40
                BF   $8,A0e41            ; 0e28 98 18
                LR   A,$0                ; 0e2a 40
                INS  0                   ; 0e2b a0
                INS  0                   ; 0e2c a0
                LR   A,$0                ; 0e2d 40
                INS  8                   ; 0e2e a8
                BF   $0,A0e98            ; 0e2f 90 68
                LI   $20                 ; 0e31 20 20
                LI   $00                 ; 0e33 20 00
                LR   A,KU                ; 0e35 00
                LR   A,KU                ; 0e36 00
                LR   A,KU                ; 0e37 00
                LR   Q,DC                ; 0e38 0e
                LR   IS,A                ; 0e39 0b
                NS   (IS)-               ; 0e3a fe
                NS   (IS)-               ; 0e3b fe
                NS   (IS)-               ; 0e3c fe
                DS   $0                  ; 0e3d 30
                DS   $0                  ; 0e3e 30
                NS   $8                  ; 0e3f f8
                NS   $8                  ; 0e40 f8
A0e41:          NS   $8                  ; 0e41 f8
                NS   $8                  ; 0e42 f8
                NS   $8                  ; 0e43 f8
                LISU 0                   ; 0e44 60
                LISU 0                   ; 0e45 60
                LR   A,KU                ; 0e46 00
                AM                       ; 0e47 88
                LR   $0,A                ; 0e48 50
                LI   $50                 ; 0e49 20 50
                AM                       ; 0e4b 88
                LR   A,KU                ; 0e4c 00
                LR   A,KU                ; 0e4d 00
                LI   $20                 ; 0e4e 20 20
                NS   $8                  ; 0e50 f8
                LI   $20                 ; 0e51 20 20
                LR   A,KU                ; 0e53 00
                LR   A,KU                ; 0e54 00
                LR   A,KU                ; 0e55 00
                LR   A,KU                ; 0e56 00
                LR   A,KU                ; 0e57 00
                LI   $20                 ; 0e58 20 20
                LR   A,$0                ; 0e5a 40
                LR   A,KU                ; 0e5b 00
                LR   A,KU                ; 0e5c 00
                LR   A,KU                ; 0e5d 00
                NS   $8                  ; 0e5e f8
                LR   A,KU                ; 0e5f 00
                LR   A,KU                ; 0e60 00
                LR   A,KU                ; 0e61 00
                LR   A,KU                ; 0e62 00
                LR   A,KU                ; 0e63 00
                LR   A,KU                ; 0e64 00
                LR   A,KU                ; 0e65 00
                LR   A,KU                ; 0e66 00
                LR   A,KU                ; 0e67 00
                LI   $00                 ; 0e68 20 00
                LR   K,P                 ; 0e6a 08
                LR   DC,H                ; 0e6b 10
                LI   $40                 ; 0e6c 20 40
                BT   0,0                 ; 0e6e 80 00
                LIS  $0                  ; 0e70 70
                AM                       ; 0e71 88
                BF   $8,A0e1b            ; 0e72 98 a8
                AS   $8                  ; 0e74 c8
                AM                       ; 0e75 88
                LIS  $0                  ; 0e76 70
                LI   $20                 ; 0e77 20 20
                LI   $20                 ; 0e79 20 20
                LI   $20                 ; 0e7b 20 20
                LI   $70                 ; 0e7d 20 70
                AM                       ; 0e7f 88
                LR   K,P                 ; 0e80 08
                DS   $0                  ; 0e81 30
A0e82:          LR   A,$0                ; 0e82 40
                BT   0,-8                ; 0e83 80 f8
A0e85:          LIS  $0                  ; 0e85 70
                AM                       ; 0e86 88
                LR   K,P                 ; 0e87 08
A0e88:          DS   $0                  ; 0e88 30
                LR   K,P                 ; 0e89 08
                AM                       ; 0e8a 88
                LIS  $0                  ; 0e8b 70
A0e8c:          LR   DC,H                ; 0e8c 10
A0e8d:          DS   $0                  ; 0e8d 30
                LR   $0,A                ; 0e8e 50
A0e8f:          BF   $0,A0e88            ; 0e8f 90 f8
                LR   DC,H                ; 0e91 10
                LR   DC,H                ; 0e92 10
                NS   $8                  ; 0e93 f8
A0e94:          BT   0,A0e85             ; 0e94 80 f0
                LR   K,P                 ; 0e96 08
                LR   K,P                 ; 0e97 08
A0e98:          AM                       ; 0e98 88
                LIS  $0                  ; 0e99 70
                DS   $0                  ; 0e9a 30
                LR   A,$0                ; 0e9b 40
                BT   0,A0e8d             ; 0e9c 80 f0
A0e9e:          AM                       ; 0e9e 88
                AM                       ; 0e9f 88
                LIS  $0                  ; 0ea0 70
                NS   $8                  ; 0ea1 f8
                LR   K,P                 ; 0ea2 08
                LR   DC,H                ; 0ea3 10
                LI   $40                 ; 0ea4 20 40
                BT   0,-128              ; 0ea6 80 80
                LIS  $0                  ; 0ea8 70
                AM                       ; 0ea9 88
                AM                       ; 0eaa 88
                LIS  $0                  ; 0eab 70
                AM                       ; 0eac 88
                AM                       ; 0ead 88
                LIS  $0                  ; 0eae 70
                LIS  $0                  ; 0eaf 70
                AM                       ; 0eb0 88
                AM                       ; 0eb1 88
                LIS  $8                  ; 0eb2 78
                LR   K,P                 ; 0eb3 08
                LR   DC,H                ; 0eb4 10
A0eb5:          LISU 0                   ; 0eb5 60
                LR   A,KU                ; 0eb6 00
A0eb7:          LR   A,KU                ; 0eb7 00
                LI   $00                 ; 0eb8 20 00
                LI   $00                 ; 0eba 20 00
                LR   A,KU                ; 0ebc 00
                LR   A,KU                ; 0ebd 00
                LR   A,KU                ; 0ebe 00
                LI   $00                 ; 0ebf 20 00
                LI   $20                 ; 0ec1 20 20
                LR   A,$0                ; 0ec3 40
                LR   DC,H                ; 0ec4 10
                LI   $40                 ; 0ec5 20 40
                BT   0,64                ; 0ec7 80 40
                LI   $10                 ; 0ec9 20 10                LOOKS LIKE CHARACTER DATA HERE
                LR   A,KU                ; 0ecb 00
                LR   A,KU                ; 0ecc 00
                NS   $8                  ; 0ecd f8
                LR   A,KU                ; 0ece 00
A0ecf:          NS   $8                  ; 0ecf f8
                LR   A,KU                ; 0ed0 00
                LR   A,KU                ; 0ed1 00
                LR   A,$0                ; 0ed2 40
                LI   $10                 ; 0ed3 20 10
A0ed5:          LR   K,P                 ; 0ed5 08
                LR   DC,H                ; 0ed6 10
                LI   $40                 ; 0ed7 20 40
                LIS  $0                  ; 0ed9 70
                AM                       ; 0eda 88
                LR   DC,H                ; 0edb 10
                LI   $20                 ; 0edc 20 20
                LR   A,KU                ; 0ede 00
                LI   $70                 ; 0edf 20 70
                AM                       ; 0ee1 88
                INS  8                   ; 0ee2 a8
                OUTS 8                   ; 0ee3 b8
                OUTS 0                   ; 0ee4 b0
                BT   0,A0f5e             ; 0ee5 80 78
                LIS  $0                  ; 0ee7 70
                AM                       ; 0ee8 88
                AM                       ; 0ee9 88
                NS   $8                  ; 0eea f8
                AM                       ; 0eeb 88  
A0eec:          AM                       ; 0eec 88
                AM                       ; 0eed 88
                NS   $0                  ; 0eee f0
                AM                       ; 0eef 88
                AM                       ; 0ef0 88
                NS   $0                  ; 0ef1 f0
                AM                       ; 0ef2 88
                AM                       ; 0ef3 88
                NS   $0                  ; 0ef4 f0
                LIS  $0                  ; 0ef5 70
                AM                       ; 0ef6 88
                BT   0,-128              ; 0ef7 80 80
                BT   0,A0e82             ; 0ef9 80 88
                LIS  $0                  ; 0efb 70
                NS   $0                  ; 0efc f0
                AM                       ; 0efd 88
                AM                       ; 0efe 88
                AM                       ; 0eff 88
                AM                       ; 0f00 88
                AM                       ; 0f01 88
                NS   $0                  ; 0f02 f0
                NS   $8                  ; 0f03 f8
                BT   0,A0e85             ; 0f04 80 80
                XS   $0                  ; 0f06 e0
                BT   0,A0e88             ; 0f07 80 80
                NS   $8                  ; 0f09 f8
                NS   $8                  ; 0f0a f8
                BT   0,A0e8c             ; 0f0b 80 80
                XS   $0                  ; 0f0d e0
                BT   0,A0e8f             ; 0f0e 80 80
                BT   0,112               ; 0f10 80 70
                AM                       ; 0f12 88
                BT   0,A0e94             ; 0f13 80 80
                BF   $8,A0e9e            ; 0f15 98 88
                LIS  $8                  ; 0f17 78
                AM                       ; 0f18 88
                AM                       ; 0f19 88
                AM                       ; 0f1a 88
                NS   $8                  ; 0f1b f8
                AM                       ; 0f1c 88
                AM                       ; 0f1d 88
                AM                       ; 0f1e 88
                LIS  $0                  ; 0f1f 70
                LI   $20                 ; 0f20 20 20
                LI   $20                 ; 0f22 20 20
                LI   $70                 ; 0f24 20 70
                LIS  $0                  ; 0f26 70
                LR   DC,H                ; 0f27 10
                LR   DC,H                ; 0f28 10
                LR   DC,H                ; 0f29 10
                LR   DC,H                ; 0f2a 10
                LR   $0,A                ; 0f2b 50
                LI   $88                 ; 0f2c 20 88
                BF   $0,A0ecf            ; 0f2e 90 a0
                AS   $0                  ; 0f30 c0
                INS  0                   ; 0f31 a0
                BF   $0,-120             ; 0f32 90 88
                BT   0,A0eb5             ; 0f34 80 80
                BT   0,A0eb7             ; 0f36 80 80
                BT   0,-128              ; 0f38 80 80
                NS   $8                  ; 0f3a f8
                AM                       ; 0f3b 88
                ASD  $8                  ; 0f3c d8
                INS  8                   ; 0f3d a8
                INS  8                   ; 0f3e a8
                AM                       ; 0f3f 88
                AM                       ; 0f40 88
                AM                       ; 0f41 88
                AM                       ; 0f42 88
                AM                       ; 0f43 88
                AS   $8                  ; 0f44 c8
                INS  8                   ; 0f45 a8
                BF   $8,A0ecf            ; 0f46 98 88
                AM                       ; 0f48 88
                NS   $8                  ; 0f49 f8
                AM                       ; 0f4a 88
                AM                       ; 0f4b 88
                AM                       ; 0f4c 88
                AM                       ; 0f4d 88
                AM                       ; 0f4e 88
                NS   $8                  ; 0f4f f8
                NS   $0                  ; 0f50 f0
                AM                       ; 0f51 88
                AM                       ; 0f52 88
                NS   $0                  ; 0f53 f0
                BT   0,A0ed5             ; 0f54 80 80
                BT   0,A0fc7             ; 0f56 80 70
                AM                       ; 0f58 88
                AM                       ; 0f59 88
                AM                       ; 0f5a 88
                INS  8                   ; 0f5b a8
                BF   $8,A0fd5            ; 0f5c 98 78
A0f5e:          NS   $0                  ; 0f5e f0
                AM                       ; 0f5f 88
                AM                       ; 0f60 88
                NS   $0                  ; 0f61 f0
                INS  0                   ; 0f62 a0
                BF   $0,A0eec            ; 0f63 90 88
                LIS  $0                  ; 0f65 70
                AM                       ; 0f66 88
                BT   0,A0fd8             ; 0f67 80 70
                LR   K,P                 ; 0f69 08
                AM                       ; 0f6a 88
                LIS  $0                  ; 0f6b 70
                NS   $8                  ; 0f6c f8
                LI   $20                 ; 0f6d 20 20
                LI   $20                 ; 0f6f 20 20
                LI   $20                 ; 0f71 20 20
                AM                       ; 0f73 88
                AM                       ; 0f74 88
                AM                       ; 0f75 88
                AM                       ; 0f76 88
                AM                       ; 0f77 88
                AM                       ; 0f78 88
                LIS  $0                  ; 0f79 70
                AM                       ; 0f7a 88
                AM                       ; 0f7b 88
                AM                       ; 0f7c 88
                AM                       ; 0f7d 88
                AM                       ; 0f7e 88
                LR   $0,A                ; 0f7f 50
                LI   $88                 ; 0f80 20 88
                AM                       ; 0f82 88
                AM                       ; 0f83 88
                AM                       ; 0f84 88
                INS  8                   ; 0f85 a8
                INS  8                   ; 0f86 a8
                LR   $0,A                ; 0f87 50
                AM                       ; 0f88 88
                LIS  $0                  ; 0f89 70
                AM                       ; 0f8a 88
                NS   $8                  ; 0f8b f8
                AM                       ; 0f8c 88
                AM                       ; 0f8d 88
                AM                       ; 0f8e 88
                AM                       ; 0f8f 88
                LIS  $0                  ; 0f90 70
                AM                       ; 0f91 88
                AM                       ; 0f92 88
                AM                       ; 0f93 88
                AM                       ; 0f94 88
                LIS  $0                  ; 0f95 70
                AM                       ; 0f96 88
                LR   A,KU                ; 0f97 00
                AM                       ; 0f98 88
                AM                       ; 0f99 88
                AM                       ; 0f9a 88
                AM                       ; 0f9b 88
                LIS  $0                  ; 0f9c 70
                AM                       ; 0f9d 88
                AM                       ; 0f9e 88
                AM                       ; 0f9f 88
                LR   $0,A                ; 0fa0 50
                LI   $20                 ; 0fa1 20 20
                LI   $f8                 ; 0fa3 20 f8
                LR   K,P                 ; 0fa5 08
                LR   DC,H                ; 0fa6 10
                LI   $40                 ; 0fa7 20 40
                BT   0,-8                ; 0fa9 80 f8
                AM                       ; 0fab 88
                LIS  $0                  ; 0fac 70
                AM                       ; 0fad 88
                AM                       ; 0fae 88
                AM                       ; 0faf 88
                AM                       ; 0fb0 88
                LIS  $0                  ; 0fb1 70
                NS   $a                  ; 0fb2 fa
                NS   $3                  ; 0fb3 f3

                .byte "ELECTRONIC-"

                .byte   $fe              ; 0fbf fe

                .byte "  PARTN"

A0fc7:          .byte "ER"
                .byte   $fe              ; 0fc9 fe
                .byte   $fe              ; 0fca fe
                .byte   $f2              ; 0fcb f2

                .byte "SERVICE-P"

A0fd5:          .byte "LUS"              ; 0fd5 4c
A0fd8:          .byte   $f1              ; 0fd8 f1
                .byte   $ff              ; 0fd9 ff                 
                .byte   $fa              ; 0fda fa
                .byte   $f3              ; 0fdb f3

                .byte "ELECTRONIC"

                .byte   $fe
                .byte   $fe

                .byte "PARTNER"

                .byte   $fd              ; 0fef fd
                .byte   $fe              ; 0ff0 fe
                .byte   $fe              ; 0ff1 fe

                .byte "GEMEINSCHAFT"

                .byte   $fc              ; 0ffe fc
                .byte   $ff              ; 0fff ff   

A1000:          LI   $d3                 ; 1000 20 d3         Start here when button 2 was pressed
                LR   $3,A                ; 1002 53
                PI   $00d0               ; 1003 28 00 d0
                LI   $d0                 ; 1006 20 d0
                LR   $3,A                ; 1008 53
                PI   $00d0               ; 1009 28 00 d0
                LI   $d6                 ; 100c 20 d6
                LR   $3,A                ; 100e 53
                PI   $00d0               ; 100f 28 00 d0      Three screen clears, different colors.

                LISU 2                   ; 1012 62
                LISL 1                   ; 1013 69
                LI   $10                 ; 1014 20 10
                LR   (IS),A              ; 1016 5c
                LISL 3                   ; 1017 6b
                LIS  $f                  ; 1018 7f
                LR   (IS)+,A             ; 1019 5d
                LI   $b2                 ; 101a 20 b2
                LR   (IS)+,A             ; 101c 5d
                LISL 6                   ; 101d 6e
                LIS  $d                  ; 101e 7d
                LR   (IS)+,A             ; 101f 5d
                LI   $95                 ; 1020 20 95
                LR   (IS),A              ; 1022 5c
                PI   A0abc               ; 1023 28 0a bc
                LI   $31                 ; 1026 20 31
                LR   $2,A                ; 1028 52
                PI   A0c44               ; 1029 28 0c 44
                LI   $d3                 ; 102c 20 d3
                LR   $3,A                ; 102e 53
                PI   $00d0               ; 102f 28 00 d0
                LI   $d0                 ; 1032 20 d0
                LR   $3,A                ; 1034 53
                PI   $00d0               ; 1035 28 00 d0
                LISU 2                   ; 1038 62
                LISL 3                   ; 1039 6b
                LIS  $c                  ; 103a 7c
                LR   (IS)+,A             ; 103b 5d
                LI   $f2                 ; 103c 20 f2
                LR   (IS)+,A             ; 103e 5d
                PI   A0939               ; 103f 28 09 39
                BF   $0,A1000            ; 1042 90 bd
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                NS   $a                  ; 1050 fa
                NS   $1                  ; 1051 f1
                LI   $3e                 ; 1052 20 3e
                DS   (IS)-               ; 1054 3e
                DS   (IS)-               ; 1055 3e
                LI   $f2                 ; 1056 20 f2
                DS   $7                  ; 1058 37
                DS   $0                  ; 1059 30
                DS   $0                  ; 105a 30
                LI   $f1                 ; 105b 20 f1
                DS   (IS)                ; 105d 3c
                DS   (IS)                ; 105e 3c
                DS   (IS)                ; 105f 3c
                NS   (IS)-               ; 1060 fe
                NS   $3                  ; 1061 f3

                .byte " ELECTRONIC-"

                .byte   $fe              ; 106e fe
  
                .byte "   PARTNER"

                .byte   $fe              ; 1079 fe
                .byte   $f1              ; 107a f1

                .byte " BIETEN MEHR"

                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 

                .byte "            UNSER NEUES PARTNERANGEBOT = "
                .byte "HOHE LEISTUNG / GZNSTIGER PREIS            "

                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $fa              ; 1100 fa
                .byte   $f1              ; 1101 f1
                .byte   $3e              ; 1102 3e
                .byte   $f3              ; 1103 f3

                .byte "ELECTRONIC-"

                .byte  $f1               ; 110f f1
                .byte  $3c               ; 1110 3c  "<"
                .byte  $fe               ; 1111 fe
                .byte  $3e               ; 1112 3e  ">"
                .byte  "  "              ; 1113 20 20
                .byte  $f3               ; 1115 f3

                .byte "PARTNER  "
                .byte  $f1               ; 111f f1
                .byte  $3c               ; 1120 3c
                .byte  $fe               ; 1121 fe
                .byte  $f2               ; 1122 f2

                .byte "MIETVORTEILE:"
                .byte  $fc               ; 1130 fc
                .byte  $fe               ; 1131 fe
                .byte  $f1               ; 1132 f1
                .byte " VERGLEICHEN"
                .byte  $fe               ; 113f fe
                .byte "  SIE BITTE!"
                .byte  $fc
                .byte  $f9               ; 114d f9
                .byte  $fb               ; 114e fb
                .byte "OHNE KAPITAL-"
                .byte   $fe              ; 115c fe
                .byte "AUFWAND ... "
                .byte   $fc              ; 1169 fc
                .byte   $f9              ; 116a f9
                .byte   $fb              ; 116b fb
                .byte " SOFORT EIN  "
                .byte   $fe              ; 1179 fe
                .byte "NEUES GERXT"      ; X shown as Ä on screen (A umlaut)
                .byte   $fc              ; 1185 fc
                .byte   $f9              ; 1186 f9
                .byte   $fb              ; 1187 fb
                .byte " REPARATUR-"
                .byte   $fe              ; 1193 fe
                .byte "  KOSTEN.. "
                .byte   $fc
                .byte   $fb              ; 11a0 fb
                .byte   $f9              ; 11a1 f9
                .byte " ENTFALLEN "
                .byte   $fe
                .byte   $20
                .byte   $f2
                .byte "========="
                .byte   $f1              ; 11b9 f1
                .byte   $fb              ; 11ba fb
                .byte   $f9              ; 11bb f9
                .byte   $fc              ; 11bc fc
                .byte "ERSTKLASSIGER"
                .byte   $fe              ; 11ca fe
                .byte "BLIT\SERVICE"     ; \ shown as Z on screen
                .byte   $fc              ; 11d7 fc

                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
A1200:          .byte   $ff                 
                NS   (IS)                ; 1201 fc
                LIS  $c                  ; 1202 7c
                DS   (IS)                ; 1203 3c
                POP                      ; 1204 1c
                LR   A,KU                ; 1205 00
                NS   (IS)                ; 1206 fc
                NS   (IS)                ; 1207 fc
                NS   (IS)                ; 1208 fc
                NS   (IS)                ; 1209 fc
                NS   (IS)                ; 120a fc
                LIS  $8                  ; 120b 78
                NS   (IS)                ; 120c fc
                NS   (IS)                ; 120d fc
                NS   $8                  ; 120e f8
                NS   $0                  ; 120f f0
                XS   $0                  ; 1210 e0
                LR   A,KU                ; 1211 00
A1212:          LR   A,KU                ; 1212 00
                LR   A,KU                ; 1213 00
                LR   A,KU                ; 1214 00
                LR   A,KU                ; 1215 00
                AS   $0                  ; 1216 c0
                LR   A,$0                ; 1217 40
                LR   A,KU                ; 1218 00
                LR   A,KU                ; 1219 00
                LR   A,$0                ; 121a 40
                DS   $0                  ; 121b 30
                COM                      ; 121c 18
                COM                      ; 121d 18
                LR   A,KU                ; 121e 00
                LR   A,KU                ; 121f 00
                LR   A,KU                ; 1220 00
                LR   A,KU                ; 1221 00
                LR   A,KU                ; 1222 00
                XS   $0                  ; 1223 e0
                AI   $64                 ; 1224 24 64
                AS   (IS)                ; 1226 cc
                AS   (IS)                ; 1227 cc
                LIS  $c                  ; 1228 7c
                DS   (IS)                ; 1229 3c
                OUTS 0                   ; 122a b0
                OUTS 0                   ; 122b b0
A122c:          DS   $0                  ; 122c 30
                DS   $4                  ; 122d 34
                XS   (IS)                ; 122e ec
                XS   (IS)                ; 122f ec
                LISL 0                   ; 1230 68
                LISL 4                   ; 1231 6c
                AS   (IS)                ; 1232 cc
                BF   $c,A122c            ; 1233 9c f8
                NS   $0                  ; 1235 f0
A1236:          LR   A,KU                ; 1236 00
                LR   A,KU                ; 1237 00
                LR   A,KU                ; 1238 00
                LR   A,KU                ; 1239 00
                LR   A,KU                ; 123a 00
                LR   A,KU                ; 123b 00
                LISU 0                   ; 123c 60
                LR   A,$0                ; 123d 40
                LR   A,(IS)              ; 123e 4c
                LR   A,(IS)              ; 123f 4c
                LR   A,$0                ; 1240 40
                NS   (IS)                ; 1241 fc
                PK                       ; 1242 0c
                PK                       ; 1243 0c
                PK                       ; 1244 0c
                PK                       ; 1245 0c
                SR   4                   ; 1246 14
                AI   $14                 ; 1247 24 14
                LR   KU,A                ; 1249 04
                LR   KU,A                ; 124a 04
                LR   A,$0                ; 124b 40
                LR   A,(IS)              ; 124c 4c
                LR   A,(IS)              ; 124d 4c
                LR   A,$0                ; 124e 40
                NS   (IS)                ; 124f fc
                PK                       ; 1250 0c
                PK                       ; 1251 0c
                PK                       ; 1252 0c
                PK                       ; 1253 0c
                LR   K,P                 ; 1254 08
                COM                      ; 1255 18
                PK                       ; 1256 0c
                LR   K,P                 ; 1257 08
                LR   K,P                 ; 1258 08
A1259:          LIS  $f                  ; 1259 7f
                LIS  $f                  ; 125a 7f
                LISU 6                   ; 125b 66
                LISU 6                   ; 125c 66
                NS   $7                  ; 125d f7
                NS   $7                  ; 125e f7
                LR   QL,A                ; 125f 07
                LR   DC,Q                ; 1260 0f
                NS   (IS)-               ; 1261 fe
                NS   (IS)-               ; 1262 fe
                LISU 6                   ; 1263 66
                LISU 6                   ; 1264 66
                .byte   $ef                 
                .byte   $ef                 
                XS   $0                  ; 1267 e0
                NS   $0                  ; 1268 f0
                LR   DC,Q                ; 1269 0f
                INC                      ; 126a 1f
                .byte   $3f                 
                .byte   $3f                 
                LR   A,KU                ; 126d 00
                LR   A,KU                ; 126e 00
                LR   A,KU                ; 126f 00
                LR   A,KU                ; 1270 00
                NS   $0                  ; 1271 f0
                NS   $8                  ; 1272 f8
                NS   (IS)                ; 1273 fc
                NS   (IS)                ; 1274 fc
                LR   A,KU                ; 1275 00
                LR   A,KU                ; 1276 00
                LR   A,KU                ; 1277 00
                LR   A,KU                ; 1278 00
                NS   $3                  ; 1279 f3
                LR   A,$5                ; 127a 45
                LR   A,(IS)              ; 127b 4c
                LR   A,$5                ; 127c 45
                LR   A,$3                ; 127d 43
                LR   $4,A                ; 127e 54
                LR   $2,A                ; 127f 52
                .byte   $4f                 
                LR   A,(IS)-             ; 1281 4e
                LR   A,$9                ; 1282 49
                LR   A,$3                ; 1283 43
                NS   (IS)-               ; 1284 fe
                LR   $0,A                ; 1285 50
                LR   A,$1                ; 1286 41
                LR   $2,A                ; 1287 52
                LR   $4,A                ; 1288 54
                LR   A,(IS)-             ; 1289 4e
                LR   A,$5                ; 128a 45
                LR   $2,A                ; 128b 52
                .byte   $ff                 
                NS   $a                  ; 128d fa
                NS   $2                  ; 128e f2
                .byte   $4f                 
                LR   A,(IS)              ; 1290 4c
                LR   $b,A                ; 1291 5b
                LR   A,(IS)+             ; 1292 4d
                LR   $0,A                ; 1293 50
                LR   A,$9                ; 1294 49
                LR   A,$1                ; 1295 41
                NS   (IS)-               ; 1296 fe
                LI   $31                 ; 1297 20 31
                DS   $9                  ; 1299 39
                DS   $8                  ; 129a 38
                DS   $0                  ; 129b 30
                NS   (IS)                ; 129c fc
                .byte   $ff                 
                NS   $a                  ; 129e fa
                NS   $1                  ; 129f f1
                NS   (IS)-               ; 12a0 fe
                LI   $20                 ; 12a1 20 20
                LR   A,(IS)-             ; 12a3 4e
                LR   A,$9                ; 12a4 49
                LR   A,$3                ; 12a5 43
                LR   A,$8                ; 12a6 48
                LR   $4,A                ; 12a7 54
                NS   (IS)-               ; 12a8 fe
                LR   $6,A                ; 12a9 56
                LR   A,$5                ; 12aa 45
                LR   $2,A                ; 12ab 52
                LR   $0,A                ; 12ac 50
                LR   A,$1                ; 12ad 41
                LR   $3,A                ; 12ae 53
                LR   $3,A                ; 12af 53
                LR   A,$5                ; 12b0 45
                LR   A,(IS)-             ; 12b1 4e
                NS   (IS)                ; 12b2 fc
                NS   $a                  ; 12b3 fa
                NS   $2                  ; 12b4 f2
                LR   A,(IS)+             ; 12b5 4d
                LR   A,$9                ; 12b6 49
                LR   $4,A                ; 12b7 54
                LI   $44                 ; 12b8 20 44
                LR   A,$5                ; 12ba 45
                LR   A,(IS)+             ; 12bb 4d
                NS   (IS)-               ; 12bc fe
                NS   $2                  ; 12bd f2
                LR   A,$5                ; 12be 45
                LR   A,$9                ; 12bf 49
                LR   A,$7                ; 12c0 47
                LR   A,$5                ; 12c1 45
                LR   A,(IS)-             ; 12c2 4e
                LR   A,$5                ; 12c3 45
                LR   A,(IS)-             ; 12c4 4e
                NS   (IS)-               ; 12c5 fe
                NS   $1                  ; 12c6 f1
                LR   $6,A                ; 12c7 56
                LR   A,$9                ; 12c8 49
                LR   A,$4                ; 12c9 44
                LR   A,$5                ; 12ca 45
                .byte   $4f                 
                LR   A,$7                ; 12cc 47
                LR   A,$5                ; 12cd 45
                LR   $2,A                ; 12ce 52
                LR   $8,A                ; 12cf 58
                LR   $4,A                ; 12d0 54
                NS   (IS)                ; 12d1 fc
                NS   $a                  ; 12d2 fa
                NS   $1                  ; 12d3 f1
                LR   $6,A                ; 12d4 56
                .byte   $4f                 
                LR   A,(IS)-             ; 12d6 4e
                LI   $44                 ; 12d7 20 44
                LR   A,$5                ; 12d9 45
                LR   A,(IS)-             ; 12da 4e
                NS   (IS)-               ; 12db fe
                LR   $6,A                ; 12dc 56
                LR   A,$9                ; 12dd 49
                LR   A,$4                ; 12de 44
                LR   A,$5                ; 12df 45
                .byte   $4f                 
                .byte   $2d                 
                LI   $fe                 ; 12e2 20 fe
                LR   $3,A                ; 12e4 53
                LR   $0,A                ; 12e5 50
                LR   A,$5                ; 12e6 45
                LR   (IS),A              ; 12e7 5c
                LR   A,$9                ; 12e8 49
                LR   A,$1                ; 12e9 41
                LR   A,(IS)              ; 12ea 4c
                LR   A,$9                ; 12eb 49
                LR   $3,A                ; 12ec 53
                LR   $4,A                ; 12ed 54
                LR   A,$5                ; 12ee 45
                LR   A,(IS)-             ; 12ef 4e
                NS   (IS)                ; 12f0 fc
                .byte   $ff                 
                NS   $a                  ; 12f2 fa
                NS   $1                  ; 12f3 f1
                LI   $20                 ; 12f4 20 20
                LI   $20                 ; 12f6 20 20
                LI   $20                 ; 12f8 20 20
                LR   A,$1                ; 12fa 41
                LR   A,(IS)-             ; 12fb 4e
                LR   $2,A                ; 12fc 52
                LR   $5,A                ; 12fd 55
                LR   A,$6                ; 12fe 46
                NS   (IS)-               ; 12ff fe
                LI   $ff                 ; 1300 20 ff
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
A1400:          LI   $d3                 ; 1400 20 d3
                LR   $3,A                ; 1402 53
                PI   $00d0               ; 1403 28 00 d0
                LI   $d0                 ; 1406 20 d0
                LR   $3,A                ; 1408 53
                PI   $00d0               ; 1409 28 00 d0
                LI   $d6                 ; 140c 20 d6
                LR   $3,A                ; 140e 53
                PI   $00d0               ; 140f 28 00 d0
                LISU 2                   ; 1412 62
                LISL 1                   ; 1413 69
                LI   $10                 ; 1414 20 10
                LR   (IS),A              ; 1416 5c
                LISL 3                   ; 1417 6b
                LIS  $f                  ; 1418 7f
                LR   (IS)+,A             ; 1419 5d
                LI   $b2                 ; 141a 20 b2
                LR   (IS)+,A             ; 141c 5d
                LISL 6                   ; 141d 6e
                LIS  $d                  ; 141e 7d
                LR   (IS)+,A             ; 141f 5d
                LI   $95                 ; 1420 20 95
                LR   (IS),A              ; 1422 5c
                PI   A0abc               ; 1423 28 0a bc
                LI   $31                 ; 1426 20 31
                LR   $2,A                ; 1428 52
                PI   A0c44               ; 1429 28 0c 44
                LI   $d3                 ; 142c 20 d3
                LR   $3,A                ; 142e 53
                PI   $00d0               ; 142f 28 00 d0
                LI   $d0                 ; 1432 20 d0
                LR   $3,A                ; 1434 53
                PI   $00d0               ; 1435 28 00 d0
                LISU 2                   ; 1438 62
                LISL 3                   ; 1439 6b
                LIS  $c                  ; 143a 7c
                LR   (IS)+,A             ; 143b 5d
                LI   $f2                 ; 143c 20 f2
                LR   (IS)+,A             ; 143e 5d
                PI   A0939               ; 143f 28 09 39
                BF   $0,A1400            ; 1442 90 bd
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                NS   $a                  ; 1450 fa
                NS   $1                  ; 1451 f1
                LI   $3e                 ; 1452 20 3e
                DS   (IS)-               ; 1454 3e
                DS   (IS)-               ; 1455 3e
                LI   $f2                 ; 1456 20 f2
                DS   $7                  ; 1458 37
                DS   $0                  ; 1459 30
                DS   $0                  ; 145a 30
                LI   $f1                 ; 145b 20 f1
                DS   (IS)                ; 145d 3c
                DS   (IS)                ; 145e 3c
                DS   (IS)                ; 145f 3c
                NS   (IS)-               ; 1460 fe
                NS   $3                  ; 1461 f3
                LI   $45                 ; 1462 20 45
                LR   A,(IS)              ; 1464 4c
                LR   A,$5                ; 1465 45
                LR   A,$3                ; 1466 43
                LR   $4,A                ; 1467 54
                LR   $2,A                ; 1468 52
                .byte   $4f                 
                LR   A,(IS)-             ; 146a 4e
                LR   A,$9                ; 146b 49
                LR   A,$3                ; 146c 43
                .byte   $2d                 
                NS   (IS)-               ; 146e fe
                LI   $20                 ; 146f 20 20
                LI   $50                 ; 1471 20 50
                LR   A,$1                ; 1473 41
                LR   $2,A                ; 1474 52
                LR   $4,A                ; 1475 54
                LR   A,(IS)-             ; 1476 4e
                LR   A,$5                ; 1477 45
                LR   $2,A                ; 1478 52
                NS   (IS)-               ; 1479 fe
                NS   $1                  ; 147a f1
                LI   $42                 ; 147b 20 42
                LR   A,$9                ; 147d 49
                LR   A,$5                ; 147e 45
                LR   $4,A                ; 147f 54
                LR   A,$5                ; 1480 45
                LR   A,(IS)-             ; 1481 4e
                LI   $4d                 ; 1482 20 4d
                LR   A,$5                ; 1484 45
                LR   A,$8                ; 1485 48
                LR   $2,A                ; 1486 52
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                LI   $20                 ; 1490 20 20
                LI   $20                 ; 1492 20 20
                LI   $20                 ; 1494 20 20
                LI   $20                 ; 1496 20 20
                LI   $20                 ; 1498 20 20
                LI   $20                 ; 149a 20 20
                LR   $5,A                ; 149c 55
                LR   A,(IS)-             ; 149d 4e
                LR   $3,A                ; 149e 53
                LR   A,$5                ; 149f 45
                LR   $2,A                ; 14a0 52
                LI   $4e                 ; 14a1 20 4e
                LR   A,$5                ; 14a3 45
                LR   $5,A                ; 14a4 55
                LR   A,$5                ; 14a5 45
                LR   $3,A                ; 14a6 53
                LI   $50                 ; 14a7 20 50
                LR   A,$1                ; 14a9 41
                LR   $2,A                ; 14aa 52
                LR   $4,A                ; 14ab 54
                LR   A,(IS)-             ; 14ac 4e
                LR   A,$5                ; 14ad 45
                LR   $2,A                ; 14ae 52
                LR   A,$1                ; 14af 41
                LR   A,(IS)-             ; 14b0 4e
                LR   A,$7                ; 14b1 47
                LR   A,$5                ; 14b2 45
                LR   A,$2                ; 14b3 42
                .byte   $4f                 
                LR   $4,A                ; 14b5 54
                LI   $3d                 ; 14b6 20 3d
                LI   $48                 ; 14b8 20 48
                .byte   $4f                 
                LR   A,$8                ; 14bb 48
                LR   A,$5                ; 14bc 45
                LI   $4c                 ; 14bd 20 4c
                LR   A,$5                ; 14bf 45
                LR   A,$9                ; 14c0 49
                LR   $3,A                ; 14c1 53
                LR   $4,A                ; 14c2 54
                LR   $5,A                ; 14c3 55
                LR   A,(IS)-             ; 14c4 4e
                LR   A,$7                ; 14c5 47
                LI   $2f                 ; 14c6 20 2f
                LI   $47                 ; 14c8 20 47
                LR   $a,A                ; 14ca 5a
                LR   A,(IS)-             ; 14cb 4e
                LR   $3,A                ; 14cc 53
                LR   $4,A                ; 14cd 54
                LR   A,$9                ; 14ce 49
                LR   A,$7                ; 14cf 47
                LR   A,$5                ; 14d0 45
                LR   $2,A                ; 14d1 52
                LI   $50                 ; 14d2 20 50
                LR   $2,A                ; 14d4 52
                LR   A,$5                ; 14d5 45
                LR   A,$9                ; 14d6 49
                LR   $3,A                ; 14d7 53
                LI   $20                 ; 14d8 20 20
                LI   $20                 ; 14da 20 20
                LI   $20                 ; 14dc 20 20
                LI   $20                 ; 14de 20 20
                LI   $20                 ; 14e0 20 20
                LI   $20                 ; 14e2 20 20
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                NS   $a                  ; 1500 fa
                NS   $1                  ; 1501 f1
                DS   (IS)-               ; 1502 3e
                NS   $3                  ; 1503 f3
                LR   A,$5                ; 1504 45
                LR   A,(IS)              ; 1505 4c
                LR   A,$5                ; 1506 45
                LR   A,$3                ; 1507 43
                LR   $4,A                ; 1508 54
                LR   $2,A                ; 1509 52
                .byte   $4f                 
                LR   A,(IS)-             ; 150b 4e
                LR   A,$9                ; 150c 49
                LR   A,$3                ; 150d 43
                .byte   $2d                 
                NS   $1                  ; 150f f1
                DS   (IS)                ; 1510 3c
                NS   (IS)-               ; 1511 fe
                DS   (IS)-               ; 1512 3e
                LI   $20                 ; 1513 20 20
                NS   $3                  ; 1515 f3
                LR   $0,A                ; 1516 50
                LR   A,$1                ; 1517 41
                LR   $2,A                ; 1518 52
                LR   $4,A                ; 1519 54
                LR   A,(IS)-             ; 151a 4e
                LR   A,$5                ; 151b 45
                LR   $2,A                ; 151c 52
                LI   $20                 ; 151d 20 20
                NS   $1                  ; 151f f1
                DS   (IS)                ; 1520 3c
                NS   (IS)-               ; 1521 fe
                NS   $2                  ; 1522 f2
                LR   A,(IS)+             ; 1523 4d
                LR   A,$9                ; 1524 49
                LR   A,$5                ; 1525 45
                LR   $4,A                ; 1526 54
                LR   $6,A                ; 1527 56
                .byte   $4f                 
                LR   $2,A                ; 1529 52
                LR   $4,A                ; 152a 54
                LR   A,$5                ; 152b 45
                LR   A,$9                ; 152c 49
                LR   A,(IS)              ; 152d 4c
                LR   A,$5                ; 152e 45
                DS   $a                  ; 152f 3a
                NS   (IS)                ; 1530 fc
                NS   (IS)-               ; 1531 fe
                NS   $1                  ; 1532 f1
                LI   $56                 ; 1533 20 56
                LR   A,$5                ; 1535 45
                LR   $2,A                ; 1536 52
                LR   A,$7                ; 1537 47
                LR   A,(IS)              ; 1538 4c
                LR   A,$5                ; 1539 45
                LR   A,$9                ; 153a 49
                LR   A,$3                ; 153b 43
                LR   A,$8                ; 153c 48
                LR   A,$5                ; 153d 45
                LR   A,(IS)-             ; 153e 4e
                NS   (IS)-               ; 153f fe
                LI   $20                 ; 1540 20 20
                LR   $3,A                ; 1542 53
                LR   A,$9                ; 1543 49
                LR   A,$5                ; 1544 45
                LI   $42                 ; 1545 20 42
                LR   A,$9                ; 1547 49
                LR   $4,A                ; 1548 54
                LR   $4,A                ; 1549 54
                LR   A,$5                ; 154a 45
                NI   $fc                 ; 154b 21 fc
                NS   $9                  ; 154d f9
                NS   $b                  ; 154e fb
                .byte   $4f                 
                LR   A,$8                ; 1550 48
                LR   A,(IS)-             ; 1551 4e
                LR   A,$5                ; 1552 45
                LI   $4b                 ; 1553 20 4b
                LR   A,$1                ; 1555 41
                LR   $0,A                ; 1556 50
                LR   A,$9                ; 1557 49
                LR   $4,A                ; 1558 54
                LR   A,$1                ; 1559 41
                LR   A,(IS)              ; 155a 4c
                .byte   $2d                 
                NS   (IS)-               ; 155c fe
                LR   A,$1                ; 155d 41
                LR   $5,A                ; 155e 55
                LR   A,$6                ; 155f 46
                LR   $7,A                ; 1560 57
                LR   A,$1                ; 1561 41
                LR   A,(IS)-             ; 1562 4e
                LR   A,$4                ; 1563 44
                LI   $2e                 ; 1564 20 2e
                .byte   $2e                 
                .byte   $2e                 
                LI   $fc                 ; 1568 20 fc
                NS   $9                  ; 156a f9
                NS   $b                  ; 156b fb
                LI   $53                 ; 156c 20 53
                .byte   $4f                 
                LR   A,$6                ; 156f 46
                .byte   $4f                 
                LR   $2,A                ; 1571 52
                LR   $4,A                ; 1572 54
                LI   $45                 ; 1573 20 45
                LR   A,$9                ; 1575 49
                LR   A,(IS)-             ; 1576 4e
                LI   $20                 ; 1577 20 20
                NS   (IS)-               ; 1579 fe
                LR   A,(IS)-             ; 157a 4e
                LR   A,$5                ; 157b 45
                LR   $5,A                ; 157c 55
                LR   A,$5                ; 157d 45
                LR   $3,A                ; 157e 53
                LI   $47                 ; 157f 20 47
                LR   A,$5                ; 1581 45
                LR   $2,A                ; 1582 52
                LR   $8,A                ; 1583 58
                LR   $4,A                ; 1584 54
                NS   (IS)                ; 1585 fc
                NS   $9                  ; 1586 f9
                NS   $b                  ; 1587 fb
                LI   $52                 ; 1588 20 52
                LR   A,$5                ; 158a 45
                LR   $0,A                ; 158b 50
                LR   A,$1                ; 158c 41
                LR   $2,A                ; 158d 52
                LR   A,$1                ; 158e 41
                LR   $4,A                ; 158f 54
                LR   $5,A                ; 1590 55
                LR   $2,A                ; 1591 52
                .byte   $2d                 
                NS   (IS)-               ; 1593 fe
                LI   $20                 ; 1594 20 20
                LR   A,$b                ; 1596 4b
                .byte   $4f                 
                LR   $3,A                ; 1598 53
                LR   $4,A                ; 1599 54
                LR   A,$5                ; 159a 45
                LR   A,(IS)-             ; 159b 4e
                .byte   $2e                 
                .byte   $2e                 
                LI   $fc                 ; 159e 20 fc
                NS   $b                  ; 15a0 fb
                NS   $9                  ; 15a1 f9
                LI   $45                 ; 15a2 20 45
                LR   A,(IS)-             ; 15a4 4e
                LR   $4,A                ; 15a5 54
                LR   A,$6                ; 15a6 46
                LR   A,$1                ; 15a7 41
                LR   A,(IS)              ; 15a8 4c
                LR   A,(IS)              ; 15a9 4c
                LR   A,$5                ; 15aa 45
                LR   A,(IS)-             ; 15ab 4e
                LI   $fe                 ; 15ac 20 fe
                LI   $f2                 ; 15ae 20 f2
                DS   (IS)+               ; 15b0 3d
                DS   (IS)+               ; 15b1 3d
                DS   (IS)+               ; 15b2 3d
                DS   (IS)+               ; 15b3 3d
                DS   (IS)+               ; 15b4 3d
                DS   (IS)+               ; 15b5 3d
                DS   (IS)+               ; 15b6 3d
                DS   (IS)+               ; 15b7 3d
                DS   (IS)+               ; 15b8 3d
                NS   $1                  ; 15b9 f1
                NS   $b                  ; 15ba fb
                NS   $9                  ; 15bb f9
                NS   (IS)                ; 15bc fc
                LR   A,$5                ; 15bd 45
                LR   $2,A                ; 15be 52
                LR   $3,A                ; 15bf 53
                LR   $4,A                ; 15c0 54
                LR   A,$b                ; 15c1 4b
                LR   A,(IS)              ; 15c2 4c
                LR   A,$1                ; 15c3 41
                LR   $3,A                ; 15c4 53
                LR   $3,A                ; 15c5 53
                LR   A,$9                ; 15c6 49
                LR   A,$7                ; 15c7 47
                LR   A,$5                ; 15c8 45
                LR   $2,A                ; 15c9 52
                NS   (IS)-               ; 15ca fe
                LR   A,$2                ; 15cb 42
                LR   A,(IS)              ; 15cc 4c
                LR   A,$9                ; 15cd 49
                LR   $4,A                ; 15ce 54
                LR   (IS),A              ; 15cf 5c
                LR   $3,A                ; 15d0 53
                LR   A,$5                ; 15d1 45
                LR   $2,A                ; 15d2 52
                LR   $6,A                ; 15d3 56
                LR   A,$9                ; 15d4 49
                LR   A,$3                ; 15d5 43
                LR   A,$5                ; 15d6 45
                NS   (IS)                ; 15d7 fc
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                NS   (IS)                ; 1601 fc
                LIS  $c                  ; 1602 7c
                DS   (IS)                ; 1603 3c
                POP                      ; 1604 1c
                LR   A,KU                ; 1605 00
                NS   (IS)                ; 1606 fc
                NS   (IS)                ; 1607 fc
                NS   (IS)                ; 1608 fc
                NS   (IS)                ; 1609 fc
                NS   (IS)                ; 160a fc
                LIS  $8                  ; 160b 78
                NS   (IS)                ; 160c fc
                NS   (IS)                ; 160d fc
                NS   $8                  ; 160e f8
                NS   $0                  ; 160f f0
                XS   $0                  ; 1610 e0
                LR   A,KU                ; 1611 00
                LR   A,KU                ; 1612 00
                LR   A,KU                ; 1613 00
                LR   A,KU                ; 1614 00
                LR   A,KU                ; 1615 00
                AS   $0                  ; 1616 c0
                LR   A,$0                ; 1617 40
                LR   A,KU                ; 1618 00
                LR   A,KU                ; 1619 00
                LR   A,$0                ; 161a 40
                DS   $0                  ; 161b 30
                COM                      ; 161c 18
                COM                      ; 161d 18
                LR   A,KU                ; 161e 00
                LR   A,KU                ; 161f 00
                LR   A,KU                ; 1620 00
                LR   A,KU                ; 1621 00
                LR   A,KU                ; 1622 00
                XS   $0                  ; 1623 e0
                AI   $64                 ; 1624 24 64
                AS   (IS)                ; 1626 cc
                AS   (IS)                ; 1627 cc
                LIS  $c                  ; 1628 7c
                DS   (IS)                ; 1629 3c
                OUTS 0                   ; 162a b0
                OUTS 0                   ; 162b b0
A162c:          DS   $0                  ; 162c 30
                DS   $4                  ; 162d 34
                XS   (IS)                ; 162e ec
                XS   (IS)                ; 162f ec
                LISL 0                   ; 1630 68
                LISL 4                   ; 1631 6c
                AS   (IS)                ; 1632 cc
                BF   $c,A162c            ; 1633 9c f8
                NS   $0                  ; 1635 f0
                LR   A,KU                ; 1636 00
                LR   A,KU                ; 1637 00
                LR   A,KU                ; 1638 00
                LR   A,KU                ; 1639 00
                LR   A,KU                ; 163a 00
                LR   A,KU                ; 163b 00
                LISU 0                   ; 163c 60
                LR   A,$0                ; 163d 40
                LR   A,(IS)              ; 163e 4c
                LR   A,(IS)              ; 163f 4c
                LR   A,$0                ; 1640 40
                NS   (IS)                ; 1641 fc
                PK                       ; 1642 0c
                PK                       ; 1643 0c
                PK                       ; 1644 0c
                PK                       ; 1645 0c
                SR   4                   ; 1646 14
                AI   $14                 ; 1647 24 14
                LR   KU,A                ; 1649 04
                LR   KU,A                ; 164a 04
                LR   A,$0                ; 164b 40
                LR   A,(IS)              ; 164c 4c
                LR   A,(IS)              ; 164d 4c
                LR   A,$0                ; 164e 40
                NS   (IS)                ; 164f fc
                PK                       ; 1650 0c
                PK                       ; 1651 0c
                PK                       ; 1652 0c
                PK                       ; 1653 0c
                LR   K,P                 ; 1654 08
                COM                      ; 1655 18
                PK                       ; 1656 0c
                LR   K,P                 ; 1657 08
                LR   K,P                 ; 1658 08
                LIS  $f                  ; 1659 7f
                LIS  $f                  ; 165a 7f
                LISU 6                   ; 165b 66
                LISU 6                   ; 165c 66
                NS   $7                  ; 165d f7
                NS   $7                  ; 165e f7
                LR   QL,A                ; 165f 07
                LR   DC,Q                ; 1660 0f
                NS   (IS)-               ; 1661 fe
                NS   (IS)-               ; 1662 fe
                LISU 6                   ; 1663 66
                LISU 6                   ; 1664 66
                .byte   $ef                 
                .byte   $ef                 
                XS   $0                  ; 1667 e0
                NS   $0                  ; 1668 f0
                LR   DC,Q                ; 1669 0f
                INC                      ; 166a 1f
                .byte   $3f                 
                .byte   $3f                 
                LR   A,KU                ; 166d 00
                LR   A,KU                ; 166e 00
                LR   A,KU                ; 166f 00
                LR   A,KU                ; 1670 00
                NS   $0                  ; 1671 f0
                NS   $8                  ; 1672 f8
                NS   (IS)                ; 1673 fc
                NS   (IS)                ; 1674 fc
                LR   A,KU                ; 1675 00
                LR   A,KU                ; 1676 00
                LR   A,KU                ; 1677 00
                LR   A,KU                ; 1678 00
                NS   $3                  ; 1679 f3
                LR   A,$5                ; 167a 45
                LR   A,(IS)              ; 167b 4c
                LR   A,$5                ; 167c 45
                LR   A,$3                ; 167d 43
                LR   $4,A                ; 167e 54
                LR   $2,A                ; 167f 52
                .byte   $4f                 
                LR   A,(IS)-             ; 1681 4e
                LR   A,$9                ; 1682 49
                LR   A,$3                ; 1683 43
                NS   (IS)-               ; 1684 fe
                LR   $0,A                ; 1685 50
                LR   A,$1                ; 1686 41
                LR   $2,A                ; 1687 52
                LR   $4,A                ; 1688 54
                LR   A,(IS)-             ; 1689 4e
                LR   A,$5                ; 168a 45
                LR   $2,A                ; 168b 52
                .byte   $ff                 
                NS   $a                  ; 168d fa
                NS   $2                  ; 168e f2
                .byte   $4f                 
                LR   A,(IS)              ; 1690 4c
                LR   $b,A                ; 1691 5b
                LR   A,(IS)+             ; 1692 4d
                LR   $0,A                ; 1693 50
                LR   A,$9                ; 1694 49
                LR   A,$1                ; 1695 41
                NS   (IS)-               ; 1696 fe
                LI   $31                 ; 1697 20 31
                DS   $9                  ; 1699 39
                DS   $8                  ; 169a 38
                DS   $0                  ; 169b 30
                NS   (IS)                ; 169c fc
                .byte   $ff                 
                NS   $a                  ; 169e fa
                NS   $1                  ; 169f f1
                NS   (IS)-               ; 16a0 fe
                LI   $20                 ; 16a1 20 20
                LR   A,(IS)-             ; 16a3 4e
                LR   A,$9                ; 16a4 49
                LR   A,$3                ; 16a5 43
                LR   A,$8                ; 16a6 48
                LR   $4,A                ; 16a7 54
                NS   (IS)-               ; 16a8 fe
                LR   $6,A                ; 16a9 56
                LR   A,$5                ; 16aa 45
                LR   $2,A                ; 16ab 52
                LR   $0,A                ; 16ac 50
                LR   A,$1                ; 16ad 41
                LR   $3,A                ; 16ae 53
                LR   $3,A                ; 16af 53
                LR   A,$5                ; 16b0 45
                LR   A,(IS)-             ; 16b1 4e
                NS   (IS)                ; 16b2 fc
                NS   $a                  ; 16b3 fa
                NS   $2                  ; 16b4 f2
                LR   A,(IS)+             ; 16b5 4d
                LR   A,$9                ; 16b6 49
                LR   $4,A                ; 16b7 54
                LI   $44                 ; 16b8 20 44
                LR   A,$5                ; 16ba 45
                LR   A,(IS)+             ; 16bb 4d
                NS   (IS)-               ; 16bc fe
                NS   $2                  ; 16bd f2
                LR   A,$5                ; 16be 45
                LR   A,$9                ; 16bf 49
                LR   A,$7                ; 16c0 47
                LR   A,$5                ; 16c1 45
                LR   A,(IS)-             ; 16c2 4e
                LR   A,$5                ; 16c3 45
                LR   A,(IS)-             ; 16c4 4e
                NS   (IS)-               ; 16c5 fe
                NS   $1                  ; 16c6 f1
                LR   $6,A                ; 16c7 56
                LR   A,$9                ; 16c8 49
                LR   A,$4                ; 16c9 44
                LR   A,$5                ; 16ca 45
                .byte   $4f                 
                LR   A,$7                ; 16cc 47
                LR   A,$5                ; 16cd 45
                LR   $2,A                ; 16ce 52
                LR   $8,A                ; 16cf 58
                LR   $4,A                ; 16d0 54
                NS   (IS)                ; 16d1 fc
                NS   $a                  ; 16d2 fa
                NS   $1                  ; 16d3 f1
                LR   $6,A                ; 16d4 56
                .byte   $4f                 
                LR   A,(IS)-             ; 16d6 4e
                LI   $44                 ; 16d7 20 44
                LR   A,$5                ; 16d9 45
                LR   A,(IS)-             ; 16da 4e
                NS   (IS)-               ; 16db fe
                LR   $6,A                ; 16dc 56
                LR   A,$9                ; 16dd 49
                LR   A,$4                ; 16de 44
                LR   A,$5                ; 16df 45
                .byte   $4f                 
                .byte   $2d                 
                LI   $fe                 ; 16e2 20 fe
                LR   $3,A                ; 16e4 53
                LR   $0,A                ; 16e5 50
                LR   A,$5                ; 16e6 45
                LR   (IS),A              ; 16e7 5c
                LR   A,$9                ; 16e8 49
                LR   A,$1                ; 16e9 41
                LR   A,(IS)              ; 16ea 4c
                LR   A,$9                ; 16eb 49
                LR   $3,A                ; 16ec 53
                LR   $4,A                ; 16ed 54
                LR   A,$5                ; 16ee 45
                LR   A,(IS)-             ; 16ef 4e
                NS   (IS)                ; 16f0 fc
                .byte   $ff                 
                NS   $a                  ; 16f2 fa
                NS   $1                  ; 16f3 f1
                LI   $20                 ; 16f4 20 20
                LI   $20                 ; 16f6 20 20
                LI   $20                 ; 16f8 20 20
                LR   A,$1                ; 16fa 41
                LR   A,(IS)-             ; 16fb 4e
                LR   $2,A                ; 16fc 52
                LR   $5,A                ; 16fd 55
                LR   A,$6                ; 16fe 46
                NS   (IS)-               ; 16ff fe
                LI   $ff                 ; 1700 20 ff
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff                 
                .byte   $ff