]> git.sur5r.net Git - cc65/blob - libsrc/c128/toggle_videomode.s
873e38eb1b26c013fe57550ec931eb19e651242d
[cc65] / 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
10         .include        "c128.inc"
11
12 .proc   _toggle_videomode 
13
14         jsr     SWAPPER                 ; Toggle the mode
15         lda     #14
16         jmp     BSOUT                   ; Switch to lower case chars
17
18 .endproc
19