mirror of
https://github.com/cc65/cc65.git
synced 2024-11-19 21:32:19 +00:00
19 lines
386 B
ArmAsm
19 lines
386 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
|
|
.import SWAPPER, BSOUT
|
|
|
|
.proc _toggle_videomode
|
|
|
|
jsr SWAPPER ; Toggle the mode
|
|
lda #14
|
|
jmp BSOUT ; Switch to lower case chars
|
|
|
|
.endproc
|
|
|