Minor comment adjustment.

[cc65] / libsrc / c16 / crt0.s

diff --git a/libsrc/c16/crt0.s b/libsrc/c16/crt0.s
index c967671c5df178984983ff3397c500c4c25eeb17..bbdd4a2520f3cfa639f8b14fb61c565a355ae396 100644 (file)
--- a/libsrc/c16/crt0.s
+++ b/libsrc/c16/crt0.s
@@ -13,35 +13,39 @@
        .import         __INTERRUPTOR_COUNT__
 
         .include        "zeropage.inc"
-       .include        "../plus4/plus4.inc"
+       .include        "plus4.inc"
 
 
 ; ------------------------------------------------------------------------
-; Place the startup code in a special segment.
-
-.segment               "STARTUP"
-
 ; BASIC header with a SYS call
 
+.segment               "EXEHDR"
+
         .word   Head            ; Load address
 Head:   .word   @Next
         .word   .version        ; Line number
-        .byte   $9E,"4109"     ; SYS 4109
+        .byte   $9E             ; SYS token
+        .byte   <(((Start / 1000) .mod 10) + '0')
+        .byte   <(((Start /  100) .mod 10) + '0')
+        .byte   <(((Start /   10) .mod 10) + '0')
+        .byte   <(((Start /    1) .mod 10) + '0')
         .byte   $00             ; End of BASIC line
 @Next:  .word   0               ; BASIC end marker
 
 ; ------------------------------------------------------------------------
-; Actual code
+; Startup code
 
-               ldx     #zpspace-1
-L1:    lda     sp,x
-       sta     zpsave,x        ; save the zero page locations we need
-       dex
-               bpl     L1
+.segment               "STARTUP"
+
+Start:
 
-; Close open files
+; Save the zero page locations we need
 
-       jsr     CLRCH
+        ldx    #zpspace-1
+L1:    lda     sp,x
+       sta     zpsave,x
+       dex
+               bpl     L1
 
 ; Switch to second charset