.segment "SRPREP"
+; ***** entry point *****
+
sramprep:
.ifdef DEBUG
print_string "entering stage #2"
iocbok:
.endif
- ; Reopen it in Graphics 0
+ ; reopen it in Graphics 0
lda #OPEN
sta ICCOM,x
lda #OPNIN | OPNOT
; switch to temporary chargen
- sta CHBASE
- sta CHBAS
+ sta CHBASE
+ sta CHBAS
; copy shadow RAM contents to their destination (segment SHADOW_RAM)
lda #<__SHADOW_RAM2_SIZE__
bne do_copy2
lda #>__SHADOW_RAM2_SIZE__
- beq no_copy2 ; we have no shadow RAM contents
+ beq no_copy2 ; we have no shadow RAM #2 contents
; ptr1 - src; ptr2 - dest; tmp1, tmp2 - len
do_copy2:
; and that enough memory is installed (which isn't the case for a 600XL).
; For the non-XL target it checks whether there is enough memory
; installed to run the program.
-; For both target it checks that the program won't load below MEMLO.
-; If one of the checks fails the loading of the main program
+; For both targets it checks that the program won't load below MEMLO.
+; If one of the checks fails, the loading of the main program
; is aborted by jumping to DOSVEC.
;
; Christian Groessler, chris@groessler.org, 2013
sta ICCOM,x
jsr CIOV_org
.endmacro
-.macro print_string2 addr, len
+.macro print_string2 addr, len
ldx #0 ; channel 0
lda #<addr
sta ICBAL,x ; address
lda #PUTCHR
sta ICCOM,x
jsr CIOV_org
-
.endmacro