diff options
Diffstat (limited to 'programs/forg.s')
-rw-r--r-- | programs/forg.s | 17 |
1 files changed, 0 insertions, 17 deletions
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. |