eaw/tzpuFusionX
1
0
Fork 0
Code Issues Packages Projects Releases 1 Wiki Activity
Files
bea3393432e759d8a9cd77e82ae3190540578f70
tzpuFusionX/software/asm/basic_sp-5025.asm
Philip Smart 066e049538 Add Z80 assembly sources, ROMs and build tools to repository 
Un-ignore software/asm/, software/tools/, and software/roms/ so that
CI/CD builds on Jenkins can assemble Z80 ROMs, TZFS, and CP/M from
source. Previously these files were only available on the dev machine.

Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
2026-03-14 15:42:50 +00:00

5909 lines
699 KiB
NASM
Raw Blame History

;----------------------------------------------------
; Project: BASIC_SP-5025.MZF
; Main File: BASIC_SP-5025.MZF.ASM
; Date: 09/05/2021 10:03:22
;
; Created with SUC vbDISX.
;
;----------------------------------------------------
; With repeat autotrace from execute address
; With added unused space analysis
; includes find word tables (selected the 2 highest blocks)
; includes find all words with preceding JPs or CALL opcode value
;
; Followed by more unused space analysis for text
; includes keyword table search
; includes text search
; Followed by more unused space analysis for text
; Finally more unused space analysis for unused block start address link search
ORG 01200H
XOR A ;1200 AF
LD (L3D26),A ;1201 32263D
LD (0FFFFH),A ;1204 32FFFF
LD HL,043FFH ;1207 21FF43
LD D,208 ;120A 16D0
L120C: INC HL ;120C 23
LD A,H ;120D 7C
CP D ;120E BA
JR Z,L121B ;120F 280A
LD A,255 ;1211 3EFF
LD (HL),A ;1213 77
SUB (HL) ;1214 96
JR NZ,L121B ;1215 2004
LD (HL),A ;1217 77
CP (HL) ;1218 BE
JR Z,L120C ;1219 28F1
L121B: LD (04561H),HL ;121B 226145
LD (04563H),HL ;121E 226345
LD SP,HL ;1221 F9
CALL CRLF2 ;1222 CD0600
LD DE,L12E2 ;1225 11E212
CALL MESSAGE ;1228 CD1500
CALL L1832 ;122B CD3218
LD BC,L000A ;122E 010A00
CALL L173F ;1231 CD3F17
LD DE,L4400 ;1234 110044
PUSH DE ;1237 D5
CALL L16F7 ;1238 CDF716
POP DE ;123B D1
CALL L1357 ;123C CD5713
LD DE,L1326 ;123F 112613
CALL MESSAGE ;1242 CD1500
XOR A ;1245 AF
LD D,A ;1246 57
LD E,A ;1247 5F
CALL SETCLOCK ;1248 CD3300
L124B: LD DE,L12FE ;124B 11FE12
CALL MUSIC ;124E CD3000
LD DE,L12F9 ;1251 11F912
CALL L1357 ;1254 CD5713
L1257: LD A,(L4565) ;1257 3A6545
OR A ;125A B7
JP Z,L1274 ;125B CA7412
LD HL,(L47FF) ;125E 2AFF47
LD A,H ;1261 7C
OR L ;1262 B5
JP Z,L1278 ;1263 CA7812
LD BC,CRLF2 ;1266 010600
LD DE,L4566 ;1269 116645
LD HL,L47FD ;126C 21FD47
CALL L1799 ;126F CD9917
JR L1278 ;1272 1804
L1274: LD HL,(04563H) ;1274 2A6345
LD SP,HL ;1277 F9
L1278: CALL L184E ;1278 CD4E18
CALL CRLF ;127B CD0900
LD DE,L4400 ;127E 110044
CALL USER ;1281 CD0300
CALL L13CE ;1284 CDCE13
CALL L1443 ;1287 CD4314
LD HL,(L4457) ;128A 2A5744
LD A,L ;128D 7D
OR H ;128E B4
JR NZ,L12A0 ;128F 200F
LD HL,L4459 ;1291 215944
LD (L4801),HL ;1294 220148
CALL L168B ;1297 CD8B16
DEC C ;129A 0D
POP HL ;129B E1
ADD HL,DE ;129C 19
JP L1278 ;129D C37812
L12A0: CALL L1987 ;12A0 CD8719
CALL L13C1 ;12A3 CDC113
CALL L17A5 ;12A6 CDA517
CP (HL) ;12A9 BE
LD (DE),A ;12AA 12
JR NZ,L12BE ;12AB 2011
CALL L17E8 ;12AD CDE817
EX DE,HL ;12B0 EB
CALL L1766 ;12B1 CD6617
CALL L1651 ;12B4 CD5116
CALL L189C ;12B7 CD9C18
EX DE,HL ;12BA EB
CALL L17E0 ;12BB CDE017
L12BE: LD A,(L4459) ;12BE 3A5944
CP 13 ;12C1 FE0D
JP Z,L1257 ;12C3 CA5712
CALL L17A8 ;12C6 CDA817
RL D ;12C9 CB12
LD (L4455),HL ;12CB 225544
EX DE,HL ;12CE EB
LD HL,L4455 ;12CF 215544
CALL L17E8 ;12D2 CDE817
CALL L1796 ;12D5 CD9617
CALL L189C ;12D8 CD9C18
EX DE,HL ;12DB EB
CALL L17E0 ;12DC CDE017
JP L1257 ;12DF C35712
L12E2: DB " * SHARP BAS" ;12E2 202A20534841525020424153
DB "IC SP-5025" ;12EE 49432053502D35303235
DB 0DH ;12F8 0D
L12F9: DB "READY" ;12F9 5245414459
L12FE: DB 0DH ;12FE 0D
L12FF: DB " ERR" ;12FF 20455252
DB 4FH,52H,0DH ;1303 4F520D
L1306: DB " IN" ;1306 20494E
DB 0DH ;1309 0D
L130A: DB "SYNTAX" ;130A 53594E544158
DB 0DH ;1310 0D
L1311: DB "MEMORY" ;1311 4D454D4F5259
DB 0DH ;1317 0D
L1318: DB "DATA" ;1318 44415441
DB 0DH ;131C 0D
L131D: DB "MISMATCH" ;131D 4D49534D41544348
DB 0DH ;1325 0D
L1326: DB " BYTES" ;1326 204259544553
DB 0DH ;132C 0D
L132D: DB "BREAK" ;132D 425245414B
DB 0DH ;1332 0D
L1333: DB "16FOR" ;1333 3136464F52
DB 0DH ;1338 0D
L1339: DB "16GOSUB" ;1339 3136474F535542
DB 0DH ;1340 0D
L1341: DB "6FN" ;1341 36464E
DB 0DH ;1344 0D
L1345: DB "CONT" ;1345 434F4E54
DB 0DH ;1349 0D
L134A: DB "FILE" ;134A 46494C45
DB 0DH ;134E 0D
L134F: DB "OVERLAY" ;134F 4F5645524C4159
DB 0DH ;1356 0D
L1357: CALL CRLF ;1357 CD0900
JP MESSAGE ;135A C31500
L135D: CALL L187C ;135D CD7C18
CALL L1357 ;1360 CD5713
LD DE,L12FF ;1363 11FF12
L1366: CALL MESSAGE ;1366 CD1500
LD HL,(L47FF) ;1369 2AFF47
LD A,L ;136C 7D
OR H ;136D B4
JP Z,L124B ;136E CA4B12
LD DE,L4400 ;1371 110044
PUSH DE ;1374 D5
CALL L16F7 ;1375 CDF716
LD DE,L1306 ;1378 110613
CALL MESSAGE ;137B CD1500
POP DE ;137E D1
CALL MESSAGE ;137F CD1500
JP L124B ;1382 C34B12
L1385: CALL CRLF ;1385 CD0900
LD DE,L132D ;1388 112D13
JP L1366 ;138B C36613
L138E: LD DE,L130A ;138E 110A13
JR L1396 ;1391 1803
L1393: LD DE,L1311 ;1393 111113
L1396: JR L139B ;1396 1803
L1398: LD DE,L1318 ;1398 111813
L139B: JR L13A0 ;139B 1803
L139D: LD DE,L131D ;139D 111D13
L13A0: JR L13A5 ;13A0 1803
L13A2: LD DE,L1333 ;13A2 113313
L13A5: JR L13AA ;13A5 1803
L13A7: LD DE,L1339 ;13A7 113913
L13AA: JR L13AF ;13AA 1803
L13AC: LD DE,L1341 ;13AC 114113
L13AF: JR L13B4 ;13AF 1803
L13B1: LD DE,L134A ;13B1 114A13
L13B4: JR L13B9 ;13B4 1803
L13B6: LD DE,L134F ;13B6 114F13
L13B9: JR L13BE ;13B9 1803
L13BB: LD DE,L1345 ;13BB 114513
L13BE: JP L135D ;13BE C35D13
L13C1: XOR A ;13C1 AF
JR L13C6 ;13C2 1802
L13C4: LD A,1 ;13C4 3E01
L13C6: JR L13CA ;13C6 1802
L13C8: LD A,2 ;13C8 3E02
L13CA: LD (L4565),A ;13CA 326545
RET ;13CD C9
L13CE: LD HL,L4400 ;13CE 210044
CALL L16F1 ;13D1 CDF116
EX DE,HL ;13D4 EB
LD (L4457),HL ;13D5 225744
LD HL,L4459 ;13D8 215944
LD C,0 ;13DB 0E00
EX DE,HL ;13DD EB
CALL L162D ;13DE CD2D16
L13E1: CALL L1491 ;13E1 CD9114
RET Z ;13E4 C8
DEC DE ;13E5 1B
CP 63 ;13E6 FE3F
JR NZ,L13F0 ;13E8 2006
LD A,133 ;13EA 3E85
LD (DE),A ;13EC 12
INC DE ;13ED 13
JR L13E1 ;13EE 18F1
L13F0: DEC HL ;13F0 2B
EX DE,HL ;13F1 EB
PUSH HL ;13F2 E5
LD HL,L14D8 ;13F3 21D814
LD B,128 ;13F6 0680
L13F8: PUSH DE ;13F8 D5
L13F9: CALL L162D ;13F9 CD2D16
EX DE,HL ;13FC EB
CALL L162D ;13FD CD2D16
EX DE,HL ;1400 EB
CP (HL) ;1401 BE
INC HL ;1402 23
INC DE ;1403 13
JR Z,L13F9 ;1404 28F3
DEC HL ;1406 2B
CP 255 ;1407 FEFF
JP Z,L1415 ;1409 CA1514
ADD A,128 ;140C C680
JP C,L138E ;140E DA8E13
CP (HL) ;1411 BE
JP Z,L1427 ;1412 CA2714
L1415: INC B ;1415 04
LD A,220 ;1416 3EDC
CP B ;1418 B8
JP Z,L143B ;1419 CA3B14
LD A,127 ;141C 3E7F
L141E: CP (HL) ;141E BE
INC HL ;141F 23
JP NC,L141E ;1420 D21E14
POP DE ;1423 D1
JP L13F8 ;1424 C3F813
L1427: POP AF ;1427 F1
POP HL ;1428 E1
LD (HL),B ;1429 70
INC HL ;142A 23
EX DE,HL ;142B EB
LD A,B ;142C 78
CP 130 ;142D FE82
JP NC,L13E1 ;142F D2E113
CALL L14C5 ;1432 CDC514
CP 58 ;1435 FE3A
JP Z,L13E1 ;1437 CAE113
RET ;143A C9
L143B: POP DE ;143B D1
POP HL ;143C E1
INC DE ;143D 13
INC HL ;143E 23
EX DE,HL ;143F EB
JP L13E1 ;1440 C3E113
L1443: LD HL,(L4457) ;1443 2A5744
LD DE,L4400 ;1446 110044
LD C,178 ;1449 0EB2
CALL L16F9 ;144B CDF916
LD A,32 ;144E 3E20
LD (DE),A ;1450 12
INC DE ;1451 13
LD HL,L4459 ;1452 215944
L1455: CALL L1491 ;1455 CD9114
RET Z ;1458 C8
SUB 128 ;1459 D680
JP M,L1455 ;145B FA5514
DEC C ;145E 0D
PUSH AF ;145F F5
DEC DE ;1460 1B
PUSH HL ;1461 E5
LD HL,L14D8 ;1462 21D814
L1465: OR A ;1465 B7
JP Z,L1475 ;1466 CA7514
PUSH AF ;1469 F5
LD A,127 ;146A 3E7F
L146C: CP (HL) ;146C BE
INC HL ;146D 23
JR NC,L146C ;146E 30FC
POP AF ;1470 F1
DEC A ;1471 3D
JP L1465 ;1472 C36514
L1475: CALL L14BA ;1475 CDBA14
OR A ;1478 B7
JP P,L1475 ;1479 F27514
DEC DE ;147C 1B
AND 127 ;147D E67F
LD (DE),A ;147F 12
INC DE ;1480 13
POP HL ;1481 E1
POP AF ;1482 F1
CP 2 ;1483 FE02
JP NC,L1455 ;1485 D25514
CALL L14C5 ;1488 CDC514
CP 58 ;148B FE3A
JP Z,L1455 ;148D CA5514
RET ;1490 C9
L1491: CALL L14BA ;1491 CDBA14
RET Z ;1494 C8
CALL L14A5 ;1495 CDA514
JR Z,L1491 ;1498 28F7
CP 34 ;149A FE22
RET NZ ;149C C0
CALL L14B1 ;149D CDB114
CP 13 ;14A0 FE0D
JR NZ,L1491 ;14A2 20ED
RET ;14A4 C9
L14A5: CP 32 ;14A5 FE20
RET Z ;14A7 C8
CP 255 ;14A8 FEFF
RET Z ;14AA C8
CP 40 ;14AB FE28
RET Z ;14AD C8
CP 41 ;14AE FE29
RET ;14B0 C9
L14B1: CALL L14BA ;14B1 CDBA14
RET Z ;14B4 C8
CP 34 ;14B5 FE22
JR NZ,L14B1 ;14B7 20F8
RET ;14B9 C9
L14BA: LD A,(HL) ;14BA 7E
LD (DE),A ;14BB 12
INC HL ;14BC 23
INC DE ;14BD 13
INC C ;14BE 0C
JP Z,L1398 ;14BF CA9813
CP 13 ;14C2 FE0D
RET ;14C4 C9
L14C5: CALL L14BA ;14C5 CDBA14
RET Z ;14C8 C8
CP 58 ;14C9 FE3A
RET Z ;14CB C8
CP 34 ;14CC FE22
JR NZ,L14C5 ;14CE 20F5
CALL L14B1 ;14D0 CDB114
CP 13 ;14D3 FE0D
JR NZ,L14C5 ;14D5 20EE
RET ;14D7 C9
L14D8: DB "RE" ;14D8 5245
DB BRC ;14DA CD
DB "DAT" ;14DB 444154
DB 0C1H ;14DE C1
DB "LIS" ;14DF 4C4953
DB 0D4H ;14E2 D4
DB "RU" ;14E3 5255
DB TLC ;14E5 CE
DB "NE" ;14E6 4E45
DB 0D7H ;14E8 D7
DB "PRIN" ;14E9 5052494E
DB 0D4H ;14ED D4
DB "LE" ;14EE 4C45
DB 0D4H ;14F0 D4
DB "FO" ;14F1 464F
DB TCT ;14F3 D2
DB "I" ;14F4 49
DB 0C6H ;14F5 C6
DB "GOT" ;14F6 474F54
DB 0CFH ;14F9 CF
DB "REA" ;14FA 524541
DB 0C4H ;14FD C4
DB "GOSU" ;14FE 474F5355
DB 0C2H ;1502 C2
DB "RETUR" ;1503 5245545552
DB TLC ;1508 CE
DB "NEX" ;1509 4E4558
DB 0D4H ;150C D4
DB "STO" ;150D 53544F
DB TRC ;1510 D0
DB "EN" ;1511 454E
DB 0C4H ;1513 C4
DB "O" ;1514 4F
DB TLC ;1515 CE
DB "LOA" ;1516 4C4F41
DB 0C4H ;1519 C4
DB "SAV" ;151A 534156
DB 0C5H ;151D C5
DB "VERIF" ;151E 5645524946
DB 0D9H ;1523 D9
DB "POK" ;1524 504F4B
DB 0C5H ;1527 C5
DB "DI" ;1528 4449
DB BRC ;152A CD
DB "DEF F" ;152B 4445462046
DB TLC ;1530 CE
DB "INPU" ;1531 494E5055
DB 0D4H ;1535 D4
DB "RESTOR" ;1536 524553544F52
DB 0C5H ;153C C5
DB "CL" ;153D 434C
DB TCT ;153F D2
DB "MUSI" ;1540 4D555349
DB 0C3H ;1544 C3
DB "TEMP" ;1545 54454D50
DB 0CFH ;1549 CF
DB "USR" ;154A 555352
DB 0A8H ;154D A8
DB "WOPE" ;154E 574F5045
DB TLC ;1552 CE
DB "ROPE" ;1553 524F5045
DB TLC ;1557 CE
DB "CLOS" ;1558 434C4F53
DB 0C5H ;155C C5
DB "BY" ;155D 4259
DB 0C5H ;155F C5
DB "LIMI" ;1560 4C494D49
DB 0D4H ;1564 D4
DB "CON" ;1565 434F4E
DB 0D4H ;1568 D4
DB "SE" ;1569 5345
DB 0D4H ;156B D4
DB "RESE" ;156C 52455345
DB 0D4H ;1570 D4
DB "GE" ;1571 4745
DB 0D4H ;1573 D4
DB "INP" ;1574 494E50
DB 0A3H ;1577 A3
DB "OUT" ;1578 4F5554
DB 0A3H,0FFH,0FFH,0FFH ;157B A3FFFFFF
DB 0FFH,0FFH ;157F FFFF
DB "THE" ;1581 544845
DB TLC ;1584 CE
DB "T" ;1585 54
DB 0CFH ;1586 CF
DB "STE" ;1587 535445
DB TRC ;158A D0
DB ">" ;158B 3E
DB 0BCH ;158C BC
DB "<" ;158D 3C
DB 0BEH ;158E BE
DB "=" ;158F 3D
DB 0BCH ;1590 BC
DB "<" ;1591 3C
DB 0BDH ;1592 BD
DB "=" ;1593 3D
DB 0BEH ;1594 BE
DB ">" ;1595 3E
DB 0BDH,0BDH,0BEH,0BCH ;1596 BDBDBEBC
DB "AN" ;159A 414E
DB 0C4H ;159C C4
DB "O" ;159D 4F
DB TCT ;159E D2
DB "NO" ;159F 4E4F
DB 0D4H,0ABH,0ADH,0AAH ;15A1 D4ABADAA
DB 0AFH ;15A5 AF
DB "LEFT$" ;15A6 4C45465424
DB 0A8H ;15AB A8
DB "RIGHT$" ;15AC 524947485424
DB 0A8H ;15B2 A8
DB "MID$" ;15B3 4D494424
DB 0A8H ;15B7 A8
DB "LEN" ;15B8 4C454E
DB 0A8H ;15BB A8
DB "CHR$" ;15BC 43485224
DB 0A8H ;15C0 A8
DB "STR$" ;15C1 53545224
DB 0A8H ;15C5 A8
DB "ASC" ;15C6 415343
DB 0A8H ;15C9 A8
DB "VAL" ;15CA 56414C
DB 0A8H ;15CD A8
DB "PEEK" ;15CE 5045454B
DB 0A8H ;15D2 A8
DB "TAB" ;15D3 544142
DB 0A8H ;15D6 A8
DB "SPC" ;15D7 535043
DB 0A8H ;15DA A8
DB "SIZ" ;15DB 53495A
DB 0C5H,0FFH,0FFH,0FFH ;15DE C5FFFFFF
DB 0DEH ;15E2 DE
DB "RND" ;15E3 524E44
DB 0A8H ;15E6 A8
DB "SIN" ;15E7 53494E
DB 0A8H ;15EA A8
DB "COS" ;15EB 434F53
DB 0A8H ;15EE A8
DB "TAN" ;15EF 54414E
DB 0A8H ;15F2 A8
DB "ATN" ;15F3 41544E
DB 0A8H ;15F6 A8
DB "EXP" ;15F7 455850
DB 0A8H ;15FA A8
DB "INT" ;15FB 494E54
DB 0A8H ;15FE A8
DB "LOG" ;15FF 4C4F47
DB 0A8H ;1602 A8
DB "LN" ;1603 4C4E
DB 0A8H ;1605 A8
DB "ABS" ;1606 414253
DB 0A8H ;1609 A8
DB "SGN" ;160A 53474E
DB 0A8H ;160D A8
DB "SQR" ;160E 535152
DB 0A8H,0FFH,0FFH ;1611 A8FFFF
L1614: DB 0C1H,00H,00H,00H ;1614 C1000000
DB 80H ;1618 80
L1619: DB 80H,00H,00H,00H ;1619 80000000
DB 00H ;161D 00
L161E: DB "A" ;161E 41
DB 00H,00H,00H,80H ;161F 00000080
L1623: DB 0C2H,0A1H,0DAH,0FH ;1623 C2A1DA0F
DB 0C9H ;1627 C9
DB "*" ;1628 2A
DB 01H ;1629 01
DB "H+" ;162A 482B
L162C: DB "#" ;162C 23
L162D: DB "~" ;162D 7E
DB 0FEH ;162E FE
DB " " ;162F 20
DB 0C0H,18H,0F9H ;1630 C018F9
L1633: DB 0F5H ;1633 F5
DB ">" ;1634 3E
DB 0DH ;1635 0D
L1636: DB 0BEH ;1636 BE
DB "# " ;1637 2320
DB 0FCH,0F1H,0C9H ;1639 FCF1C9
L163C: DB "#" ;163C 23
L163D: DB BRC ;163D CD
DB ")" ;163E 29
DB 18H,0C8H,0FEH,22H ;163F 18C8FE22
DB " " ;1643 20
DB 0F7H ;1644 F7
L1645: DB BRC ;1645 CD
DB "," ;1646 2C
DB 16H,0FEH ;1647 16FE
DB 0DH ;1649 0D
DB 0C8H,0FEH,22H ;164A C8FE22
DB " " ;164D 20
DB 0F6H,18H,0EBH ;164E F618EB
L1651: DB "y/Ox/G" ;1651 792F4F782F47
DB 03H,0C9H ;1657 03C9
L1659: DB BRC ;1659 CD
DB "-" ;165A 2D
DB CSN,0D6H ;165B 16D6
DB "0" ;165D 30
DB 0FEH,0AH ;165E FE0A
DB "~" ;1660 7E
DB 0C9H ;1661 C9
L1662: DB "|" ;1662 7C
DB 92H,0C0H ;1663 92C0
DB "}" ;1665 7D
DB 93H,0C9H ;1666 93C9
L1668: DB "{" ;1668 7B
DB 95H ;1669 95
DB "oz" ;166A 6F7A
DB 9CH ;166C 9C
DB "g" ;166D 67
DB 0C9H ;166E C9
L166F: DB 0E1H ;166F E1
L1670: DB 0E3H ;1670 E3
L1671: DB 0F5H ;1671 F5
DB "~#fo" ;1672 7E23666F
DB 0F1H,0E3H,0C9H ;1676 F1E3C9
L1679: DB 0E1H ;1679 E1
L167A: DB 0E3H ;167A E3
DB "##" ;167B 2323
DB 0E3H,0C9H ;167D E3C9
L167F: DB "*DF#####" ;167F 2A44462323232323
DB 0C9H ;1687 C9
L1688: DB "*" ;1688 2A
DB 01H ;1689 01
DB "H" ;168A 48
L168B: DB BRC ;168B CD
DB "-" ;168C 2D
DB CSN,0E3H,0BEH ;168D 16E3BE
DB "#" ;1690 23
DB 0C2H ;1691 C2
DB "q" ;1692 71
DB CSN ;1693 16
DB "#" ;1694 23
DB 18H,0BH ;1695 180B
L1697: DB "*" ;1697 2A
DB 01H ;1698 01
DB "H" ;1699 48
L169A: DB BRC ;169A CD
DB "-" ;169B 2D
DB CSN,0E3H,0BEH,0C2H ;169C 16E3BEC2
DB 8EH,CMR ;16A0 8E13
L16A2: DB "#" ;16A2 23
DB 0E3H,0C3H ;16A3 E3C3
DB "," ;16A5 2C
DB CSN ;16A6 16
L16A7: DB 0AFH,0BCH ;16A7 AFBC
DB "(" ;16A9 28
DB 05H,0EBH,0BCH,0C2H ;16AA 05EBBCC2
DB "p" ;16AE 70
DB CSN ;16AF 16
L16B0: DB "}l" ;16B0 7D6C
L16B2: DB 0B7H ;16B2 B7
DB " " ;16B3 20
DB 04H,0EBH,0C3H ;16B4 04EBC3
DB "z" ;16B7 7A
DB CSN ;16B8 16
L16B9: DB LCT ;16B9 CB
DB "?0" ;16BA 3F30
DB 04H,19H,0DAH ;16BC 0419DA
DB "p" ;16BF 70
DB CSN ;16C0 16
L16C1: DB LCT ;16C1 CB
DB "#" ;16C2 23
DB LCT,CMU,0C3H,0B2H ;16C3 CB12C3B2
DB CSN ;16C7 16
L16C8: DB BRC,0A7H,CSN,98H ;16C8 CDA71698
DB CMR,0C9H ;16CC 13C9
L16CE: DB CMD,00H,00H ;16CE 110000
L16D1: DB BRC ;16D1 CD
DB "Y" ;16D2 59
DB CSN,TCT ;16D3 16D2
DB "z" ;16D5 7A
DB CSN,0E5H ;16D6 16E5
DB "!" ;16D8 21
DB 0AH,00H,BRC,0A7H ;16D9 0A00CDA7
DB CSN ;16DD 16
DB "o" ;16DE 6F
DB CSN,0E1H ;16DF 16E1
DB "~" ;16E1 7E
DB 0E6H,0FH,83H ;16E2 E60F83
DB "_z" ;16E5 5F7A
DB TLC,00H ;16E7 CE00
DB "W" ;16E9 57
DB 0DAH ;16EA DA
DB "p" ;16EB 70
DB CSN ;16EC 16
DB "#" ;16ED 23
DB 0C3H,BCT,CSN ;16EE C3D116
L16F1: DB BRC,TLC,CSN,8EH ;16F1 CDCE168E
DB CMR,0C9H ;16F5 13C9
L16F7: DB 0EH,00H ;16F7 0E00
L16F9: DB "> " ;16F9 3E20
DB CMU,CMR,0D5H,06H ;16FB 1213D506
DB 00H,CMD,10H ;16FF 001110
DB "'" ;1702 27
DB BRC,22H,17H,CMD ;1703 CD221711
DB 0E8H,03H,BRC,22H ;1707 E803CD22
DB 17H,CMD ;170B 1711
DB "d" ;170D 64
DB 00H,BRC,22H,17H ;170E 00CD2217
DB CMD,0AH,00H,BRC ;1712 110A00CD
DB 22H,17H ;1716 2217
DB "}" ;1718 7D
DB BCT,0F6H ;1719 D1F6
DB "0" ;171B 30
DB CMU,CMR ;171C 1213
DB ">" ;171E 3E
DB 0DH ;171F 0D
DB CMU,0C9H ;1720 12C9
L1722: DB ">" ;1722 3E
DB 0FFH ;1723 FF
L1724: DB "<" ;1724 3C
DB 0B7H,0EDH ;1725 B7ED
DB "R0" ;1727 5230
DB 0FAH,19H,0B7H ;1729 FA19B7
DB " " ;172C 20
DB 03H,0B0H,0C8H,0AFH ;172D 03B0C8AF
L1731: DB 04H,0F6H ;1731 04F6
DB "0" ;1733 30
DB BCT,0E3H ;1734 D1E3
DB "w#" ;1736 7723
DB 0E3H,0D5H,0CH,0C9H ;1738 E3D50CC9
L173C: DB 01H,00H,00H ;173C 010000
L173F: DB "*DF" ;173F 2A4446
L1742: DB 09H,0DAH,93H,CMR ;1742 09DA9313
DB 0EBH ;1746 EB
DB "!" ;1747 21
DB 9CH,0FFH ;1748 9CFF
DB "9" ;174A 39
DB 0AFH,0EDH ;174B AFED
DB "R" ;174D 52
DB TRC,0C3H,93H,CMR ;174E D0C39313
L1752: PUSH HL ;1752 E5
PUSH DE ;1753 D5
CALL L173F ;1754 CD3F17
POP DE ;1757 D1
POP HL ;1758 E1
RET ;1759 C9
L175A: LD E,(HL) ;175A 5E
INC HL ;175B 23
LD D,(HL) ;175C 56
INC HL ;175D 23
LD A,(HL) ;175E 7E
INC HL ;175F 23
LD H,(HL) ;1760 66
LD L,A ;1761 6F
EX DE,HL ;1762 EB
LD A,L ;1763 7D
OR H ;1764 B4
RET ;1765 C9
L1766: PUSH BC ;1766 C5
PUSH HL ;1767 E5
PUSH DE ;1768 D5
EX DE,HL ;1769 EB
ADD HL,BC ;176A 09
EX DE,HL ;176B EB
CALL L167F ;176C CD7F16
LD A,L ;176F 7D
SUB E ;1770 93
LD C,A ;1771 4F
LD A,H ;1772 7C
SBC A,D ;1773 9A
LD B,A ;1774 47
INC BC ;1775 03
POP HL ;1776 E1
PUSH HL ;1777 E5
EX DE,HL ;1778 EB
JP L179C ;1779 C39C17
L177C: CALL L1752 ;177C CD5217
PUSH BC ;177F C5
PUSH HL ;1780 E5
PUSH DE ;1781 D5
CALL L167F ;1782 CD7F16
PUSH HL ;1785 E5
ADD HL,BC ;1786 09
EX (SP),HL ;1787 E3
LD A,L ;1788 7D
SUB E ;1789 93
LD C,A ;178A 4F
LD A,H ;178B 7C
SBC A,D ;178C 9A
LD B,A ;178D 47
INC BC ;178E 03
POP DE ;178F D1
LDDR ;1790 EDB8
L1792: POP DE ;1792 D1
POP HL ;1793 E1
POP BC ;1794 C1
RET ;1795 C9
L1796: CALL L177C ;1796 CD7C17
L1799: PUSH BC ;1799 C5
PUSH HL ;179A E5
PUSH DE ;179B D5
L179C: LD A,C ;179C 79
OR B ;179D B0
JR Z,L17A2 ;179E 2802
LDIR ;17A0 EDB0
L17A2: JP L1792 ;17A2 C39217
L17A5: LD (L462E),HL ;17A5 222E46
L17A8: LD HL,L4806 ;17A8 210648
L17AB: PUSH HL ;17AB E5
CALL L175A ;17AC CD5A17
JP Z,L166F ;17AF CA6F16
PUSH HL ;17B2 E5
LD HL,(L462E) ;17B3 2A2E46
CALL L1662 ;17B6 CD6216
POP HL ;17B9 E1
JP Z,L1679 ;17BA CA7916
JP C,L1679 ;17BD DA7916
POP AF ;17C0 F1
JP L17AB ;17C1 C3AB17
L17C4: PUSH HL ;17C4 E5
LD E,(HL) ;17C5 5E
INC HL ;17C6 23
LD D,(HL) ;17C7 56
LD A,E ;17C8 7B
OR D ;17C9 B2
JP Z,L166F ;17CA CA6F16
LD HL,(L4630) ;17CD 2A3046
CALL L1662 ;17D0 CD6216
POP HL ;17D3 E1
INC HL ;17D4 23
INC HL ;17D5 23
JP L167A ;17D6 C37A16
L17D9: ADD HL,BC ;17D9 09
EX DE,HL ;17DA EB
POP HL ;17DB E1
LD (HL),E ;17DC 73
INC HL ;17DD 23
LD (HL),D ;17DE 72
EX DE,HL ;17DF EB
L17E0: PUSH HL ;17E0 E5
CALL L175A ;17E1 CD5A17
JR NZ,L17D9 ;17E4 20F3
POP HL ;17E6 E1
RET ;17E7 C9
L17E8: PUSH HL ;17E8 E5
LD BC,L0004 ;17E9 010400
ADD HL,BC ;17EC 09
CALL L17F6 ;17ED CDF617
INC BC ;17F0 03
POP HL ;17F1 E1
RET ;17F2 C9
L17F3: LD BC,COLDSTART ;17F3 010000
L17F6: PUSH HL ;17F6 E5
LD A,13 ;17F7 3E0D
L17F9: CP (HL) ;17F9 BE
INC HL ;17FA 23
INC BC ;17FB 03
JR NZ,L17F9 ;17FC 20FB
DEC BC ;17FE 0B
POP HL ;17FF E1
RET ;1800 C9
L1801: LD A,E ;1801 7B
EX DE,HL ;1802 EB
LD HL,(L4642) ;1803 2A4246
INC A ;1806 3C
L1807: DEC A ;1807 3D
CALL NZ,L1633 ;1808 C43316
JR NZ,L1807 ;180B 20FA
EX DE,HL ;180D EB
RET ;180E C9
L180F: LD A,D ;180F 7A
OR A ;1810 B7
RET NZ ;1811 C0
JR L1817 ;1812 1803
L1814: LD A,D ;1814 7A
OR A ;1815 B7
RET Z ;1816 C8
L1817: JP L139D ;1817 C39D13
L181A: LD HL,(L4644) ;181A 2A4446
EX DE,HL ;181D EB
L181E: LD BC,L0005 ;181E 010500
LDIR ;1821 EDB0
RET ;1823 C9
L1824: LD HL,(L4644) ;1824 2A4446
JR L181E ;1827 18F5
L1829: CALL L162D ;1829 CD2D16
CP 13 ;182C FE0D
RET Z ;182E C8
CP 58 ;182F FE3A
RET ;1831 C9
L1832: LD HL,COLDSTART ;1832 210000
LD (L4632),HL ;1835 223246
LD HL,L4806 ;1838 210648
CALL L1896 ;183B CD9618
LD (L4634),HL ;183E 223446
XOR A ;1841 AF
LD (L29B8),A ;1842 32B829
CALL L13C1 ;1845 CDC113
CALL L1857 ;1848 CD5718
CALL L187C ;184B CD7C18
L184E: LD HL,L47FD ;184E 21FD47
CALL L1896 ;1851 CD9618
JP L1896 ;1854 C39618
L1857: LD HL,(L4634) ;1857 2A3446
LD B,9 ;185A 0609
L185C: CALL L1896 ;185C CD9618
DJNZ L185C ;185F 10FB
LD DE,L4636 ;1861 113646
LD HL,(L4634) ;1864 2A3446
EX DE,HL ;1867 EB
LD B,7 ;1868 0607
L186A: INC DE ;186A 13
INC DE ;186B 13
LD (HL),E ;186C 73
INC HL ;186D 23
LD (HL),D ;186E 72
INC HL ;186F 23
DJNZ L186A ;1870 10F8
L1872: LD HL,(L4642) ;1872 2A4246
CALL L1896 ;1875 CD9618
LD (L4644),HL ;1878 224446
RET ;187B C9
L187C: LD HL,L47F0 ;187C 21F047
LD (L464A),HL ;187F 224A46
LD HL,L4787 ;1882 218747
LD (L4648),HL ;1885 224846
LD HL,L466A ;1888 216A46
LD (L4646),HL ;188B 224646
LD HL,L4803 ;188E 210348
CALL L1896 ;1891 CD9618
LD (HL),A ;1894 77
RET ;1895 C9
L1896: XOR A ;1896 AF
L1897: LD (HL),A ;1897 77
INC HL ;1898 23
LD (HL),A ;1899 77
INC HL ;189A 23
RET ;189B C9
L189C: PUSH HL ;189C E5
LD A,E ;189D 7B
EX AF,AF' ;189E 08
LD A,D ;189F 7A
LD HL,L4644 ;18A0 214446
L18A3: LD E,(HL) ;18A3 5E
INC HL ;18A4 23
LD D,(HL) ;18A5 56
CP D ;18A6 BA
JP C,L18B3 ;18A7 DAB318
JP NZ,L18BF ;18AA C2BF18
EX AF,AF' ;18AD 08
CP E ;18AE BB
JP NC,L18BE ;18AF D2BE18
EX AF,AF' ;18B2 08
L18B3: EX DE,HL ;18B3 EB
ADD HL,BC ;18B4 09
EX DE,HL ;18B5 EB
LD (HL),D ;18B6 72
DEC HL ;18B7 2B
LD (HL),E ;18B8 73
DEC HL ;18B9 2B
DEC HL ;18BA 2B
JP L18A3 ;18BB C3A318
L18BE: EX AF,AF' ;18BE 08
L18BF: LD D,A ;18BF 57
EX AF,AF' ;18C0 08
LD E,A ;18C1 5F
POP HL ;18C2 E1
RET ;18C3 C9
L18C4: CALL L162D ;18C4 CD2D16
L18C7: LD BC,COLDSTART ;18C7 010000
LD DE,L0D2C ;18CA 112C0D
CP 34 ;18CD FE22
JR NZ,L18D3 ;18CF 2002
LD E,A ;18D1 5F
INC HL ;18D2 23
L18D3: PUSH HL ;18D3 E5
L18D4: LD A,(HL) ;18D4 7E
CP D ;18D5 BA
JR Z,L18E0 ;18D6 2808
CP E ;18D8 BB
INC HL ;18D9 23
JR Z,L18E0 ;18DA 2804
INC BC ;18DC 03
JR L18D4 ;18DD 18F5
L18DF: PUSH HL ;18DF E5
L18E0: EX (SP),HL ;18E0 E3
EX DE,HL ;18E1 EB
LD HL,(L4642) ;18E2 2A4246
XOR A ;18E5 AF
L18E6: PUSH AF ;18E6 F5
LD A,(HL) ;18E7 7E
OR A ;18E8 B7
JR Z,L18F2 ;18E9 2807
CALL L1633 ;18EB CD3316
POP AF ;18EE F1
INC A ;18EF 3C
JR L18E6 ;18F0 18F4
L18F2: EX DE,HL ;18F2 EB
INC BC ;18F3 03
CALL L1796 ;18F4 CD9617
PUSH HL ;18F7 E5
LD HL,(L4644) ;18F8 2A4446
ADD HL,BC ;18FB 09
LD (L4644),HL ;18FC 224446
POP HL ;18FF E1
EX DE,HL ;1900 EB
DEC BC ;1901 0B
ADD HL,BC ;1902 09
LD (HL),13 ;1903 360D
POP AF ;1905 F1
LD E,A ;1906 5F
LD D,1 ;1907 1601
POP HL ;1909 E1
JP L162D ;190A C32D16
L190D: CALL L162D ;190D CD2D16
CP 13 ;1910 FE0D
JP Z,L1670 ;1912 CA7016
PUSH HL ;1915 E5
DEC HL ;1916 2B
L1917: INC HL ;1917 23
CALL L162D ;1918 CD2D16
CP 43 ;191B FE2B
JR NZ,L1921 ;191D 2002
LD A,188 ;191F 3EBC
L1921: CP 45 ;1921 FE2D
JR NZ,L1927 ;1923 2002
LD A,189 ;1925 3EBD
L1927: LD (HL),A ;1927 77
CALL L193D ;1928 CD3D19
JR Z,L1917 ;192B 28EA
CP 69 ;192D FE45
JR Z,L1917 ;192F 28E6
CP 13 ;1931 FE0D
JP NZ,L166F ;1933 C26F16
POP HL ;1936 E1
CALL L22AF ;1937 CDAF22
JP L167A ;193A C37A16
L193D: CALL L1659 ;193D CD5916
JR NC,L1944 ;1940 3002
CP (HL) ;1942 BE
RET ;1943 C9
L1944: CP 46 ;1944 FE2E
RET Z ;1946 C8
CP 189 ;1947 FEBD
RET Z ;1949 C8
CP 188 ;194A FEBC
RET ;194C C9
L194D: PUSH HL ;194D E5
LD HL,(L4644) ;194E 2A4446
LD DE,COLDSTART ;1951 110000
LD A,(HL) ;1954 7E
OR A ;1955 B7
JP P,L1398 ;1956 F29813
CP 193 ;1959 FEC1
JP C,L1974 ;195B DA7419
SUB 209 ;195E D6D1
JP NC,L1398 ;1960 D29813
L1963: LD E,3 ;1963 1E03
ADD HL,DE ;1965 19
LD E,(HL) ;1966 5E
INC HL ;1967 23
LD D,(HL) ;1968 56
JP L1970 ;1969 C37019
L196C: SRL D ;196C CB3A
RR E ;196E CB1B
L1970: INC A ;1970 3C
JP NZ,L196C ;1971 C26C19
L1974: POP HL ;1974 E1
RET ;1975 C9
L1976: LD HL,L456C ;1976 216C45
JR L197E ;1979 1803
L197B: LD HL,L4570 ;197B 217045
L197E: LD (HL),C ;197E 71
INC HL ;197F 23
LD (HL),B ;1980 70
INC HL ;1981 23
LD (HL),E ;1982 73
INC HL ;1983 23
LD (HL),D ;1984 72
INC HL ;1985 23
RET ;1986 C9
L1987: XOR A ;1987 AF
LD (L4577),A ;1988 327745
RET ;198B C9
L198C: EXX ;198C D9
LD BC,L0005 ;198D 010500
CALL L19A0 ;1990 CDA019
CALL L22AF ;1993 CDAF22
CALL L1814 ;1996 CD1418
CALL L194D ;1999 CD4D19
EXX ;199C D9
LD BC,LFFFB ;199D 01FBFF
L19A0: LD HL,(L4644) ;19A0 2A4446
ADD HL,BC ;19A3 09
LD (L4644),HL ;19A4 224446
EXX ;19A7 D9
RET ;19A8 C9
L19A9: CALL L198C ;19A9 CD8C19
LD A,D ;19AC 7A
OR A ;19AD B7
RET Z ;19AE C8
JP L1398 ;19AF C39813
L19B2: LD HL,(L4801) ;19B2 2A0148
L19B5: CALL L162D ;19B5 CD2D16
L19B8: CP 13 ;19B8 FE0D
JP Z,L19C7 ;19BA CAC719
CALL L169A ;19BD CD9A16
LD A,(L0122) ;19C0 3A2201
LD C,B ;19C3 48
JP L19E1 ;19C4 C3E119
L19C7: LD HL,(L47FD) ;19C7 2AFD47
XOR A ;19CA AF
OR H ;19CB B4
JP Z,L124B ;19CC CA4B12
L19CF: LD DE,L47FD ;19CF 11FD47
LD BC,L0004 ;19D2 010400
LDIR ;19D5 EDB0
LD (L4801),HL ;19D7 220148
LD A,(L47FE) ;19DA 3AFE47
OR A ;19DD B7
JP Z,L1B2D ;19DE CA2D1B
L19E1: LD HL,PORT0 ;19E1 2100E0
LD (HL),248 ;19E4 36F8
INC HL ;19E6 23
LD A,(HL) ;19E7 7E
INC A ;19E8 3C
JP Z,L19F7 ;19E9 CAF719
CALL BREAK ;19EC CD1E00
JR NZ,L19F7 ;19EF 2006
CALL L13C8 ;19F1 CDC813
JP L1385 ;19F4 C38513
L19F7: LD HL,(L4642) ;19F7 2A4246
XOR A ;19FA AF
LD (HL),A ;19FB 77
INC HL ;19FC 23
LD (HL),A ;19FD 77
INC HL ;19FE 23
LD (L4644),HL ;19FF 224446
LD HL,(L4801) ;1A02 2A0148
LD A,(HL) ;1A05 7E
OR A ;1A06 B7
JP P,L1B3F ;1A07 F23F1B
CP 170 ;1A0A FEAA
JP NC,L138E ;1A0C D28E13
LD DE,L1A1F ;1A0F 111F1A
L1A12: INC HL ;1A12 23
EX DE,HL ;1A13 EB
ADD A,A ;1A14 87
LD C,A ;1A15 4F
LD B,0 ;1A16 0600
ADD HL,BC ;1A18 09
LD C,(HL) ;1A19 4E
INC HL ;1A1A 23
LD B,(HL) ;1A1B 46
EX DE,HL ;1A1C EB
PUSH BC ;1A1D C5
RET ;1A1E C9
L1A1F: DW L1B27 ;1A1F 271B
DW L1B27 ;1A21 271B
DW L1A76 ;1A23 761A
DW L1CCB ;1A25 CB1C
DW L1A6F ;1A27 6F1A
DW L1C2F ;1A29 2F1C
DW L1B3F ;1A2B 3F1B
DW L1D5C ;1A2D 5C1D
DW L2182 ;1A2F 8221
DW L1CDB ;1A31 DB1C
DW L1FAF ;1A33 AF1F
DW L1CF6 ;1A35 F61C
DW L1D2A ;1A37 2A1D
DW L1DF4 ;1A39 F41D
DW L1B36 ;1A3B 361B
DW L1B2D ;1A3D 2D1B
DW L1FF6 ;1A3F F61F
DW L2A36 ;1A41 362A
DW L29BB ;1A43 BB29
DW L298F ;1A45 8F29
DW L2166 ;1A47 6621
DW L2050 ;1A49 5020
DW L21B0 ;1A4B B021
DW L1E7C ;1A4D 7C1E
DW L1B24 ;1A4F 241B
DW L2177 ;1A51 7721
DW L2226 ;1A53 2622
DW L2246 ;1A55 4622
DW L28B2 ;1A57 B228
DW L2BA7 ;1A59 A72B
DW L2BD7 ;1A5B D72B
DW L2C05 ;1A5D 052C
DW L2854 ;1A5F 5428
DW L28C2 ;1A61 C228
DW L28FC ;1A63 FC28
DW L292A ;1A65 2A29
DW L292E ;1A67 2E29
DW L2857 ;1A69 5728
DW L2CD8 ;1A6B D82C
DW L2D2E ;1A6D 2E2D
L1A6F: CALL L1832 ;1A6F CD3218
JP L124B ;1A72 C34B12
L1A75: DB 0FEH ;1A75 FE
L1A76: LD A,(L29B8) ;1A76 3AB829
OR A ;1A79 B7
JP NZ,L124B ;1A7A C24B12
LD B,A ;1A7D 47
CALL L168B ;1A7E CD8B16
CP A ;1A81 BF
ADC A,H ;1A82 8C
LD A,(DE) ;1A83 1A
CALL L169A ;1A84 CD9A16
LD D,B ;1A87 50
CALL L3C85 ;1A88 CD853C
INC B ;1A8B 04
LD A,B ;1A8C 78
LD (L1A75),A ;1A8D 32751A
PUSH HL ;1A90 E5
CALL L1B08 ;1A91 CD081B
LD HL,L457E ;1A94 217E45
CALL L1896 ;1A97 CD9618
DEC A ;1A9A 3D
CALL L1897 ;1A9B CD9718
POP HL ;1A9E E1
CALL L168B ;1A9F CD8B16
DEC C ;1AA2 0D
PUSH HL ;1AA3 E5
LD A,(DE) ;1AA4 1A
LD HL,L4806 ;1AA5 210648
L1AA8: PUSH HL ;1AA8 E5
CALL L175A ;1AA9 CD5A17
POP HL ;1AAC E1
JP Z,L124B ;1AAD CA4B12
CALL L17E8 ;1AB0 CDE817
LD DE,L4455 ;1AB3 115544
CALL L1799 ;1AB6 CD9917
LD HL,(L457E) ;1AB9 2A7E45
EX DE,HL ;1ABC EB
LD HL,(L4457) ;1ABD 2A5744
CALL L1662 ;1AC0 CD6216
JP C,L1ADF ;1AC3 DADF1A
EX DE,HL ;1AC6 EB
LD HL,(L4580) ;1AC7 2A8045
CALL L1662 ;1ACA CD6216
JP C,L1ADF ;1ACD DADF1A
CALL L1443 ;1AD0 CD4314
LD DE,L4400 ;1AD3 110044
CALL L1B12 ;1AD6 CD121B
CALL BREAK ;1AD9 CD1E00
JP Z,L124B ;1ADC CA4B12
L1ADF: LD HL,(L4455) ;1ADF 2A5544
JP L1AA8 ;1AE2 C3A81A
DB 0CDH,0F1H,16H,0EDH ;1AE5 CDF116ED Link 1AE5 found at , $1AA3
DB 53H,7EH,45H,0CDH ;1AE9 537E45CD
DB 8BH,16H,0DH,0F9H ;1AED 8B160DF9
DB 1AH,0EBH,22H,80H ;1AF1 1AEB2280
DB 45H,0C3H,0A5H,1AH ;1AF5 45C3A51A
DB 0CDH,9AH,16H,0BDH ;1AF9 CD9A16BD
DB 0FEH,0DH,0CAH,0A5H ;1AFD FE0DCAA5
DB 1AH,0CDH,0F1H,16H ;1B01 1ACDF116
DB 0C3H,0F2H,1AH ;1B05 C3F21A
L1B08: LD A,(L1A75) ;1B08 3A751A
OR A ;1B0B B7
JP Z,CRLF ;1B0C CA0900
JP L3BA1 ;1B0F C3A13B
L1B12: LD A,(L1A75) ;1B12 3A751A
OR A ;1B15 B7
JR NZ,L1B1E ;1B16 2006
CALL STRING ;1B18 CD1800
JP CRLF ;1B1B C30900
L1B1E: CALL L3C05 ;1B1E CD053C
JP L3BA1 ;1B21 C3A13B
L1B24: CALL L1987 ;1B24 CD8719
L1B27: CALL L163D ;1B27 CD3D16
JP L19B8 ;1B2A C3B819
L1B2D: CALL L13C4 ;1B2D CDC413
LD (L4801),HL ;1B30 220148
JP L124B ;1B33 C34B12
L1B36: CALL L13C4 ;1B36 CDC413
L1B39: LD (L4801),HL ;1B39 220148
JP L1385 ;1B3C C38513
L1B3F: PUSH HL ;1B3F E5
L1B40: CALL L1829 ;1B40 CD2918
JP Z,L138E ;1B43 CA8E13
CP 182 ;1B46 FEB6
INC HL ;1B48 23
JR NZ,L1B40 ;1B49 20F5
CALL L22AF ;1B4B CDAF22
LD (L4801),HL ;1B4E 220148
CALL L1976 ;1B51 CD7619
POP HL ;1B54 E1
CALL L2613 ;1B55 CD1326
CALL L2436 ;1B58 CD3624
CALL L169A ;1B5B CD9A16
OR (HL) ;1B5E B6
CALL L197B ;1B5F CD7B19
CALL L1B6A ;1B62 CD6A1B
SBC A,L ;1B65 9D
INC DE ;1B66 13
JP L19B2 ;1B67 C3B219
L1B6A: LD HL,L456F ;1B6A 216F45
LD B,(HL) ;1B6D 46
INC HL ;1B6E 23
LD C,(HL) ;1B6F 4E
INC HL ;1B70 23
LD A,(HL) ;1B71 7E
LD DE,(L4572) ;1B72 ED5B7245
OR A ;1B76 B7
JP NZ,L1B84 ;1B77 C2841B
OR B ;1B7A B0
JP NZ,L1670 ;1B7B C27016
CALL L1824 ;1B7E CD2418
JP L167A ;1B81 C37A16
L1B84: XOR A ;1B84 AF
OR B ;1B85 B0
JP Z,L1670 ;1B86 CA7016
LD HL,L4559 ;1B89 215945
XOR A ;1B8C AF
LD B,A ;1B8D 47
SBC HL,DE ;1B8E ED52
JP Z,L1BC0 ;1B90 CAC01B
LD HL,(L456C) ;1B93 2A6C45
PUSH HL ;1B96 E5
XOR A ;1B97 AF
SBC HL,BC ;1B98 ED42
LD B,H ;1B9A 44
LD C,L ;1B9B 4D
JR C,L1BA3 ;1B9C 3805
CALL L177C ;1B9E CD7C17
JR L1BAB ;1BA1 1808
L1BA3: PUSH BC ;1BA3 C5
CALL L1651 ;1BA4 CD5116
CALL L1766 ;1BA7 CD6617
POP BC ;1BAA C1
L1BAB: CALL L189C ;1BAB CD9C18
LD HL,(L456E) ;1BAE 2A6E45
EX DE,HL ;1BB1 EB
CALL L1801 ;1BB2 CD0118
EX DE,HL ;1BB5 EB
POP BC ;1BB6 C1
LD A,C ;1BB7 79
OR A ;1BB8 B7
JR Z,L1BBD ;1BB9 2802
LDIR ;1BBB EDB0
L1BBD: JP L167A ;1BBD C37A16
L1BC0: LD HL,(L456E) ;1BC0 2A6E45
EX DE,HL ;1BC3 EB
CALL L1801 ;1BC4 CD0118
EX DE,HL ;1BC7 EB
LD DE,L4557 ;1BC8 115745
PUSH DE ;1BCB D5
LD B,3 ;1BCC 0603
L1BCE: LD C,2 ;1BCE 0E02
L1BD0: CALL L1659 ;1BD0 CD5916
JP NC,L1398 ;1BD3 D29813
LD (DE),A ;1BD6 12
INC DE ;1BD7 13
INC HL ;1BD8 23
DEC C ;1BD9 0D
JR NZ,L1BD0 ;1BDA 20F4
LD A,13 ;1BDC 3E0D
LD (DE),A ;1BDE 12
INC DE ;1BDF 13
DEC B ;1BE0 05
JR NZ,L1BCE ;1BE1 20EB
CALL L168B ;1BE3 CD8B16
DEC C ;1BE6 0D
SBC A,B ;1BE7 98
INC DE ;1BE8 13
POP HL ;1BE9 E1
CALL L198C ;1BEA CD8C19
LD B,0 ;1BED 0600
LD A,E ;1BEF 7B
CP 24 ;1BF0 FE18
JP NC,L1398 ;1BF2 D29813
SUB 12 ;1BF5 D60C
JR C,L1BFB ;1BF7 3802
LD E,A ;1BF9 5F
INC B ;1BFA 04
L1BFB: LD A,B ;1BFB 78
PUSH AF ;1BFC F5
PUSH HL ;1BFD E5
LD HL,L0E10 ;1BFE 21100E
CALL L16C8 ;1C01 CDC816
POP HL ;1C04 E1
PUSH DE ;1C05 D5
INC HL ;1C06 23
CALL L198C ;1C07 CD8C19
LD A,E ;1C0A 7B
CP 60 ;1C0B FE3C
JP NC,L1398 ;1C0D D29813
PUSH HL ;1C10 E5
LD HL,L003C ;1C11 213C00
CALL L16C8 ;1C14 CDC816
POP HL ;1C17 E1
EX (SP),HL ;1C18 E3
ADD HL,DE ;1C19 19
EX (SP),HL ;1C1A E3
INC HL ;1C1B 23
CALL L198C ;1C1C CD8C19
LD A,E ;1C1F 7B
CP 60 ;1C20 FE3C
JP NC,L1398 ;1C22 D29813
POP HL ;1C25 E1
ADD HL,DE ;1C26 19
EX DE,HL ;1C27 EB
POP AF ;1C28 F1
CALL SETCLOCK ;1C29 CD3300
JP L167A ;1C2C C37A16
L1C2F: LD B,0 ;1C2F 0600
CALL L168B ;1C31 CD8B16
CP A ;1C34 BF
LD B,L ;1C35 45
INC E ;1C36 1C
INC HL ;1C37 23
INC B ;1C38 04
CP 84 ;1C39 FE54
JP Z,L1C45 ;1C3B CA451C
CP 80 ;1C3E FE50
JP NZ,L138E ;1C40 C28E13
LD B,128 ;1C43 0680
L1C45: LD A,B ;1C45 78
LD (L457D),A ;1C46 327D45
CALL L1829 ;1C49 CD2918
JP NZ,L1C60 ;1C4C C2601C
LD A,(L457D) ;1C4F 3A7D45
LD BC,L19B5 ;1C52 01B519
PUSH BC ;1C55 C5
CP 1 ;1C56 FE01
RET Z ;1C58 C8
OR A ;1C59 B7
JP Z,CRLF2 ;1C5A CA0600
JP L3BA6 ;1C5D C3A63B
L1C60: CALL L168B ;1C60 CD8B16
DEC SP ;1C63 3B
LD H,(HL) ;1C64 66
INC E ;1C65 1C
CALL L168B ;1C66 CD8B16
INC L ;1C69 2C
LD A,L ;1C6A 7D
INC E ;1C6B 1C
LD A,(L457D) ;1C6C 3A7D45
LD BC,L1C7D ;1C6F 017D1C
PUSH BC ;1C72 C5
CP 1 ;1C73 FE01
RET Z ;1C75 C8
OR A ;1C76 B7
JP Z,TAB ;1C77 CA0F00
JP L3C4A ;1C7A C34A3C
L1C7D: DB 0CDH,29H,18H,0CAH ;1C7D CD2918CA Link 1C7D found at , $1C6A, $1C70
DB 0B5H,19H,0FEH,3BH ;1C81 B519FE3B
DB 28H,02H,0FEH,2CH ;1C85 2802FE2C
DB 0CAH,60H,1CH,0CDH ;1C89 CA601CCD
DB 0AFH,22H,0E5H,7AH ;1C8D AF22E57A
DB 0B7H,0C2H,0C5H,1CH ;1C91 B7C2C51C
DB 2AH,44H,46H,11H ;1C95 2A444611
DB 00H,44H,0D5H,0CDH ;1C99 0044D5CD
DB 2DH,32H,0D1H,3AH ;1C9D 2D32D13A
DB 7DH,45H,01H,0B3H ;1CA1 7D4501B3
DB 1CH,0C5H,0FEH,01H ;1CA5 1CC5FE01
DB 0CAH,4EH,2CH,0B7H ;1CA9 CA4E2CB7
DB 0CAH,27H,3DH,0C3H ;1CAD CA273DC3
DB 0B6H,3BH,0E1H,0CDH ;1CB1 B63BE1CD
DB 29H,18H,28H,06H ;1CB5 29182806
DB 0FEH,3BH,28H,02H ;1CB9 FE3B2802
DB 0FEH,2CH,0CAH,49H ;1CBD FE2CCA49
DB 1CH,0C3H,8EH,13H ;1CC1 1CC38E13
DB 0CDH,01H,18H,0C3H ;1CC5 CD0118C3
DB 0A0H,1CH ;1CC9 A01C
L1CCB: CALL L1987 ;1CCB CD8719
XOR A ;1CCE AF
LD (L457A),A ;1CCF 327A45
LD (L4565),A ;1CD2 326545
CALL L1659 ;1CD5 CD5916
JP NC,L1CEA ;1CD8 D2EA1C
L1CDB: CALL L16F1 ;1CDB CDF116
L1CDE: EX DE,HL ;1CDE EB
CALL L17A5 ;1CDF CDA517
ADC A,(HL) ;1CE2 8E
INC DE ;1CE3 13
JP NZ,L138E ;1CE4 C28E13
JP L19CF ;1CE7 C3CF19
L1CEA: CALL L1857 ;1CEA CD5718
CALL L187C ;1CED CD7C18
LD HL,L4806 ;1CF0 210648
JP L19CF ;1CF3 C3CF19
L1CF6: CALL L16F1 ;1CF6 CDF116
L1CF9: LD (L4801),HL ;1CF9 220148
EX DE,HL ;1CFC EB
CALL L17A5 ;1CFD CDA517
ADC A,(HL) ;1D00 8E
INC DE ;1D01 13
JP NZ,L138E ;1D02 C28E13
EXX ;1D05 D9
LD HL,L4805 ;1D06 210548
LD A,(HL) ;1D09 7E
CP 15 ;1D0A FE0F
JP Z,L13A7 ;1D0C CAA713
INC (HL) ;1D0F 34
DEC HL ;1D10 2B
DEC HL ;1D11 2B
LD DE,(L464A) ;1D12 ED5B4A46
DEC DE ;1D16 1B
LD BC,L0007 ;1D17 010700
LDDR ;1D1A EDB8
INC DE ;1D1C 13
LD (L464A),DE ;1D1D ED534A46
LD C,7 ;1D21 0E07
ADD HL,BC ;1D23 09
LD (HL),0 ;1D24 3600
EXX ;1D26 D9
JP L19CF ;1D27 C3CF19
L1D2A: LD HL,L4805 ;1D2A 210548
XOR A ;1D2D AF
CP (HL) ;1D2E BE
JP Z,L138E ;1D2F CA8E13
DEC (HL) ;1D32 35
L1D33: LD HL,L4803 ;1D33 210348
LD A,(HL) ;1D36 7E
OR A ;1D37 B7
JP Z,L1D4B ;1D38 CA4B1D
DEC (HL) ;1D3B 35
INC HL ;1D3C 23
DEC (HL) ;1D3D 35
LD HL,(L4648) ;1D3E 2A4846
LD BC,L0013 ;1D41 011300
ADD HL,BC ;1D44 09
LD (L4648),HL ;1D45 224846
JP L1D33 ;1D48 C3331D
L1D4B: LD HL,(L464A) ;1D4B 2A4A46
LD DE,L47FD ;1D4E 11FD47
LD BC,L0007 ;1D51 010700
LDIR ;1D54 EDB0
LD (L464A),HL ;1D56 224A46
JP L19B2 ;1D59 C3B219
L1D5C: CALL L2613 ;1D5C CD1326
CALL L169A ;1D5F CD9A16
OR (HL) ;1D62 B6
PUSH DE ;1D63 D5
CALL L1DEB ;1D64 CDEB1D
POP HL ;1D67 E1
LD (L47F0),HL ;1D68 22F047
EX DE,HL ;1D6B EB
CALL L2441 ;1D6C CD4124
CALL L1824 ;1D6F CD2418
CALL L1697 ;1D72 CD9716
XOR (HL) ;1D75 AE
CALL L1DEB ;1D76 CDEB1D
LD DE,L47F8 ;1D79 11F847
CALL L1824 ;1D7C CD2418
CALL L1688 ;1D7F CD8816
XOR A ;1D82 AF
ADC A,L ;1D83 8D
DEC E ;1D84 1D
CALL L1DEB ;1D85 CDEB1D
LD HL,(L4644) ;1D88 2A4446
JR L1D90 ;1D8B 1803
DB 21H,14H,16H ;1D8D 211416
L1D90: LD DE,L47F2 ;1D90 11F247
LD A,(HL) ;1D93 7E
LD (L47F7),A ;1D94 32F747
LD BC,L0005 ;1D97 010500
LDIR ;1D9A EDB0
LD HL,(L4648) ;1D9C 2A4846
LD DE,(L47F0) ;1D9F ED5BF047
LD A,(L4803) ;1DA3 3A0348
INC A ;1DA6 3C
L1DA7: DEC A ;1DA7 3D
JP Z,L1DCC ;1DA8 CACC1D
EX AF,AF' ;1DAB 08
LD A,(HL) ;1DAC 7E
SUB E ;1DAD 93
LD B,A ;1DAE 47
INC HL ;1DAF 23
LD A,(HL) ;1DB0 7E
SUB D ;1DB1 92
OR B ;1DB2 B0
LD BC,VIDEO ;1DB3 011200
ADD HL,BC ;1DB6 09
JP Z,L1DBE ;1DB7 CABE1D
EX AF,AF' ;1DBA 08
JP L1DA7 ;1DBB C3A71D
L1DBE: LD (L4648),HL ;1DBE 224846
EX AF,AF' ;1DC1 08
DEC A ;1DC2 3D
LD HL,L4803 ;1DC3 210348
LD B,(HL) ;1DC6 46
LD (HL),A ;1DC7 77
SUB B ;1DC8 90
INC HL ;1DC9 23
ADD A,(HL) ;1DCA 86
LD (HL),A ;1DCB 77
L1DCC: LD HL,L4804 ;1DCC 210448
LD A,(HL) ;1DCF 7E
CP 15 ;1DD0 FE0F
JP Z,L13A2 ;1DD2 CAA213
INC (HL) ;1DD5 34
DEC HL ;1DD6 2B
INC (HL) ;1DD7 34
DEC HL ;1DD8 2B
LD DE,(L4648) ;1DD9 ED5B4846
LD BC,L0013 ;1DDD 011300
DEC DE ;1DE0 1B
LDDR ;1DE1 EDB8
INC DE ;1DE3 13
EX DE,HL ;1DE4 EB
LD (L4648),HL ;1DE5 224846
JP L19B2 ;1DE8 C3B219
L1DEB: CALL L22AF ;1DEB CDAF22
LD (L4801),HL ;1DEE 220148
JP L1814 ;1DF1 C31418
L1DF4: LD A,(L4803) ;1DF4 3A0348
OR A ;1DF7 B7
JP Z,L138E ;1DF8 CA8E13
CALL L25CD ;1DFB CDCD25
LD (L4801),HL ;1DFE 220148
LD HL,(L4648) ;1E01 2A4846
CALL NC,L1E77 ;1E04 D4771E
L1E07: LD A,E ;1E07 7B
SUB (HL) ;1E08 96
INC HL ;1E09 23
LD B,A ;1E0A 47
LD A,D ;1E0B 7A
SUB (HL) ;1E0C 96
OR B ;1E0D B0
JP Z,L1E28 ;1E0E CA281E
EXX ;1E11 D9
LD HL,L4803 ;1E12 210348
LD A,(HL) ;1E15 7E
DEC A ;1E16 3D
JP Z,L138E ;1E17 CA8E13
LD (HL),A ;1E1A 77
INC HL ;1E1B 23
DEC (HL) ;1E1C 35
EXX ;1E1D D9
LD BC,VIDEO ;1E1E 011200
ADD HL,BC ;1E21 09
LD (L4648),HL ;1E22 224846
JP L1E07 ;1E25 C3071E
L1E28: INC HL ;1E28 23
CALL L2441 ;1E29 CD4124
PUSH DE ;1E2C D5
PUSH HL ;1E2D E5
CALL L2D4D ;1E2E CD4D2D
POP HL ;1E31 E1
POP DE ;1E32 D1
LD BC,L0005 ;1E33 010500
ADD HL,BC ;1E36 09
LD A,(HL) ;1E37 7E
INC HL ;1E38 23
PUSH HL ;1E39 E5
OR A ;1E3A B7
JP P,L1E57 ;1E3B F2571E
EX DE,HL ;1E3E EB
CALL L33EE ;1E3F CDEE33
POP HL ;1E42 E1
LD BC,L0005 ;1E43 010500
JP C,L1E62 ;1E46 DA621E
L1E49: ADD HL,BC ;1E49 09
LD DE,L47FD ;1E4A 11FD47
INC C ;1E4D 0C
LDIR ;1E4E EDB0
LD HL,(L4801) ;1E50 2A0148
LD A,(HL) ;1E53 7E
JP L19B8 ;1E54 C3B819
L1E57: CALL L33EE ;1E57 CDEE33
POP HL ;1E5A E1
LD BC,L0005 ;1E5B 010500
CCF ;1E5E 3F
JP C,L1E49 ;1E5F DA491E
L1E62: LD C,11 ;1E62 0E0B
ADD HL,BC ;1E64 09
LD (L4648),HL ;1E65 224846
LD HL,L4803 ;1E68 210348
DEC (HL) ;1E6B 35
INC HL ;1E6C 23
DEC (HL) ;1E6D 35
CALL L1688 ;1E6E CD8816
INC L ;1E71 2C
OR D ;1E72 B2
ADD HL,DE ;1E73 19
JP L1DF4 ;1E74 C3F41D
L1E77: LD E,(HL) ;1E77 5E
INC HL ;1E78 23
LD D,(HL) ;1E79 56
DEC HL ;1E7A 2B
RET ;1E7B C9
L1E7C: CALL L2C39 ;1E7C CD392C
PUSH HL ;1E7F E5
LD HL,(L47FF) ;1E80 2AFF47
LD A,L ;1E83 7D
OR H ;1E84 B4
JP Z,L138E ;1E85 CA8E13
XOR A ;1E88 AF
LD (L4574),A ;1E89 327445
POP HL ;1E8C E1
LD (L4801),HL ;1E8D 220148
PUSH HL ;1E90 E5
CALL L162D ;1E91 CD2D16
CP 34 ;1E94 FE22
LD DE,L1EAF ;1E96 11AF1E
JP NZ,L1EA9 ;1E99 C2A91E
CALL L2383 ;1E9C CD8323
CALL L169A ;1E9F CD9A16
DEC SP ;1EA2 3B
LD (L4801),HL ;1EA3 220148
CALL L1801 ;1EA6 CD0118
L1EA9: CALL L1EC1 ;1EA9 CDC11E
JP L1F06 ;1EAC C3061F
L1EAF: DB "? " ;1EAF 3F20
DB 0DH ;1EB1 0D
L1EB2: XOR A ;1EB2 AF
LD (CHARCOUNT),A ;1EB3 329411
RET ;1EB6 C9
L1EB7: LD A,(L457D) ;1EB7 3A7D45
OR A ;1EBA B7
CALL Z,CRLF ;1EBB CC0900
LD DE,L1EAF ;1EBE 11AF1E
L1EC1: LD A,(L457D) ;1EC1 3A7D45
OR A ;1EC4 B7
CALL Z,MESSAGE ;1EC5 CC1500
CALL NZ,L1EB2 ;1EC8 C4B21E
LD DE,L4455 ;1ECB 115544
LD A,(CHARCOUNT) ;1ECE 3A9411
CALL L2C7A ;1ED1 CD7A2C
CALL USER ;1ED4 CD0300
EX DE,HL ;1ED7 EB
LD A,(L457D) ;1ED8 3A7D45
OR A ;1EDB B7
JP NZ,L1EF8 ;1EDC C2F81E
LD A,27 ;1EDF 3E1B
CP (HL) ;1EE1 BE
JP Z,L1EFC ;1EE2 CAFC1E
LD A,13 ;1EE5 3E0D
L1EE7: CP (HL) ;1EE7 BE
JP Z,L1EB7 ;1EE8 CAB71E
INC HL ;1EEB 23
DEC C ;1EEC 0D
JR NZ,L1EE7 ;1EED 20F8
CALL L168B ;1EEF CD8B16
DEC C ;1EF2 0D
RET M ;1EF3 F8
LD E,195 ;1EF4 1EC3
OR A ;1EF6 B7
LD E,34 ;1EF7 1E22
LD (HL),L ;1EF9 75
LD B,L ;1EFA 45
RET ;1EFB C9
L1EFC: LD A,129 ;1EFC 3E81
LD (L4565),A ;1EFE 326545
POP AF ;1F01 F1
POP HL ;1F02 E1
JP L1B39 ;1F03 C3391B
L1F06: LD HL,(L4801) ;1F06 2A0148
CALL L1829 ;1F09 CD2918
JP Z,L1FA4 ;1F0C CAA41F
CALL L2613 ;1F0F CD1326
CALL L2436 ;1F12 CD3624
CALL L1829 ;1F15 CD2918
JR Z,L1F1E ;1F18 2804
CALL L169A ;1F1A CD9A16
INC L ;1F1D 2C
L1F1E: LD (L4801),HL ;1F1E 220148
CALL L197B ;1F21 CD7B19
LD HL,(L4575) ;1F24 2A7545
CALL L168B ;1F27 CD8B16
INC L ;1F2A 2C
DEC L ;1F2B 2D
RRA ;1F2C 1F
LD (L4575),HL ;1F2D 227545
LD A,(L457D) ;1F30 3A7D45
OR A ;1F33 B7
JP NZ,L1F3D ;1F34 C23D1F
CALL L1829 ;1F37 CD2918
CALL Z,L1F9A ;1F3A CC9A1F
L1F3D: LD HL,(L4575) ;1F3D 2A7545
CALL L18C4 ;1F40 CDC418
LD A,(L4574) ;1F43 3A7445
OR A ;1F46 B7
JP Z,L1F4D ;1F47 CA4D1F
LD (L4578),HL ;1F4A 227845
L1F4D: LD (L4575),HL ;1F4D 227545
LD A,(L4571) ;1F50 3A7145
OR A ;1F53 B7
CALL Z,L1F72 ;1F54 CC721F
CALL L1976 ;1F57 CD7619
CALL L1B6A ;1F5A CD6A1B
SBC A,L ;1F5D 9D
INC DE ;1F5E 13
LD A,(L457D) ;1F5F 3A7D45
OR A ;1F62 B7
JP Z,L1F06 ;1F63 CA061F
LD HL,(L4801) ;1F66 2A0148
CALL L1829 ;1F69 CD2918
CALL NZ,L1EC1 ;1F6C C4C11E
JP L1F06 ;1F6F C3061F
L1F72: CALL L1801 ;1F72 CD0118
EX DE,HL ;1F75 EB
CALL L190D ;1F76 CD0D19
LD A,H ;1F79 7C
RRA ;1F7A 1F
RET ;1F7B C9
DB 0F1H,3AH,74H,45H ;1F7C F13A7445 Link 1F7C found at , $1F79
DB 0B7H,0C2H,98H,13H ;1F80 B7C29813
DB 3AH,7DH,45H,0B7H ;1F84 3A7D45B7
DB 0C2H,98H,13H,11H ;1F88 C2981311
DB 18H,13H,0CDH,57H ;1F8C 1813CD57
DB 13H,11H,0FFH,12H ;1F90 1311FF12
DB 0CDH,15H,00H,0C3H ;1F94 CD1500C3
DB 8CH,1EH ;1F98 8C1E
L1F9A: LD A,(L4574) ;1F9A 3A7445
OR A ;1F9D B7
JP Z,L1EB7 ;1F9E CAB71E
JP L1FD4 ;1FA1 C3D41F
L1FA4: LD A,(L4574) ;1FA4 3A7445
OR A ;1FA7 B7
JP NZ,L19B2 ;1FA8 C2B219
POP AF ;1FAB F1
JP L19B2 ;1FAC C3B219
L1FAF: LD (L4801),HL ;1FAF 220148
LD A,(L4577) ;1FB2 3A7745
OR A ;1FB5 B7
CALL Z,L1FCA ;1FB6 CCCA1F
LD HL,(L4578) ;1FB9 2A7845
LD (L4575),HL ;1FBC 227545
XOR A ;1FBF AF
LD (L457D),A ;1FC0 327D45
INC A ;1FC3 3C
LD (L4574),A ;1FC4 327445
JP L1F06 ;1FC7 C3061F
L1FCA: INC A ;1FCA 3C
LD (L4577),A ;1FCB 327745
LD HL,L4806 ;1FCE 210648
JP L1FE0 ;1FD1 C3E01F
L1FD4: LD HL,(L4575) ;1FD4 2A7545
CALL L163D ;1FD7 CD3D16
INC HL ;1FDA 23
CP 58 ;1FDB FE3A
JP Z,L1FE9 ;1FDD CAE91F
L1FE0: LD A,(HL) ;1FE0 7E
INC HL ;1FE1 23
OR (HL) ;1FE2 B6
JP Z,L1385 ;1FE3 CA8513
INC HL ;1FE6 23
INC HL ;1FE7 23
INC HL ;1FE8 23
L1FE9: CALL L168B ;1FE9 CD8B16
ADD A,C ;1FEC 81
RST 10H ;16 ;1FED D7
RRA ;1FEE 1F
LD (L4578),HL ;1FEF 227845
LD (L4575),HL ;1FF2 227545
RET ;1FF5 C9
L1FF6: CALL L22AF ;1FF6 CDAF22
CALL L1814 ;1FF9 CD1418
LD DE,(L4644) ;1FFC ED5B4446
LD A,(DE) ;2000 1A
LD DE,COLDSTART ;2001 110000
CP 193 ;2004 FEC1
JP C,L2019 ;2006 DA1920
SUB 209 ;2009 D6D1
JP NC,L2019 ;200B D21920
LD BC,L2019 ;200E 011920
PUSH BC ;2011 C5
PUSH HL ;2012 E5
LD HL,(L4644) ;2013 2A4446
JP L1963 ;2016 C36319
L2019: LD A,(HL) ;2019 7E
INC HL ;201A 23
SUB 137 ;201B D689
JR Z,L2024 ;201D 2805
CP 2 ;201F FE02
JP NZ,L138E ;2021 C28E13
L2024: EX AF,AF' ;2024 08
LD A,E ;2025 7B
L2026: OR A ;2026 B7
JP Z,L1B27 ;2027 CA271B
LD A,D ;202A 7A
OR A ;202B B7
JP NZ,L1B27 ;202C C2271B
L202F: DEC E ;202F 1D
JP Z,L2042 ;2030 CA4220
L2033: CALL L1829 ;2033 CD2918
JP Z,L19B8 ;2036 CAB819
CP 44 ;2039 FE2C
INC HL ;203B 23
JP NZ,L2033 ;203C C23320
JP L202F ;203F C32F20
L2042: CALL L16F1 ;2042 CDF116
CALL L163D ;2045 CD3D16
EX AF,AF' ;2048 08
OR A ;2049 B7
JP NZ,L1CF9 ;204A C2F91C
JP L1CDE ;204D C3DE1C
L2050: CALL L2613 ;2050 CD1326
LD BC,COLDSTART ;2053 010000
CP 36 ;2056 FE24
JR NZ,L205C ;2058 2002
INC HL ;205A 23
INC B ;205B 04
L205C: CALL L169A ;205C CD9A16
JR Z,L202E ;205F 28CD
EXX ;2061 D9
JR NZ,L2026 ;2062 20C2
OR L ;2064 B5
JR NZ,L204C ;2065 20E5
LD HL,(L20D7) ;2067 2AD720
LD E,H ;206A 5C
LD D,A ;206B 57
LD H,A ;206C 67
INC HL ;206D 23
INC DE ;206E 13
CALL L16A7 ;206F CDA716
SUB E ;2072 93
INC DE ;2073 13
LD A,(L20D6) ;2074 3AD620
OR A ;2077 B7
POP HL ;2078 E1
PUSH DE ;2079 D5
PUSH HL ;207A E5
JR NZ,L2085 ;207B 2008
LD HL,L0005 ;207D 210500
CALL L16A7 ;2080 CDA716
SUB E ;2083 93
INC DE ;2084 13
L2085: LD HL,L0004 ;2085 210400
ADD HL,DE ;2088 19
JP C,L1393 ;2089 DA9313
LD B,H ;208C 44
LD C,L ;208D 4D
POP DE ;208E D1
CALL L177C ;208F CD7C17
CALL L189C ;2092 CD9C18
LD HL,(L4630) ;2095 2A3046
EX DE,HL ;2098 EB
LD (HL),E ;2099 73
INC HL ;209A 23
LD (HL),D ;209B 72
INC HL ;209C 23
LD DE,(L20D7) ;209D ED5BD720
LD (HL),E ;20A1 73
INC HL ;20A2 23
LD (HL),D ;20A3 72
INC HL ;20A4 23
POP BC ;20A5 C1
LD A,(L20D6) ;20A6 3AD620
OR A ;20A9 B7
JP Z,L20C1 ;20AA CAC120
L20AD: LD (HL),13 ;20AD 360D
INC HL ;20AF 23
DEC BC ;20B0 0B
LD A,B ;20B1 78
OR C ;20B2 B1
JR NZ,L20AD ;20B3 20F8
L20B5: LD HL,(L20D4) ;20B5 2AD420
CALL L168B ;20B8 CD8B16
INC L ;20BB 2C
OR L ;20BC B5
ADD HL,DE ;20BD 19
JP L2050 ;20BE C35020
L20C1: EX DE,HL ;20C1 EB
L20C2: PUSH BC ;20C2 C5
LD HL,L1619 ;20C3 211916
LD BC,L0005 ;20C6 010500
LDIR ;20C9 EDB0
POP BC ;20CB C1
DEC BC ;20CC 0B
LD A,B ;20CD 78
OR C ;20CE B1
JR NZ,L20C2 ;20CF 20F1
JP L20B5 ;20D1 C3B520
L20D4: DW 0A323H ;20D4 23A3
L20D6: DB 33H ;20D6 33
L20D7: DW 09E3EH ;20D7 3E9E
L20D9: PUSH DE ;20D9 D5
PUSH BC ;20DA C5
CALL L19A9 ;20DB CDA919
POP BC ;20DE C1
LD A,(HL) ;20DF 7E
CP 44 ;20E0 FE2C
CALL Z,L215A ;20E2 CC5A21
CALL L169A ;20E5 CD9A16
ADD HL,HL ;20E8 29
LD (L20D4),HL ;20E9 22D420
POP HL ;20EC E1
LD (L4630),HL ;20ED 223046
EX DE,HL ;20F0 EB
LD (L20D7),HL ;20F1 22D720
LD A,B ;20F4 78
LD (L20D6),A ;20F5 32D620
LD HL,L4636 ;20F8 213646
LD DE,CRLF2 ;20FB 110600
OR A ;20FE B7
JR NZ,L2102 ;20FF 2001
ADD HL,DE ;2101 19
L2102: LD A,C ;2102 79
LD E,2 ;2103 1E02
OR A ;2105 B7
JR NZ,L2109 ;2106 2001
ADD HL,DE ;2108 19
L2109: LD E,(HL) ;2109 5E
INC HL ;210A 23
LD D,(HL) ;210B 56
EX DE,HL ;210C EB
L210D: CALL L17C4 ;210D CDC417
LD B,E ;2110 43
LD HL,L45CA ;2111 21CA45
LD HL,L235E ;2114 215E23
PUSH HL ;2117 E5
LD L,(HL) ;2118 6E
LD D,0 ;2119 1600
LD H,D ;211B 62
INC HL ;211C 23
INC DE ;211D 13
CALL L16C8 ;211E CDC816
LD A,(L20D6) ;2121 3AD620
OR A ;2124 B7
JP NZ,L2134 ;2125 C23421
LD HL,L0005 ;2128 210500
CALL L16C8 ;212B CDC816
POP HL ;212E E1
ADD HL,DE ;212F 19
L2130: INC HL ;2130 23
JP L210D ;2131 C30D21
L2134: POP HL ;2134 E1
L2135: LD A,13 ;2135 3E0D
L2137: INC HL ;2137 23
CP (HL) ;2138 BE
JR NZ,L2137 ;2139 20FC
DEC DE ;213B 1B
LD A,D ;213C 7A
OR E ;213D B3
JR NZ,L2135 ;213E 20F5
JP L2130 ;2140 C33021
DB 0AFH,0C9H,4EH,23H ;2143 AFC94E23 Link 2143 found at , $2110
DB 46H,23H,0EDH,5BH ;2147 4623ED5B
DB 0D7H,20H,78H,0BAH ;214B D72078BA
DB 38H,02H,79H,0BBH ;214F 380279BB
DB 0DAH,8EH,13H,3EH ;2153 DA8E133E
DB 01H,0B7H,0C9H ;2157 01B7C9
L215A: INC C ;215A 0C
PUSH BC ;215B C5
PUSH DE ;215C D5
INC HL ;215D 23
CALL L19A9 ;215E CDA919
LD A,E ;2161 7B
POP DE ;2162 D1
LD D,A ;2163 57
POP BC ;2164 C1
RET ;2165 C9
L2166: CALL L198C ;2166 CD8C19
PUSH DE ;2169 D5
CALL L169A ;216A CD9A16
INC L ;216D 2C
CALL L19A9 ;216E CDA919
EX (SP),HL ;2171 E3
LD (HL),E ;2172 73
POP HL ;2173 E1
JP L19B5 ;2174 C3B519
L2177: PUSH HL ;2177 E5
CALL L1857 ;2178 CD5718
CALL L1872 ;217B CD7218
POP HL ;217E E1
JP L19B5 ;217F C3B519
L2182: CALL L2258 ;2182 CD5822
CALL L1814 ;2185 CD1418
LD IX,(L4644) ;2188 DD2A4446
BIT 7,(IX+4) ;218C DDCB047E
JP Z,L19C7 ;2190 CAC719
LD A,(HL) ;2193 7E
INC HL ;2194 23
CP 137 ;2195 FE89
L2197: JP Z,L1CDB ;2197 CADB1C
CP 139 ;219A FE8B
JP Z,L1CF6 ;219C CAF61C
CP 173 ;219F FEAD
JP NZ,L138E ;21A1 C28E13
CALL L1659 ;21A4 CD5916
JP C,L1CDB ;21A7 DADB1C
LD (L4801),HL ;21AA 220148
JP L19E1 ;21AD C3E119
L21B0: CALL L162D ;21B0 CD2D16
SUB 65 ;21B3 D641
CP 26 ;21B5 FE1A
JP NC,L138E ;21B7 D28E13
LD E,(HL) ;21BA 5E
INC HL ;21BB 23
CALL L169A ;21BC CD9A16
JR Z,L2197 ;21BF 28D6
LD B,C ;21C1 41
CP 26 ;21C2 FE1A
JP NC,L138E ;21C4 D28E13
LD D,(HL) ;21C7 56
INC HL ;21C8 23
CALL L169A ;21C9 CD9A16
ADD HL,HL ;21CC 29
CALL L169A ;21CD CD9A16
OR (HL) ;21D0 B6
PUSH HL ;21D1 E5
CALL L163D ;21D2 CD3D16
POP BC ;21D5 C1
PUSH HL ;21D6 E5
XOR A ;21D7 AF
SBC HL,BC ;21D8 ED42
PUSH BC ;21DA C5
PUSH HL ;21DB E5
LD HL,(L4634) ;21DC 2A3446
L21DF: LD A,(HL) ;21DF 7E
CP E ;21E0 BB
JP Z,L2204 ;21E1 CA0422
CP 0 ;21E4 FE00
JR Z,L21EF ;21E6 2807
INC HL ;21E8 23
INC HL ;21E9 23
CALL L1633 ;21EA CD3316
JR L21DF ;21ED 18F0
L21EF: EX DE,HL ;21EF EB
LD BC,USER ;21F0 010300
CALL L177C ;21F3 CD7C17
CALL L189C ;21F6 CD9C18
EX DE,HL ;21F9 EB
LD (HL),E ;21FA 73
INC HL ;21FB 23
LD (HL),D ;21FC 72
INC HL ;21FD 23
LD (HL),13 ;21FE 360D
EX DE,HL ;2200 EB
JP L221A ;2201 C31A22
L2204: INC HL ;2204 23
LD (HL),D ;2205 72
INC HL ;2206 23
PUSH HL ;2207 E5
CALL L163D ;2208 CD3D16
POP DE ;220B D1
XOR A ;220C AF
SBC HL,DE ;220D ED52
LD B,H ;220F 44
LD C,L ;2210 4D
CALL L1766 ;2211 CD6617
CALL L1651 ;2214 CD5116
CALL L189C ;2217 CD9C18
L221A: POP BC ;221A C1
POP HL ;221B E1
CALL L1796 ;221C CD9617
CALL L189C ;221F CD9C18
POP HL ;2222 E1
JP L19B5 ;2223 C3B519
L2226: CALL L1829 ;2226 CD2918
JP Z,L19B5 ;2229 CAB519
CALL L22AF ;222C CDAF22
CALL L1829 ;222F CD2918
JR Z,L2235 ;2232 2801
INC HL ;2234 23
L2235: PUSH HL ;2235 E5
CALL L180F ;2236 CD0F18
CALL L1801 ;2239 CD0118
CALL MUSIC ;223C CD3000
JP C,L1385 ;223F DA8513
POP HL ;2242 E1
JP L2226 ;2243 C32622
L2246: CALL L19A9 ;2246 CDA919
LD A,E ;2249 7B
DEC A ;224A 3D
CP 7 ;224B FE07
JP NC,L1398 ;224D D29813
INC A ;2250 3C
CALL SPEED ;2251 CD4100
JP L1B27 ;2254 C3271B
L2257: INC HL ;2257 23
L2258: CALL L22AF ;2258 CDAF22
L225B: CP 176 ;225B FEB0
RET C ;225D D8
CP 188 ;225E FEBC
RET NC ;2260 D0
EX AF,AF' ;2261 08
LD A,D ;2262 7A
OR A ;2263 B7
JP NZ,L2272 ;2264 C27222
EX AF,AF' ;2267 08
EXX ;2268 D9
LD BC,L225B ;2269 015B22
LD DE,L22AE ;226C 11AE22
JP L2339 ;226F C33923
L2272: EX AF,AF' ;2272 08
CP 182 ;2273 FEB6
JP NZ,L138E ;2275 C28E13
LD A,C ;2278 79
PUSH DE ;2279 D5
PUSH AF ;227A F5
CALL L22AE ;227B CDAE22
CALL L180F ;227E CD0F18
POP AF ;2281 F1
EX (SP),HL ;2282 E3
LD B,A ;2283 47
SUB C ;2284 91
JP NZ,L22A1 ;2285 C2A122
OR B ;2288 B0
JP Z,L229C ;2289 CA9C22
CALL L1801 ;228C CD0118
EX DE,HL ;228F EB
CALL L1801 ;2290 CD0118
L2293: LD A,(DE) ;2293 1A
CP (HL) ;2294 BE
INC HL ;2295 23
INC DE ;2296 13
JP NZ,L22A1 ;2297 C2A122
DJNZ L2293 ;229A 10F7
L229C: LD DE,L161E ;229C 111E16
JR Z,L22A4 ;229F 2803
L22A1: LD DE,L1619 ;22A1 111916
L22A4: CALL L181A ;22A4 CD1A18
POP HL ;22A7 E1
CALL L237B ;22A8 CD7B23
JP L225B ;22AB C35B22
L22AE: INC HL ;22AE 23
L22AF: LD A,(HL) ;22AF 7E
CP 32 ;22B0 FE20
JR Z,L22AE ;22B2 28FA
CP 188 ;22B4 FEBC
JP Z,L22C7 ;22B6 CAC722
CP 189 ;22B9 FEBD
JP NZ,L22C8 ;22BB C2C822
CALL L2315 ;22BE CD1523
CALL L2393 ;22C1 CD9323
JP L22CB ;22C4 C3CB22
L22C7: INC HL ;22C7 23
L22C8: CALL L2316 ;22C8 CD1623
L22CB: CP 188 ;22CB FEBC
RET C ;22CD D8
CP 190 ;22CE FEBE
RET NC ;22D0 D0
EX AF,AF' ;22D1 08
LD A,D ;22D2 7A
OR A ;22D3 B7
JP NZ,L22E2 ;22D4 C2E222
EX AF,AF' ;22D7 08
EXX ;22D8 D9
LD BC,L22CB ;22D9 01CB22
LD DE,L2315 ;22DC 111523
JP L2339 ;22DF C33923
L22E2: EX AF,AF' ;22E2 08
CP 188 ;22E3 FEBC
JP NZ,L138E ;22E5 C28E13
PUSH DE ;22E8 D5
PUSH BC ;22E9 C5
CALL L2315 ;22EA CD1523
CALL L180F ;22ED CD0F18
LD A,C ;22F0 79
EXX ;22F1 D9
POP BC ;22F2 C1
POP DE ;22F3 D1
ADD A,C ;22F4 81
JP C,L1398 ;22F5 DA9813
LD H,B ;22F8 60
LD L,A ;22F9 6F
PUSH HL ;22FA E5
EXX ;22FB D9
PUSH HL ;22FC E5
PUSH DE ;22FD D5
EXX ;22FE D9
POP HL ;22FF E1
PUSH HL ;2300 E5
CALL L1801 ;2301 CD0118
EX DE,HL ;2304 EB
CALL L1801 ;2305 CD0118
CALL L1796 ;2308 CD9617
CALL L189C ;230B CD9C18
POP DE ;230E D1
POP HL ;230F E1
POP BC ;2310 C1
LD A,(HL) ;2311 7E
JP L22CB ;2312 C3CB22
L2315: INC HL ;2315 23
L2316: CALL L232A ;2316 CD2A23
L2319: CP 190 ;2319 FEBE
RET C ;231B D8
CP 192 ;231C FEC0
RET NC ;231E D0
EXX ;231F D9
LD BC,L2319 ;2320 011923
LD DE,L2329 ;2323 112923
JP L2339 ;2326 C33923
L2329: DB 23H ;2329 23
L232A: CALL L2383 ;232A CD8323
L232D: CP 207 ;232D FECF
RET NZ ;232F C0
LD A,192 ;2330 3EC0
EXX ;2332 D9
LD BC,L232D ;2333 012D23
LD DE,L2382 ;2336 118223
L2339: PUSH BC ;2339 C5
LD HL,(L4644) ;233A 2A4446
LD BC,L0005 ;233D 010500
ADD HL,BC ;2340 09
LD (L4644),HL ;2341 224446
SUB 176 ;2344 D6B0
ADD A,A ;2346 87
LD HL,L2628 ;2347 212826
LD C,A ;234A 4F
ADD HL,BC ;234B 09
LD C,(HL) ;234C 4E
INC HL ;234D 23
LD B,(HL) ;234E 46
PUSH BC ;234F C5
LD HL,L235C ;2350 215C23
PUSH HL ;2353 E5
PUSH DE ;2354 D5
EXX ;2355 D9
LD A,D ;2356 7A
OR A ;2357 B7
RET Z ;2358 C8
JP L139D ;2359 C39D13
L235C: DB 7AH,0B7H ;235C 7AB7 Link 235C found at , $2351
L235E: DB 0C2H,9DH,13H,0FDH ;235E C29D13FD
DB 0E1H,0E5H,2AH,44H ;2362 E1E52A44
DB 46H,01H,0FBH,0FFH ;2366 4601FBFF
DB 5DH,54H,09H,22H ;236A 5D540922
DB 44H,46H,0EBH,01H ;236E 4446EB01
DB 7AH,23H,0C5H,0FDH ;2372 7A23C5FD
DB 0E9H ;2376 E9
L2377: CALL L181A ;2377 CD1A18
L237A: POP HL ;237A E1
L237B: LD BC,L0005 ;237B 010500
LD D,B ;237E 50
LD E,B ;237F 58
LD A,(HL) ;2380 7E
RET ;2381 C9
L2382: DB 23H ;2382 23
L2383: CALL L162D ;2383 CD2D16
CP 188 ;2386 FEBC
JP Z,L23A8 ;2388 CAA823
CP 189 ;238B FEBD
JP NZ,L23A9 ;238D C2A923
CALL L23A8 ;2390 CDA823
L2393: EXX ;2393 D9
LD HL,(L4644) ;2394 2A4446
PUSH HL ;2397 E5
LD BC,L0004 ;2398 010400
ADD HL,BC ;239B 09
LD A,(HL) ;239C 7E
POP HL ;239D E1
OR A ;239E B7
JR Z,L23A5 ;239F 2804
LD A,(HL) ;23A1 7E
ADD A,128 ;23A2 C680
LD (HL),A ;23A4 77
L23A5: EXX ;23A5 D9
LD A,(HL) ;23A6 7E
RET ;23A7 C9
L23A8: INC HL ;23A8 23
L23A9: CALL L25CD ;23A9 CDCD25
JP NC,L23CC ;23AC D2CC23
LD A,70 ;23AF 3E46
CP E ;23B1 BB
JR NZ,L23BA ;23B2 2006
LD A,78 ;23B4 3E4E
CP D ;23B6 BA
JP Z,L2476 ;23B7 CA7624
L23BA: CALL L2436 ;23BA CD3624
PUSH HL ;23BD E5
LD A,B ;23BE 78
OR A ;23BF B7
JP Z,L2377 ;23C0 CA7723
EX DE,HL ;23C3 EB
LD B,0 ;23C4 0600
CALL L18DF ;23C6 CDDF18
POP HL ;23C9 E1
LD A,(HL) ;23CA 7E
RET ;23CB C9
L23CC: CP 40 ;23CC FE28
JP Z,L23F2 ;23CE CAF223
CP 34 ;23D1 FE22
JP Z,L18C4 ;23D3 CAC418
CALL L193D ;23D6 CD3D19
JP NZ,L23E3 ;23D9 C2E323
LD DE,(L4644) ;23DC ED5B4446
JP L2FD9 ;23E0 C3D92F
L23E3: CP 255 ;23E3 FEFF
JP NZ,L2400 ;23E5 C20024
CALL L162C ;23E8 CD2C16
PUSH HL ;23EB E5
LD DE,L1623 ;23EC 112316
JP L2377 ;23EF C37723
L23F2: LD BC,COLDSTART ;23F2 010000
CALL L1752 ;23F5 CD5217
CALL L2257 ;23F8 CD5722
CALL L169A ;23FB CD9A16
ADD HL,HL ;23FE 29
RET ;23FF C9
L2400: SUB 192 ;2400 D6C0
CP 15 ;2402 FE0F
JP NC,L240D ;2404 D20D24
LD DE,L264A ;2407 114A26
JP L1A12 ;240A C3121A
L240D: SUB 16 ;240D D610
CP 15 ;240F FE0F
JP NC,L138E ;2411 D28E13
PUSH AF ;2414 F5
CALL L22AE ;2415 CDAE22
CALL L1814 ;2418 CD1418
CALL L169A ;241B CD9A16
ADD HL,HL ;241E 29
POP AF ;241F F1
PUSH HL ;2420 E5
LD HL,L237A ;2421 217A23
PUSH HL ;2424 E5
LD HL,(L4644) ;2425 2A4446
EX DE,HL ;2428 EB
LD HL,L2662 ;2429 216226
ADD A,A ;242C 87
LD C,A ;242D 4F
LD B,0 ;242E 0600
ADD HL,BC ;2430 09
LD A,(HL) ;2431 7E
INC HL ;2432 23
LD H,(HL) ;2433 66
LD L,A ;2434 6F
JP (HL) ;2435 E9
L2436: LD A,(HL) ;2436 7E
CP 36 ;2437 FE24
JP Z,L24F7 ;2439 CAF724
CP 40 ;243C FE28
JP Z,L2585 ;243E CA8525
L2441: PUSH HL ;2441 E5
LD HL,(L4640) ;2442 2A4046
LD BC,L0005 ;2445 010500
L2448: LD A,(HL) ;2448 7E
CP E ;2449 BB
INC HL ;244A 23
JR NZ,L2452 ;244B 2005
LD A,(HL) ;244D 7E
CP D ;244E BA
JP Z,L2471 ;244F CA7124
L2452: OR A ;2452 B7
JR Z,L245A ;2453 2805
INC HL ;2455 23
ADD HL,BC ;2456 09
JP L2448 ;2457 C34824
L245A: LD C,7 ;245A 0E07
DEC HL ;245C 2B
PUSH DE ;245D D5
EX DE,HL ;245E EB
LD HL,L1619 ;245F 211916
DEC HL ;2462 2B
DEC HL ;2463 2B
CALL L1796 ;2464 CD9617
CALL L189C ;2467 CD9C18
EX DE,HL ;246A EB
POP DE ;246B D1
LD (HL),E ;246C 73
INC HL ;246D 23
LD (HL),D ;246E 72
LD C,5 ;246F 0E05
L2471: INC HL ;2471 23
EX DE,HL ;2472 EB
POP HL ;2473 E1
LD A,(HL) ;2474 7E
RET ;2475 C9
L2476: LD A,(HL) ;2476 7E
SUB 65 ;2477 D641
CP 26 ;2479 FE1A
JP NC,L138E ;247B D28E13
LD E,(HL) ;247E 5E
INC HL ;247F 23
CALL L169A ;2480 CD9A16
JR Z,L245A ;2483 28D5
CALL L22AF ;2485 CDAF22
CALL L1814 ;2488 CD1418
CALL L169A ;248B CD9A16
ADD HL,HL ;248E 29
POP DE ;248F D1
PUSH HL ;2490 E5
LD HL,(L4634) ;2491 2A3446
L2494: LD A,(HL) ;2494 7E
CP 0 ;2495 FE00
JP Z,L138E ;2497 CA8E13
CP E ;249A BB
JR Z,L24A4 ;249B 2807
INC HL ;249D 23
INC HL ;249E 23
CALL L1633 ;249F CD3316
JR L2494 ;24A2 18F0
L24A4: INC HL ;24A4 23
LD E,(HL) ;24A5 5E
INC HL ;24A6 23
PUSH HL ;24A7 E5
PUSH DE ;24A8 D5
LD D,32 ;24A9 1620
CALL L2441 ;24AB CD4124
POP HL ;24AE E1
PUSH DE ;24AF D5
PUSH HL ;24B0 E5
LD HL,(L4646) ;24B1 2A4646
LD DE,L464C ;24B4 114C46
CALL L1662 ;24B7 CD6216
JP Z,L13AC ;24BA CAAC13
LD BC,LFFFA ;24BD 01FAFF
ADD HL,BC ;24C0 09
LD (L4646),HL ;24C1 224646
POP DE ;24C4 D1
LD (HL),E ;24C5 73
INC HL ;24C6 23
POP DE ;24C7 D1
LD BC,L0005 ;24C8 010500
EX DE,HL ;24CB EB
CALL L1799 ;24CC CD9917
EX DE,HL ;24CF EB
LD HL,(L4644) ;24D0 2A4446
CALL L1799 ;24D3 CD9917
POP HL ;24D6 E1
CALL L22AF ;24D7 CDAF22
CALL L1814 ;24DA CD1418
CALL L1829 ;24DD CD2918
JP NZ,L138E ;24E0 C28E13
LD HL,(L4646) ;24E3 2A4646
LD E,(HL) ;24E6 5E
INC HL ;24E7 23
LD D,32 ;24E8 1620
CALL L2441 ;24EA CD4124
CALL L1799 ;24ED CD9917
ADD HL,BC ;24F0 09
LD (L4646),HL ;24F1 224646
JP L237A ;24F4 C37A23
L24F7: CALL L162C ;24F7 CD2C16
CP 40 ;24FA FE28
JP Z,L2580 ;24FC CA8025
PUSH HL ;24FF E5
LD HL,L4954 ;2500 215449
XOR A ;2503 AF
SBC HL,DE ;2504 ED52
JP Z,L2539 ;2506 CA3925
EX DE,HL ;2509 EB
LD (L4630),HL ;250A 223046
LD HL,(L463A) ;250D 2A3A46
L2510: CALL L17C4 ;2510 CDC417
LD E,37 ;2513 1E25
JP Z,L2530 ;2515 CA3025
CALL L1633 ;2518 CD3316
JP L2510 ;251B C31025
DB 01H,03H,00H,0EBH ;251E 010300EB Link 251E found at , $2513
DB 21H,30H,46H,0CDH ;2522 213046CD
DB 96H,17H,0CDH,9CH ;2526 9617CD9C
DB 18H,0EBH,23H,23H ;252A 18EB2323
DB 36H,0DH ;252E 360D
L2530: CALL L17F3 ;2530 CDF317
EX DE,HL ;2533 EB
LD B,1 ;2534 0601
POP HL ;2536 E1
LD A,(HL) ;2537 7E
RET ;2538 C9
L2539: CALL READTIME ;2539 CD3B00
EX DE,HL ;253C EB
OR A ;253D B7
JR Z,L2542 ;253E 2802
LD A,12 ;2540 3E0C
L2542: EXX ;2542 D9
LD HL,L4559 ;2543 215945
PUSH HL ;2546 E5
EXX ;2547 D9
LD DE,LF1F0 ;2548 11F0F1
CALL L2560 ;254B CD6025
LD DE,LFFC4 ;254E 11C4FF
CALL L255F ;2551 CD5F25
LD A,L ;2554 7D
CALL L2569 ;2555 CD6925
POP DE ;2558 D1
LD BC,L0106 ;2559 010601
POP HL ;255C E1
LD A,(HL) ;255D 7E
RET ;255E C9
L255F: XOR A ;255F AF
L2560: ADD HL,DE ;2560 19
JR NC,L2566 ;2561 3003
INC A ;2563 3C
JR L2560 ;2564 18FA
L2566: OR A ;2566 B7
SBC HL,DE ;2567 ED52
L2569: LD BC,L30F6 ;2569 01F630
L256C: ADD A,C ;256C 81
JR NC,L2572 ;256D 3003
INC B ;256F 04
JR L256C ;2570 18FA
L2572: ADD A,58 ;2572 C63A
EX AF,AF' ;2574 08
LD A,B ;2575 78
EXX ;2576 D9
LD (HL),A ;2577 77
INC HL ;2578 23
EX AF,AF' ;2579 08
LD (HL),A ;257A 77
INC HL ;257B 23
LD (HL),13 ;257C 360D
EXX ;257E D9
RET ;257F C9
L2580: LD BC,L0100 ;2580 010001
JR L2588 ;2583 1803
L2585: LD BC,COLDSTART ;2585 010000
L2588: INC HL ;2588 23
CALL L20D9 ;2589 CDD920
JP Z,L138E ;258C CA8E13
PUSH HL ;258F E5
LD L,C ;2590 69
LD H,0 ;2591 2600
LD C,E ;2593 4B
LD E,D ;2594 5A
LD B,H ;2595 44
LD D,H ;2596 54
PUSH BC ;2597 C5
INC HL ;2598 23
CALL L16C8 ;2599 CDC816
POP HL ;259C E1
ADD HL,DE ;259D 19
EX DE,HL ;259E EB
LD A,(L20D6) ;259F 3AD620
OR A ;25A2 B7
JP NZ,L25B5 ;25A3 C2B525
LD HL,L0005 ;25A6 210500
CALL L16C8 ;25A9 CDC816
POP HL ;25AC E1
ADD HL,DE ;25AD 19
EX DE,HL ;25AE EB
LD BC,L0005 ;25AF 010500
JP L25C7 ;25B2 C3C725
L25B5: POP HL ;25B5 E1
L25B6: LD A,D ;25B6 7A
OR E ;25B7 B3
JP Z,L25C1 ;25B8 CAC125
DEC DE ;25BB 1B
CALL L1633 ;25BC CD3316
JR L25B6 ;25BF 18F5
L25C1: CALL L17F3 ;25C1 CDF317
EX DE,HL ;25C4 EB
LD B,1 ;25C5 0601
L25C7: LD HL,(L20D4) ;25C7 2AD420
LD A,(HL) ;25CA 7E
RET ;25CB C9
L25CC: INC HL ;25CC 23
L25CD: LD A,(HL) ;25CD 7E
CP 32 ;25CE FE20
JR Z,L25CC ;25D0 28FA
SUB 65 ;25D2 D641
CP 26 ;25D4 FE1A
LD A,(HL) ;25D6 7E
RET NC ;25D7 D0
LD E,(HL) ;25D8 5E
LD D,32 ;25D9 1620
L25DB: INC HL ;25DB 23
LD A,(HL) ;25DC 7E
CP D ;25DD BA
JR Z,L25DB ;25DE 28FB
SUB 48 ;25E0 D630
CP 10 ;25E2 FE0A
JR C,L25ED ;25E4 3807
SUB 17 ;25E6 D611
CP 26 ;25E8 FE1A
LD A,(HL) ;25EA 7E
CCF ;25EB 3F
RET C ;25EC D8
L25ED: LD D,(HL) ;25ED 56
LD A,70 ;25EE 3E46
CP E ;25F0 BB
JR NZ,L25F9 ;25F1 2006
LD A,78 ;25F3 3E4E
CP D ;25F5 BA
JP Z,L260E ;25F6 CA0E26
L25F9: INC HL ;25F9 23
LD A,(HL) ;25FA 7E
CP 32 ;25FB FE20
JR Z,L25F9 ;25FD 28FA
SUB 48 ;25FF D630
CP 10 ;2601 FE0A
JR C,L25F9 ;2603 38F4
SUB 17 ;2605 D611
CP 26 ;2607 FE1A
JR C,L25F9 ;2609 38EE
L260B: LD A,(HL) ;260B 7E
SCF ;260C 37
RET ;260D C9
L260E: CALL L162C ;260E CD2C16
SCF ;2611 37
RET ;2612 C9
L2613: CALL L25CD ;2613 CDCD25
JP NC,L138E ;2616 D28E13
LD A,70 ;2619 3E46
CP E ;261B BB
JP NZ,L260B ;261C C20B26
LD A,78 ;261F 3E4E
CP D ;2621 BA
JP NZ,L260B ;2622 C20B26
JP L138E ;2625 C38E13
L2628: DW L34F1 ;2628 F134
DW L34F1 ;262A F134
DW L351C ;262C 1C35
DW L351C ;262E 1C35
DW L3520 ;2630 2035
DW L3520 ;2632 2035
DW L3512 ;2634 1235
DW L3504 ;2636 0435
DW L3508 ;2638 0835
DW L270B ;263A 0B27
DW L270E ;263C 0E27
DW L2711 ;263E 1127
DW L2D4D ;2640 4D2D
DW L2D4A ;2642 4A2D
DW L2E59 ;2644 592E
DW L2F30 ;2646 302F
DW L3B0B ;2648 0B3B
L264A: DW L267A ;264A 7A26
DW L26AC ;264C AC26
DW L26D0 ;264E D026
DW L2714 ;2650 1427
DW L2723 ;2652 2327
DW L273D ;2654 3D27
DW L2776 ;2656 7627
DW L2759 ;2658 5927
DW L27B8 ;265A B827
DW L27D9 ;265C D927
DW L2801 ;265E 0128
DW L2827 ;2660 2728
L2662: DW L352F ;2662 2F35
DW L35B0 ;2664 B035
DW L36A2 ;2666 A236
DW L36B1 ;2668 B136
DW L3A25 ;266A 253A
DW L37A6 ;266C A637
DW L340E ;266E 0E34
DW L3A13 ;2670 133A
DW L38DF ;2672 DF38
DW L2839 ;2674 3928
DW L283E ;2676 3E28
DW L36DC ;2678 DC36
L267A: CALL L22AF ;267A CDAF22
CALL L180F ;267D CD0F18
PUSH DE ;2680 D5
PUSH BC ;2681 C5
L2682: CALL L169A ;2682 CD9A16
INC L ;2685 2C
CALL L19A9 ;2686 CDA919
CALL L169A ;2689 CD9A16
ADD HL,HL ;268C 29
POP BC ;268D C1
EX (SP),HL ;268E E3
EX DE,HL ;268F EB
LD A,C ;2690 79
SUB L ;2691 95
JP C,L26A8 ;2692 DAA826
PUSH HL ;2695 E5
LD C,A ;2696 4F
PUSH DE ;2697 D5
CALL L1801 ;2698 CD0118
ADD HL,DE ;269B 19
EX DE,HL ;269C EB
L269D: CALL L1766 ;269D CD6617
CALL L1651 ;26A0 CD5116
CALL L189C ;26A3 CD9C18
POP DE ;26A6 D1
POP BC ;26A7 C1
L26A8: POP HL ;26A8 E1
JP L162D ;26A9 C32D16
L26AC: CALL L22AF ;26AC CDAF22
CALL L180F ;26AF CD0F18
PUSH DE ;26B2 D5
PUSH BC ;26B3 C5
CALL L169A ;26B4 CD9A16
INC L ;26B7 2C
CALL L19A9 ;26B8 CDA919
CALL L169A ;26BB CD9A16
ADD HL,HL ;26BE 29
POP BC ;26BF C1
EX (SP),HL ;26C0 E3
EX DE,HL ;26C1 EB
LD A,C ;26C2 79
SUB L ;26C3 95
JP C,L26A8 ;26C4 DAA826
PUSH HL ;26C7 E5
LD C,A ;26C8 4F
PUSH DE ;26C9 D5
CALL L1801 ;26CA CD0118
JP L269D ;26CD C39D26
L26D0: CALL L22AF ;26D0 CDAF22
CALL L180F ;26D3 CD0F18
PUSH DE ;26D6 D5
PUSH BC ;26D7 C5
CALL L169A ;26D8 CD9A16
INC L ;26DB 2C
CALL L19A9 ;26DC CDA919
LD A,E ;26DF 7B
DEC A ;26E0 3D
JP Z,L2708 ;26E1 CA0827
JP C,L2708 ;26E4 DA0827
POP BC ;26E7 C1
LD E,A ;26E8 5F
LD A,C ;26E9 79
SUB E ;26EA 93
JP NC,L26F0 ;26EB D2F026
XOR A ;26EE AF
LD E,C ;26EF 59
L26F0: LD C,E ;26F0 4B
LD B,D ;26F1 42
POP DE ;26F2 D1
PUSH DE ;26F3 D5
PUSH AF ;26F4 F5
PUSH BC ;26F5 C5
CALL L1801 ;26F6 CD0118
POP BC ;26F9 C1
CALL L1766 ;26FA CD6617
CALL L1651 ;26FD CD5116
CALL L189C ;2700 CD9C18
POP AF ;2703 F1
LD C,A ;2704 4F
LD B,0 ;2705 0600
PUSH BC ;2707 C5
L2708: JP L2682 ;2708 C38226
L270B: JP L138E ;270B C38E13
L270E: JP L138E ;270E C38E13
L2711: JP L138E ;2711 C38E13
L2714: CALL L22AF ;2714 CDAF22
CALL L180F ;2717 CD0F18
CALL L169A ;271A CD9A16
ADD HL,HL ;271D 29
PUSH HL ;271E E5
LD A,C ;271F 79
JP L278A ;2720 C38A27
L2723: CALL L19A9 ;2723 CDA919
CALL L169A ;2726 CD9A16
ADD HL,HL ;2729 29
PUSH HL ;272A E5
LD A,E ;272B 7B
CP 32 ;272C FE20
JR NC,L2732 ;272E 3002
LD E,13 ;2730 1E0D
L2732: LD HL,L4400 ;2732 210044
PUSH HL ;2735 E5
LD (HL),E ;2736 73
INC HL ;2737 23
LD (HL),13 ;2738 360D
JP L2752 ;273A C35227
L273D: CALL L22AF ;273D CDAF22
CALL L1814 ;2740 CD1418
CALL L169A ;2743 CD9A16
ADD HL,HL ;2746 29
PUSH HL ;2747 E5
LD HL,(L4644) ;2748 2A4446
LD DE,L4400 ;274B 110044
PUSH DE ;274E D5
CALL L322D ;274F CD2D32
L2752: POP HL ;2752 E1
CALL L18C4 ;2753 CDC418
POP HL ;2756 E1
LD A,(HL) ;2757 7E
RET ;2758 C9
L2759: CALL L22AF ;2759 CDAF22
CALL L180F ;275C CD0F18
CALL L169A ;275F CD9A16
ADD HL,HL ;2762 29
PUSH HL ;2763 E5
CALL L1801 ;2764 CD0118
EX DE,HL ;2767 EB
CALL L190D ;2768 CD0D19
LD (HL),B ;276B 70
DAA ;276C 27
JP L26A8 ;276D C3A826
DB 11H,19H,16H,0C3H ;2770 111916C3 Link 2770 found at , $276B
DB 77H,23H ;2774 7723
L2776: CALL L22AF ;2776 CDAF22
CALL L180F ;2779 CD0F18
CALL L169A ;277C CD9A16
ADD HL,HL ;277F 29
PUSH HL ;2780 E5
CALL L1801 ;2781 CD0118
LD A,(DE) ;2784 1A
CP 13 ;2785 FE0D
JP Z,L1398 ;2787 CA9813
L278A: OR A ;278A B7
LD BC,L8000 ;278B 010080
CALL NZ,L27A6 ;278E C4A627
LD HL,(L4644) ;2791 2A4446
LD DE,USER ;2794 110300
LD (HL),B ;2797 70
INC HL ;2798 23
L2799: LD (HL),D ;2799 72
INC HL ;279A 23
DEC E ;279B 1D
JR NZ,L2799 ;279C 20FB
LD (HL),C ;279E 71
LD BC,L0005 ;279F 010500
POP HL ;27A2 E1
JP L162D ;27A3 C32D16
L27A6: LD E,8 ;27A6 1E08
L27A8: OR A ;27A8 B7
JP M,L27B1 ;27A9 FAB127
RLA ;27AC 17
DEC E ;27AD 1D
JP L27A8 ;27AE C3A827
L27B1: LD C,A ;27B1 4F
LD A,192 ;27B2 3EC0
ADD A,E ;27B4 83
LD B,A ;27B5 47
RET ;27B6 C9
L27B7: DB 00H ;27B7 00
L27B8: CALL L198C ;27B8 CD8C19
CALL L169A ;27BB CD9A16
ADD HL,HL ;27BE 29
PUSH HL ;27BF E5
LD A,(L27B7) ;27C0 3AB727
OR A ;27C3 B7
JP NZ,L27D1 ;27C4 C2D127
LD HL,(04563H) ;27C7 2A6345
DEC HL ;27CA 2B
CALL L1662 ;27CB CD6216
JP NC,L27D4 ;27CE D2D427
L27D1: LD A,(DE) ;27D1 1A
JR L27D6 ;27D2 1802
L27D4: LD A,32 ;27D4 3E20
L27D6: JP L278A ;27D6 C38A27
L27D9: CALL L19A9 ;27D9 CDA919
LD B,19 ;27DC 0613
CALL L169A ;27DE CD9A16
ADD HL,HL ;27E1 29
LD A,39 ;27E2 3E27
ADD A,A ;27E4 87
SUB E ;27E5 93
JP C,L1398 ;27E6 DA9813
LD A,(L457D) ;27E9 3A7D45
OR A ;27EC B7
LD A,(CHARCOUNT) ;27ED 3A9411
JR Z,L27F7 ;27F0 2805
LD B,32 ;27F2 0620
LD A,(L3D26) ;27F4 3A263D
L27F7: LD D,A ;27F7 57
LD A,E ;27F8 7B
SUB D ;27F9 92
JP NC,L27FE ;27FA D2FE27
XOR A ;27FD AF
L27FE: JP L280B ;27FE C30B28
L2801: CALL L19A9 ;2801 CDA919
LD B,32 ;2804 0620
CALL L169A ;2806 CD9A16
ADD HL,HL ;2809 29
LD A,E ;280A 7B
L280B: PUSH HL ;280B E5
LD HL,L4400 ;280C 210044
PUSH HL ;280F E5
LD C,A ;2810 4F
L2811: OR A ;2811 B7
JP Z,L281B ;2812 CA1B28
LD (HL),B ;2815 70
INC HL ;2816 23
DEC A ;2817 3D
JP L2811 ;2818 C31128
L281B: LD (HL),13 ;281B 360D
LD B,0 ;281D 0600
POP HL ;281F E1
CALL L18DF ;2820 CDDF18
POP HL ;2823 E1
JP L162D ;2824 C32D16
L2827: PUSH HL ;2827 E5
CALL L173C ;2828 CD3C17
LD DE,L4400 ;282B 110044
PUSH DE ;282E D5
CALL L16F7 ;282F CDF716
POP HL ;2832 E1
CALL L22AF ;2833 CDAF22
POP HL ;2836 E1
LD A,(HL) ;2837 7E
RET ;2838 C9
L2839: LD A,(DE) ;2839 1A
OR 128 ;283A F680
LD (DE),A ;283C 12
RET ;283D C9
L283E: LD A,(DE) ;283E 1A
LD DE,L161E ;283F 111E16
OR A ;2842 B7
JP P,L2851 ;2843 F25128
LD DE,L1614 ;2846 111416
CP 128 ;2849 FE80
JP NZ,L2851 ;284B C25128
LD DE,L1619 ;284E 111916
L2851: JP L181A ;2851 C31A18
L2854: JP COLDSTART ;2854 C30000
L2857: CALL L2613 ;2857 CD1326
CALL L2436 ;285A CD3624
LD (L4801),HL ;285D 220148
CALL L197B ;2860 CD7B19
CALL KEYBOARD ;2863 CD1B00
CP 27 ;2866 FE1B
JP Z,L124B ;2868 CA4B12
LD HL,L45A2 ;286B 21A245
OR A ;286E B7
JP NZ,L28A3 ;286F C2A328
LD (L45A4),A ;2872 32A445
L2875: LD A,(L4571) ;2875 3A7145
LD B,48 ;2878 0630
OR A ;287A B7
JP Z,L2880 ;287B CA8028
LD B,13 ;287E 060D
L2880: LD (HL),B ;2880 70
INC HL ;2881 23
LD (HL),13 ;2882 360D
DEC HL ;2884 2B
CALL L18C7 ;2885 CDC718
LD A,(L4571) ;2888 3A7145
OR A ;288B B7
JP NZ,L2898 ;288C C29828
CALL L1801 ;288F CD0118
EX DE,HL ;2892 EB
CALL L190D ;2893 CD0D19
L2896: OR D ;2896 B2
ADD HL,DE ;2897 19
L2898: CALL L1976 ;2898 CD7619
CALL L1B6A ;289B CD6A1B
SBC A,L ;289E 9D
INC DE ;289F 13
JP L19B2 ;28A0 C3B219
L28A3: LD B,A ;28A3 47
LD A,(L45A4) ;28A4 3AA445
CP B ;28A7 B8
JP Z,L2875 ;28A8 CA7528
LD A,B ;28AB 78
LD (L45A4),A ;28AC 32A445
JP L2880 ;28AF C38028
L28B2: CALL L198C ;28B2 CD8C19
CALL L169A ;28B5 CD9A16
ADD HL,HL ;28B8 29
LD (L4801),HL ;28B9 220148
LD HL,L19B2 ;28BC 21B219
PUSH HL ;28BF E5
EX DE,HL ;28C0 EB
JP (HL) ;28C1 E9
L28C2: CALL L168B ;28C2 CD8B16
LD C,L ;28C5 4D
RET C ;28C6 D8
JR Z,L2896 ;28C7 28CD
SBC A,D ;28C9 9A
LD D,65 ;28CA 1641
CALL L169A ;28CC CD9A16
LD E,B ;28CF 58
LD (L4801),HL ;28D0 220148
LD HL,(04561H) ;28D3 2A6145
JR L28F5 ;28D6 181D
DB 0CDH,8CH,19H,22H ;28D8 CD8C1922 Link 28D8 found at , $28C6
DB 01H,48H,2AH,61H ;28DC 01482A61
DB 45H,0CDH,62H,16H ;28E0 45CD6216
DB 0DAH,93H,13H,2AH ;28E4 DA93132A
DB 44H,46H,01H,0C8H ;28E8 444601C8
DB 00H,09H,0CDH,62H ;28EC 0009CD62
DB 16H,0D2H,93H,13H ;28F0 16D29313
DB 0EBH ;28F4 EB
L28F5: LD (04563H),HL ;28F5 226345
LD SP,HL ;28F8 F9
JP L19B2 ;28F9 C3B219
L28FC: LD HL,(L47FF) ;28FC 2AFF47
LD A,L ;28FF 7D
OR H ;2900 B4
JP NZ,L13BB ;2901 C2BB13
LD A,(L4565) ;2904 3A6545
OR A ;2907 B7
JP Z,L13BB ;2908 CABB13
PUSH AF ;290B F5
CALL L13C1 ;290C CDC113
LD BC,CRLF2 ;290F 010600
LD DE,L47FD ;2912 11FD47
LD HL,L4566 ;2915 216645
CALL L1799 ;2918 CD9917
POP AF ;291B F1
LD HL,(L4801) ;291C 2A0148
OR A ;291F B7
JP M,L1E7C ;2920 FA7C1E
DEC A ;2923 3D
JP Z,L19B2 ;2924 CAB219
JP L19E1 ;2927 C3E119
L292A: LD A,1 ;292A 3E01
JR L292F ;292C 1801
L292E: XOR A ;292E AF
L292F: PUSH AF ;292F F5
CALL L19A9 ;2930 CDA919
PUSH DE ;2933 D5
CALL L169A ;2934 CD9A16
INC L ;2937 2C
CALL L19A9 ;2938 CDA919
LD (L4801),HL ;293B 220148
LD A,E ;293E 7B
L293F: SUB 50 ;293F D632
JR NC,L293F ;2941 30FC
ADD A,50 ;2943 C632
LD E,A ;2945 5F
POP BC ;2946 C1
LD A,C ;2947 79
L2948: SUB 80 ;2948 D650
JR NC,L2948 ;294A 30FC
ADD A,80 ;294C C650
LD C,A ;294E 4F
XOR A ;294F AF
SRL C ;2950 CB39
JR NC,L2962 ;2952 300E
SRL E ;2954 CB3B
JR NC,L295C ;2956 3004
ADD A,4 ;2958 C604
L295A: ADD A,2 ;295A C602
L295C: ADD A,1 ;295C C601
L295E: ADD A,1 ;295E C601
JR L2968 ;2960 1806
L2962: SRL E ;2962 CB3B
JR NC,L295E ;2964 30F8
JR L295A ;2966 18F2
L2968: PUSH AF ;2968 F5
LD HL,VIDRAM ;2969 2100D0
LD A,40 ;296C 3E28
L296E: ADD HL,DE ;296E 19
DEC A ;296F 3D
JR NZ,L296E ;2970 20FC
ADD HL,BC ;2972 09
LD A,(HL) ;2973 7E
CP 240 ;2974 FEF0
JR NC,L297A ;2976 3002
LD A,240 ;2978 3EF0
L297A: POP BC ;297A C1
LD C,A ;297B 4F
POP AF ;297C F1
OR A ;297D B7
LD A,B ;297E 78
JR Z,L2984 ;297F 2803
OR C ;2981 B1
JR L2986 ;2982 1802
L2984: CPL ;2984 2F
AND C ;2985 A1
L2986: CP 240 ;2986 FEF0
JR NZ,L298B ;2988 2001
XOR A ;298A AF
L298B: LD (HL),A ;298B 77
JP L19B2 ;298C C3B219
L298F: XOR A ;298F AF
JP L2A38 ;2990 C3382A
L2993: LD A,(STACK) ;2993 3AF010
CP 2 ;2996 FE02
JP NZ,L2A66 ;2998 C2662A
CALL L2B08 ;299B CD082B
CALL L2B48 ;299E CD482B
CALL CHECK ;29A1 CD2D00
PUSH AF ;29A4 F5
CALL L2B60 ;29A5 CD602B
POP AF ;29A8 F1
JP C,L2B41 ;29A9 DA412B
LD DE,L29B5 ;29AC 11B529
CALL L1357 ;29AF CD5713
JP L19B2 ;29B2 C3B219
L29B5: DB "OK" ;29B5 4F4B
DB 0DH ;29B7 0D
L29B8: DB 00H ;29B8 00
L29B9: DW 00000H ;29B9 0000
L29BB: EX DE,HL ;29BB EB
CALL L2B9C ;29BC CD9C2B
LD HL,L0D02 ;29BF 21020D
LD (STACK),HL ;29C2 22F010
XOR A ;29C5 AF
PUSH AF ;29C6 F5
LD HL,L4806 ;29C7 210648
L29CA: LD (FILESTART),HL ;29CA 220411
LD HL,COLDSTART ;29CD 210000
LD (EXECUTE),HL ;29D0 220611
LD (L1108),HL ;29D3 220811
EX DE,HL ;29D6 EB
CALL L1829 ;29D7 CD2918
JP Z,L29FB ;29DA CAFB29
CALL L2383 ;29DD CD8323
LD A,D ;29E0 7A
OR A ;29E1 B7
JP Z,L138E ;29E2 CA8E13
LD A,C ;29E5 79
CP 17 ;29E6 FE11
JP NC,L138E ;29E8 D28E13
CALL L1801 ;29EB CD0118
PUSH HL ;29EE E5
LD HL,HEADBUFFER ;29EF 21F110
EX DE,HL ;29F2 EB
CALL L1799 ;29F3 CD9917
EX DE,HL ;29F6 EB
ADD HL,BC ;29F7 09
LD (HL),13 ;29F8 360D
POP HL ;29FA E1
L29FB: LD (L4801),HL ;29FB 220148
POP AF ;29FE F1
JP NZ,L2BC6 ;29FF C2C62B
LD HL,(L29B9) ;2A02 2AB929
LD (L1108),HL ;2A05 220811
LD A,(L29B8) ;2A08 3AB829
OR A ;2A0B B7
JP NZ,L124B ;2A0C C24B12
LD HL,(L4634) ;2A0F 2A3446
LD DE,L4806 ;2A12 110648
EX DE,HL ;2A15 EB
CALL L1668 ;2A16 CD6816
LD (FILESIZE),HL ;2A19 220211
CALL PHEAD ;2A1C CD2100
JP C,L1385 ;2A1F DA8513
CALL CRLF ;2A22 CD0900
CALL L2B48 ;2A25 CD482B
CALL PDATA ;2A28 CD2400
PUSH AF ;2A2B F5
CALL L2B60 ;2A2C CD602B
POP AF ;2A2F F1
JP NC,L19B2 ;2A30 D2B219
JP L1385 ;2A33 C38513
L2A36: LD A,1 ;2A36 3E01
L2A38: LD (L4592),A ;2A38 329245
XOR A ;2A3B AF
LD (L458E),A ;2A3C 328E45
L2A3F: CALL L1829 ;2A3F CD2918
JP Z,L2A63 ;2A42 CA632A
CALL L2383 ;2A45 CD8323
CALL L180F ;2A48 CD0F18
CALL L1829 ;2A4B CD2918
JP NZ,L138E ;2A4E C28E13
CALL L1801 ;2A51 CD0118
LD A,C ;2A54 79
CP 17 ;2A55 FE11
JP NC,L138E ;2A57 D28E13
LD A,1 ;2A5A 3E01
LD (L458E),A ;2A5C 328E45
LD (L458F),DE ;2A5F ED538F45
L2A63: LD (L4801),HL ;2A63 220148
L2A66: CALL LHEAD ;2A66 CD2700
JP C,L2B41 ;2A69 DA412B
CALL L2B0D ;2A6C CD0D2B
LD HL,STACK ;2A6F 21F010
LD A,(HL) ;2A72 7E
OR A ;2A73 B7
JP Z,L2A66 ;2A74 CA662A
CP 4 ;2A77 FE04
JP NC,L2A66 ;2A79 D2662A
LD A,(L458E) ;2A7C 3A8E45
OR A ;2A7F B7
JP Z,L2A99 ;2A80 CA992A
LD HL,(L458F) ;2A83 2A8F45
LD DE,HEADBUFFER ;2A86 11F110
LD C,16 ;2A89 0E10
L2A8B: LD A,(DE) ;2A8B 1A
CP (HL) ;2A8C BE
JP NZ,L2A66 ;2A8D C2662A
CP 13 ;2A90 FE0D
JR Z,L2A99 ;2A92 2805
INC HL ;2A94 23
INC DE ;2A95 13
DEC C ;2A96 0D
JR NZ,L2A8B ;2A97 20F2
L2A99: LD A,(STACK) ;2A99 3AF010
LD C,A ;2A9C 4F
LD A,(L4592) ;2A9D 3A9245
OR A ;2AA0 B7
JP Z,L2993 ;2AA1 CA9329
CP 2 ;2AA4 FE02
JP NZ,L2AB1 ;2AA6 C2B12A
DEC C ;2AA9 0D
CP C ;2AAA B9
JP Z,L2BEA ;2AAB CAEA2B
JP L2A66 ;2AAE C3662A
L2AB1: LD A,C ;2AB1 79
CP 1 ;2AB2 FE01
JP Z,L2B74 ;2AB4 CA742B
CP 2 ;2AB7 FE02
JP NZ,L2A66 ;2AB9 C2662A
CALL L2B9C ;2ABC CD9C2B
LD BC,L0064 ;2ABF 016400
LD HL,L4806 ;2AC2 210648
CALL L1742 ;2AC5 CD4217
EX DE,HL ;2AC8 EB
LD HL,(FILESIZE) ;2AC9 2A0211
CALL L1662 ;2ACC CD6216
JP NC,L1393 ;2ACF D29313
CALL L2B12 ;2AD2 CD122B
LD A,(L1108) ;2AD5 3A0811
LD (L29B8),A ;2AD8 32B829
LD HL,L4806 ;2ADB 210648
LD (FILESTART),HL ;2ADE 220411
CALL LDATA ;2AE1 CD2A00
JP C,L2B3C ;2AE4 DA3C2B
LD DE,L4806 ;2AE7 110648
LD HL,(FILESIZE) ;2AEA 2A0211
ADD HL,DE ;2AED 19
LD (L4634),HL ;2AEE 223446
CALL L2B60 ;2AF1 CD602B
CALL L1857 ;2AF4 CD5718
CALL L187C ;2AF7 CD7C18
LD A,(L1109) ;2AFA 3A0911
OR A ;2AFD B7
JP Z,L19B2 ;2AFE CAB219
LD HL,L2B07 ;2B01 21072B
JP L1CCB ;2B04 C3CB1C
L2B07: DB 0DH ;2B07 0D
L2B08: LD DE,L2B31 ;2B08 11312B
JR L2B15 ;2B0B 1808
L2B0D: LD DE,L2B21 ;2B0D 11212B
JR L2B15 ;2B10 1803
L2B12: LD DE,L2B28 ;2B12 11282B
L2B15: CALL L1357 ;2B15 CD5713
LD DE,HEADBUFFER ;2B18 11F110
CALL MESSAGE ;2B1B CD1500
JP CRLF ;2B1E C30900
L2B21: DB "FOUND " ;2B21 464F554E4420
DB 0DH ;2B27 0D
L2B28: DB "LOADING " ;2B28 4C4F4144494E4720
DB 0DH ;2B30 0D
L2B31: DB "VERIFYING " ;2B31 564552494659494E4720
DB 0DH ;2B3B 0D
L2B3C: PUSH AF ;2B3C F5
CALL L1832 ;2B3D CD3218
POP AF ;2B40 F1
L2B41: DEC A ;2B41 3D
JP Z,L1398 ;2B42 CA9813
JP L1385 ;2B45 C38513
L2B48: LD HL,L4806 ;2B48 210648
L2B4B: LD E,(HL) ;2B4B 5E
INC HL ;2B4C 23
LD D,(HL) ;2B4D 56
LD A,E ;2B4E 7B
OR D ;2B4F B2
RET Z ;2B50 C8
PUSH DE ;2B51 D5
DEC HL ;2B52 2B
LD A,E ;2B53 7B
SUB L ;2B54 95
LD E,A ;2B55 5F
LD A,D ;2B56 7A
SBC A,H ;2B57 9C
LD D,A ;2B58 57
LD (HL),E ;2B59 73
INC HL ;2B5A 23
LD (HL),D ;2B5B 72
POP HL ;2B5C E1
JP L2B4B ;2B5D C34B2B
L2B60: LD HL,L4806 ;2B60 210648
L2B63: LD E,(HL) ;2B63 5E
INC HL ;2B64 23
LD D,(HL) ;2B65 56
LD A,E ;2B66 7B
OR D ;2B67 B2
RET Z ;2B68 C8
DEC HL ;2B69 2B
EX DE,HL ;2B6A EB
ADD HL,DE ;2B6B 19
EX DE,HL ;2B6C EB
LD (HL),E ;2B6D 73
INC HL ;2B6E 23
LD (HL),D ;2B6F 72
EX DE,HL ;2B70 EB
JP L2B63 ;2B71 C3632B
L2B74: LD HL,(FILESTART) ;2B74 2A0411
EX DE,HL ;2B77 EB
LD HL,(04563H) ;2B78 2A6345
DEC HL ;2B7B 2B
CALL L1662 ;2B7C CD6216
JP NC,L13B6 ;2B7F D2B613
LD HL,(FILESIZE) ;2B82 2A0211
ADD HL,DE ;2B85 19
JP C,L1393 ;2B86 DA9313
EX DE,HL ;2B89 EB
LD HL,(04561H) ;2B8A 2A6145
CALL L1662 ;2B8D CD6216
JP C,L1393 ;2B90 DA9313
CALL L2B12 ;2B93 CD122B
CALL LDATA ;2B96 CD2A00
JP L19B2 ;2B99 C3B219
L2B9C: PUSH HL ;2B9C E5
LD HL,(L47FF) ;2B9D 2AFF47
LD A,H ;2BA0 7C
OR L ;2BA1 B5
JP NZ,L138E ;2BA2 C28E13
POP HL ;2BA5 E1
RET ;2BA6 C9
L2BA7: LD A,(L457A) ;2BA7 3A7A45
OR A ;2BAA B7
JP NZ,L13B1 ;2BAB C2B113
INC A ;2BAE 3C
PUSH AF ;2BAF F5
EX DE,HL ;2BB0 EB
LD HL,L0D03 ;2BB1 21030D
LD (STACK),HL ;2BB4 22F010
LD HL,L0080 ;2BB7 218000
LD (FILESIZE),HL ;2BBA 220211
LD HL,L45AE ;2BBD 21AE45
LD (L457B),HL ;2BC0 227B45
JP L29CA ;2BC3 C3CA29
L2BC6: CALL PHEAD ;2BC6 CD2100
JP C,L1385 ;2BC9 DA8513
CALL CRLF ;2BCC CD0900
LD A,1 ;2BCF 3E01
LD (L457A),A ;2BD1 327A45
JP L19B2 ;2BD4 C3B219
L2BD7: LD A,(L457A) ;2BD7 3A7A45
OR A ;2BDA B7
JP NZ,L13B1 ;2BDB C2B113
LD A,2 ;2BDE 3E02
LD (L4592),A ;2BE0 329245
XOR A ;2BE3 AF
LD (L458E),A ;2BE4 328E45
JP L2A3F ;2BE7 C33F2A
L2BEA: LD (L457A),A ;2BEA 327A45
CALL L2B12 ;2BED CD122B
LD HL,L45AE ;2BF0 21AE45
LD (FILESTART),HL ;2BF3 220411
LD HL,L0080 ;2BF6 218000
LD (FILESIZE),HL ;2BF9 220211
LD HL,L462E ;2BFC 212E46
LD (L457B),HL ;2BFF 227B45
JP L19B2 ;2C02 C3B219
L2C05: LD A,(L457A) ;2C05 3A7A45
OR A ;2C08 B7
JP Z,L1B27 ;2C09 CA271B
PUSH HL ;2C0C E5
DEC A ;2C0D 3D
JP NZ,L2C25 ;2C0E C2252C
LD HL,(L457B) ;2C11 2A7B45
LD DE,L462E ;2C14 112E46
CALL L1662 ;2C17 CD6216
JP NC,L2C2D ;2C1A D22D2C
L2C1D: LD (HL),255 ;2C1D 36FF
CALL PDATA ;2C1F CD2400
JP C,L1385 ;2C22 DA8513
L2C25: XOR A ;2C25 AF
LD (L457A),A ;2C26 327A45
POP HL ;2C29 E1
JP L1B27 ;2C2A C3271B
L2C2D: CALL PDATA ;2C2D CD2400
JP C,L1385 ;2C30 DA8513
LD HL,L45AE ;2C33 21AE45
JP L2C1D ;2C36 C31D2C
L2C39: CALL L168B ;2C39 CD8B16
CP A ;2C3C BF
LD C,C ;2C3D 49
INC L ;2C3E 2C
CALL L168B ;2C3F CD8B16
LD D,H ;2C42 54
LD C,C ;2C43 49
INC L ;2C44 2C
LD A,1 ;2C45 3E01
JR L2C4A ;2C47 1801
DB 0AFH ;2C49 AF
L2C4A: LD (L457D),A ;2C4A 327D45
RET ;2C4D C9
DB 3AH,7AH,45H,0FEH ;2C4E 3A7A45FE Link 2C4E found at , $1CAA
DB 01H,0C2H,0B1H,13H ;2C52 01C2B113
DB 2AH,7BH,45H,0D5H ;2C56 2A7B45D5
DB 11H,2EH,46H,0CDH ;2C5A 112E46CD
DB 62H,16H,0DAH,6CH ;2C5E 6216DA6C
DB 2CH,0CDH,24H,00H ;2C62 2CCD2400
DB 0DAH,85H,13H,21H ;2C66 DA851321
DB 0AEH,45H,0D1H,1AH ;2C6A AE45D11A
DB 77H,23H,13H,0FEH ;2C6E 772313FE
DB 0DH,0C2H,59H,2CH ;2C72 0DC2592C
DB 22H,7BH,45H,0C9H ;2C76 227B45C9
L2C7A: LD C,A ;2C7A 4F
CALL L2CD0 ;2C7B CDD02C
RET Z ;2C7E C8
PUSH DE ;2C7F D5
LD C,0 ;2C80 0E00
CP 2 ;2C82 FE02
JP NZ,L13B1 ;2C84 C2B113
LD (L4592),A ;2C87 329245
LD HL,(L457B) ;2C8A 2A7B45
L2C8D: PUSH DE ;2C8D D5
LD DE,L462E ;2C8E 112E46
CALL L1662 ;2C91 CD6216
JP C,L2CA7 ;2C94 DAA72C
CALL LDATA ;2C97 CD2A00
JP NC,L2CA4 ;2C9A D2A42C
DEC A ;2C9D 3D
JP Z,L1398 ;2C9E CA9813
JP L1385 ;2CA1 C38513
L2CA4: LD HL,L45AE ;2CA4 21AE45
L2CA7: LD A,(HL) ;2CA7 7E
LD B,A ;2CA8 47
CP 255 ;2CA9 FEFF
JP NZ,L2CB6 ;2CAB C2B62C
LD A,(L4592) ;2CAE 3A9245
CP 2 ;2CB1 FE02
JP Z,L13B1 ;2CB3 CAB113
L2CB6: XOR A ;2CB6 AF
LD (L4592),A ;2CB7 329245
LD A,B ;2CBA 78
POP DE ;2CBB D1
LD (DE),A ;2CBC 12
INC HL ;2CBD 23
INC DE ;2CBE 13
INC C ;2CBF 0C
CP 13 ;2CC0 FE0D
JP NZ,L2C8D ;2CC2 C28D2C
DEC C ;2CC5 0D
POP DE ;2CC6 D1
LD (L457B),HL ;2CC7 227B45
POP HL ;2CCA E1
INC HL ;2CCB 23
INC HL ;2CCC 23
INC HL ;2CCD 23
PUSH HL ;2CCE E5
RET ;2CCF C9
L2CD0: LD A,(L457D) ;2CD0 3A7D45
OR A ;2CD3 B7
LD A,(L457A) ;2CD4 3A7A45
RET ;2CD7 C9
L2CD8: CALL L19A9 ;2CD8 CDA919
PUSH DE ;2CDB D5
CALL L169A ;2CDC CD9A16
INC L ;2CDF 2C
CALL L2613 ;2CE0 CD1326
CALL L2436 ;2CE3 CD3624
LD A,B ;2CE6 78
OR A ;2CE7 B7
JP NZ,L139D ;2CE8 C29D13
LD (L4801),HL ;2CEB 220148
CALL L197B ;2CEE CD7B19
POP DE ;2CF1 D1
LD A,E ;2CF2 7B
CP 240 ;2CF3 FEF0
JP NC,L1398 ;2CF5 D29813
LD (L2CFC),A ;2CF8 32FC2C
IN A,(PTRDATA) ;2CFB DBFF
OR A ;2CFD B7
LD B,A ;2CFE 47
JP Z,L2D0F ;2CFF CA0F2D
LD A,200 ;2D02 3EC8
L2D04: BIT 7,B ;2D04 CB78
JP NZ,L2D11 ;2D06 C2112D
SLA B ;2D09 CB20
DEC A ;2D0B 3D
JP L2D04 ;2D0C C3042D
L2D0F: LD A,128 ;2D0F 3E80
L2D11: LD HL,(L4644) ;2D11 2A4446
LD (HL),A ;2D14 77
INC HL ;2D15 23
XOR A ;2D16 AF
LD (HL),A ;2D17 77
INC HL ;2D18 23
LD (HL),A ;2D19 77
INC HL ;2D1A 23
LD (HL),A ;2D1B 77
INC HL ;2D1C 23
LD (HL),B ;2D1D 70
LD D,A ;2D1E 57
LD E,A ;2D1F 5F
LD B,A ;2D20 47
LD C,5 ;2D21 0E05
CALL L1976 ;2D23 CD7619
CALL L1B6A ;2D26 CD6A1B
SBC A,L ;2D29 9D
INC DE ;2D2A 13
JP L19B2 ;2D2B C3B219
L2D2E: CALL L19A9 ;2D2E CDA919
LD A,E ;2D31 7B
CP 240 ;2D32 FEF0
JP NC,L1398 ;2D34 D29813
LD (L2D43),A ;2D37 32432D
CALL L169A ;2D3A CD9A16
INC L ;2D3D 2C
CALL L19A9 ;2D3E CDA919
LD A,E ;2D41 7B
OUT (PTRDATA),A ;2D42 D3FF
JP L19B5 ;2D44 C3B519
L2D47: DW 032AFH ;2D47 AF32
L2D49: DB 7AH ;2D49 7A
L2D4A: XOR A ;2D4A AF
JR L2D4F ;2D4B 1802
L2D4D: LD A,128 ;2D4D 3E80
L2D4F: PUSH DE ;2D4F D5
XOR (HL) ;2D50 AE
CPL ;2D51 2F
LD C,A ;2D52 4F
LD A,(DE) ;2D53 1A
AND 128 ;2D54 E680
LD B,A ;2D56 47
XOR C ;2D57 A9
CPL ;2D58 2F
AND 128 ;2D59 E680
LD C,A ;2D5B 4F
L2D5C: PUSH BC ;2D5C C5
LD B,(HL) ;2D5D 46
RES 7,B ;2D5E CBB8
LD A,(DE) ;2D60 1A
AND 127 ;2D61 E67F
CP B ;2D63 B8
JP NC,L2D72 ;2D64 D2722D
POP BC ;2D67 C1
EX DE,HL ;2D68 EB
LD A,B ;2D69 78
XOR C ;2D6A A9
CPL ;2D6B 2F
AND 128 ;2D6C E680
LD B,A ;2D6E 47
JP L2D5C ;2D6F C35C2D
L2D72: LD C,A ;2D72 4F
ADD A,64 ;2D73 C640
LD (L2D49),A ;2D75 32492D
LD A,C ;2D78 79
SUB B ;2D79 90
POP BC ;2D7A C1
LD (L2D47),BC ;2D7B ED43472D
PUSH DE ;2D7F D5
INC HL ;2D80 23
LD E,(HL) ;2D81 5E
INC HL ;2D82 23
LD D,(HL) ;2D83 56
INC HL ;2D84 23
LD C,(HL) ;2D85 4E
INC HL ;2D86 23
LD B,(HL) ;2D87 46
POP HL ;2D88 E1
INC HL ;2D89 23
JP Z,L2DAB ;2D8A CAAB2D
L2D8D: CP 8 ;2D8D FE08
JP NC,L2DA1 ;2D8F D2A12D
L2D92: SRL B ;2D92 CB38
RR C ;2D94 CB19
RR D ;2D96 CB1A
RR E ;2D98 CB1B
DEC A ;2D9A 3D
JP NZ,L2D92 ;2D9B C2922D
JP L2DAB ;2D9E C3AB2D
L2DA1: LD E,D ;2DA1 5A
LD D,C ;2DA2 51
LD C,B ;2DA3 48
LD B,0 ;2DA4 0600
SUB 8 ;2DA6 D608
JP NZ,L2D8D ;2DA8 C28D2D
L2DAB: LD A,(L2D47) ;2DAB 3A472D
OR A ;2DAE B7
JP Z,L2DEE ;2DAF CAEE2D
LD A,(HL) ;2DB2 7E
INC HL ;2DB3 23
ADD A,E ;2DB4 83
LD E,A ;2DB5 5F
LD A,(HL) ;2DB6 7E
INC HL ;2DB7 23
ADC A,D ;2DB8 8A
LD D,A ;2DB9 57
LD A,(HL) ;2DBA 7E
INC HL ;2DBB 23
ADC A,C ;2DBC 89
LD C,A ;2DBD 4F
LD A,(HL) ;2DBE 7E
ADC A,B ;2DBF 88
LD B,A ;2DC0 47
JP NC,L2DD0 ;2DC1 D2D02D
RR B ;2DC4 CB18
RR C ;2DC6 CB19
RR D ;2DC8 CB1A
RR E ;2DCA CB1B
LD HL,L2D49 ;2DCC 21492D
INC (HL) ;2DCF 34
L2DD0: LD HL,L2D49 ;2DD0 21492D
LD A,(HL) ;2DD3 7E
SUB 64 ;2DD4 D640
JP C,L2DE0 ;2DD6 DAE02D
JP M,L1398 ;2DD9 FA9813
DEC HL ;2DDC 2B
OR (HL) ;2DDD B6
JR L2DE3 ;2DDE 1803
L2DE0: CALL L367B ;2DE0 CD7B36
L2DE3: POP HL ;2DE3 E1
L2DE4: LD (HL),A ;2DE4 77
INC HL ;2DE5 23
LD (HL),E ;2DE6 73
INC HL ;2DE7 23
LD (HL),D ;2DE8 72
INC HL ;2DE9 23
LD (HL),C ;2DEA 71
INC HL ;2DEB 23
LD (HL),B ;2DEC 70
RET ;2DED C9
L2DEE: LD A,(HL) ;2DEE 7E
INC HL ;2DEF 23
SUB E ;2DF0 93
LD E,A ;2DF1 5F
LD A,(HL) ;2DF2 7E
INC HL ;2DF3 23
SBC A,D ;2DF4 9A
LD D,A ;2DF5 57
LD A,(HL) ;2DF6 7E
INC HL ;2DF7 23
SBC A,C ;2DF8 99
LD C,A ;2DF9 4F
LD A,(HL) ;2DFA 7E
SBC A,B ;2DFB 98
LD B,A ;2DFC 47
CALL C,L2E3D ;2DFD DC3D2E
OR C ;2E00 B1
OR D ;2E01 B2
JP NZ,L2E0B ;2E02 C20B2E
LD A,E ;2E05 7B
CP 63 ;2E06 FE3F
JP C,L2DE0 ;2E08 DAE02D
L2E0B: LD HL,L2D49 ;2E0B 21492D
L2E0E: LD A,B ;2E0E 78
OR A ;2E0F B7
JP M,L2DD0 ;2E10 FAD02D
JP NZ,L2E2B ;2E13 C22B2E
LD A,(HL) ;2E16 7E
SUB 8 ;2E17 D608
JP C,L2DE0 ;2E19 DAE02D
LD (HL),A ;2E1C 77
LD A,C ;2E1D 79
OR D ;2E1E B2
OR E ;2E1F B3
JP Z,L2DE0 ;2E20 CAE02D
LD B,C ;2E23 41
LD C,D ;2E24 4A
LD D,E ;2E25 53
LD E,0 ;2E26 1E00
JP L2E0E ;2E28 C30E2E
L2E2B: DEC (HL) ;2E2B 35
JP C,L2DE0 ;2E2C DAE02D
SLA E ;2E2F CB23
RL D ;2E31 CB12
RL C ;2E33 CB11
RL B ;2E35 CB10
JP P,L2E2B ;2E37 F22B2E
JP L2DD0 ;2E3A C3D02D
L2E3D: LD HL,L2D48 ;2E3D 21482D
LD A,(HL) ;2E40 7E
ADD A,128 ;2E41 C680
LD (HL),A ;2E43 77
LD A,E ;2E44 7B
CPL ;2E45 2F
ADD A,1 ;2E46 C601
LD E,A ;2E48 5F
LD A,D ;2E49 7A
CPL ;2E4A 2F
ADC A,0 ;2E4B CE00
LD D,A ;2E4D 57
LD A,C ;2E4E 79
CPL ;2E4F 2F
ADC A,0 ;2E50 CE00
LD C,A ;2E52 4F
LD A,B ;2E53 78
CPL ;2E54 2F
ADC A,0 ;2E55 CE00
LD B,A ;2E57 47
RET ;2E58 C9
L2E59: PUSH DE ;2E59 D5
LD A,(DE) ;2E5A 1A
XOR (HL) ;2E5B AE
CPL ;2E5C 2F
AND 128 ;2E5D E680
LD (L2D48),A ;2E5F 32482D
LD B,(HL) ;2E62 46
RES 7,B ;2E63 CBB8
LD A,(DE) ;2E65 1A
AND 127 ;2E66 E67F
ADD A,B ;2E68 80
JP Z,L2DE0 ;2E69 CAE02D
DEC A ;2E6C 3D
CP 48 ;2E6D FE30
JP C,L2DE0 ;2E6F DAE02D
CP 224 ;2E72 FEE0
JP NC,L1398 ;2E74 D29813
LD (L2D49),A ;2E77 32492D
XOR A ;2E7A AF
LD (L2D47),A ;2E7B 32472D
LD BC,L0004 ;2E7E 010400
ADD HL,BC ;2E81 09
LD A,(HL) ;2E82 7E
OR A ;2E83 B7
JP P,L2DE0 ;2E84 F2E02D
PUSH HL ;2E87 E5
POP IY ;2E88 FDE1
LD C,B ;2E8A 48
EX DE,HL ;2E8B EB
INC HL ;2E8C 23
LD E,(HL) ;2E8D 5E
INC HL ;2E8E 23
LD D,(HL) ;2E8F 56
INC HL ;2E90 23
PUSH HL ;2E91 E5
LD H,B ;2E92 60
LD L,B ;2E93 68
EXX ;2E94 D9
POP HL ;2E95 E1
LD E,(HL) ;2E96 5E
INC HL ;2E97 23
LD D,(HL) ;2E98 56
LD HL,COLDSTART ;2E99 210000
LD A,D ;2E9C 7A
OR A ;2E9D B7
JP P,L2DE0 ;2E9E F2E02D
LD C,4 ;2EA1 0E04
L2EA3: LD A,(IY+0) ;2EA3 FD7E00
LD B,8 ;2EA6 0608
OR A ;2EA8 B7
JP Z,L2F24 ;2EA9 CA242F
L2EAC: RLA ;2EAC 17
JP NC,L2EC5 ;2EAD D2C52E
EX AF,AF' ;2EB0 08
EXX ;2EB1 D9
LD A,B ;2EB2 78
ADD A,C ;2EB3 81
LD C,A ;2EB4 4F
ADC HL,DE ;2EB5 ED5A
EXX ;2EB7 D9
ADC HL,DE ;2EB8 ED5A
JP NC,L2EC4 ;2EBA D2C42E
LD A,(L2D47) ;2EBD 3A472D
INC A ;2EC0 3C
LD (L2D47),A ;2EC1 32472D
L2EC4: EX AF,AF' ;2EC4 08
L2EC5: SRL D ;2EC5 CB3A
RR E ;2EC7 CB1B
EXX ;2EC9 D9
RR D ;2ECA CB1A
RR E ;2ECC CB1B
RR B ;2ECE CB18
EXX ;2ED0 D9
DJNZ L2EAC ;2ED1 10D9
L2ED3: DEC IY ;2ED3 FD2B
DEC C ;2ED5 0D
JP NZ,L2EA3 ;2ED6 C2A32E
LD A,(L2D47) ;2ED9 3A472D
OR A ;2EDC B7
JP Z,L2EF7 ;2EDD CAF72E
LD B,A ;2EE0 47
LD A,(L2D49) ;2EE1 3A492D
ADD A,B ;2EE4 80
LD (L2D49),A ;2EE5 32492D
L2EE8: SCF ;2EE8 37
RR H ;2EE9 CB1C
RR L ;2EEB CB1D
EXX ;2EED D9
RR H ;2EEE CB1C
RR L ;2EF0 CB1D
RR C ;2EF2 CB19
EXX ;2EF4 D9
DJNZ L2EE8 ;2EF5 10F1
L2EF7: EXX ;2EF7 D9
LD A,C ;2EF8 79
OR A ;2EF9 B7
JP P,L2F1C ;2EFA F21C2F
LD DE,L0001 ;2EFD 110100
ADD HL,DE ;2F00 19
EXX ;2F01 D9
LD DE,COLDSTART ;2F02 110000
ADC HL,DE ;2F05 ED5A
JP NC,L2F1B ;2F07 D21B2F
RR H ;2F0A CB1C
RR L ;2F0C CB1D
EXX ;2F0E D9
RR H ;2F0F CB1C
RR L ;2F11 CB1D
EXX ;2F13 D9
LD A,(L2D49) ;2F14 3A492D
INC A ;2F17 3C
LD (L2D49),A ;2F18 32492D
L2F1B: EXX ;2F1B D9
L2F1C: PUSH HL ;2F1C E5
EXX ;2F1D D9
LD B,H ;2F1E 44
LD C,L ;2F1F 4D
POP DE ;2F20 D1
JP L2E0B ;2F21 C30B2E
L2F24: LD A,E ;2F24 7B
LD E,D ;2F25 5A
LD D,0 ;2F26 1600
EXX ;2F28 D9
LD B,E ;2F29 43
LD E,D ;2F2A 5A
LD D,A ;2F2B 57
EXX ;2F2C D9
JP L2ED3 ;2F2D C3D32E
L2F30: PUSH DE ;2F30 D5
LD A,(DE) ;2F31 1A
XOR (HL) ;2F32 AE
CPL ;2F33 2F
AND 128 ;2F34 E680
LD (L2D48),A ;2F36 32482D
LD B,(HL) ;2F39 46
RES 7,B ;2F3A CBB8
LD A,(DE) ;2F3C 1A
AND 127 ;2F3D E67F
SUB B ;2F3F 90
ADD A,129 ;2F40 C681
L2F42: CP 48 ;2F42 FE30
JP C,L2DE0 ;2F44 DAE02D
CP 224 ;2F47 FEE0
JP NC,L1398 ;2F49 D29813
LD (L2D49),A ;2F4C 32492D
INC HL ;2F4F 23
INC DE ;2F50 13
EX DE,HL ;2F51 EB
LD C,(HL) ;2F52 4E
INC HL ;2F53 23
LD B,(HL) ;2F54 46
INC HL ;2F55 23
PUSH HL ;2F56 E5
EX DE,HL ;2F57 EB
LD E,(HL) ;2F58 5E
INC HL ;2F59 23
LD D,(HL) ;2F5A 56
INC HL ;2F5B 23
LD A,L ;2F5C 7D
EX AF,AF' ;2F5D 08
LD A,H ;2F5E 7C
LD H,B ;2F5F 60
LD L,C ;2F60 69
EXX ;2F61 D9
POP HL ;2F62 E1
LD C,(HL) ;2F63 4E
INC HL ;2F64 23
LD B,(HL) ;2F65 46
LD H,A ;2F66 67
EX AF,AF' ;2F67 08
LD L,A ;2F68 6F
LD E,(HL) ;2F69 5E
INC HL ;2F6A 23
LD D,(HL) ;2F6B 56
LD H,B ;2F6C 60
LD L,C ;2F6D 69
LD A,D ;2F6E 7A
OR A ;2F6F B7
JP P,L1398 ;2F70 F29813
LD C,4 ;2F73 0E04
L2F75: LD B,8 ;2F75 0608
L2F77: BIT 7,H ;2F77 CB7C
JP NZ,L2F95 ;2F79 C2952F
OR A ;2F7C B7
L2F7D: RLA ;2F7D 17
EXX ;2F7E D9
ADD HL,HL ;2F7F 29
EXX ;2F80 D9
ADC HL,HL ;2F81 ED6A
DJNZ L2F77 ;2F83 10F2
PUSH AF ;2F85 F5
DEC C ;2F86 0D
JP NZ,L2F75 ;2F87 C2752F
L2F8A: POP AF ;2F8A F1
LD E,A ;2F8B 5F
POP AF ;2F8C F1
LD D,A ;2F8D 57
POP AF ;2F8E F1
LD C,A ;2F8F 4F
POP AF ;2F90 F1
LD B,A ;2F91 47
JP L2E0B ;2F92 C30B2E
L2F95: EXX ;2F95 D9
OR A ;2F96 B7
SBC HL,DE ;2F97 ED52
EXX ;2F99 D9
SBC HL,DE ;2F9A ED52
CCF ;2F9C 3F
JP C,L2F7D ;2F9D DA7D2F
EXX ;2FA0 D9
ADD HL,DE ;2FA1 19
EXX ;2FA2 D9
ADC HL,DE ;2FA3 ED5A
OR A ;2FA5 B7
RLA ;2FA6 17
EXX ;2FA7 D9
ADD HL,HL ;2FA8 29
EXX ;2FA9 D9
ADC HL,HL ;2FAA ED6A
DEC B ;2FAC 05
JP NZ,L2FB7 ;2FAD C2B72F
PUSH AF ;2FB0 F5
LD B,8 ;2FB1 0608
DEC C ;2FB3 0D
JP Z,L2F8A ;2FB4 CA8A2F
L2FB7: EXX ;2FB7 D9
OR A ;2FB8 B7
SBC HL,DE ;2FB9 ED52
EXX ;2FBB D9
SBC HL,DE ;2FBC ED52
SCF ;2FBE 37
RLA ;2FBF 17
DEC B ;2FC0 05
JP NZ,L2FCB ;2FC1 C2CB2F
PUSH AF ;2FC4 F5
LD B,8 ;2FC5 0608
DEC C ;2FC7 0D
JP Z,L2F8A ;2FC8 CA8A2F
L2FCB: EXX ;2FCB D9
ADD HL,HL ;2FCC 29
EXX ;2FCD D9
ADC HL,HL ;2FCE ED6A
JP NC,L2F77 ;2FD0 D2772F
JP L2FB7 ;2FD3 C3B72F
L2FD6: DB 9DH ;2FD6 9D
L2FD7: DW 03A23H ;2FD7 233A
L2FD9: LD A,(HL) ;2FD9 7E
PUSH HL ;2FDA E5
POP IX ;2FDB DDE1
EX DE,HL ;2FDD EB
LD (L2FD7),HL ;2FDE 22D72F
EX AF,AF' ;2FE1 08
XOR A ;2FE2 AF
LD (L2FD6),A ;2FE3 32D62F
LD H,A ;2FE6 67
LD L,A ;2FE7 6F
EXX ;2FE8 D9
LD H,A ;2FE9 67
LD L,A ;2FEA 6F
LD B,A ;2FEB 47
LD C,A ;2FEC 4F
EX AF,AF' ;2FED 08
CP 46 ;2FEE FE2E
JP Z,L3008 ;2FF0 CA0830
SUB 48 ;2FF3 D630
L2FF5: CALL L30E3 ;2FF5 CDE330
CALL L30D9 ;2FF8 CDD930
SUB 48 ;2FFB D630
CP 10 ;2FFD FE0A
JR C,L2FF5 ;2FFF 38F4
ADD A,48 ;3001 C630
CP 46 ;3003 FE2E
JP NZ,L3019 ;3005 C21930
L3008: CALL L30D9 ;3008 CDD930
SUB 48 ;300B D630
CP 10 ;300D FE0A
JP NC,L3017 ;300F D21730
CALL L30F2 ;3012 CDF230
JR L3008 ;3015 18F1
L3017: ADD A,48 ;3017 C630
L3019: CP 69 ;3019 FE45
JP NZ,L3064 ;301B C26430
EXX ;301E D9
CALL L30D9 ;301F CDD930
LD B,1 ;3022 0601
CP 188 ;3024 FEBC
JR Z,L302E ;3026 2806
CP 189 ;3028 FEBD
JP NZ,L138E ;302A C28E13
DEC B ;302D 05
L302E: LD A,B ;302E 78
OR A ;302F B7
EX AF,AF' ;3030 08
L3031: CALL L30D9 ;3031 CDD930
SUB 48 ;3034 D630
JR Z,L3031 ;3036 28F9
CP 10 ;3038 FE0A
JP NC,L305A ;303A D25A30
LD B,A ;303D 47
CALL L30D9 ;303E CDD930
SUB 48 ;3041 D630
CP 10 ;3043 FE0A
JP NC,L305A ;3045 D25A30
LD C,A ;3048 4F
CALL L30D9 ;3049 CDD930
SUB 48 ;304C D630
CP 10 ;304E FE0A
JP C,L1398 ;3050 DA9813
LD A,B ;3053 78
ADD A,A ;3054 87
ADD A,A ;3055 87
ADD A,B ;3056 80
ADD A,A ;3057 87
ADD A,C ;3058 81
LD B,A ;3059 47
L305A: EX AF,AF' ;305A 08
LD A,B ;305B 78
JR NZ,L3060 ;305C 2002
CPL ;305E 2F
INC A ;305F 3C
L3060: LD (L2FD6),A ;3060 32D62F
EXX ;3063 D9
L3064: PUSH IX ;3064 DDE5
LD A,(L2FD6) ;3066 3AD62F
ADD A,29 ;3069 C61D
ADD A,C ;306B 81
LD (L2FD6),A ;306C 32D62F
CP 48 ;306F FE30
JP C,L307C ;3071 DA7C30
CP 128 ;3074 FE80
JP C,L1398 ;3076 DA9813
JP L30CE ;3079 C3CE30
L307C: LD A,128 ;307C 3E80
LD (L2D48),A ;307E 32482D
LD A,160 ;3081 3EA0
LD (L2D49),A ;3083 32492D
PUSH HL ;3086 E5
EXX ;3087 D9
POP BC ;3088 C1
LD D,H ;3089 54
LD E,L ;308A 5D
LD HL,L3096 ;308B 219630
PUSH HL ;308E E5
LD HL,(L2FD7) ;308F 2AD72F
PUSH HL ;3092 E5
JP L2E0B ;3093 C30B2E
L3096: DB 3AH,0D6H,2FH,6FH ;3096 3AD62F6F Link 3096 found at , $308C
DB 4FH,26H,00H,44H ;309A 4F260044
DB 29H,29H,09H,01H ;309E 29290901
DB 20H,31H,09H,0EDH ;30A2 203109ED
DB 5BH,0D7H,2FH,3EH ;30A6 5BD72F3E
DB 80H,32H,48H,2DH ;30AA 8032482D
DB 3EH,20H,86H,47H ;30AE 3E208647
DB 1AH,0E6H,7FH,80H ;30B2 1AE67F80
DB 0DAH,98H,13H,0D6H ;30B6 DA9813D6
DB 21H,30H,01H,0AFH ;30BA 213001AF
DB 01H,0C6H,30H,0C5H ;30BE 01C630C5
DB 0D5H,0C3H,6DH,2EH ;30C2 D5C36D2E
L30C6: DB 0E1H,01H,05H,00H ;30C6 E1010500
DB 50H,58H,7EH,0C9H ;30CA 50587EC9
L30CE: LD HL,L30C6 ;30CE 21C630
PUSH HL ;30D1 E5
LD HL,(L2FD7) ;30D2 2AD72F
PUSH HL ;30D5 E5
JP L2DE0 ;30D6 C3E02D
L30D9: INC IX ;30D9 DD23
LD A,(IX+0) ;30DB DD7E00
CP 32 ;30DE FE20
RET NZ ;30E0 C0
JR L30D9 ;30E1 18F6
L30E3: OR A ;30E3 B7
JR NZ,L30E9 ;30E4 2003
OR B ;30E6 B0
RET Z ;30E7 C8
XOR A ;30E8 AF
L30E9: EX AF,AF' ;30E9 08
LD A,B ;30EA 78
CP 9 ;30EB FE09
JP NZ,L3100 ;30ED C20031
INC C ;30F0 0C
RET ;30F1 C9
L30F2: OR A ;30F2 B7
JR NZ,L30FA ;30F3 2005
DEC C ;30F5 0D
L30F6: OR B ;30F6 B0
RET Z ;30F7 C8
INC C ;30F8 0C
XOR A ;30F9 AF
L30FA: EX AF,AF' ;30FA 08
LD A,B ;30FB 78
CP 9 ;30FC FE09
RET Z ;30FE C8
DEC C ;30FF 0D
L3100: INC B ;3100 04
LD D,H ;3101 54
LD E,L ;3102 5D
EXX ;3103 D9
LD D,H ;3104 54
LD E,L ;3105 5D
XOR A ;3106 AF
ADD HL,HL ;3107 29
RLA ;3108 17
ADD HL,HL ;3109 29
RLA ;310A 17
ADD HL,DE ;310B 19
LD D,0 ;310C 1600
ADC A,D ;310E 8A
ADD HL,HL ;310F 29
RLA ;3110 17
EX AF,AF' ;3111 08
LD E,A ;3112 5F
EX AF,AF' ;3113 08
ADD HL,DE ;3114 19
ADC A,D ;3115 8A
EXX ;3116 D9
ADD HL,HL ;3117 29
ADD HL,HL ;3118 29
ADD HL,DE ;3119 19
ADD HL,HL ;311A 29
LD D,0 ;311B 1600
LD E,A ;311D 5F
ADD HL,DE ;311E 19
RET ;311F C9
DB 0E0H,0F5H,0F7H,0D2H ;3120 E0F5F7D2 Link 3120 found at , $30A2, $3487
DB 0CAH,0E3H,0F3H,0B5H ;3124 CAE3F3B5
DB 87H,0FDH,0E7H,0B8H ;3128 87FDE7B8
DB 0D1H,74H,9EH,0EAH ;312C D1749EEA
DB 25H,06H,12H,0C6H ;3130 250612C6
DB 0EDH,0AFH,87H,96H ;3134 EDAF8796
DB 0F7H,0F1H,0CDH,14H ;3138 F7F1CD14
DB 0BEH,9AH,0F4H,01H ;313C BE9AF401
DB 9AH,6DH,0C1H,0F7H ;3140 9A6DC1F7
DB 81H,00H,0C9H,0F1H ;3144 8100C9F1
DB 0FBH,50H,0A0H,1DH ;3148 FB50A01D
DB 97H ;314C 97
L314D: DB 0FEH,65H,08H,0E5H ;314D FE6508E5
DB 0BCH,01H,7EH,4AH ;3151 BC017E4A
DB 1EH,0ECH,05H,8FH ;3155 1EEC058F
DB 0EEH,92H,93H,08H ;3159 EE929308
DB 32H,0AAH,77H,0B8H ;315D 32AA77B8
DB 0BH,0BFH,94H,95H ;3161 0BBF9495
DB 0E6H,0FH,0F7H,7CH ;3165 E60FF77C
DB 1DH,90H,12H,35H ;3169 1D901235
DB 0DCH,24H,0B4H,15H ;316D DC24B415
DB 42H,13H,2EH,0E1H ;3171 42132EE1
DB 19H,09H,0CCH,0BCH ;3175 1909CCBC
DB 8CH,1CH,0CH,0FFH ;3179 8C1C0CFF
DB 0EBH,0AFH,1FH,0CFH ;317D EBAF1FCF
DB 0FEH,0E6H,0DBH,23H ;3181 FEE6DB23
DB 41H,5FH,70H,89H ;3185 415F7089
DB 26H,12H,77H,0CCH ;3189 261277CC
DB 0ABH,29H,0D6H,94H ;318D AB29D694
DB 0BFH,0D6H,2DH,06H ;3191 BFD62D06
DB 0BDH,37H,86H,30H ;3195 BD378630
DB 47H,0ACH,0C5H,0A7H ;3199 47ACC5A7
DB 33H,59H,17H,0B7H ;319D 335917B7
DB 0D1H,37H,98H,6EH ;31A1 D137986E
DB 12H,83H,3AH,3DH ;31A5 12833A3D
DB 0AH,0D7H,0A3H,3DH ;31A9 0AD7A33D
DB 0CDH,0CCH,0CCH,0CCH ;31AD CDCCCCCC
DB 41H,00H,00H,00H ;31B1 41000000
DB 80H,44H,00H,00H ;31B5 80440000
DB 00H,0A0H,47H,00H ;31B9 00A04700
DB 00H,00H,0C8H,4AH ;31BD 0000C84A
DB 00H,00H,00H,0FAH ;31C1 000000FA
DB 4EH,00H,00H,40H ;31C5 4E000040
DB 9CH,51H,00H,00H ;31C9 9C510000
DB 50H,0C3H,54H,00H ;31CD 50C35400
DB 00H,24H,0F4H,58H ;31D1 0024F458
DB 00H,80H,96H,98H ;31D5 00809698
DB 5BH,00H,20H,0BCH ;31D9 5B0020BC
DB 0BEH,5EH,00H,28H ;31DD BE5E0028
DB 6BH,0EEH,62H,00H ;31E1 6BEE6200
DB 0F9H,02H,95H,65H ;31E5 F9029565
DB 40H,0B7H,43H,0BAH ;31E9 40B743BA
DB 68H,10H,0A5H,0D4H ;31ED 6810A5D4
DB 0E8H,6CH,2AH,0E7H ;31F1 E86C2AE7
DB 84H,91H,6FH,0F5H ;31F5 84916FF5
DB 20H,0E6H,0B5H,72H ;31F9 20E6B572
DB 32H,0A9H,5FH,0E3H ;31FD 32A95FE3
DB 76H,0BFH,0C9H,1BH ;3201 76BFC91B
DB 8EH,79H,2FH,0BCH ;3205 8E792FBC
DB 0A2H,0B1H,7CH,3AH ;3209 A2B17C3A
DB 6BH,0BH,0DEH,80H ;320D 6B0BDE80
DB 05H,23H,0C7H,8AH ;3211 0523C78A
L3215: DW 02D54H ;3215 542D
L3217: DB 22H ;3217 22 Link 3217 found at , $3232, $325F, $32EE, $3344, $33E2, $33E6, $3427, $34
L3218: DB 03H ;3218 03
L3219: DB 64H ;3219 64
L321A: DB 0C3H,0FFH,29H,0CDH ;321A C3FF29CD
DB 42H,26H,0D6H ;321E 4226D6
L3221: DB "A" ;3221 41
L3222: DB 0FEH ;3222 FE
L3223: DB 1AH ;3223 1A Link 3223 found at , $32DD, $3DFD, $3E3C
L3224: DB 0D2H,8EH,23H,5EH ;3224 D28E235E
DB 23H,0CDH,0B2H,26H ;3228 23CDB226
DB 28H ;322C 28
L322D: PUSH DE ;322D D5
CALL L3316 ;322E CD1633
LD A,(L3217) ;3231 3A1732
OR A ;3234 B7
JP Z,L32DC ;3235 CADC32
JP M,L3242 ;3238 FA4232
CP 9 ;323B FE09
JP C,L32A1 ;323D DAA132
JR L3247 ;3240 1805
L3242: CP 255 ;3242 FEFF
JP NC,L32D6 ;3244 D2D632
L3247: LD A,46 ;3247 3E2E
LD (L3219),A ;3249 321932
LD HL,L3222 ;324C 212232
XOR A ;324F AF
L3250: DEC HL ;3250 2B
CP (HL) ;3251 BE
JR Z,L3250 ;3252 28FC
LD A,(HL) ;3254 7E
CP 46 ;3255 FE2E
JP Z,L3309 ;3257 CA0933
INC HL ;325A 23
LD (HL),69 ;325B 3645
INC HL ;325D 23
LD A,(L3217) ;325E 3A1732
LD B,43 ;3261 062B
OR A ;3263 B7
JP P,L3270 ;3264 F27032
CP 237 ;3267 FEED
JP C,L3309 ;3269 DA0933
LD B,45 ;326C 062D
CPL ;326E 2F
INC A ;326F 3C
L3270: LD (HL),B ;3270 70
INC HL ;3271 23
LD BC,LFF0A ;3272 010AFF
L3275: INC B ;3275 04
SUB C ;3276 91
JR NC,L3275 ;3277 30FC
ADD A,C ;3279 81
LD (HL),B ;327A 70
INC HL ;327B 23
LD (HL),A ;327C 77
INC HL ;327D 23
LD (HL),13 ;327E 360D
L3280: LD HL,L3218 ;3280 211832
L3283: INC HL ;3283 23
LD A,(HL) ;3284 7E
CP 13 ;3285 FE0D
JP Z,L3293 ;3287 CA9332
JP NC,L3283 ;328A D28332
OR 48 ;328D F630
LD (HL),A ;328F 77
JP L3283 ;3290 C38332
L3293: LD DE,L3218 ;3293 111832
XOR A ;3296 AF
SBC HL,DE ;3297 ED52
LD B,H ;3299 44
LD C,L ;329A 4D
POP HL ;329B E1
EX DE,HL ;329C EB
INC BC ;329D 03
LDIR ;329E EDB0
RET ;32A0 C9
L32A1: LD HL,L321A ;32A1 211A32
LD DE,L3219 ;32A4 111932
LD B,A ;32A7 47
INC B ;32A8 04
L32A9: DEC B ;32A9 05
JP Z,L32B4 ;32AA CAB432
LD A,(HL) ;32AD 7E
LD (DE),A ;32AE 12
INC HL ;32AF 23
INC DE ;32B0 13
JP L32A9 ;32B1 C3A932
L32B4: LD A,46 ;32B4 3E2E
LD (DE),A ;32B6 12
LD HL,L3222 ;32B7 212232
L32BA: LD (HL),13 ;32BA 360D
DEC HL ;32BC 2B
LD A,(HL) ;32BD 7E
OR A ;32BE B7
JR Z,L32BA ;32BF 28F9
CP 46 ;32C1 FE2E
JP NZ,L32C8 ;32C3 C2C832
LD (HL),13 ;32C6 360D
L32C8: LD HL,L3219 ;32C8 211932
LD A,(HL) ;32CB 7E
CP 13 ;32CC FE0D
JP NZ,L3280 ;32CE C28032
LD (HL),0 ;32D1 3600
JP L3280 ;32D3 C38032
L32D6: LD DE,L3224 ;32D6 112432
JP L32DF ;32D9 C3DF32
L32DC: LD DE,L3223 ;32DC 112332
L32DF: LD HL,L3221 ;32DF 212132
LD A,13 ;32E2 3E0D
LD (DE),A ;32E4 12
PUSH DE ;32E5 D5
DEC DE ;32E6 1B
LD BC,L0008 ;32E7 010800
LDDR ;32EA EDB8
EX DE,HL ;32EC EB
LD A,(L3217) ;32ED 3A1732
OR A ;32F0 B7
JP Z,L32F7 ;32F1 CAF732
LD (HL),0 ;32F4 3600
DEC HL ;32F6 2B
L32F7: LD (HL),46 ;32F7 362E
DEC HL ;32F9 2B
LD (HL),0 ;32FA 3600
POP HL ;32FC E1
L32FD: DEC HL ;32FD 2B
LD A,(HL) ;32FE 7E
CP 0 ;32FF FE00
JP NZ,L3280 ;3301 C28032
LD (HL),13 ;3304 360D
JP L32FD ;3306 C3FD32
L3309: LD HL,L3313 ;3309 211333
LD BC,USER ;330C 010300
POP DE ;330F D1
LDIR ;3310 EDB0
RET ;3312 C9
L3313: DB " 0" ;3313 2030
DB 0DH ;3315 0D
L3316: LD (L3215),HL ;3316 221532
LD A,(HL) ;3319 7E
LD B,32 ;331A 0620
OR A ;331C B7
JP M,L3322 ;331D FA2233
LD B,45 ;3320 062D
L3322: AND 127 ;3322 E67F
LD (HL),A ;3324 77
LD A,B ;3325 78
LD (L3218),A ;3326 321832
EX DE,HL ;3329 EB
LD HL,L314D ;332A 214D31
LD A,236 ;332D 3EEC
EX AF,AF' ;332F 08
L3330: EX AF,AF' ;3330 08
INC A ;3331 3C
EX AF,AF' ;3332 08
LD BC,L0005 ;3333 010500
ADD HL,BC ;3336 09
PUSH HL ;3337 E5
PUSH DE ;3338 D5
LD A,(DE) ;3339 1A
CALL L33FB ;333A CDFB33
POP DE ;333D D1
POP HL ;333E E1
JP NC,L3330 ;333F D23033
EX AF,AF' ;3342 08
LD (L3217),A ;3343 321732
PUSH DE ;3346 D5
LD BC,L3358 ;3347 015833
PUSH BC ;334A C5
PUSH DE ;334B D5
LD A,128 ;334C 3E80
LD (L2D48),A ;334E 32482D
LD A,(DE) ;3351 1A
SUB (HL) ;3352 96
ADD A,129 ;3353 C681
JP L2F42 ;3355 C3422F
L3358: DB 21H,19H,32H,36H ;3358 21193236 Link 3358 found at , $3348
DB 00H,23H,0E3H,7EH ;335C 0023E37E
DB 23H,5EH,23H,56H ;3360 235E2356
DB 23H,0E5H,0EBH,0D9H ;3364 23E5EBD9
DB 0E1H,5EH,23H,56H ;3368 E15E2356
DB 0EBH,0D6H,0C0H,0D2H ;336C EBD6C0D2
DB 80H,33H,0CBH,3CH ;3370 8033CB3C
DB 0CBH,1DH,0D9H,0CBH ;3374 CB1DD9CB
DB 1CH,0CBH,1DH,0D9H ;3378 1CCB1DD9
DB 3CH,0C2H,72H,33H ;337C 3CC27233
DB 0C1H,3EH,09H,08H ;3380 C13E0908
DB 0AFH,54H,5DH,0D9H ;3384 AF545DD9
DB 54H,5DH,29H,0D9H ;3388 545D29D9
DB 0EDH,6AH,17H,0D9H ;338C ED6A17D9
DB 29H,0D9H,0EDH,6AH ;3390 29D9ED6A
DB 17H,0D9H,19H,0D9H ;3394 17D919D9
DB 0EDH,5AH,16H,00H ;3398 ED5A1600
DB 8AH,0D9H,29H,0D9H ;339C 8AD929D9
DB 0EDH,6AH,17H,02H ;33A0 ED6A1702
DB 03H,08H,3DH,0C2H ;33A4 03083DC2
DB 83H,33H,21H,22H ;33A8 83332122
DB 32H,7EH,36H,00H ;33AC 327E3600
DB 0FEH,05H,0EH,00H ;33B0 FE050E00
DB 0DAH,0B8H,33H,0CH ;33B4 DAB8330C
DB 06H,0AH,05H,0CAH ;33B8 060A05CA
DB 0CEH,33H,2BH,7EH ;33BC CE332B7E
DB 81H,77H,0D6H,0AH ;33C0 8177D60A
DB 0EH,00H,0DAH,0BAH ;33C4 0E00DABA
DB 33H,0CH,77H,0C3H ;33C8 330C77C3
DB 0BAH,33H,3AH,19H ;33CC BA333A19
DB 32H,0B7H,0C8H,21H ;33D0 32B7C821
DB 21H,32H,11H,22H ;33D4 21321122
DB 32H,01H,09H,00H ;33D8 32010900
DB 0EDH,0B8H,0EBH,36H ;33DC EDB8EB36
DB 00H,3AH,17H,32H ;33E0 003A1732
DB 3CH,32H,17H,32H ;33E4 3C321732
DB 0C3H,0AAH,33H ;33E8 C3AA33
L33EB: LD BC,L0005 ;33EB 010500
L33EE: LD A,(DE) ;33EE 1A
OR A ;33EF B7
JP M,L33FB ;33F0 FAFB33
BIT 7,(HL) ;33F3 CB7E
JR Z,L33F9 ;33F5 2802
SCF ;33F7 37
RET ;33F8 C9
L33F9: EX DE,HL ;33F9 EB
LD A,(DE) ;33FA 1A
L33FB: CP (HL) ;33FB BE
RET NZ ;33FC C0
DEC C ;33FD 0D
ADD HL,BC ;33FE 09
EX DE,HL ;33FF EB
ADD HL,BC ;3400 09
EX DE,HL ;3401 EB
LD B,3 ;3402 0603
L3404: LD A,(DE) ;3404 1A
CP (HL) ;3405 BE
RET NZ ;3406 C0
DEC HL ;3407 2B
DEC DE ;3408 1B
DJNZ L3404 ;3409 10F9
LD A,(DE) ;340B 1A
CP (HL) ;340C BE
RET ;340D C9
L340E: EX DE,HL ;340E EB
CALL L3316 ;340F CD1633
LD A,(L3218) ;3412 3A1832
LD B,128 ;3415 0680
CP 32 ;3417 FE20
JP Z,L341E ;3419 CA1E34
LD B,0 ;341C 0600
L341E: LD A,B ;341E 78
LD (L2D48),A ;341F 32482D
OR A ;3422 B7
JP Z,L34A7 ;3423 CAA734
LD A,(L3217) ;3426 3A1732
DEC A ;3429 3D
JP M,L34DF ;342A FADF34
LD HL,L3222 ;342D 212232
LD B,13 ;3430 060D
LD (HL),B ;3432 70
SUB 8 ;3433 D608
JR NC,L343D ;3435 3006
L3437: LD (HL),B ;3437 70
DEC HL ;3438 2B
INC A ;3439 3C
JR NZ,L3437 ;343A 20FB
DEC A ;343C 3D
L343D: INC A ;343D 3C
LD (L2FD6),A ;343E 32D62F
LD IX,L3219 ;3441 DD211932
XOR A ;3445 AF
LD H,A ;3446 67
LD L,A ;3447 6F
EXX ;3448 D9
LD B,A ;3449 47
LD C,A ;344A 4F
LD H,A ;344B 67
LD L,A ;344C 6F
L344D: LD A,(IX+0) ;344D DD7E00
CP 13 ;3450 FE0D
JP Z,L345D ;3452 CA5D34
CALL L30E3 ;3455 CDE330
INC IX ;3458 DD23
JP L344D ;345A C34D34
L345D: LD A,(L2FD6) ;345D 3AD62F
ADD A,29 ;3460 C61D
ADD A,C ;3462 81
LD (L2FD6),A ;3463 32D62F
LD A,160 ;3466 3EA0
LD (L2D49),A ;3468 32492D
PUSH HL ;346B E5
EXX ;346C D9
POP BC ;346D C1
LD D,H ;346E 54
LD E,L ;346F 5D
LD HL,L347B ;3470 217B34
PUSH HL ;3473 E5
LD HL,(L3215) ;3474 2A1532
PUSH HL ;3477 E5
JP L2E0B ;3478 C30B2E
L347B: DB 3AH,0D6H,2FH,4FH ;347B 3AD62F4F Link 347B found at , $3471
DB 6FH,26H,00H,44H ;347F 6F260044
DB 29H,29H,09H,01H ;3483 29290901
DB 20H,31H,09H,0EDH ;3487 203109ED
DB 5BH,15H,32H,0AFH ;348B 5B1532AF
DB 32H,47H,2DH,3EH ;348F 32472D3E
DB 20H,86H,47H,1AH ;3493 2086471A
DB 0E6H,7FH,80H,0DAH ;3497 E67F80DA
DB 98H,13H,0D6H,21H ;349B 9813D621
DB 0D2H,0A3H,34H,0AFH ;349F D2A334AF
DB 0D5H,0C3H,6DH,2EH ;34A3 D5C36D2E
L34A7: LD A,(L3217) ;34A7 3A1732
DEC A ;34AA 3D
JP M,L34E4 ;34AB FAE434
LD HL,L3222 ;34AE 212232
LD BC,L0D00 ;34B1 01000D
LD (HL),B ;34B4 70
SUB 8 ;34B5 D608
JP NC,L34CA ;34B7 D2CA34
JP L34C5 ;34BA C3C534
L34BD: EX AF,AF' ;34BD 08
LD A,(HL) ;34BE 7E
OR A ;34BF B7
JR Z,L34C3 ;34C0 2801
INC C ;34C2 0C
L34C3: LD (HL),B ;34C3 70
EX AF,AF' ;34C4 08
L34C5: DEC HL ;34C5 2B
INC A ;34C6 3C
JR NZ,L34BD ;34C7 20F4
DEC A ;34C9 3D
L34CA: EX AF,AF' ;34CA 08
LD A,C ;34CB 79
OR A ;34CC B7
JR Z,L34DB ;34CD 280C
L34CF: LD A,(HL) ;34CF 7E
INC A ;34D0 3C
LD (HL),A ;34D1 77
CP 10 ;34D2 FE0A
JR NZ,L34DB ;34D4 2005
LD (HL),0 ;34D6 3600
DEC HL ;34D8 2B
JR L34CF ;34D9 18F4
L34DB: EX AF,AF' ;34DB 08
JP L343D ;34DC C33D34
L34DF: LD DE,L1619 ;34DF 111916
JR L34E7 ;34E2 1803
L34E4: LD DE,L161E ;34E4 111E16
L34E7: LD HL,(L3215) ;34E7 2A1532
EX DE,HL ;34EA EB
L34EB: LD BC,L0005 ;34EB 010500
LDIR ;34EE EDB0
RET ;34F0 C9
L34F1: PUSH DE ;34F1 D5
CALL L33EB ;34F2 CDEB33
JP Z,L34FD ;34F5 CAFD34
L34F8: LD HL,L161E ;34F8 211E16
JR L3500 ;34FB 1803
L34FD: LD HL,L1619 ;34FD 211916
L3500: POP DE ;3500 D1
JP L34EB ;3501 C3EB34
L3504: PUSH DE ;3504 D5
EX DE,HL ;3505 EB
JR L3509 ;3506 1801
L3508: PUSH DE ;3508 D5
L3509: CALL L33EB ;3509 CDEB33
JP C,L34F8 ;350C DAF834
JP L34FD ;350F C3FD34
L3512: PUSH DE ;3512 D5
CALL L33EB ;3513 CDEB33
JP Z,L34F8 ;3516 CAF834
JP L34FD ;3519 C3FD34
L351C: PUSH DE ;351C D5
EX DE,HL ;351D EB
JR L3521 ;351E 1801
L3520: PUSH DE ;3520 D5
L3521: CALL L33EB ;3521 CDEB33
JP C,L34FD ;3524 DAFD34
JP L34F8 ;3527 C3F834
L352A: DB 0BEH,35H,28H,0DCH ;352A BE3528DC Link 352A found at , $353B, $355D
DB 0CFH ;352E CF
L352F: PUSH DE ;352F D5
EX DE,HL ;3530 EB
LD A,(HL) ;3531 7E
LD BC,L0004 ;3532 010400
ADD HL,BC ;3535 09
XOR (HL) ;3536 AE
JP M,L355C ;3537 FA5C35
LD DE,L352A ;353A 112A35
PUSH DE ;353D D5
LD HL,L3583 ;353E 218335
CALL L2E59 ;3541 CD592E
POP HL ;3544 E1
PUSH HL ;3545 E5
LD A,(HL) ;3546 7E
INC HL ;3547 23
LD E,(HL) ;3548 5E
INC HL ;3549 23
LD D,(HL) ;354A 56
INC HL ;354B 23
LD C,(HL) ;354C 4E
INC HL ;354D 23
LD B,(HL) ;354E 46
CP 193 ;354F FEC1
CALL NC,L356B ;3551 D46B35
POP HL ;3554 E1
PUSH HL ;3555 E5
CALL L2DE4 ;3556 CDE42D
JP L3566 ;3559 C36635
L355C: LD DE,L352A ;355C 112A35
LD HL,L357E ;355F 217E35
PUSH DE ;3562 D5
CALL L34EB ;3563 CDEB34
L3566: POP HL ;3566 E1
POP DE ;3567 D1
JP L34EB ;3568 C3EB34
L356B: SUB 192 ;356B D6C0
L356D: SLA E ;356D CB23
RL D ;356F CB12
RL C ;3571 CB11
RL B ;3573 CB10
DEC A ;3575 3D
JP NZ,L356D ;3576 C26D35
LD A,192 ;3579 3EC0
JP L3661 ;357B C36136
L357E: DB 0BEH,35H,28H,0DCH ;357E BE3528DC Link 357E found at , $3560
DB 0CFH ;3582 CF
L3583: DB 0C5H,00H,00H,00H ;3583 C5000000
DB 0B8H ;3587 B8
L3588: DB 0CDH,8EH,27H,0CDH ;3588 CD8E27CD
DB 0B5H ;358C B5
L358D: DB 28H,2AH,30H,62H ;358D 282A3062
DB 0EBH ;3591 EB
L3592: DB 73H,23H,72H,23H ;3592 73237223
DB 36H ;3596 36
L3597: DB 0DH,0CDH,03H,28H ;3597 0DCD0328
DB 0EBH ;359B EB
L359C: LD DE,L3588 ;359C 118835
JP L2D4D ;359F C34D2D
L35A2: CALL L359C ;35A2 CD9C35
L35A5: LD HL,L358D ;35A5 218D35
L35A8: LD DE,L3588 ;35A8 118835
JP L2E59 ;35AB C3592E
L35AE: DW 0AFF1H ;35AE F1AF
L35B0: PUSH DE ;35B0 D5
LD HL,L3684 ;35B1 218436
CALL L2F30 ;35B4 CD302F
POP HL ;35B7 E1
PUSH HL ;35B8 E5
LD A,(HL) ;35B9 7E
LD (L35AF),A ;35BA 32AF35
OR 128 ;35BD F680
INC HL ;35BF 23
LD E,(HL) ;35C0 5E
INC HL ;35C1 23
LD D,(HL) ;35C2 56
INC HL ;35C3 23
LD C,(HL) ;35C4 4E
INC HL ;35C5 23
LD B,(HL) ;35C6 46
CP 195 ;35C7 FEC3
JP C,L35DF ;35C9 DADF35
SUB 194 ;35CC D6C2
L35CE: SLA E ;35CE CB23
RL D ;35D0 CB12
RL C ;35D2 CB11
RL B ;35D4 CB10
DEC A ;35D6 3D
JP NZ,L35CE ;35D7 C2CE35
LD A,194 ;35DA 3EC2
CALL L3661 ;35DC CD6136
L35DF: LD HL,L8000 ;35DF 210080
CP 194 ;35E2 FEC2
JR C,L35EC ;35E4 3806
LD H,L ;35E6 65
RES 7,B ;35E7 CBB8
CALL L3661 ;35E9 CD6136
L35EC: CP 193 ;35EC FEC1
JR C,L35F6 ;35EE 3806
INC L ;35F0 2C
RES 7,B ;35F1 CBB8
CALL L3661 ;35F3 CD6136
L35F6: EX AF,AF' ;35F6 08
LD A,(L35AF) ;35F7 3AAF35
XOR H ;35FA AC
CPL ;35FB 2F
AND 128 ;35FC E680
LD H,A ;35FE 67
LD (L35AE),HL ;35FF 22AE35
EX AF,AF' ;3602 08
POP HL ;3603 E1
PUSH HL ;3604 E5
CALL L2DE4 ;3605 CDE42D
LD A,(L35AE) ;3608 3AAE35
OR A ;360B B7
JR Z,L3616 ;360C 2808
POP DE ;360E D1
PUSH DE ;360F D5
LD HL,L1614 ;3610 211416
CALL L2D4A ;3613 CD4A2D
L3616: POP HL ;3616 E1
PUSH HL ;3617 E5
LD A,(HL) ;3618 7E
AND 127 ;3619 E67F
LD B,A ;361B 47
LD A,(L35AF) ;361C 3AAF35
OR B ;361F B0
LD (HL),A ;3620 77
LD DE,L3588 ;3621 118835
CALL L34EB ;3624 CDEB34
LD DE,L358D ;3627 118D35
LD HL,L3588 ;362A 218835
CALL L34EB ;362D CDEB34
CALL L35A5 ;3630 CDA535
LD DE,L358D ;3633 118D35
LD HL,L3588 ;3636 218835
CALL L34EB ;3639 CDEB34
LD HL,L3689 ;363C 218936
CALL L35A8 ;363F CDA835
LD HL,L368E ;3642 218E36
CALL L35A2 ;3645 CDA235
LD HL,L3693 ;3648 219336
CALL L35A2 ;364B CDA235
LD HL,L3698 ;364E 219836
CALL L35A2 ;3651 CDA235
LD HL,L369D ;3654 219D36
CALL L359C ;3657 CD9C35
POP DE ;365A D1
LD HL,L3588 ;365B 218835
JP L2E59 ;365E C3592E
L3661: BIT 7,B ;3661 CB78
RET NZ ;3663 C0
EX AF,AF' ;3664 08
LD A,B ;3665 78
OR C ;3666 B1
OR E ;3667 B3
OR D ;3668 B2
JP Z,L367B ;3669 CA7B36
EX AF,AF' ;366C 08
L366D: BIT 7,B ;366D CB78
RET NZ ;366F C0
SLA E ;3670 CB23
RL D ;3672 CB12
RL C ;3674 CB11
RL B ;3676 CB10
DEC A ;3678 3D
JR NZ,L366D ;3679 20F2
L367B: LD BC,COLDSTART ;367B 010000
LD DE,COLDSTART ;367E 110000
LD A,128 ;3681 3E80
RET ;3683 C9
L3684: DB 0C1H,0A1H,0DAH,0FH ;3684 C1A1DA0F Link 3684 found at , $35B2, $36A4, $3ABF
DB 0C9H ;3688 C9
L3689: DB 0B4H,0DCH,0FH,0AH ;3689 B4DC0F0A
DB 9FH ;368D 9F
L368E: DB 39H,61H,8FH,29H ;368E 39618F29
DB 99H ;3692 99
L3693: DB 0BDH,0C8H,77H,34H ;3693 BDC87734
DB 0A3H ;3697 A3
L3698: DB 40H,85H,0E1H,5DH ;3698 4085E15D
DB 0A5H ;369C A5
L369D: DB 0C1H,94H,0DAH,0FH ;369D C194DA0F
DB 0C9H ;36A1 C9
L36A2: PUSH DE ;36A2 D5
LD HL,L3684 ;36A3 218436
CALL L2D4A ;36A6 CD4A2D
POP HL ;36A9 E1
CALL L3B45 ;36AA CD453B
EX DE,HL ;36AD EB
JP L35B0 ;36AE C3B035
L36B1: PUSH DE ;36B1 D5
EX DE,HL ;36B2 EB
LD DE,L3597 ;36B3 119735
CALL L34EB ;36B6 CDEB34
POP DE ;36B9 D1
PUSH DE ;36BA D5
CALL L36A2 ;36BB CDA236
POP HL ;36BE E1
PUSH HL ;36BF E5
LD DE,L3592 ;36C0 119235
CALL L34EB ;36C3 CDEB34
POP DE ;36C6 D1
PUSH DE ;36C7 D5
LD HL,L3597 ;36C8 219735
CALL L34EB ;36CB CDEB34
POP DE ;36CE D1
PUSH DE ;36CF D5
CALL L35B0 ;36D0 CDB035
POP DE ;36D3 D1
LD HL,L3592 ;36D4 219235
JP L2F30 ;36D7 C3302F
L36DA: DB 0FEH ;36DA FE
L36DB: DB 0AH ;36DB 0A
L36DC: LD A,3 ;36DC 3E03
LD (L36DA),A ;36DE 32DA36
PUSH DE ;36E1 D5
EX DE,HL ;36E2 EB
LD A,(HL) ;36E3 7E
ADD A,128 ;36E4 C680
JP NC,L1398 ;36E6 D29813
JP NZ,L36F9 ;36E9 C2F936
EX AF,AF' ;36EC 08
LD BC,L0004 ;36ED 010400
ADD HL,BC ;36F0 09
LD A,(HL) ;36F1 7E
SBC HL,BC ;36F2 ED42
OR A ;36F4 B7
JP P,L375C ;36F5 F25C37
EX AF,AF' ;36F8 08
L36F9: BIT 0,A ;36F9 CB47
JP NZ,L3778 ;36FB C27837
LD (L36DB),A ;36FE 32DB36
LD (HL),192 ;3701 36C0
LD DE,L3588 ;3703 118835
CALL L34EB ;3706 CDEB34
LD HL,L3790 ;3709 219037
CALL L35A8 ;370C CDA835
LD HL,L3795 ;370F 219537
L3712: CALL L359C ;3712 CD9C35
L3715: LD DE,L358D ;3715 118D35
POP HL ;3718 E1
PUSH HL ;3719 E5
CALL L34EB ;371A CDEB34
LD DE,L358D ;371D 118D35
LD HL,L3588 ;3720 218835
CALL L2F30 ;3723 CD302F
LD HL,L358D ;3726 218D35
CALL L359C ;3729 CD9C35
LD HL,L3588 ;372C 218835
LD A,(HL) ;372F 7E
AND 127 ;3730 E67F
DEC A ;3732 3D
JP C,L375C ;3733 DA5C37
OR 128 ;3736 F680
LD (HL),A ;3738 77
LD A,(L36DA) ;3739 3ADA36
DEC A ;373C 3D
LD (L36DA),A ;373D 32DA36
JP NZ,L3715 ;3740 C21537
LD A,(L36DB) ;3743 3ADB36
CP 64 ;3746 FE40
CALL NZ,L3763 ;3748 C46337
LD B,(HL) ;374B 46
RES 7,B ;374C CBB8
ADD A,B ;374E 80
SUB 64 ;374F D640
JP C,L375C ;3751 DA5C37
JP M,L1398 ;3754 FA9813
OR 128 ;3757 F680
LD (HL),A ;3759 77
JR L375F ;375A 1803
L375C: LD HL,L1619 ;375C 211916
L375F: POP DE ;375F D1
JP L34EB ;3760 C3EB34
L3763: JP C,L376D ;3763 DA6D37
SUB 64 ;3766 D640
SRL A ;3768 CB3F
ADD A,64 ;376A C640
RET ;376C C9
L376D: LD B,A ;376D 47
LD A,64 ;376E 3E40
SUB B ;3770 90
SRL A ;3771 CB3F
LD B,A ;3773 47
LD A,64 ;3774 3E40
SUB B ;3776 90
RET ;3777 C9
L3778: INC A ;3778 3C
LD (L36DB),A ;3779 32DB36
LD (HL),191 ;377C 36BF
LD DE,L3588 ;377E 118835
CALL L34EB ;3781 CDEB34
LD HL,L379A ;3784 219A37
CALL L35A8 ;3787 CDA835
LD HL,L379F ;378A 219F37
JP L3712 ;378D C31237
L3790: DB 0C0H,00H,00H,00H ;3790 C0000000 Link 3790 found at , $370A
DB 90H ;3794 90
L3795: DB 0BFH,00H,00H,00H ;3795 BF000000
DB 0E0H ;3799 E0
L379A: DB 0C0H,00H,00H,00H ;379A C0000000
DB 0E0H ;379E E0
L379F: DB 0BFH,00H,00H,00H ;379F BF000000
DB 90H ;37A3 90
L37A4: DB BRC ;37A4 CD
L37A5: DB 02H ;37A5 02
L37A6: PUSH DE ;37A6 D5
LD A,(DE) ;37A7 1A
AND 128 ;37A8 E680
LD (L37A4),A ;37AA 32A437
LD A,(DE) ;37AD 1A
OR 128 ;37AE F680
LD (DE),A ;37B0 12
LD HL,L38D7 ;37B1 21D738
CALL L2F30 ;37B4 CD302F
POP HL ;37B7 E1
PUSH HL ;37B8 E5
LD A,64 ;37B9 3E40
LD (L37A5),A ;37BB 32A537
LD A,(HL) ;37BE 7E
SUB 193 ;37BF D6C1
CALL NC,L3861 ;37C1 D46138
POP DE ;37C4 D1
PUSH DE ;37C5 D5
LD HL,L38D2 ;37C6 21D238
CALL L2D4A ;37C9 CD4A2D
POP HL ;37CC E1
PUSH HL ;37CD E5
LD DE,L3588 ;37CE 118835
CALL L34EB ;37D1 CDEB34
LD HL,L38AF ;37D4 21AF38
CALL L35A8 ;37D7 CDA835
LD HL,L38B4 ;37DA 21B438
CALL L359C ;37DD CD9C35
POP HL ;37E0 E1
PUSH HL ;37E1 E5
CALL L35A8 ;37E2 CDA835
LD HL,L38B9 ;37E5 21B938
CALL L359C ;37E8 CD9C35
POP HL ;37EB E1
PUSH HL ;37EC E5
CALL L35A8 ;37ED CDA835
LD HL,L38BE ;37F0 21BE38
CALL L359C ;37F3 CD9C35
POP HL ;37F6 E1
PUSH HL ;37F7 E5
CALL L35A8 ;37F8 CDA835
LD HL,L38C3 ;37FB 21C338
CALL L359C ;37FE CD9C35
POP HL ;3801 E1
PUSH HL ;3802 E5
CALL L35A8 ;3803 CDA835
LD HL,L38C8 ;3806 21C838
CALL L359C ;3809 CD9C35
POP HL ;380C E1
PUSH HL ;380D E5
CALL L35A8 ;380E CDA835
LD HL,L38CD ;3811 21CD38
CALL L359C ;3814 CD9C35
LD HL,L3588 ;3817 218835
LD B,(HL) ;381A 46
RES 7,B ;381B CBB8
LD A,(L37A5) ;381D 3AA537
ADD A,B ;3820 80
JP C,L38A5 ;3821 DAA538
SUB 63 ;3824 D63F
JP C,L3895 ;3826 DA9538
JP M,L38A5 ;3829 FAA538
OR 128 ;382C F680
LD (HL),A ;382E 77
LD A,(L37A4) ;382F 3AA437
OR A ;3832 B7
JP Z,L383D ;3833 CA3D38
LD HL,L3588 ;3836 218835
POP DE ;3839 D1
JP L34EB ;383A C3EB34
L383D: POP DE ;383D D1
PUSH DE ;383E D5
LD HL,L1614 ;383F 211416
CALL L34EB ;3842 CDEB34
POP DE ;3845 D1
PUSH DE ;3846 D5
LD A,(DE) ;3847 1A
CP 252 ;3848 FEFC
PUSH AF ;384A F5
JP C,L3850 ;384B DA5038
DEC A ;384E 3D
LD (DE),A ;384F 12
L3850: LD HL,L3588 ;3850 218835
CALL L2F30 ;3853 CD302F
POP AF ;3856 F1
POP HL ;3857 E1
RET C ;3858 D8
LD A,(HL) ;3859 7E
DEC A ;385A 3D
LD (HL),A ;385B 77
RET M ;385C F8
PUSH HL ;385D E5
JP L2DE0 ;385E C3E02D
L3861: INC HL ;3861 23
LD E,(HL) ;3862 5E
INC HL ;3863 23
LD D,(HL) ;3864 56
INC HL ;3865 23
LD C,(HL) ;3866 4E
INC HL ;3867 23
LD B,(HL) ;3868 46
PUSH HL ;3869 E5
INC A ;386A 3C
LD H,A ;386B 67
XOR A ;386C AF
L386D: SLA E ;386D CB23
RL D ;386F CB12
RL C ;3871 CB11
RL B ;3873 CB10
RLA ;3875 17
JP C,L38A3 ;3876 DAA338
DEC H ;3879 25
JP NZ,L386D ;387A C26D38
ADD A,64 ;387D C640
JP C,L38A3 ;387F DAA338
LD (L37A5),A ;3882 32A537
LD A,192 ;3885 3EC0
CALL L3661 ;3887 CD6136
POP HL ;388A E1
LD (HL),B ;388B 70
DEC HL ;388C 2B
LD (HL),C ;388D 71
DEC HL ;388E 2B
LD (HL),D ;388F 72
DEC HL ;3890 2B
LD (HL),E ;3891 73
DEC HL ;3892 2B
LD (HL),A ;3893 77
RET ;3894 C9
L3895: LD A,(L37A4) ;3895 3AA437
OR A ;3898 B7
JP Z,L1398 ;3899 CA9813
L389C: LD HL,L1619 ;389C 211916
POP DE ;389F D1
JP L34EB ;38A0 C3EB34
L38A3: POP AF ;38A3 F1
POP AF ;38A4 F1
L38A5: LD A,(L37A4) ;38A5 3AA437
OR A ;38A8 B7
JP NZ,L1398 ;38A9 C29813
JP L389C ;38AC C39C38
L38AF: DB 0B3H,7CH,8CH,90H ;38AF B37C8C90 Link 38AF found at , $37D5
DB 0E3H ;38B3 E3
L38B4: DB 0B6H,1FH,0DFH,62H ;38B4 B61FDF62
DB 0F8H ;38B8 F8
L38B9: DB 0B9H,0E2H,6DH,0DDH ;38B9 B9E26DDD
DB 0DEH ;38BD DE
L38BE: DB 0BCH,8BH,33H,0C1H ;38BE BC8B33C1
DB 0A0H ;38C2 A0
L38C3: DB 0BEH,89H,4AH,0F1H ;38C3 BE894AF1
DB 0ADH ;38C7 AD
L38C8: DB 0BFH,34H,33H,0F2H ;38C8 BF3433F2
DB 0FAH ;38CC FA
L38CD: DB 0C0H,36H,0F3H,04H ;38CD C036F304
DB 0B5H ;38D1 B5
L38D2: DB 0C0H,00H,00H,00H ;38D2 C0000000
DB 80H ;38D6 80
L38D7: DB 0C0H,0F8H,17H,72H ;38D7 C0F81772
DB 0B1H ;38DB B1
L38DC: DB 0DAH ;38DC DA
L38DD: DB 98H ;38DD 98
L38DE: DB 23H ;38DE 23
L38DF: PUSH DE ;38DF D5
LD A,128 ;38E0 3E80
LD (L38DD),A ;38E2 32DD38
LD (L38DC),A ;38E5 32DC38
EX DE,HL ;38E8 EB
LD A,(HL) ;38E9 7E
OR A ;38EA B7
JP P,L1398 ;38EB F29813
CP 138 ;38EE FE8A
JP NC,L38FE ;38F0 D2FE38
XOR A ;38F3 AF
LD (L38DC),A ;38F4 32DC38
EX DE,HL ;38F7 EB
CALL L36DC ;38F8 CDDC36
POP HL ;38FB E1
PUSH HL ;38FC E5
LD A,(HL) ;38FD 7E
L38FE: CP 193 ;38FE FEC1
CALL C,L39BF ;3900 DCBF39
LD B,0 ;3903 0600
CP 193 ;3905 FEC1
JP Z,L3910 ;3907 CA1039
SUB 193 ;390A D6C1
LD B,A ;390C 47
LD A,193 ;390D 3EC1
LD (HL),A ;390F 77
L3910: LD A,B ;3910 78
LD (L38DE),A ;3911 32DE38
LD DE,L3588 ;3914 118835
CALL L34EB ;3917 CDEB34
POP DE ;391A D1
PUSH DE ;391B D5
LD HL,L3A04 ;391C 21043A
CALL L2D4A ;391F CD4A2D
LD HL,L3A04 ;3922 21043A
CALL L359C ;3925 CD9C35
POP DE ;3928 D1
PUSH DE ;3929 D5
LD HL,L3588 ;392A 218835
CALL L2F30 ;392D CD302F
POP DE ;3930 D1
PUSH DE ;3931 D5
LD HL,L3A09 ;3932 21093A
CALL L2E59 ;3935 CD592E
POP HL ;3938 E1
PUSH HL ;3939 E5
LD DE,L358D ;393A 118D35
CALL L34EB ;393D CDEB34
POP HL ;3940 E1
PUSH HL ;3941 E5
LD DE,L358D ;3942 118D35
CALL L2E59 ;3945 CD592E
LD DE,L3588 ;3948 118835
LD HL,L358D ;394B 218D35
CALL L34EB ;394E CDEB34
LD HL,L39F0 ;3951 21F039
CALL L35A8 ;3954 CDA835
LD HL,L39F5 ;3957 21F539
CALL L35A2 ;395A CDA235
LD HL,L39FA ;395D 21FA39
CALL L35A2 ;3960 CDA235
LD HL,L39FF ;3963 21FF39
CALL L359C ;3966 CD9C35
POP HL ;3969 E1
PUSH HL ;396A E5
CALL L35A8 ;396B CDA835
LD DE,L358D ;396E 118D35
LD HL,L3588 ;3971 218835
CALL L34EB ;3974 CDEB34
LD A,(L38DE) ;3977 3ADE38
ADD A,A ;397A 87
INC A ;397B 3C
LD B,A ;397C 47
LD A,8 ;397D 3E08
L397F: BIT 7,B ;397F CB78
JP NZ,L398A ;3981 C28A39
SLA B ;3984 CB20
DEC A ;3986 3D
JP NZ,L397F ;3987 C27F39
L398A: ADD A,192 ;398A C6C0
LD HL,L3588 ;398C 218835
LD (HL),A ;398F 77
INC HL ;3990 23
XOR A ;3991 AF
LD (HL),A ;3992 77
INC HL ;3993 23
LD (HL),A ;3994 77
INC HL ;3995 23
LD (HL),A ;3996 77
INC HL ;3997 23
LD (HL),B ;3998 70
LD HL,L3A0E ;3999 210E3A
CALL L35A8 ;399C CDA835
LD HL,L358D ;399F 218D35
CALL L359C ;39A2 CD9C35
LD HL,L3588 ;39A5 218835
LD A,(L38DD) ;39A8 3ADD38
CALL L3B43 ;39AB CD433B
POP DE ;39AE D1
PUSH DE ;39AF D5
CALL L34EB ;39B0 CDEB34
POP DE ;39B3 D1
LD A,(L38DC) ;39B4 3ADC38
OR A ;39B7 B7
RET NZ ;39B8 C0
LD HL,L3588 ;39B9 218835
JP L2D4D ;39BC C34D2D
L39BF: PUSH HL ;39BF E5
LD DE,L3588 ;39C0 118835
CALL L34EB ;39C3 CDEB34
POP DE ;39C6 D1
PUSH DE ;39C7 D5
LD HL,L1614 ;39C8 211416
CALL L34EB ;39CB CDEB34
POP DE ;39CE D1
PUSH DE ;39CF D5
LD HL,L3588 ;39D0 218835
CALL L2F30 ;39D3 CD302F
POP HL ;39D6 E1
LD A,(HL) ;39D7 7E
CP 193 ;39D8 FEC1
JP NC,L39E8 ;39DA D2E839
PUSH HL ;39DD E5
EX DE,HL ;39DE EB
LD HL,L1614 ;39DF 211416
CALL L34EB ;39E2 CDEB34
POP HL ;39E5 E1
LD A,193 ;39E6 3EC1
L39E8: EX AF,AF' ;39E8 08
LD A,0 ;39E9 3E00
LD (L38DD),A ;39EB 32DD38
EX AF,AF' ;39EE 08
RET ;39EF C9
L39F0: DB 0ADH,0A4H,62H,0CCH ;39F0 ADA462CC Link 39F0 found at , $3952
DB 0AFH ;39F4 AF
L39F5: DB 0B2H,9FH,0E9H,47H ;39F5 B29FE947
DB 0F9H ;39F9 F9
L39FA: DB 0B8H,0A4H,82H,0AAH ;39FA B8A482AA
DB 0DCH ;39FE DC
L39FF: DB 0BFH,0BFH,0CCH,0B0H ;39FF BFBFCCB0
DB 0AFH ;3A03 AF
L3A04: DB 0C1H,33H,0F3H,04H ;3A04 C133F304
DB 0B5H ;3A08 B5
L3A09: DB 0C3H,99H,79H,82H ;3A09 C3997982
DB 0BAH ;3A0D BA
L3A0E: DB 0BFH,0F8H,17H,72H ;3A0E BFF81772
DB 0B1H ;3A12 B1
L3A13: PUSH DE ;3A13 D5
CALL L38DF ;3A14 CDDF38
POP DE ;3A17 D1
LD HL,L3A1E ;3A18 211E3A
JP L2E59 ;3A1B C3592E
L3A1E: DB 0BFH,0A9H,0D8H,5BH ;3A1E BFA9D85B Link 3A1E found at , $1EC0, $1F99, $3A19
DB 0DEH ;3A22 DE
L3A23: DB 03H ;3A23 03
L3A24: DB 64H ;3A24 64
L3A25: PUSH DE ;3A25 D5
EX DE,HL ;3A26 EB
LD A,(HL) ;3A27 7E
AND 128 ;3A28 E680
LD (L3A23),A ;3A2A 32233A
SET 7,(HL) ;3A2D CBFE
LD DE,L1614 ;3A2F 111416
CALL L33EB ;3A32 CDEB33
LD A,128 ;3A35 3E80
JP NC,L3A53 ;3A37 D2533A
LD DE,L3588 ;3A3A 118835
POP HL ;3A3D E1
PUSH HL ;3A3E E5
CALL L34EB ;3A3F CDEB34
POP DE ;3A42 D1
PUSH DE ;3A43 D5
LD HL,L1614 ;3A44 211416
CALL L34EB ;3A47 CDEB34
POP DE ;3A4A D1
PUSH DE ;3A4B D5
LD HL,L3588 ;3A4C 218835
CALL L2F30 ;3A4F CD302F
XOR A ;3A52 AF
L3A53: LD (L3A24),A ;3A53 32243A
POP HL ;3A56 E1
PUSH HL ;3A57 E5
LD DE,L3588 ;3A58 118835
CALL L34EB ;3A5B CDEB34
POP HL ;3A5E E1
PUSH HL ;3A5F E5
CALL L35A8 ;3A60 CDA835
LD HL,L3588 ;3A63 218835
LD DE,L358D ;3A66 118D35
CALL L34EB ;3A69 CDEB34
LD HL,L3AD3 ;3A6C 21D33A
CALL L35A8 ;3A6F CDA835
LD HL,L3AD8 ;3A72 21D83A
CALL L35A2 ;3A75 CDA235
LD HL,L3ADD ;3A78 21DD3A
CALL L35A2 ;3A7B CDA235
LD HL,L3AE2 ;3A7E 21E23A
CALL L35A2 ;3A81 CDA235
LD HL,L3AE7 ;3A84 21E73A
CALL L35A2 ;3A87 CDA235
LD HL,L3AEC ;3A8A 21EC3A
CALL L35A2 ;3A8D CDA235
LD HL,L3AF1 ;3A90 21F13A
CALL L35A2 ;3A93 CDA235
LD HL,L3AF6 ;3A96 21F63A
CALL L35A2 ;3A99 CDA235
LD HL,L3AFB ;3A9C 21FB3A
CALL L35A2 ;3A9F CDA235
LD HL,L1614 ;3AA2 211416
CALL L359C ;3AA5 CD9C35
POP HL ;3AA8 E1
PUSH HL ;3AA9 E5
CALL L35A8 ;3AAA CDA835
POP DE ;3AAD D1
PUSH DE ;3AAE D5
LD HL,L3588 ;3AAF 218835
CALL L34EB ;3AB2 CDEB34
LD A,(L3A24) ;3AB5 3A243A
OR A ;3AB8 B7
JP NZ,L3ACC ;3AB9 C2CC3A
POP DE ;3ABC D1
PUSH DE ;3ABD D5
LD HL,L3684 ;3ABE 218436
CALL L34EB ;3AC1 CDEB34
POP DE ;3AC4 D1
PUSH DE ;3AC5 D5
LD HL,L3588 ;3AC6 218835
CALL L2D4A ;3AC9 CD4A2D
L3ACC: POP HL ;3ACC E1
LD A,(L3A23) ;3ACD 3A233A
JP L3B43 ;3AD0 C3433B
L3AD3: DB 37H,0CAH,9AH,56H ;3AD3 37CA9A56 Link 3AD3 found at , $3A6D
DB 0DFH ;3AD7 DF
L3AD8: DB 0BAH,12H,77H,0CCH ;3AD8 BA1277CC
DB 0ABH ;3ADC AB
L3ADD: DB 3BH,23H,0B2H,5EH ;3ADD 3B23B25E
DB 0F8H ;3AE1 F8
L3AE2: DB 0BCH,20H,63H,90H ;3AE2 BC206390
DB 0E9H ;3AE6 E9
L3AE7: DB 3DH,0EEH,3DH,0E0H ;3AE7 3DEE3DE0 Link 3AE7 found at , $3A85
DB 0AAH ;3AEB AA
L3AEC: DB 0BDH,4FH,1AH,0D5H ;3AEC BD4F1AD5
DB 0DFH ;3AF0 DF
L3AF1: DB 3EH,0E3H,0AFH,03H ;3AF1 3EE3AF03
DB 92H ;3AF5 92
L3AF6: DB 0BEH,2AH,7BH,0C7H ;3AF6 BE2A7BC7
DB 0CCH ;3AFA CC
L3AFB: DB 3FH,17H,96H,0AAH ;3AFB 3F1796AA
DB 0AAH ;3AFF AA
L3B00: DB 0E1H,22H,03H,64H ;3B00 E1220364
L3B04: DB 0F1H ;3B04 F1
L3B05: DB 0C2H ;3B05 C2
L3B06: DB 0CCH ;3B06 CC
DB 3CH,2AH,0BFH,3AH ;3B07 3C2ABF3A
L3B0B: PUSH DE ;3B0B D5
LD DE,L3B06 ;3B0C 11063B
CALL L34EB ;3B0F CDEB34
POP HL ;3B12 E1
PUSH HL ;3B13 E5
LD BC,L0004 ;3B14 010400
ADD HL,BC ;3B17 09
LD A,(HL) ;3B18 7E
OR A ;3B19 B7
POP HL ;3B1A E1
PUSH HL ;3B1B E5
JP P,L2DE0 ;3B1C F2E02D
LD A,(HL) ;3B1F 7E
AND 128 ;3B20 E680
LD (L3B05),A ;3B22 32053B
SET 7,(HL) ;3B25 CBFE
EX DE,HL ;3B27 EB
CALL L38DF ;3B28 CDDF38
LD A,(L3B05) ;3B2B 3A053B
OR A ;3B2E B7
CALL Z,L3B56 ;3B2F CC563B
POP DE ;3B32 D1
PUSH DE ;3B33 D5
LD HL,L3B06 ;3B34 21063B
CALL L2E59 ;3B37 CD592E
POP DE ;3B3A D1
PUSH DE ;3B3B D5
CALL L37A6 ;3B3C CDA637
POP HL ;3B3F E1
LD A,(L3B05) ;3B40 3A053B
L3B43: OR A ;3B43 B7
RET NZ ;3B44 C0
L3B45: LD BC,L0004 ;3B45 010400
ADD HL,BC ;3B48 09
BIT 7,(HL) ;3B49 CB7E
PUSH AF ;3B4B F5
XOR A ;3B4C AF
SBC HL,BC ;3B4D ED42
POP AF ;3B4F F1
RET Z ;3B50 C8
LD A,(HL) ;3B51 7E
ADD A,128 ;3B52 C680
LD (HL),A ;3B54 77
RET ;3B55 C9
L3B56: LD HL,L3B06 ;3B56 21063B
LD DE,L3B00 ;3B59 11003B
CALL L34EB ;3B5C CDEB34
LD DE,L3B06 ;3B5F 11063B
CALL L340E ;3B62 CD0E34
LD DE,L3B00 ;3B65 11003B
LD HL,L3B06 ;3B68 21063B
CALL L2D4A ;3B6B CD4A2D
LD HL,L3B04 ;3B6E 21043B
LD A,(HL) ;3B71 7E
OR A ;3B72 B7
JP M,L1398 ;3B73 FA9813
LD HL,L3B06 ;3B76 21063B
LD A,(HL) ;3B79 7E
INC HL ;3B7A 23
LD E,(HL) ;3B7B 5E
INC HL ;3B7C 23
LD D,(HL) ;3B7D 56
INC HL ;3B7E 23
LD C,(HL) ;3B7F 4E
INC HL ;3B80 23
LD B,(HL) ;3B81 46
AND 127 ;3B82 E67F
SUB 65 ;3B84 D641
JP C,L3B9B ;3B86 DA9B3B
JP Z,L3B98 ;3B89 CA983B
L3B8C: SLA E ;3B8C CB23
RL D ;3B8E CB12
RL C ;3B90 CB11
RL B ;3B92 CB10
DEC A ;3B94 3D
JP NZ,L3B8C ;3B95 C28C3B
L3B98: RL B ;3B98 CB10
RET C ;3B9A D8
L3B9B: LD A,128 ;3B9B 3E80
LD (L3B05),A ;3B9D 32053B
RET ;3BA0 C9
L3BA1: LD A,(L3D26) ;3BA1 3A263D
OR A ;3BA4 B7
RET Z ;3BA5 C8
L3BA6: CALL L3C66 ;3BA6 CD663C
RET C ;3BA9 D8
LD A,13 ;3BAA 3E0D
CALL L3C87 ;3BAC CD873C
XOR A ;3BAF AF
LD (L3D26),A ;3BB0 32263D
JP L3CC6 ;3BB3 C3C63C
DB 0CDH,66H,3CH,0D8H ;3BB6 CD663CD8 Link 3BB6 found at , $1CB1
DB 0C5H,0D5H,3AH,26H ;3BBA C5D53A26
DB 3DH,47H,1AH,0FEH ;3BBE 3D471AFE
DB 0DH,0CAH,1DH,3CH ;3BC2 0DCA1D3C
DB 0FEH,20H,0DCH,0D3H ;3BC6 FE20DCD3
DB 3BH,0CDH,87H,3CH ;3BCA 3BCD873C
DB 04H,13H,0C3H,0C0H ;3BCE 0413C3C0
DB 3BH,0FEH,15H,0CAH ;3BD2 3BFE15CA
DB 0ECH,3BH,0FEH,12H ;3BD6 EC3BFE12
DB 0CAH,0F1H,3BH,0FEH ;3BDA CAF13BFE
DB 11H,0CAH,0F6H,3BH ;3BDE 11CAF63B
DB 0FEH,16H,0CAH,0FBH ;3BE2 FE16CAFB
DB 3BH,0F1H,13H,0C3H ;3BE6 3BF113C3
DB 0C0H,3BH,3EH,0FH ;3BEA C03B3E0F
DB 06H,0FFH,0C9H,3EH ;3BEE 06FFC93E
DB 0BH,06H,0FFH,0C9H ;3BF2 0B06FFC9
DB 3EH,09H,06H,0FFH ;3BF6 3E0906FF
DB 0C9H,3EH,0CH,0CDH ;3BFA C93E0CCD
DB 87H,3CH,3EH,0AH ;3BFE 873C3E0A
DB 06H,0FFH,0C9H ;3C02 06FFC9
L3C05: CALL L3C66 ;3C05 CD663C
RET C ;3C08 D8
PUSH BC ;3C09 C5
PUSH DE ;3C0A D5
LD A,(L3D26) ;3C0B 3A263D
LD B,A ;3C0E 47
L3C0F: LD A,(DE) ;3C0F 1A
CP 13 ;3C10 FE0D
JP Z,L3C1D ;3C12 CA1D3C
CALL L3C87 ;3C15 CD873C
INC B ;3C18 04
INC DE ;3C19 13
JP L3C0F ;3C1A C30F3C
L3C1D: LD A,B ;3C1D 78
CP 80 ;3C1E FE50
JP C,L3C25 ;3C20 DA253C
SUB 80 ;3C23 D650
L3C25: LD (L3D26),A ;3C25 32263D
POP DE ;3C28 D1
POP BC ;3C29 C1
JP L3CC6 ;3C2A C3C63C
DB 0FEH,0DH,0CAH,0A6H ;3C2D FE0DCAA6 Link 3C2D found at , $2EBF, $2F16
DB 3BH,0C5H,0D5H,4FH ;3C31 3BC5D54F
DB 3AH,26H,3DH,47H ;3C35 3A263D47
DB 0CDH,66H,3CH,0D2H ;3C39 CD663CD2
DB 42H,3CH,0D1H,0C1H ;3C3D 423CD1C1
DB 0C9H,79H,0CDH,87H ;3C41 C979CD87
DB 3CH,04H,0C3H,1DH ;3C45 3C04C31D
DB 3CH ;3C49 3C
L3C4A: CALL L3C66 ;3C4A CD663C
RET C ;3C4D D8
PUSH BC ;3C4E C5
PUSH DE ;3C4F D5
LD A,(L3D26) ;3C50 3A263D
LD B,A ;3C53 47
L3C54: LD A,32 ;3C54 3E20
CALL L3C87 ;3C56 CD873C
INC B ;3C59 04
LD A,B ;3C5A 78
L3C5B: SUB 10 ;3C5B D60A
JP C,L3C54 ;3C5D DA543C
JP NZ,L3C5B ;3C60 C25B3C
JP L3C1D ;3C63 C31D3C
L3C66: LD A,5 ;3C66 3E05
CALL L3C78 ;3C68 CD783C
RET C ;3C6B D8
LD A,6 ;3C6C 3E06
CALL L3C78 ;3C6E CD783C
JP NC,L3C76 ;3C71 D2763C
XOR A ;3C74 AF
RET ;3C75 C9
L3C76: SCF ;3C76 37
RET ;3C77 C9
L3C78: CALL L3C87 ;3C78 CD873C
LD A,0 ;3C7B 3E00
CALL L3C9D ;3C7D CD9D3C
IN A,(PTRSTATUS) ;3C80 DBFE
RRCA ;3C82 0F
RRCA ;3C83 0F
RET ;3C84 C9
L3C85: LD A,15 ;3C85 3E0F
L3C87: PUSH AF ;3C87 F5
LD A,0 ;3C88 3E00
CALL L3C9D ;3C8A CD9D3C
POP AF ;3C8D F1
OUT (PTRDATA),A ;3C8E D3FF
LD A,128 ;3C90 3E80
OUT (PTRSTROBE),A ;3C92 D3FE
LD A,1 ;3C94 3E01
CALL L3C9D ;3C96 CD9D3C
XOR A ;3C99 AF
OUT (PTRSTROBE),A ;3C9A D3FE
RET ;3C9C C9
L3C9D: PUSH BC ;3C9D C5
PUSH DE ;3C9E D5
LD D,A ;3C9F 57
LD E,6 ;3CA0 1E06
LD BC,COLDSTART ;3CA2 010000
L3CA5: IN A,(PTRSTATUS) ;3CA5 DBFE
AND 13 ;3CA7 E60D
CP D ;3CA9 BA
JP NZ,L3CB0 ;3CAA C2B03C
POP DE ;3CAD D1
POP BC ;3CAE C1
RET ;3CAF C9
L3CB0: DEC BC ;3CB0 0B
LD A,B ;3CB1 78
OR C ;3CB2 B1
JP NZ,L3CA5 ;3CB3 C2A53C
DEC E ;3CB6 1D
JP NZ,L3CA5 ;3CB7 C2A53C
CALL CRLF ;3CBA CD0900
LD DE,L3CF0 ;3CBD 11F03C
CALL MESSAGE ;3CC0 CD1500
JP L124B ;3CC3 C34B12
L3CC6: LD A,7 ;3CC6 3E07
CALL L3C78 ;3CC8 CD783C
JP NC,L3CDA ;3CCB D2DA3C
LD A,8 ;3CCE 3E08
CALL L3C78 ;3CD0 CD783C
RET C ;3CD3 D8
LD DE,L3D14 ;3CD4 11143D
JP L3CDD ;3CD7 C3DD3C
L3CDA: LD DE,L3D1A ;3CDA 111A3D
L3CDD: CALL CRLF ;3CDD CD0900
CALL MESSAGE ;3CE0 CD1500
LD DE,L3D09 ;3CE3 11093D
CALL MESSAGE ;3CE6 CD1500
XOR A ;3CE9 AF
LD (L3D26),A ;3CEA 32263D
JP L124B ;3CED C34B12
L3CF0: DB "NO POWER OR " ;3CF0 4E4F20504F574552204F5220
DB "NO CONNECTIO" ;3CFC 4E4F20434F4E4E454354494F
DB "N" ;3D08 4E
L3D09: DB " (PRINTER)" ;3D09 20285052494E54455229
DB 0DH ;3D13 0D
L3D14: DB "ALARM" ;3D14 414C41524D
DB 0DH ;3D19 0D
L3D1A: DB "PAPER EM" ;3D1A 504150455220454D
DB 50H,54H,59H,0DH ;3D22 5054590D
L3D26: DB 0FFH,0F5H,0C5H,0D5H ;3D26 FFF5C5D5
DB 0E5H,01H,00H,00H ;3D2A E5010000
DB 2AH,71H,11H,3EH ;3D2E 2A71113E
DB 28H,95H,47H,21H ;3D32 28954721
DB 0C4H,3DH,1AH,0FEH ;3D36 C43D1AFE
DB 0DH,0C2H,46H,3DH ;3D3A 0DC2463D
DB 0CDH,69H,3DH,0E1H ;3D3E CD693DE1
DB 0D1H,0C1H,0F1H,0C9H ;3D42 D1C1F1C9
DB 0FEH,20H,0D2H,57H ;3D46 FE20D257
DB 3DH,0CDH,69H,3DH ;3D4A 3DCD693D
DB 1AH,13H,4FH,0CDH ;3D4E 1A134FCD
DB 46H,09H,0C3H,2BH ;3D52 4609C32B
DB 3DH,1AH,13H,0CDH ;3D56 3D1A13CD
DB 0B9H,0BH,77H,23H ;3D5A B90B7723
DB 0CH,05H,0C2H,38H ;3D5E 0C05C238
DB 3DH,0CDH,69H,3DH ;3D62 3DCD693D
DB 0C3H,2BH,3DH,79H ;3D66 C32B3D79
DB 0B7H,0C8H,0D5H,06H ;3D6A B7C8D506
DB 00H,3AH,94H,11H ;3D6E 003A9411
DB 81H,0FEH,50H,0DAH ;3D72 81FE50DA
DB 7AH,3DH,0D6H,50H ;3D76 7A3DD650
DB 32H,94H,11H,0CDH ;3D7A 329411CD
DB 0B1H,0FH,3AH,71H ;3D7E B10F3A71
DB 11H,81H,32H,71H ;3D82 11813271
DB 11H,0EBH,21H,0C4H ;3D86 11EB21C4
DB 3DH,0CDH,0A6H,0DH ;3D8A 3DCDA60D
DB 0EDH,0B0H,0D1H,2AH ;3D8E EDB0D12A
DB 71H,11H,7DH,0FEH ;3D92 71117DFE
DB 28H,0C0H,0D5H,5CH ;3D96 28C0D55C
DB 16H,00H,21H,73H ;3D9A 16002173
DB 11H,19H,7EH,0B7H ;3D9E 11197EB7
DB 0C2H,0ABH,3DH,23H ;3DA2 C2AB3D23
DB 36H,01H,23H,36H ;3DA6 36012336
DB 00H,2AH,71H,11H ;3DAA 002A7111
DB 2EH,00H,24H,22H ;3DAE 2E002422
DB 71H,11H,0D1H,7CH ;3DB2 7111D17C
DB 0FEH,19H,0C0H,26H ;3DB6 FE19C026
DB 18H,22H,71H,11H ;3DBA 18227111
DB 3EH,0C0H,0CDH,0DCH ;3DBE 3EC0CDDC
DB 0DH,0C9H,13H,0CH ;3DC2 0DC9130C
DB 0FEH,0DH,0C2H,93H ;3DC6 FE0DC293
DB 3DH,0DH,0D1H,22H ;3DCA 3D0DD122
DB 7BH,61H,0E1H,23H ;3DCE 7B61E123
DB 23H,23H,0E5H,0C9H ;3DD2 2323E5C9
DB 3AH,7DH,61H,0B7H ;3DD6 3A7D61B7
DB 3AH,7AH,61H,0C9H ;3DDA 3A7A61C9
DB 0CDH,0C7H,29H,0D5H ;3DDE CDC729D5
DB 0CDH,0B2H,26H,2CH ;3DE2 CDB2262C
DB 0CDH,0BH,37H,0CDH ;3DE6 CD0B37CD
DB 97H,34H,78H,0B7H ;3DEA 973478B7
DB 0C2H,9DH,23H,22H ;3DEE C29D2322
DB 03H,64H,0CDH,94H ;3DF2 0364CD94
DB 29H,0D1H,7BH,0FEH ;3DF6 29D17BFE
DB 0F0H,0D2H,98H,23H ;3DFA F0D29823
DB 32H,02H,3EH,0DBH ;3DFE 32023EDB
DB 0FFH,0B7H,47H,0CAH ;3E02 FFB747CA
DB 15H,3EH,3EH,0C8H ;3E06 153E3EC8
DB 0CBH,78H,0C2H,17H ;3E0A CB78C217
DB 3EH,0CBH,20H,3DH ;3E0E 3ECB203D
DB 0C3H,0AH,3EH,3EH ;3E12 C30A3E3E
DB 80H,2AH,46H,62H ;3E16 802A4662
DB 77H,23H,0AFH,77H ;3E1A 7723AF77
DB 23H,77H,23H,77H ;3E1E 23772377
DB 23H,70H,57H,5FH ;3E22 2370575F
DB 47H,0EH,05H,0CDH ;3E26 470E05CD
DB 8FH,29H,0CDH,8EH ;3E2A 8F29CD8E
DB 2BH,9DH,23H,0C3H ;3E2E 2B9D23C3
DB 0D0H,29H,0CDH,0C7H ;3E32 D029CDC7
DB 29H,7BH,0FEH,0F0H ;3E36 297BFEF0
DB 0D2H,98H,23H,32H ;3E3A D2982332
DB 49H,3EH,0CDH,0B2H ;3E3E 493ECDB2
DB 26H,2CH,0CDH,0C7H ;3E42 262CCDC7
DB 29H,7BH,0D3H,0FFH ;3E46 297BD3FF
DB 0C3H,0D3H,29H,0CDH ;3E4A C3D329CD
DB 0C7H,29H,7BH,0FEH ;3E4E C7297BFE
DB 0FFH,0CAH,98H,23H ;3E52 FFCA9823
DB 0D5H,0CDH,0B2H,26H ;3E56 D5CDB226
DB 2CH,0CDH,0BH,37H ;3E5A 2CCD0B37
DB 0CDH,97H,34H,22H ;3E5E CD973422
DB 03H,64H,78H,0B7H ;3E62 036478B7
DB 0CAH,8EH,23H,21H ;3E66 CA8E2321
DB 3FH,3FH,0C1H,06H ;3E6A 3F3FC106
DB 0AH,7EH,0FEH,0FFH ;3E6E 0A7EFEFF
DB 28H,0EH,79H,0BEH ;3E72 280E79BE
DB 28H,0AH,23H,23H ;3E76 280A2323
DB 23H,23H,23H,10H ;3E7A 23232310
DB 0F0H,0C3H,98H,23H ;3E7E F0C39823
DB 23H,23H,23H,73H ;3E82 23232373
DB 23H,72H,2AH,03H ;3E86 23722A03
DB 64H,0CDH,52H,26H ;3E8A 64CD5226
DB 0C3H,0D3H,29H,0CDH ;3E8E C3D329CD
DB 0C7H,29H,7BH,0FEH ;3E92 C7297BFE
DB 0FFH,0CAH,98H,23H ;3E96 FFCA9823
DB 0D5H,0CDH,0B2H,26H ;3E9A D5CDB226
DB 2CH,0CDH,03H,27H ;3E9E 2CCD0327
DB 22H,03H,64H,21H ;3EA2 22036421
DB 3FH,3FH,0C1H,06H ;3EA6 3F3FC106
DB 0AH,7EH,0FEH,0FFH ;3EAA 0A7EFEFF
DB 28H,14H,79H,0BEH ;3EAE 281479BE
DB 28H,0AH,23H,23H ;3EB2 280A2323
DB 23H,23H,23H,10H ;3EB6 23232310
DB 0F0H,0C3H,98H,23H ;3EBA F0C39823
DB 06H,02H,3EH,0FFH ;3EBE 06023EFF
DB 18H,03H,06H,03H ;3EC2 18030603
DB 71H,23H,73H,23H ;3EC6 71237323
DB 72H,23H,77H,10H ;3ECA 72237710
DB 0FCH,0C3H,88H,3EH ;3ECE FCC3883E
DB 22H,03H,64H,21H ;3ED2 22036421
DB 3EH,3FH,23H,7EH ;3ED6 3E3F237E
DB 0FEH,0FFH,0CAH,88H ;3EDA FEFFCA88
DB 3EH,23H,23H,23H ;3EDE 3E232323
DB 23H,7EH,0FEH,0F0H ;3EE2 237EFEF0
DB 28H,0F0H,7EH,0FEH ;3EE6 28F07EFE
DB 0FFH,28H,0DH,23H ;3EEA FF280D23
DB 7EH,0FEH,0FFH,0CAH ;3EEE 7EFEFFCA
DB 1BH,4FH,23H,23H ;3EF2 1B4F2323
DB 23H,23H,18H,0EEH ;3EF6 232318EE
DB 2BH,2BH,56H,2BH ;3EFA 2B2B562B
DB 5EH,0C3H,00H,00H ;3EFE 5EC30000
END
Reference in New Issue View Git Blame Copy Permalink