mirror of
https://github.com/cc65/cc65.git
synced 2024-09-11 22:55:11 +00:00
23 lines
205 B
ArmAsm
23 lines
205 B
ArmAsm
|
;
|
||
|
; 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
|
||
|
|
||
|
|