Apple-2-SW/a2d
1
0
Fork 0
mirror of https://github.com/mi57730/a2d.git synced 2024-11-29 07:49:20 +00:00
Code Issues Projects Releases Wiki Activity

Show Image DA/IIgs: Preserve NEWVIDEO bits

Browse Source
This commit is contained in:
Joshua Bell 2018-05-11 07:59:23 -07:00
parent 2da03912a0
commit 37ff19ef0d
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
desk.acc/show.image.file.s
View File

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