;
-; Christian Groessler, June 2004
+; Christian Groessler, July 2004
; from Freddy Offenga's rominfo.c
;
-; unsigned char _get_ostype(void)
+; unsigned char get_ostype(void)
;
; x x x x x x x x - 8 bit flag
; | | | | | | | |
; 101 - unassigned (up to 111)
;
- .export __get_ostype
+ .export _get_ostype
-.proc __get_ostype
+.proc _get_ostype
lda $fcd8
cmp #$a2
; 400/800 NTSC Rev. A
lda #%00011001
- bne _400800_done
+ bne _fin
; 400/800 unknown
_400800_unknown:
lda #%00000001
- bne _400800_done
+ bne _fin
_400800_1:
cmp #$d6
; 400/800 PAL Rev. A
lda #%00001001
- bne _400800_done
+ bne _fin
_400800_2:
cmp #$f3
; 400/800 NTSC Rev. B
lda #%00100001
- bne _400800_done
+ bne _fin
_400800_3:
; 400/800 PAL Rev. B
lda #%00010001
-
-_400800_done:
bne _fin
.endproc