adapted monitor command 'C'

src/mon_m65/mon_command_compare.s

@@ -0,0 +1,43 @@
+
+; Based on BSM (Bit Shifter's Monitor)
+
+
+Mon_Compare:
+
+	jsr  Get_Param_Range     ; Long_PC = source
+	+bcs Mon_Error           ; Long_CT = count
+	jsr  Get_LAC             ; Long_AC = target
+	+bcs Mon_Error
+
+	lda  Src_Addr_Mode
+	ora  Dst_Addr_Mode
+	sta  Src_Addr_Mode
+
+	lda  Addr_Mode
+	sta  Dst_Addr_Mode
+
+	jsr  Print_CR
+	ldz  #0
+
+@loop:
+
+	lda  Dst_Addr_Mode
+	sta  Addr_Mode
+	jsr  Get_From_Memory_LAC
+	sta  Byte_TMP
+
+	lda  Src_Addr_Mode
+	sta  Addr_Mode
+	jsr  Get_From_Memory_LPC
+
+	cmp  Byte_TMP
+	beq  @laba
+	jsr  Print_LPC_Addr
+
+@laba:
+
+	jsr  Inc_LAC
+	jsr  Inc_LPC
+	jsr  Dec_LCT
+	bpl  @loop
+	jmp  Main