support6800/__xdiveq.s The __xdiveq routine does not calculate correctly

[zu2]

--- ../Fuzix-Compiler-Kit/support6800/__xdiveq.s	2024-10-02 15:56:16
+++ support6800/__xdiveq.s	2024-10-08 17:07:08
@@ -19,10 +19,9 @@
 	bsr absd
 	staa @tmp
 	stab @tmp+1
-	ldaa ,x
 	ldab 1,x
-	bita #0x80
-	bne negmod
+	ldaa ,x
+	bmi negmod
 	staa @tmp1
 	stab @tmp1+1
 	ldaa @tmp
@@ -62,7 +61,7 @@
 	ldab 1,x
 	bsr absd
 	staa @tmp1
-	stab @tmp+1
+	stab @tmp1+1
 	ldaa @tmp
 	ldab @tmp+1
 	ldx @tmp1
@@ -72,18 +71,17 @@
 	ldaa @tmp
 	ldab @tmp+1
 	ror @tmp4
-	bcs store		; low bit set -> negate
+	bcc store		; low bit set -> negate
 	bsr negd
 	bra store
 	
 absd:
-	bita #$80
-	beq ispos
+	tsta
+	bpl ispos
 	inc @tmp4		; count sign changes in Y
 negd:
-	subb #1			; negate d
+	nega
+	negb
 	sbca #0
-	coma
-	comb
 ispos:
 	rts