Browse Source

Update rz.asm

pull/269/head
b1ackmai1er 4 years ago
parent
commit
171d4d4ae7
  1. 318
      Source/Apps/Test/rzsz/rz.asm

318
Source/Apps/Test/rzsz/rz.asm

@ -3639,17 +3639,13 @@ sub_0_159D: ; CODE XREF: sub_0_14A7+30p
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_15A5: ; CODE XREF: sub_0_159D+2p
call sub_0_1662
sub_0_15A5: call sub_0_1662 ; CODE XREF: sub_0_159D+2p
jr z, loc_0_15CA jr z, loc_0_15CA
ex de, hl ex de, hl
inc hl inc hl
loc_0_15AC: ; CODE XREF: sub_0_15A5+23j
ld a, (de)
loc_0_15AC: ld a, (de) ; CODE XREF: sub_0_15A5+23j
or a or a
jr z, loc_0_15CA jr z, loc_0_15CA
inc de inc de
@ -3657,17 +3653,13 @@ loc_0_15AC: ; CODE XREF: sub_0_15A5+23j
push hl push hl
push de push de
ld b, 8 ld b, 8
loc_0_15B6: ; CODE XREF: sub_0_15A5+17j
ld a, (de)
loc_0_15B6: ld a, (de) ; CODE XREF: sub_0_15A5+17j
cp (hl) cp (hl)
jr nz, loc_0_15BE jr nz, loc_0_15BE
inc hl inc hl
inc de inc de
djnz loc_0_15B6 djnz loc_0_15B6
loc_0_15BE: ; CODE XREF: sub_0_15A5+13j
pop de
loc_0_15BE: pop de ; CODE XREF: sub_0_15A5+13j
pop hl pop hl
jr z, loc_0_15CD jr z, loc_0_15CD
ex de, hl ex de, hl
@ -3675,16 +3667,11 @@ loc_0_15BE: ; CODE XREF: sub_0_15A5+13j
add hl, bc add hl, bc
ex de, hl ex de, hl
jr loc_0_15AC jr loc_0_15AC
;----------------------------------------------------------------------------
loc_0_15CA: ; CODE XREF: sub_0_1552+3j
; sub_0_1552+14j ...
or 0FFh
ret
;----------------------------------------------------------------------------
loc_0_15CA: or 0FFh ; CODE XREF: sub_0_1552+3j
ret ; sub_0_1552+14j ...
loc_0_15CD: ; CODE XREF: sub_0_15A5+1Bj
dec de
loc_0_15CD: dec de ; CODE XREF: sub_0_15A5+1Bj
ld a, (de) ld a, (de)
ld (byte_0_2D0E), a ld (byte_0_2D0E), a
dec de dec de
@ -3692,16 +3679,11 @@ loc_0_15CD: ; CODE XREF: sub_0_15A5+1Bj
ld (byte_0_2D0D), a ld (byte_0_2D0D), a
xor a xor a
ret ret
; End of function sub_0_15A5
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_15D9: ; CODE XREF: sub_0_1522p sub_0_1522+1Ap
ld a, (hl)
sub_0_15D9: ld a, (hl) ; CODE XREF: sub_0_1522p sub_0_1522+1Ap
cp 21h cp 21h
jr c, loc_0_15F8 jr c, loc_0_15F8
cp 3Dh cp 3Dh
@ -3721,25 +3703,17 @@ sub_0_15D9: ; CODE XREF: sub_0_1522p sub_0_1522+1Ap
or a or a
ret z ret z
cp 3Bh cp 3Bh
ret
;----------------------------------------------------------------------------
ret
loc_0_15F8: ; CODE XREF: sub_0_15D9+3j
xor a
loc_0_15F8: xor a ; CODE XREF: sub_0_15D9+3j
ret ret
; End of function sub_0_15D9
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_15FA: ; CODE XREF: sub_0_1552+3Dp
push bc
sub_0_15FA: push bc ; CODE XREF: sub_0_1552+3Dp
ld bc, 1100h ld bc, 1100h
loc_0_15FE: ; CODE XREF: sub_0_15FA+22j
ld a, (hl)
loc_0_15FE: ld a, (hl) ; CODE XREF: sub_0_15FA+22j
call sub_0_15D9 call sub_0_15D9
jr z, loc_0_161E jr z, loc_0_161E
inc hl inc hl
@ -3759,54 +3733,32 @@ loc_0_15FE: ; CODE XREF: sub_0_15FA+22j
jr c, loc_0_1622 jr c, loc_0_1622
ld c, a ld c, a
djnz loc_0_15FE djnz loc_0_15FE
loc_0_161E: ; CODE XREF: sub_0_15FA+8j
ld a, c
loc_0_161E: ld a, c ; CODE XREF: sub_0_15FA+8j
pop bc pop bc
or a or a
ret ret
;----------------------------------------------------------------------------
loc_0_1622: ; CODE XREF: sub_0_15FA+Ej
; sub_0_15FA+13j ...
pop bc
scf
;
loc_0_1622: pop bc ; CODE XREF: sub_0_15FA+Ej
scf ; sub_0_15FA+13j ...
ret ret
; End of function sub_0_15FA
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_1625: ; CODE XREF: sub_0_1552+1Ep
; sub_0_1552+2Ap ...
sub 30h
ret c
sub_0_1625: sub 30h ; CODE XREF: sub_0_1552+1Ep
ret c ; sub_0_1552+2Ap ...
cp 0Ah cp 0Ah
ccf ccf
ret ret
; End of function sub_0_1625
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_162C: ; CODE XREF: sub_0_1492+8p
xor a
sub_0_162C: xor a ; CODE XREF: sub_0_1492+8p
ld (de), a ld (de), a
inc de inc de
call sub_0_1632 call sub_0_1632
; End of function sub_0_162C
;----------------------------------------------------------------------------
; S u b r o u t i n e
sub_0_1632: ; CODE XREF: sub_0_14A7+44p
ld b, 0Bh
sub_0_1632: ld b, 0Bh ; CODE XREF: sub_0_14A7+44p
ld a, 20h ld a, 20h
call sub_0_1645 call sub_0_1645
xor a xor a
@ -3818,86 +3770,58 @@ sub_0_1632: ; CODE XREF: sub_0_14A7+44p
inc de inc de
ld b, 3 ld b, 3
xor a xor a
; End of function sub_0_1632
;----------------------------------------------------------------------------
; S u b r o u t i n e
sub_0_1645: ; CODE XREF: sub_0_1632+4p
; sub_0_1645+2j
ld (de), a
inc de
sub_0_1645: ld (de), a ; CODE XREF: sub_0_1632+4p
inc de ; sub_0_1645+2j
djnz sub_0_1645 djnz sub_0_1645
ret ret
; End of function sub_0_1645
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_164A: ; CODE XREF: sub_0_1552p
push hl
sub_0_164A: push hl ; CODE XREF: sub_0_1552p
push de push de
ld de, 2Eh ld de, 2Eh
jp loc_0_1669 jp loc_0_1669
; End of function sub_0_164A
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_1652: ; CODE XREF: sub_0_1552+7p
push hl
sub_0_1652: push hl ; CODE XREF: sub_0_1552+7p
push de push de
ld de, 2Ch ld de, 2Ch
jp loc_0_1669 jp loc_0_1669
; End of function sub_0_1652
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_165A: ; CODE XREF: sub_0_1552+38p
push hl
sub_0_165A: push hl ; CODE XREF: sub_0_1552+38p
push de push de
ld de, 2Dh ld de, 2Dh
jp loc_0_1669 jp loc_0_1669
; End of function sub_0_165A
;
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_1662: ; CODE XREF: sub_0_15A5p
push de
sub_0_1662: push de ; CODE XREF: sub_0_15A5p
ld de, 15h ld de, 15h
jp loc_0_1676 jp loc_0_1676
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
loc_0_1669: ; CODE XREF: sub_0_164A+5j
; sub_0_1652+5j ...
ld hl, (word_0_2D0F)
ld a, h
loc_0_1669: ld hl, (word_0_2D0F) ; CODE XREF: sub_0_164A+5j
ld a, h ; sub_0_1652+5j ...
or l or l
jr z, loc_0_1671 jr z, loc_0_1671
add hl, de add hl, de
loc_0_1671: ; CODE XREF: sub_0_1662+Cj
ld a, (hl)
loc_0_1671: ld a, (hl) ; CODE XREF: sub_0_1662+Cj
pop de pop de
pop hl pop hl
or a or a
ret ret
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
loc_0_1676: ; CODE XREF: sub_0_1662+4j
ld hl, (word_0_2D0F)
loc_0_1676: ld hl, (word_0_2D0F) ; CODE XREF: sub_0_1662+4j
add hl, de add hl, de
ld e, (hl) ld e, (hl)
inc hl inc hl
@ -3908,20 +3832,16 @@ loc_0_1676: ; CODE XREF: sub_0_1662+4j
pop de pop de
or a or a
ret ret
; End of function sub_0_1662
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
ld (word_0_2D0F),hl
loc_0_1683: ld (word_0_2D0F),hl
ret ret
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_1687: ; CODE XREF: sub_0_14A7+8p
; sub_0_1632+Ap
push af
push de
sub_0_1687: push af ; CODE XREF: sub_0_14A7+8p
push de ; sub_0_1632+Ap
push hl push hl
ld c, 19h ld c, 19h
call sub_0_16AF call sub_0_16AF
@ -3936,65 +3856,43 @@ sub_0_1687: ; CODE XREF: sub_0_14A7+8p
pop de pop de
pop af pop af
ret ret
; End of function sub_0_1687
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_169E: ; CODE XREF: sub_0_961+88p
ld a, 11h
sub_0_169E: ld a, 11h ; CODE XREF: sub_0_961+88p
call sub_0_16B8 call sub_0_16B8
inc a inc a
ret ret
; End of function sub_0_169E
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_16A5: ; CODE XREF: sub_0_DE7+4p
ld a, 1
sub_0_16A5: ld a, 1 ; CODE XREF: sub_0_DE7+4p
jp sub_0_16B8 jp sub_0_16B8
; End of function sub_0_16A5
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_16AA: ; CODE XREF: sub_0_DE7+1p
ld a, 0Bh
sub_0_16AA: ld a, 0Bh ; CODE XREF: sub_0_DE7+1p
jp sub_0_16B8 jp sub_0_16B8
; End of function sub_0_16AA
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_16AF: ; CODE XREF: sub_0_1687+5p
; sub_0_1687+Dp
push de
push bc
sub_0_16AF: push de ; CODE XREF: sub_0_1687+5p
push bc ; sub_0_1687+Dp
call bdos call bdos
pop bc pop bc
pop de pop de
or a or a
ret ret
; End of function sub_0_16AF
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_16B8: ; CODE XREF: sub_0_169E+2p
; sub_0_16A5+2j ...
push hl
push de
sub_0_16B8: push hl ; CODE XREF: sub_0_169E+2p
push de ; sub_0_16A5+2j ...
push bc push bc
ld c, a ld c, a
call bdos call bdos
@ -4003,15 +3901,11 @@ sub_0_16B8: ; CODE XREF: sub_0_169E+2p
pop de pop de
pop hl pop hl
ret ret
; End of function sub_0_16B8
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_16C4: ; CODE XREF: sub_0_4A4+10p
push bc
sub_0_16C4: push bc ; CODE XREF: sub_0_4A4+10p
push hl push hl
push de push de
push af push af
@ -4026,43 +3920,29 @@ sub_0_16C4: ; CODE XREF: sub_0_4A4+10p
pop hl pop hl
pop bc pop bc
ret ret
; End of function sub_0_16C4
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_16DA: ; CODE XREF: sub_0_16C4+6p
; sub_0_16C4+Ep ...
ld a, (de)
and 7Fh
sub_0_16DA: ld a, (de) ; CODE XREF: sub_0_16C4+6p
and 7Fh ; sub_0_16C4+Ep ...
cp 20h cp 20h
jr z, loc_0_16E3 jr z, loc_0_16E3
ld (hl), a ld (hl), a
inc hl inc hl
loc_0_16E3: ; CODE XREF: sub_0_16DA+5j
inc de
loc_0_16E3: inc de ; CODE XREF: sub_0_16DA+5j
djnz sub_0_16DA djnz sub_0_16DA
ret ret
; End of function sub_0_16DA
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_16E7: ; CODE XREF: sub_0_482+6p sub_0_4A4+1Fp
push bc
sub_0_16E7: push bc ; CODE XREF: sub_0_482+6p sub_0_4A4+1Fp
ld b, 0 ld b, 0
jp loc_0_16F0 jp loc_0_16F0
;----------------------------------------------------------------------------
sub_0_16ED: PUSH BC ; unref. ?
sub_0_16ED: PUSH BC
LD B,0FFH LD B,0FFH
loc_0_16F0: ; CODE XREF: sub_0_16E7+3j
push hl
loc_0_16F0: push hl ; CODE XREF: sub_0_16E7+3j
push af push af
ld h, 64h ld h, 64h
call sub_0_1703 call sub_0_1703
@ -4073,19 +3953,12 @@ loc_0_16F0: ; CODE XREF: sub_0_16E7+3j
pop hl pop hl
pop bc pop bc
ret ret
; End of function sub_0_16E7
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_1703: ; CODE XREF: sub_0_16E7+Dp
; sub_0_16E7+12p
ld l, 0FFh
loc_0_1705: ; CODE XREF: sub_0_1703+4j
sub h
sub_0_1703: ld l, 0FFh ; CODE XREF: sub_0_16E7+Dp
loc_0_1705: sub h ; CODE XREF: sub_0_1703+4j
inc l inc l
jr nc, loc_0_1705 jr nc, loc_0_1705
add a, h add a, h
@ -4099,32 +3972,17 @@ loc_0_1705: ; CODE XREF: sub_0_1703+4j
ld a, 20h ld a, 20h
jr z, loc_0_171A jr z, loc_0_171A
xor a xor a
; End of function sub_0_1703
;----------------------------------------------------------------------------
; S u b r o u t i n e
sub_0_1717: ; CODE XREF: sub_0_16E7+15p
; sub_0_1703+Aj
add a, 30h
sub_0_1717: add a, 30h ; CODE XREF: sub_0_16E7+15p
ld b, a ld b, a
loc_0_171A: ; CODE XREF: sub_0_1703+11j
ld (de), a
loc_0_171A: ld (de), a ; CODE XREF: sub_0_1703+11j
inc de inc de
ld a, h ld a, h
ret ret
; End of function sub_0_1717
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_171E: ; CODE XREF: sub_0_1492+4p
push af
sub_0_171E: push af ; CODE XREF: sub_0_1492+4p
push hl push hl
loc_0_1720: ld a, (hl) loc_0_1720: ld a, (hl)
or a or a
@ -4136,14 +3994,11 @@ loc_0_1720: ld a, (hl)
loc_0_172B: pop hl loc_0_172B: pop hl
pop af pop af
ret ret
; End of function sub_0_171E
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_172E: ; CODE XREF: start+2Fp sub_0_961+70p
push bc
sub_0_172E: push bc ; CODE XREF: start+2Fp sub_0_961+70p
push de push de
push hl push hl
ld c, a ld c, a
@ -4152,9 +4007,7 @@ sub_0_172E: ; CODE XREF: start+2Fp sub_0_961+70p
push hl push hl
inc hl inc hl
inc hl inc hl
loc_0_1737: ; CODE XREF: sub_0_172E+25j
call sub_0_176B
loc_0_1737: call sub_0_176B ; CODE XREF: sub_0_172E+25j
or a or a
jr z, loc_0_1760 jr z, loc_0_1760
ld (hl), e ld (hl), e
@ -4172,23 +4025,16 @@ loc_0_1737: ; CODE XREF: sub_0_172E+25j
xor a xor a
ld (de), a ld (de), a
inc de inc de
loc_0_1751: ; CODE XREF: sub_0_172E+1Ej
ld a, b
loc_0_1751: ld a, b ; CODE XREF: sub_0_172E+1Ej
or a or a
jr nz, loc_0_1737 jr nz, loc_0_1737
loc_0_1755: ; CODE XREF: sub_0_172E+14j
call sub_0_1779
loc_0_1755: call sub_0_1779 ; CODE XREF: sub_0_172E+14j
call sub_0_176B call sub_0_176B
or a or a
jr z, loc_0_1760 jr z, loc_0_1760
or 0FFh or 0FFh
loc_0_1760: ; CODE XREF: sub_0_172E+Dj
; sub_0_172E+1Aj ...
pop hl
push af
loc_0_1760: pop hl ; CODE XREF: sub_0_172E+Dj
push af ; sub_0_172E+1Aj ...
ld a, (hl) ld a, (hl)
sub b sub b
inc hl inc hl
@ -4198,17 +4044,12 @@ loc_0_1760: ; CODE XREF: sub_0_172E+Dj
pop de pop de
pop bc pop bc
ret ret
; End of function sub_0_172E
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_176B: ; CODE XREF: sub_0_172E+9p
; sub_0_172E+2Ap ...
ld a, (de)
and 7Fh
sub_0_176B: ld a, (de) ; CODE XREF: sub_0_172E+9p
and 7Fh ; sub_0_172E+2Ap ...
inc de inc de
cp 20h cp 20h
jr z, sub_0_176B jr z, sub_0_176B
@ -4216,17 +4057,12 @@ sub_0_176B: ; CODE XREF: sub_0_172E+9p
jr z, sub_0_176B jr z, sub_0_176B
dec de dec de
ret ret
; End of function sub_0_176B
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_1779: ; CODE XREF: sub_0_172E+16p
; sub_0_172E+27p ...
ld a, (de)
and 7Fh
sub_0_1779: ld a, (de) ; CODE XREF: sub_0_172E+16p
and 7Fh ; sub_0_172E+27p ...
ret z ret z
cp 20h cp 20h
ret z ret z
@ -4234,51 +4070,35 @@ sub_0_1779: ; CODE XREF: sub_0_172E+16p
ret z ret z
inc de inc de
jr sub_0_1779 jr sub_0_1779
; End of function sub_0_1779
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_1786: ; CODE XREF: start+1Ep sub_0_4A4+Cp
push hl
sub_0_1786: push hl ; CODE XREF: start+1Ep sub_0_4A4+Cp
call sub_0_178C call sub_0_178C
pop hl pop hl
ret ret
; End of function sub_0_1786
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_178C: ; CODE XREF: sub_0_1786+1p
push bc
loc_0_178D: ; CODE XREF: sub_0_178C+3j
ld (hl), a
sub_0_178C: push bc ; CODE XREF: sub_0_1786+1p
loc_0_178D: ld (hl), a ; CODE XREF: sub_0_178C+3j
inc hl inc hl
djnz loc_0_178D djnz loc_0_178D
pop bc pop bc
ret ret
; End of function sub_0_178C
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; S u b r o u t i n e ; S u b r o u t i n e
sub_0_1793: ; CODE XREF: sub_0_171E+6p
and 7Fh
sub_0_1793: and 7Fh ; CODE XREF: sub_0_171E+6p
cp 61h cp 61h
ret c ret c
cp 7Bh cp 7Bh
ret nc ret nc
and 5Fh and 5Fh
ret ret
; End of function sub_0_1793
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
word_0_179E: .dw 2D11h ; DATA XREF: start+18r start+35r word_0_179E: .dw 2D11h ; DATA XREF: start+18r start+35r

Loading…
Cancel
Save