From 34b9bda535d475dd80fd70481fb7ba525b8c58bd Mon Sep 17 00:00:00 2001 From: mrb0nk500 Date: Thu, 20 Feb 2020 18:18:50 -0500 Subject: Finished SuBAsm's screen editor. Which I am now calling, SuBEditor. --- programs/forg.s | 17 ----------------- 1 file changed, 17 deletions(-) delete mode 100644 programs/forg.s (limited to 'programs/forg.s') diff --git a/programs/forg.s b/programs/forg.s deleted file mode 100644 index 3e6aea1..0000000 --- a/programs/forg.s +++ /dev/null @@ -1,17 +0,0 @@ -forg: - iny ; Increment offset. - lda buf, y - jsr iswhite - bcs forg ; Reset y, if we hit the null terminator. - cmp #$2E ; Is this character a '.'? - bne forg_exit ; No, so return. - sty org ; Yes, so store the origin. -forg_end: - iny ; Increment offset. - lda buf, y - jsr istoken - bcs forg_end - dey - sty scr_col -forg_exit: - rts ; End of forg. -- cgit v1.2.3-13-gbd6f