From ad9bc17c8ecab1f0bbd26f2270d4d396f4bc5e52 Mon Sep 17 00:00:00 2001 From: Leo C Date: Mon, 1 Jun 2015 23:29:55 +0200 Subject: switch fifos conin,conout --- z180/ddtz.180 | 19 ++++++++++++------- 1 file changed, 12 insertions(+), 7 deletions(-) (limited to 'z180/ddtz.180') diff --git a/z180/ddtz.180 b/z180/ddtz.180 index aa4e977..4411549 100644 --- a/z180/ddtz.180 +++ b/z180/ddtz.180 @@ -958,11 +958,11 @@ do_op_mod: jr l0b58h ; divide x/y -; x: hl -; y: de +; hl: x +; de: y ; return: -; x/y: hl -; rem: de +; hl: q (x/y) +; de: r (x%y) DIV_HL_DE: push bc @@ -971,6 +971,11 @@ DIV_HL_DE: ld c,l ld hl,0 ;r = 0 ld a,16 ;count + +; de: x (x shifted out, q shifted in) +; bc: y +; hl: r (initially 0) + l0b89h: ex de,hl ;x add hl,hl ;x <<= 1 @@ -986,7 +991,7 @@ l0b89h: div_no_restore: dec a jr nz,l0b89h - ex de,hl + ex de,hl ;hl: q de: r pop bc ret @@ -6240,9 +6245,9 @@ vartabe: ;------------------------------------------ - .phase sysram_start+stacksize + .phase sysram_start+bs$stack$size $stack: -$stcka equ $ - stacksize +$stcka equ $ - bs$stack$size curphse defl $ .dephase -- cgit v1.2.3