mirror of
https://github.com/cc65/cc65.git
synced 2025-01-18 11:29:45 +00:00
Added get_ostype.s
git-svn-id: svn://svn.cc65.org/cc65/trunk@2289 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
parent
651e82ac78
commit
deeecae2ce
@ -35,6 +35,7 @@ OBJS = _scrsize.o \
|
|||||||
color.o \
|
color.o \
|
||||||
conio.o \
|
conio.o \
|
||||||
cputc.o \
|
cputc.o \
|
||||||
|
get_ostype.o \
|
||||||
get_tv.o \
|
get_tv.o \
|
||||||
joy_stddrv.o \
|
joy_stddrv.o \
|
||||||
kbhit.o \
|
kbhit.o \
|
||||||
|
22
libsrc/c64/get_ostype.s
Normal file
22
libsrc/c64/get_ostype.s
Normal file
@ -0,0 +1,22 @@
|
|||||||
|
;
|
||||||
|
; Stefan Haubenthal, Jul 10 2003
|
||||||
|
;
|
||||||
|
; unsigned char get_ostype(void)
|
||||||
|
;
|
||||||
|
; $AA US
|
||||||
|
; $64 PET-64
|
||||||
|
; $43 SX-64
|
||||||
|
; $03 EU_NEW
|
||||||
|
; $00 EU_OLD
|
||||||
|
;
|
||||||
|
|
||||||
|
.export _get_ostype
|
||||||
|
|
||||||
|
.proc _get_ostype
|
||||||
|
|
||||||
|
lda $ff80
|
||||||
|
rts
|
||||||
|
|
||||||
|
.endproc
|
||||||
|
|
||||||
|
|
Loading…
x
Reference in New Issue
Block a user