git.sur5r.net Git - cc65/blob - libsrc/c128/fast.s

   1 ;
   2 ; Ullrich von Bassewitz, 2003-02-13
   3 ;
   4 ; void fast (void);
   5 ; /* Switch the CPU into 2MHz mode. Note: This will disable video when in
   6 ;  * 40 column mode.
   7 ;  */
   8 ;
   9
  10         .export         _fast
  11
  12         .include        "c128.inc"
  13
  14
  15 .proc   _fast
  16
  17         lda     #$01
  18         sta     VIC_CLK_128
  19         rts
  20
  21 .endproc
  22
  23