.import __dos_type
.constructor initmainargs,25
+; --------------------------------------------------------------------------
; Get command line
+.segment "INIT"
+
initmainargs:
lda #0
sta __argc
argdos: lda #ATEOL
sta ourcl+CL_SIZE
-
+
; Move SpartaDOS command line to our own buffer
lda DOSVEC
finargs:
lda __argc
- asl
+ asl
tax
lda #0
sta argv,x
stx __argv+1
rts
- .bss
+; --------------------------------------------------------------------------
+; Data
+
+.bss
argv: .res (1 + MAXARGS) * 2