Added GEOS 1.3 and 1.5 detection.

[cc65] / libsrc / geos-cbm / system / get_ostype.s

diff --git a/libsrc/geos-cbm/system/get_ostype.s b/libsrc/geos-cbm/system/get_ostype.s
index 827630f0b21907ad8175c6aead84e9d8d437932b..6e6731952a593575d22b207ebcb3d4b3cea87302 100644 (file)
--- a/libsrc/geos-cbm/system/get_ostype.s
+++ b/libsrc/geos-cbm/system/get_ostype.s
@@ -26,6 +26,8 @@ _get_ostype:
         and #%11110000
         cmp #$10
         beq geos10
+        cmp #$13                ; either 1.3 or 1.5
+        beq geos13check
         lda gatewayFlag
         cmp #$41
         beq gateway
@@ -37,6 +39,7 @@ _get_ostype:
         beq geos_on_plus4
         ora version
         rts
+geos13:
 geos10:
         lda version
         rts
@@ -54,6 +57,13 @@ megapatch3:
         lda #$03
         ora c128Flag
         rts
+geos13check:
+        lda mp3Flag
+        cmp #$03
+        bne geos13
+geos15:
+        lda #$15
+        rts
 
 _get_tv:
         jsr _get_ostype