6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-08-09 13:25:06 +00:00
Code Issues Projects Releases Wiki Activity

Minor cleanup.

Browse Source
This commit is contained in:
Oliver Schmidt
2020-01-18 19:29:02 +01:00
parent b66f7272af
commit 0f08ae2c12
1 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
libsrc/apple2/videomode.s
View File

@@ -16,7 +16,7 @@ _videomode:
; Get and save current videomode flag ; Get and save current videomode flag
bit RD80VID bit RD80VID
php php
; If we are in 80 column mode then the 80 column firmware is ; If we are in 80 column mode then the 80 column firmware is
; known to be active so we can just print the ctrl-char code ; known to be active so we can just print the ctrl-char code
; (even if this only means staying in the current videomode) ; (even if this only means staying in the current videomode)
@@ -29,18 +29,18 @@ _videomode:
; current state of the 80 column firmware nor want to fix it ; current state of the 80 column firmware nor want to fix it
: cmp #$11 ; Ctrl-char code for 40 cols : cmp #$11 ; Ctrl-char code for 40 cols
beq done beq done
; If we are in 40 column mode and want to set 80 column mode ; If we are in 40 column mode and want to set 80 column mode
; then we first presume the 80 column firmware being already ; then we first presume the 80 column firmware being already
; active and print the ctrl-char code (this causes a garbage ; active and print the ctrl-char code (this causes a garbage
; char to be printed on the screen if isn't already active) ; char to be printed on the screen if isn't already active)
jsr COUT jsr COUT
; If we successfully switched to 80 column mode then the 80 ; If we successfully switched to 80 column mode then the 80
; column firmware was in fact already active and we're done ; column firmware was in fact already active and we're done
bit RD80VID bit RD80VID
bmi done bmi done
; The 80 column firmware isn't already active so we need to ; The 80 column firmware isn't already active so we need to
; initialize it - causing the screen to be cleared and thus ; initialize it - causing the screen to be cleared and thus
; the garbage char printed above to be erased (but for some ; the garbage char printed above to be erased (but for some
@@ -56,7 +56,7 @@ _videomode:
; Switch in LC bank 2 for R/O ; Switch in LC bank 2 for R/O
bit $C080 bit $C080
; Return ctrl-char code for setting previous ; Return ctrl-char code for setting previous
; videomode using the saved videomode flag ; videomode using the saved videomode flag
done: lda #$11 ; Ctrl-char code for 40 cols done: lda #$11 ; Ctrl-char code for 40 cols