clean up code, push video url

This commit is contained in:
John Bintz 2022-01-05 07:26:56 -05:00
parent 4698d846f1
commit 8ae5e0eb21
2 changed files with 9 additions and 8 deletions

View File

@ -2,8 +2,7 @@
A decompiled copy of The New Automatic Proofreader with comments.
Watch the video that breaks down how this works:
Watch the video that breaks down how this works: https://www.youtube.com/watch?v=R8IWYauT-MU
## Decompile it yourself

14
ap.asm
View File

@ -24,9 +24,13 @@ LFFD2 := $FFD2
;; start of our tokenizer
;; line number during GOSUB, GOTO, and RUN
;; $a7 and $a8 are RS-232 input stuff
;; $a7 and $a8 are RS-232 input stuff. Let's
;; call them...
;; The Sum...
lda $14
sta $A7
;; ...and the Overflow
lda $15
sta $A8
@ -50,12 +54,9 @@ make_text_reversed: lda $C7,x
lda #$12
jsr L9BD2
;; some places to store data in zero page?
ldy #$00
;; b4 = current character index
sty $B4
;; b0 = are we in a quoted string
sty $B0
@ -103,7 +104,7 @@ count_this_character: pla
;; load current char index
ldx $B4
repeatedly_process: clc
;; take the Character part...
;; take the Sum part...
lda $A7
;; load this character from input buffer
;; this can set the carry bit
@ -114,7 +115,8 @@ repeatedly_process: clc
;; load a8
lda $A8
;; we put the # of overflows in here
;; we increment Overflow if it, uh, overflowed
;; we add 0 because the other bit is the Carry flag
adc #$00
sta $A8