|
|
|
@ -374,7 +374,7 @@ loc_0_477: ; CODE XREF: sub_0_476+8j |
|
|
|
; S u b r o u t i n e |
|
|
|
|
|
|
|
sub_0_482: ; CODE XREF: sub_0_1289+122p |
|
|
|
ld a, (2D04h) |
|
|
|
ld a, (byte_0_2D04) |
|
|
|
ld de, text495h ; Update error string with errors |
|
|
|
call sub_0_16E7 |
|
|
|
ld de, text493h |
|
|
|
@ -584,13 +584,10 @@ sub_0_5B4: ; CODE XREF: sub_0_5D4+12p |
|
|
|
; End of function sub_0_5B4 |
|
|
|
|
|
|
|
;---------------------------------------------------------------------------- |
|
|
|
.db 0Eh ; |
|
|
|
.db 4 ; |
|
|
|
.db 5Fh ; _ |
|
|
|
.db 0C3h ; Ã |
|
|
|
.db 5 ; |
|
|
|
.db 0 ; |
|
|
|
|
|
|
|
loc_0_5C7: LD C,4 ; punch out |
|
|
|
LD E,A |
|
|
|
JP bdos |
|
|
|
;---------------------------------------------------------------------------- |
|
|
|
|
|
|
|
; S u b r o u t i n e |
|
|
|
@ -1372,7 +1369,7 @@ loc_0_92B: ; CODE XREF: sub_0_8D1+47j |
|
|
|
ld a, 3 |
|
|
|
ld (byte_0_8AF), a |
|
|
|
xor a |
|
|
|
ld (2D04h), a |
|
|
|
ld (byte_0_2D04), a |
|
|
|
call sub_0_11C1 |
|
|
|
jr c, loc_0_954 |
|
|
|
call sub_0_961 |
|
|
|
@ -1630,7 +1627,7 @@ loc_0_AC8: ; CODE XREF: seg000:0AC4j |
|
|
|
loc_0_ACF: ; CODE XREF: sub_0_8D1+40p |
|
|
|
; sub_0_BB4+Ep |
|
|
|
xor a |
|
|
|
ld (2D04h), a |
|
|
|
ld (byte_0_2D04), a |
|
|
|
ld a, 4 |
|
|
|
ld hl, 8AFh |
|
|
|
cp (hl) |
|
|
|
@ -1647,9 +1644,8 @@ loc_0_ACF: ; CODE XREF: sub_0_8D1+40p |
|
|
|
jr z, loc_0_AF3 |
|
|
|
ld b, 0Ah |
|
|
|
|
|
|
|
loc_0_AF3: ; CODE XREF: seg000:0AEFj |
|
|
|
push bc |
|
|
|
ld ix, 2CE0h |
|
|
|
loc_0_AF3: push bc |
|
|
|
ld ix, 2CE0h ; CODE XREF: seg000:0AEFj |
|
|
|
ld (ix+3), 20h |
|
|
|
ld (ix+2), 0 |
|
|
|
ld hl, (2CEBh) |
|
|
|
@ -1657,7 +1653,7 @@ loc_0_AF3: ; CODE XREF: seg000:0AEFj |
|
|
|
ld (ix+1), h |
|
|
|
smod_b_B0A: .equ $+1 ; DATA XREF: sub_0_8D1+3Dw |
|
|
|
ld a,1 ; self modifying value |
|
|
|
CALL 13BAH |
|
|
|
CALL sub_0_13BA |
|
|
|
LD A,(smod_b_B0A) |
|
|
|
CP 5 |
|
|
|
JR NZ,0B1AH |
|
|
|
@ -1667,12 +1663,12 @@ loc_0_B1A: CALL 0FD1H |
|
|
|
LD HL,loc_0_B96 |
|
|
|
LD BC,0AH |
|
|
|
CPIR |
|
|
|
JP Z,67FH |
|
|
|
loc_0_B28: LD HL,2D04H |
|
|
|
JP Z,sub_0_67F |
|
|
|
loc_0_B28: LD HL,byte_0_2D04 |
|
|
|
INC (HL) |
|
|
|
CALL 482H |
|
|
|
loc_0_B2F: POP BC |
|
|
|
DJNZ 0AF3H |
|
|
|
DJNZ loc_0_AF3 |
|
|
|
XOR A |
|
|
|
RET |
|
|
|
|
|
|
|
@ -1687,7 +1683,7 @@ loc_0_B39: POP BC |
|
|
|
RET |
|
|
|
|
|
|
|
loc_0_B40: LD HL,2CE0H |
|
|
|
CALL 688H |
|
|
|
CALL sub_0_688 |
|
|
|
JR 0B68H |
|
|
|
|
|
|
|
|
|
|
|
@ -1706,9 +1702,9 @@ loc_0_B48: LD IX,2CA7H |
|
|
|
LD A,3 |
|
|
|
loc_0_B6A: PUSH AF |
|
|
|
LD HL,2CE0H |
|
|
|
CALL 688H |
|
|
|
CALL sub_0_688 |
|
|
|
POP AF |
|
|
|
CALL 13BAH |
|
|
|
CALL sub_0_13BA |
|
|
|
CALL 0FC9H |
|
|
|
JP 0B28H |
|
|
|
|
|
|
|
@ -1798,7 +1794,7 @@ loc_0_BDF: ; CODE XREF: sub_0_BD3+3j |
|
|
|
|
|
|
|
loc_0_BE9: ; CODE XREF: sub_0_BD3+Ej |
|
|
|
xor a |
|
|
|
ld (2D04h), a |
|
|
|
ld (byte_0_2D04), a |
|
|
|
call sub_0_FAA |
|
|
|
call sub_0_FC9 |
|
|
|
call sub_0_D30 |
|
|
|
@ -1821,10 +1817,10 @@ loc_0_BE9: ; CODE XREF: sub_0_BD3+Ej |
|
|
|
|
|
|
|
;---------------------------------------------------------------------------- |
|
|
|
|
|
|
|
loc_0_C1C: LD HL,2D04H |
|
|
|
loc_0_C1C: LD HL,byte_0_2D04 |
|
|
|
INC (HL) |
|
|
|
CALL 482H |
|
|
|
LD HL,2D04H |
|
|
|
LD HL,byte_0_2D04 |
|
|
|
LD A,0AH |
|
|
|
CP (HL) |
|
|
|
JP NZ,0BF0H |
|
|
|
@ -1852,10 +1848,10 @@ loc_0_C1C: LD HL,2D04H |
|
|
|
OR A |
|
|
|
RET |
|
|
|
|
|
|
|
loc_0_C57: LD HL,2D04H |
|
|
|
loc_0_C57: LD HL,byte_0_2D04 |
|
|
|
INC (HL) |
|
|
|
CALL 482H |
|
|
|
LD HL,2D04H |
|
|
|
LD HL,byte_0_2D04 |
|
|
|
LD A,0AH |
|
|
|
CP (HL) |
|
|
|
JR NZ,0C6AH |
|
|
|
@ -1884,7 +1880,7 @@ loc_0_C93: LD A,0FFH |
|
|
|
RET |
|
|
|
|
|
|
|
loc_0_C97: XOR A |
|
|
|
LD (2D04H),A |
|
|
|
LD (byte_0_2D04),A |
|
|
|
LD DE,2CF9H |
|
|
|
LD HL,2CABH |
|
|
|
LD BC,2CABH |
|
|
|
@ -1902,7 +1898,7 @@ loc_0_CB6: CALL 0C97H |
|
|
|
LD DE,2CE0H |
|
|
|
CALL 692H |
|
|
|
LD A,3 |
|
|
|
CALL 13BAH |
|
|
|
CALL sub_0_13BA |
|
|
|
JP 0C7FH |
|
|
|
|
|
|
|
loc_0_CCA: CALL 0C97H |
|
|
|
@ -1912,7 +1908,7 @@ loc_0_CCA: CALL 0C97H |
|
|
|
LD DE,2CE0H |
|
|
|
CALL 692H |
|
|
|
LD A,3 |
|
|
|
CALL 13BAH |
|
|
|
CALL sub_0_13BA |
|
|
|
JP 0C0AH |
|
|
|
|
|
|
|
loc_0_CE4: .db 6 ; |
|
|
|
@ -2242,21 +2238,21 @@ loc_0_E50: LD B,64H ; 0e50 06 64 |
|
|
|
CALL sub_0_DE7 ; 0e52 cd e7 0d |
|
|
|
RET C ; 0e55 d8 |
|
|
|
CP 18H ; 0e56 fe 18 |
|
|
|
JR NZ,0E74H ; 0e58 20 1a |
|
|
|
LD B,'d' ; 0e5a 06 64 |
|
|
|
JR NZ,loc_0_0E74 ; 0e58 20 1a |
|
|
|
LD B,64h ; 0e5a 06 64 |
|
|
|
CALL sub_0_DE7 ; 0e5c cd e7 0d |
|
|
|
RET C ; 0e5f d8 |
|
|
|
CP 18H ; 0e60 fe 18 |
|
|
|
JR NZ,0E74H ; 0e62 20 10 |
|
|
|
LD B,'d' ; 0e64 06 64 |
|
|
|
JR NZ,loc_0_0E74 ; 0e62 20 10 |
|
|
|
LD B,64H ; 0e64 06 64 |
|
|
|
CALL sub_0_DE7 ; 0e66 cd e7 0d |
|
|
|
RET C ; 0e69 d8 |
|
|
|
CP 18H ; 0e6a fe 18 |
|
|
|
JR NZ,0E74H ; 0e6c 20 06 |
|
|
|
JR NZ,loc_0_0E74 ; 0e6c 20 06 |
|
|
|
LD B,64H ; 0e6e 06 64 |
|
|
|
CALL sub_0_DE7 ; 0e70 cd e7 0d |
|
|
|
RET C ; 0e73 d8 |
|
|
|
LD HL,0EA6H ; 0e74 21 a6 0e |
|
|
|
loc_0_0E74: LD HL,0EA6H ; 0e74 21 a6 0e |
|
|
|
LD BC,0BH ; 0e77 01 0b 00 |
|
|
|
CPIR ; 0e7a ed b1 |
|
|
|
JP Z,67FH ; 0e7c ca 7f 06 |
|
|
|
@ -3115,19 +3111,13 @@ sub_0_11FA: ; CODE XREF: sub_0_8D1+6Fp |
|
|
|
ld a, 43h |
|
|
|
jr z, loc_0_121A |
|
|
|
ld a, 15h |
|
|
|
|
|
|
|
loc_0_121A: ; CODE XREF: sub_0_11FA+1Cj |
|
|
|
call loc_0_145C |
|
|
|
|
|
|
|
loc_0_121D: ; CODE XREF: sub_0_11FA+5Ej |
|
|
|
ld a, (2D07h) |
|
|
|
loc_0_121A: call loc_0_145C ; CODE XREF: sub_0_11FA+1Cj |
|
|
|
loc_0_121D: ld a, (2D07h) ; CODE XREF: sub_0_11FA+5Ej |
|
|
|
or a |
|
|
|
ld b, 82h |
|
|
|
jr z, loc_0_1227 |
|
|
|
ld b, 32h |
|
|
|
|
|
|
|
loc_0_1227: ; CODE XREF: sub_0_11FA+29j |
|
|
|
call sub_0_1289 |
|
|
|
loc_0_1227: call sub_0_1289 ; CODE XREF: sub_0_11FA+29j |
|
|
|
jr c, loc_0_125A |
|
|
|
push af |
|
|
|
call sub_0_50B |
|
|
|
@ -3147,15 +3137,13 @@ loc_0_1227: ; CODE XREF: sub_0_11FA+29j |
|
|
|
call sub_0_D30 |
|
|
|
jr c, loc_0_1285 |
|
|
|
|
|
|
|
loc_0_1250: ; CODE XREF: sub_0_11FA+3Bj |
|
|
|
call sub_0_FC9 |
|
|
|
loc_0_1250: call sub_0_FC9 ; CODE XREF: sub_0_11FA+3Bj |
|
|
|
ld a, 6 |
|
|
|
call loc_0_145C |
|
|
|
jr loc_0_121D |
|
|
|
;---------------------------------------------------------------------------- |
|
|
|
|
|
|
|
loc_0_125A: ; CODE XREF: sub_0_11FA+30j |
|
|
|
cp 0F6h |
|
|
|
loc_0_125A: cp 0F6h ; CODE XREF: sub_0_11FA+30j |
|
|
|
jr nz, loc_0_126D |
|
|
|
call sub_0_D0E |
|
|
|
jr c, loc_0_1285 |
|
|
|
@ -3196,14 +3184,14 @@ loc_0_1285: ; CODE XREF: sub_0_11FA+54j |
|
|
|
sub_0_1289: ; CODE XREF: sub_0_11C1+18p |
|
|
|
; sub_0_11FA+2Dp |
|
|
|
ld a, b |
|
|
|
ld (2D03h), a |
|
|
|
ld (byte_0_2D03), a |
|
|
|
xor a |
|
|
|
ld (2D04h), a |
|
|
|
ld (byte_0_2D04), a |
|
|
|
ld a, 0 |
|
|
|
ld (2D09h), a |
|
|
|
|
|
|
|
loc_0_1296: ; CODE XREF: sub_0_1289+12Aj |
|
|
|
ld a, (2D03h) |
|
|
|
ld a, (byte_0_2D03) |
|
|
|
ld b, a |
|
|
|
call sub_0_DE7 |
|
|
|
ld (2D08h), a |
|
|
|
@ -3440,17 +3428,17 @@ loc_0_137F: ; CODE XREF: sub_0_1289+FBj |
|
|
|
|
|
|
|
loc_0_139A: ; CODE XREF: sub_0_1289+102j |
|
|
|
ld a, 28h |
|
|
|
ld (2D03h), a |
|
|
|
ld (byte_0_2D03), a |
|
|
|
ld a, 15h |
|
|
|
|
|
|
|
loc_0_13A1: ; CODE XREF: sub_0_1289+10Bj |
|
|
|
; sub_0_1289+10Fj |
|
|
|
call loc_0_145C |
|
|
|
call sub_0_FC9 |
|
|
|
ld hl, 2D04h |
|
|
|
ld hl, byte_0_2D04 |
|
|
|
inc (hl) |
|
|
|
call sub_0_482 |
|
|
|
ld a, (2D04h) |
|
|
|
ld a, (byte_0_2D04) |
|
|
|
cp 5 |
|
|
|
jp nz, loc_0_1296 |
|
|
|
ld a, 0FFh |
|
|
|
@ -3504,23 +3492,9 @@ loc_0_13D4: ; CODE XREF: sub_0_13BA+26j |
|
|
|
.db 2Ah ; * |
|
|
|
.db 18h ; |
|
|
|
.db 42h ; B |
|
|
|
.db 0 ; |
|
|
|
.db 30h ; 0 |
|
|
|
.db 31h ; 1 |
|
|
|
.db 32h ; 2 |
|
|
|
.db 33h ; 3 |
|
|
|
.db 34h ; 4 |
|
|
|
.db 35h ; 5 |
|
|
|
.db 36h ; 6 |
|
|
|
.db 37h ; 7 |
|
|
|
.db 38h ; 8 |
|
|
|
.db 39h ; 9 |
|
|
|
.db 61h ; a |
|
|
|
.db 62h ; b |
|
|
|
.db 63h ; c |
|
|
|
.db 64h ; d |
|
|
|
.db 65h ; e |
|
|
|
.db 66h ; f |
|
|
|
.db 0 ; |
|
|
|
|
|
|
|
loc_0_1408: .text "0123456789abcdef" |
|
|
|
|
|
|
|
;---------------------------------------------------------------------------- |
|
|
|
|
|
|
|
@ -3529,7 +3503,7 @@ loc_0_13D4: ; CODE XREF: sub_0_13BA+26j |
|
|
|
sub_0_1418: ; CODE XREF: sub_0_13BA+12p |
|
|
|
; sub_0_13BA+21p ... |
|
|
|
push af |
|
|
|
ld hl, 1408h |
|
|
|
ld hl,loc_0_1408 |
|
|
|
ld b, 0 |
|
|
|
rra |
|
|
|
rra |
|
|
|
@ -3541,7 +3515,7 @@ sub_0_1418: ; CODE XREF: sub_0_13BA+12p |
|
|
|
ld a, (hl) |
|
|
|
call loc_0_145C |
|
|
|
pop af |
|
|
|
ld hl, 1408h |
|
|
|
ld hl,loc_0_1408 |
|
|
|
ld b, 0 |
|
|
|
and 0Fh |
|
|
|
ld c, a |
|
|
|
@ -3551,70 +3525,36 @@ sub_0_1418: ; CODE XREF: sub_0_13BA+12p |
|
|
|
; End of function sub_0_1418 |
|
|
|
|
|
|
|
;---------------------------------------------------------------------------- |
|
|
|
.db 32h ; 2 |
|
|
|
.db 5Bh ; [ |
|
|
|
.db 14h ; |
|
|
|
.db 1 ; |
|
|
|
.db 9 ; |
|
|
|
.db 0 ; |
|
|
|
.db 21h ; ! |
|
|
|
.db 77h ; w |
|
|
|
.db 14h ; |
|
|
|
.db 0EDh ; í |
|
|
|
.db 0B1h ; ± |
|
|
|
.db 0CAh ; Ê |
|
|
|
.db 7Fh ; |
|
|
|
.db 6 ; |
|
|
|
.db 0E6h ; æ |
|
|
|
.db 60h ; ` |
|
|
|
.db 20h ; |
|
|
|
.db 10h ; |
|
|
|
.db 3Ah ; : |
|
|
|
.db 9Dh ; |
|
|
|
.db 2Ch ; , |
|
|
|
.db 0B7h ; · |
|
|
|
.db 28h ; ( |
|
|
|
.db 0Ah ; |
|
|
|
.db 21h ; ! |
|
|
|
.db 5Bh ; [ |
|
|
|
.db 14h ; |
|
|
|
.db 0CBh ; Ë |
|
|
|
.db 0F6h ; ö |
|
|
|
.db 3Eh ; > |
|
|
|
.db 18h ; |
|
|
|
.db 0CDh ; Í |
|
|
|
.db 5Ch ; \ |
|
|
|
.db 14h ; |
|
|
|
.db 3Eh ; > |
|
|
|
.db 0 ; |
|
|
|
;---------------------------------------------------------------------------- |
|
|
|
|
|
|
|
loc_0_145C: ; CODE XREF: sub_0_DDC+5p sub_0_11C1+13p |
|
|
|
; ... |
|
|
|
ld (byte_0_1468), a |
|
|
|
|
|
|
|
loc_0_145F: ; CODE XREF: seg000:1465j |
|
|
|
call sub_0_588 |
|
|
|
call sub_0_5CD |
|
|
|
jr z, loc_0_145F |
|
|
|
;---------------------------------------------------------------------------- |
|
|
|
.db 3Eh ; > |
|
|
|
byte_0_1468: .db 0 ; DATA XREF: seg000:145Cw |
|
|
|
.db 0C3h ; Ã |
|
|
|
.db 0C7h ; Ç |
|
|
|
.db 5 ; |
|
|
|
.db 3Ah ; : |
|
|
|
.db 68h ; h |
|
|
|
.db 14h ; |
|
|
|
.db 0E6h ; æ |
|
|
|
.db 7Fh ; |
|
|
|
.db 0FEh ; þ |
|
|
|
.db 40h ; @ |
|
|
|
.db 20h ; |
|
|
|
.db 0E5h ; å |
|
|
|
.db 18h ; |
|
|
|
.db 0D9h ; Ù |
|
|
|
.db 18h ; |
|
|
|
LD (145BH),A ;1438 32 5b 14 |
|
|
|
LD BC,9 ;143b 01 09 00 |
|
|
|
LD HL,smod_0_1477 ;143e 21 77 14 |
|
|
|
CPIR ;1441 ed b1 |
|
|
|
JP Z,67FH ;1443 ca 7f 06 |
|
|
|
AND 60H ;1446 e6 60 |
|
|
|
JR NZ,145AH ;1448 20 10 |
|
|
|
LD A,(2C9DH) ;144a 3a 9d 2c |
|
|
|
OR A ;144d b7 |
|
|
|
JR Z,145AH ;144e 28 0a |
|
|
|
LD HL,145BH ;1450 21 5b 14 |
|
|
|
SET 6,(HL) ;1453 cb f6 |
|
|
|
LD A,18H ;1455 3e 18 |
|
|
|
CALL loc_0_145C ;1457 cd 5c 14 |
|
|
|
LD A,0 |
|
|
|
loc_0_145C: LD (smod_0_1468),A |
|
|
|
loc_0_145F: CALL sub_0_588 |
|
|
|
CALL sub_0_5CD |
|
|
|
JR Z,loc_0_145F |
|
|
|
smod_0_1468: .equ $+1 |
|
|
|
LD A,0 ;1467 3e 00 |
|
|
|
JP loc_0_5C7 ;1469 c3 c7 05 |
|
|
|
|
|
|
|
LD A,(smod_0_1468) ;146c 3a 68 14 |
|
|
|
AND 7FH ;146f e6 7f |
|
|
|
CP 40H ;1471 fe 40 |
|
|
|
JR NZ,145AH ;1473 20 e5 |
|
|
|
JR 1450H ;1475 18 d9 |
|
|
|
|
|
|
|
smod_0_1477: .db 18h ; |
|
|
|
.db 0Dh ; |
|
|
|
.db 8Dh ; |
|
|
|
.db 10h ; |
|
|
|
@ -4542,8 +4482,9 @@ nstack: |
|
|
|
word_0_1808: .ds 2 |
|
|
|
.ds 14F6h |
|
|
|
byte_0_2D00: .ds 1 |
|
|
|
.ds 3 |
|
|
|
word_0_2D04: .ds 2 |
|
|
|
.ds 9 |
|
|
|
.ds 2 |
|
|
|
byte_0_2D03: .ds 1 |
|
|
|
byte_0_2D04: .ds 1 |
|
|
|
.ds 10 |
|
|
|
word_0_2D0F: .ds 2 |
|
|
|
.end ; start |
|
|
|
|