Shrank Telestrat initcwd.s by 3 bytes.

Changing when a loop test is done allowed the removal of an extra STA instruction.
2024-06-24 18:28:53 +00:00 · 2018-01-09 04:48:39 -05:00 · 2018-01-09 04:48:39 -05:00 · da22c90d33
commit da22c90d33
parent 1ea5889a87
1 changed files with 6 additions and 9 deletions
--- a/libsrc/telestrat/initcwd.s
+++ b/libsrc/telestrat/initcwd.s
@ -10,22 +10,19 @@


 initcwd:
-       
        ldx     #PWD_PTR
        BRK_TELEMON XVARS
-        
+
        sta     ptr1
        sty     ptr1+1
-        
+
        ldy     #$00
-        
-loop:        
+loop:
        lda     (ptr1),y
-        beq     done
        sta     __cwd,y
+        beq     done
        iny
        bne     loop
-       
-done:   
-        sta     __cwd,y
+
+done:
        rts