git.sur5r.net Git - cc65/blob - libsrc/plus4/clrscr.s

   1 ;
   2 ; Ullrich von Bassewitz, 06.08.1998
   3 ;
   4 ; void clrscr (void);
   5 ;
   6
   7         .export         _clrscr
   8
   9         .include        "cbm_kernal.inc"
  10         .include        "plus4.inc"
  11
  12 .segment        "LOWCODE"               ; Must go into low memory
  13
  14 .proc   _clrscr
  15         sta     ENABLE_ROM              ; Enable the ROM
  16         jsr     CLRSCR                  ; Call the ROM routine
  17         sta     ENABLE_RAM              ; Switch back to RAM
  18         rts                             ; Return to caller
  19 .endproc