Fixes 80-col/color mode

This commit is contained in:
Charles Mangin 2019-01-18 08:55:56 -05:00 committed by GitHub
parent 8adc738e77
commit d3e8eaa60f
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 2 additions and 2 deletions

Binary file not shown.

View File

@ -144,7 +144,6 @@ CLOSECMD EQU $CC ; CLOSE command index
LDA #$00 LDA #$00
STA BLINK ; blinking text? no thanks. STA BLINK ; blinking text? no thanks.
STA LORES ; low res graphics mode STA LORES ; low res graphics mode
STA MIXCLR ; For IIGS - bottom 4 lines to GR
STA PAUSED ; start not paused STA PAUSED ; start not paused
STA COLORMODE ; start in default, real hardware mode STA COLORMODE ; start in default, real hardware mode
@ -159,11 +158,12 @@ DETECTGS
ISGS lda #$01 ; disable SHR for IIgs ISGS lda #$01 ; disable SHR for IIgs
sta $c029 ; re: John Brooks sta $c029 ; re: John Brooks
; need to skip this if on IIe card, otherwise goes to alt ROM ; need to skip this if on IIe card, otherwise goes to alt ROM
STA MIXCLR ; For IIGS - bottom 4 lines to GR
NOTGS LDA #$30 NOTGS LDA #$30
STA DELAY ; start with a modest 30FPS STA DELAY ; start with a modest 30FPS
lda SETAN3 ; lda SETAN3 ; *** does something strange to low res
sta CLR80VID ; turn 80 column off sta CLR80VID ; turn 80 column off
JSR CLRLORES ; clear screen JSR CLRLORES ; clear screen