]> git.sur5r.net Git - cc65/blobdiff - libsrc/apple2/dosdetect.s
Apple 2 mouse driver and other stuff from Oliver Schmidt
[cc65] / libsrc / apple2 / dosdetect.s
index b8553ecbb07507b1c5a41f1fa17cd90aa594a810..0873bbcd8f638c0147ef671860960b6bcd72c046 100644 (file)
 ; ProDOS 8 2.0.3 - $23
 ;
 
-        .constructor   initdostype
-        .export                __dos_type
+        .constructor    initdostype, 19
+        .export         __dos_type
 
-        .include       "mli.inc"
+        .include        "mli.inc"
 
 ; Identify DOS version according to:
-; - "Beneath Apple ProDOS", chapter 6-63
-; - "Apple II ProDOS 8 TechNote #023: ProDOS 8 Changes and Minutia"
+; - Beneath Apple ProDOS, chapter 6-63
+; - Apple II ProDOS 8 TechNote #23, ProDOS 8 Changes and Minutia
 ; - ProDOS TechRefMan, chapter 5.2.4
 
         .segment        "INIT"
 
 initdostype:
-        lda    ENTRY
-        cmp    #$4C            ; Is MLI present? (JMP opcode)
-        bne    done
-        lda    KVERSION        ; ProDOS 8 kernel version
-        cmp    #$10
-        bcs    :+
-        ora    #$10            ; Make high nibble match major version
-:       sta    __dos_type
+        lda     ENTRY
+        cmp     #$4C           ; Is MLI present? (JMP opcode)
+        bne     done
+        lda     KVERSION       ; ProDOS 8 kernel version
+        cmp     #$10
+        bcs     :+
+        ora     #$10           ; Make high nibble match major version
+:       sta     __dos_type
 done:   rts
 
         .bss
 
-__dos_type:     .res   1
+__dos_type:     .res    1