bug fixes

This commit is contained in:
ceriel 1987-06-10 13:46:21 +00:00
parent e43a1b00f6
commit 130abb7e3b
2 changed files with 5 additions and 1 deletions

View file

@ -10,7 +10,7 @@
1: 1:
add bx,4 add bx,4
dec cx dec cx
jl 2f jl 4f
cmp ax,(bx) cmp ax,(bx)
jne 1b jne 1b
mov bx,2(bx) mov bx,2(bx)
@ -24,3 +24,6 @@
jmp .fat jmp .fat
3: 3:
jmp bx jmp bx
4:
mov bx,dx
jmp 2b

View file

@ -20,6 +20,7 @@ yh=4
pop dx pop dx
add dx,ax ! xh*yl+xl*yh add dx,ax ! xh*yl+xl*yh
mov ax,cx mov ax,cx
mov cx,dx
mul yl(bx) ! xl*yl mul yl(bx) ! xl*yl
add dx,cx add dx,cx
ret 4 ret 4