git.sur5r.net Git - cc65/blob - libsrc/apple2/home.s

   1 ;
   2 ; Oliver Schmidt, 03.03.2007
   3 ;
   4 ; HOME routine
   5 ;
   6
   7         .export         HOME
   8
   9         .include        "apple2.inc"
  10
  11         .segment        "LOWCODE"
  12
  13 HOME:
  14         ; Switch in ROM and call HOME
  15         bit     $C082
  16         jsr     $FC58           ; Clear current text screen
  17
  18         ; Switch in LC bank 2 for R/O and return
  19         bit     $C080
  20         rts