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

   1 ;
   2 ; Ullrich von Bassewitz, 2003-02-13
   3 ;
   4 ; void toggle_videomode (void);
   5 ; /* Toggle the video mode between 40 and 80 chars (calls SWAPPER) */
   6 ;
   7
   8         .export         _toggle_videomode
   9         .import         SWAPPER, BSOUT
  10
  11 .proc   _toggle_videomode
  12
  13         jsr     SWAPPER                 ; Toggle the mode
  14         lda     #14
  15         jmp     BSOUT                   ; Switch to lower case chars
  16
  17 .endproc
  18