Sort money

2026-05-20 22:34:21 +02:00 · 2023-05-11 10:52:34 +02:00
parent 62d838d7ed
commit d36d5d3131
3 changed files with 16 additions and 0 deletions
@@ -1097,6 +1097,22 @@ nextisequal
 	lda DirectHits,y
 	ldy TankSequence+1,x
 	cmp DirectHits,y
+    bcc nextishigher
+	bne swapvalues
+nextisequal2
+	; if results are equal, check money (H)
+	ldy TankSequence,x
+	lda moneyH,y
+	ldy TankSequence+1,x
+	cmp moneyH,y
+    bcc nextishigher
+	bne swapvalues
+nextisequal2b
+	; if results are equal, check money (L)
+	ldy TankSequence,x
+	lda moneyL,y
+	ldy TankSequence+1,x
+	cmp moneyL,y
 	;
 	beq nextishigher ; this is to block hangs when 2 equal values meet
    bcc nextishigher