From bff95f38807c1ca205e138176ade5c83ea8222ec Mon Sep 17 00:00:00 2001 From: mgcaret Date: Wed, 27 Jun 2018 17:47:46 -0700 Subject: [PATCH] mig.insp: clean up exit a bit --- mig.insp.s | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/mig.insp.s b/mig.insp.s index 5c7b2f2..c9e60f1 100644 --- a/mig.insp.s +++ b/mig.insp.s @@ -58,6 +58,7 @@ BufPtr = BufLoc+2 MigPage = BufPtr+2 ; entry points +COut = $fded COut1 = $fdf0 TabV = $fb5b PrByte = $fdda @@ -161,7 +162,10 @@ godn: inc MigPage bra dispmig : cmp #$9b ; escape bne jump - rts + lda #18 ; make sure DaveX "hit a key" + jsr TabV ; is on a blank line + lda #$8d ; and displays properly + jmp COut ; CR and exit jump: sbc #$b0 ; check for digit for page jump bmi uinput ; nope cmp #10 ; 10 or bigger?