Show Image DA/IIgs: Preserve NEWVIDEO bits

This commit is contained in:
Joshua Bell 2018-05-11 07:59:23 -07:00
parent 2da03912a0
commit 37ff19ef0d

View File

@ -619,7 +619,8 @@ cloop: lda (src),y
;; Apple IIgs - DHR Color ;; Apple IIgs - DHR Color
jsr test_iigs jsr test_iigs
bcs done bcs done
lda #%00000000 lda NEWVIDEO
and #<~(1<<5) ; Color
sta NEWVIDEO sta NEWVIDEO
done: rts done: rts
@ -638,7 +639,8 @@ done: rts
;; Apple IIgs - DHR B&W ;; Apple IIgs - DHR B&W
jsr test_iigs jsr test_iigs
bcs done bcs done
lda #%00100000 lda NEWVIDEO
ora #(1<<5) ; B&W
sta NEWVIDEO sta NEWVIDEO
done: rts done: rts