mirror of
https://github.com/cc65/cc65.git
synced 2024-07-09 16:29:09 +00:00
20 lines
370 B
ArmAsm
20 lines
370 B
ArmAsm
;
|
|
; Ullrich von Bassewitz, 2003-02-13
|
|
;
|
|
; void toggle_videomode (void);
|
|
; /* Toggle the video mode between 40 and 80 chars (calls SWAPPER) */
|
|
;
|
|
|
|
.export _toggle_videomode
|
|
|
|
.include "c128.inc"
|
|
|
|
.proc _toggle_videomode
|
|
|
|
jsr SWAPPER ; Toggle the mode
|
|
lda #14
|
|
jmp BSOUT ; Switch to lower case chars
|
|
|
|
.endproc
|
|
|