2 ; Startup code for cc65 (ATARI version)
4 ; Contributing authors:
11 .export __STARTUP__ : absolute = 1 ; Mark as startup
12 .constructor initsp, 26
14 .import initlib, donelib, callmain
15 .import zerobss, pushax
16 .import _main, __filetab, getfd
17 .import __STARTUP_LOAD__, __ZPSAVE_LOAD__
18 .import __RESERVED_MEMORY__
23 .include "zeropage.inc"
27 ; ------------------------------------------------------------------------
32 .word __STARTUP_LOAD__
33 .word __ZPSAVE_LOAD__ - 1
35 ; ------------------------------------------------------------------------
40 rts ; fix for SpartaDOS / OS/A+
41 ; they first call the entry point from AUTOSTRT and
42 ; then the load addess (this rts here).
43 ; We point AUTOSTRT directly after the rts.
47 ; Save the zero page locations we need
67 sta appmsav ; remember old APPMHI value
73 sbc #<__RESERVED_MEMORY__
74 sta APPMHI ; initialize our APPMHI value
76 sbc #>__RESERVED_MEMORY__
79 ; Call module constructors
86 ; set left margin to 0
93 ; set keyb to upper/lowercase mode
99 ; Initialize conio stuff
104 ; set stdio stream handles
108 sta __filetab + (0 * .sizeof(_FILE)); setup stdin
111 sta __filetab + (1 * .sizeof(_FILE)); setup stdout
114 sta __filetab + (2 * .sizeof(_FILE)); setup stderr
116 ; Push arguments and call main
120 ; Call module destructors. This is also the _exit entry.
122 _exit: jsr donelib ; Run module destructors
124 ; Restore system stuff
127 txs ; Restore stack pointer
129 ; restore left margin
146 ; Copy back the zero page stuff
163 ; *** end of main startup code
188 .word RUNAD ; defined in atari.h
190 .word __STARTUP_LOAD__ + 1