monitor command 'F' adaptation, not tested yet
This commit is contained in:
1 parent
9ccd94b36e
commit
68a784d563
13 files changed
+240
-141
No files matched your search
@@ -0,0 +1,31 @@
|
||||
|
||||
; Based on BSM (Bit Shifter's Monitor)
|
||||
|
||||
|
||||
; *******
|
||||
Mon_Fill:
|
||||
; *******
|
||||
|
||||
jsr Get_Param_Range ; Long_PC = target
|
||||
+bcs Mon_Error ; Long_CT = count
|
||||
|
||||
jsr Get_Addr_To_LAC ; Long_AC = fill byte
|
||||
+beq Mon_Error
|
||||
lda Long_AC+1
|
||||
ora Long_AC+2
|
||||
ora Long_AC+3
|
||||
+bne Mon_Error ; only 1 fill byte allowed
|
||||
|
||||
jsr Print_CR
|
||||
|
||||
ldz #$00
|
||||
|
||||
@loop:
|
||||
|
||||
lda Long_AC
|
||||
jsr Put_To_Memory
|
||||
jsr Inc_LPC
|
||||
jsr Dec_LCT
|
||||
bpl @loop
|
||||
|
||||
jmp Main
|
||||
Reference in new issue
Block a user