summaryrefslogtreecommitdiff
path: root/ddt180.z80
diff options
context:
space:
mode:
Diffstat (limited to 'ddt180.z80')
-rw-r--r--ddt180.z8025
1 files changed, 4 insertions, 21 deletions
diff --git a/ddt180.z80 b/ddt180.z80
index 67930db..fe694a3 100644
--- a/ddt180.z80
+++ b/ddt180.z80
@@ -2106,29 +2106,17 @@ l0dedh:
call crlf
l0e10h:
pop bc
- inc hl
inc de
- dec bc
- ld a,b
- or c
- jr nz,l0dedh
+ cpi
+ jp pe,l0dedh
ret
;-------------------------------------------------------------------------------
-; > M[V] startaddr endaddr destaddr
-; Move memory [and verify]
+; > M startaddr endaddr destaddr
+; Move memory
cmd_M:
- call get_char_upper
- cp 'V'
- jr nz,l0e1fh
- inc de
-l0e1fh:
- push af
call sub_034eh
- push hl
- push de
- push bc
call cp_hl_de
jr nc,cmdm_up
add hl,bc
@@ -2141,11 +2129,6 @@ l0e1fh:
db 01h ;swallow ldir instruction (ld bc,...)
cmdm_up:
ldir
- pop bc
- pop de
- pop hl
- pop af
- jr z,l0dedh
ret
;-------------------------------------------------------------------------------