2 ; Startup code for cc65 (C128 version)
4 ; This must be the *first* file on the linker command line
8 .import condes, initlib, donelib
11 .import RESTOR, BSOUT, CLRCH
12 .import __IRQFUNC_TABLE__, __IRQFUNC_COUNT__
13 .import __RAM_START__, __RAM_SIZE__
15 .include "zeropage.inc"
19 ; ------------------------------------------------------------------------
22 IRQInd = $2FD ; JMP $0000 - used as indirect IRQ vector
24 ; ------------------------------------------------------------------------
25 ; Place the startup code in a special segment to cope with the quirks of
30 ; BASIC header with a SYS call
33 .word Head ; Load address
35 .word 1000 ; Line number
36 .byte $9E,"7181" ; SYS 7181
37 .byte $00 ; End of BASIC line
38 @Next: .word 0 ; BASIC end marker
41 ; ------------------------------------------------------------------------
48 ; Switch to the second charset
53 ; Set the bank for the file name our execution bank
58 ; Before doing anything else, we have to setup our banking configuration.
59 ; Otherwise just the lowest 16K are actually RAM. Writing through the ROM
60 ; to the underlying RAM works, but it is bad style.
62 lda MMU_CR ; Get current memory configuration...
63 pha ; ...and save it for later
64 lda #MMU_CFG_CC65 ; Bank0 with kernal ROM
67 ; Save the zero page locations we need
79 ; Save system stuff and setup the stack
85 stx spsave ; Save the system stack pointer
87 lda #<(__RAM_START__ + __RAM_SIZE__)
89 lda #>(__RAM_START__ + __RAM_SIZE__)
90 sta sp+1 ; Set argument stack ptr
92 ; Call module constructors
96 ; If we have IRQ functions, chain our stub into the IRQ vector
98 lda #<__IRQFUNC_COUNT__
111 ; Pass an empty command line
113 NoIRQ1: jsr push0 ; argc
116 ldy #4 ; Argument size
117 jsr _main ; call the users code
119 ; Back from main (this is also the _exit entry). Reset the IRQ vector if
122 _exit: lda #<__IRQFUNC_COUNT__
131 ; Run module destructors
140 ; Copy back the zero page stuff
148 ; Reset the memory configuration
153 ; Done, restore kernal vectors in an attempt to cleanup
157 ; ------------------------------------------------------------------------
158 ; The C128 has ROM parallel to the RAM starting from $4000. The startup code
159 ; above will change this setting so that we have RAM from $0000-$BFFF. This
160 ; works quite well with the exception of interrupts: The interrupt handler
161 ; is in ROM, and the ROM switches back to the ROM configuration, which means
162 ; that parts of our program may not be accessible. To solve this, we place
163 ; the following code into a special segment called "LOWCODE" which will be
164 ; placed just above the startup code, so it goes into a RAM area that is
170 cld ; Just to be sure
171 lda MMU_CR ; Get old register value
172 pha ; And save on stack
173 lda #MMU_CFG_CC65 ; Bank 0 with kernal ROM
175 ldy #<(__IRQFUNC_COUNT__*2)
176 lda #<__IRQFUNC_TABLE__
177 ldx #>__IRQFUNC_TABLE__
178 jsr condes ; Call the functions
179 pla ; Get old register value
181 jmp IRQInd ; Jump to the saved IRQ vector
184 ; ------------------------------------------------------------------------