MirrorRepos/RomWBW
1
0
Fork 1
mirror of https://github.com/wwarthen/RomWBW.git synced 2026-02-06 14:11:48 -06:00
Code Issues Projects Releases Wiki Activity

Update rz.asm

Browse Source
This commit is contained in:
b1ackmai1er
2021-10-31 07:24:41 +08:00
parent 05fb150ad3
commit 171d4d4ae7
1 changed files with 69 additions and 249 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

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