git.sur5r.net Git - cc65/blob - libsrc/c64/get_ostype.s

   1 ;
   2 ; Stefan Haubenthal, Jul 10 2003
   3 ;
   4 ; unsigned char get_ostype(void)
   5 ;
   6 ; $AA US
   7 ; $64 PET-64
   8 ; $43 SX-64
   9 ; $03 EU_NEW
  10 ; $00 EU_OLD
  11 ;
  12
  13         .export         _get_ostype
  14
  15 .proc   _get_ostype
  16
  17         ldx     #$00            ; Clear high byte
  18         lda     $ff80
  19         rts
  20
  21 .endproc
  22
  23