Sort money

game.asm

@@ -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