mirror of
https://github.com/bobbimanners/Applecorn.git
synced 2024-06-22 20:29:34 +00:00
VDU26 now resets the graphics window to fullscreen
This commit is contained in:
parent
62aa305c96
commit
9ee3788c44
BIN
applecorn.po
BIN
applecorn.po
Binary file not shown.
|
@ -1044,7 +1044,11 @@ VDU26LP STA VDUVARS,X ; Clear all windows
|
||||||
STA TXTWINRGT ; Text window width
|
STA TXTWINRGT ; Text window width
|
||||||
LDY VDUPIXELS
|
LDY VDUPIXELS
|
||||||
BEQ VDU26QUIT ; No graphics
|
BEQ VDU26QUIT ; No graphics
|
||||||
LDX #GFXWINRGT-VDUVARS
|
BIT VDUBANK ; Is this a GS?
|
||||||
|
BPL VDU26PT2 ; Nope
|
||||||
|
>>> XF2MAIN,SHRVDU26
|
||||||
|
VDU26RET >>> ENTAUX
|
||||||
|
VDU26PT2 LDX #GFXWINRGT-VDUVARS
|
||||||
JSR VDU26SCALE ; GFXWID=TXTWID*PIXELS-1
|
JSR VDU26SCALE ; GFXWID=TXTWID*PIXELS-1
|
||||||
LDA TXTWINBOT
|
LDA TXTWINBOT
|
||||||
LDY #8 ; GFXHGT=TXTHGT*8-1
|
LDY #8 ; GFXHGT=TXTHGT*8-1
|
||||||
|
|
|
@ -25,10 +25,10 @@ SHRGFXBGMASK DB $00 ; Background colour mask
|
||||||
SHRGFXACTION DB $00 ; GCOL action for point plotting
|
SHRGFXACTION DB $00 ; GCOL action for point plotting
|
||||||
SHRXPIXEL DW $0000 ; Previous point in screen coords
|
SHRXPIXEL DW $0000 ; Previous point in screen coords
|
||||||
SHRYPIXEL DW $0000 ; Previous point in screen coords
|
SHRYPIXEL DW $0000 ; Previous point in screen coords
|
||||||
SHRWINLFT DW 0 ; Graphics window - left
|
SHRWINLFT DW $0000 ; Graphics window - left (0-639)
|
||||||
SHRWINRGT DW 639 ; Graphics window - right
|
SHRWINRGT DW $0000 ; Graphics window - right (0-639)
|
||||||
SHRWINTOP DW 0 ; Graphics window - top
|
SHRWINTOP DW $0000 ; Graphics window - top (0-199)
|
||||||
SHRWINBTM DW 199 ; Graphics window - bottom
|
SHRWINBTM DW $0000 ; Graphics window - bottom (0-199)
|
||||||
|
|
||||||
|
|
||||||
* Explode font to generate SHRFONTXPLD table
|
* Explode font to generate SHRFONTXPLD table
|
||||||
|
@ -830,6 +830,23 @@ SHRVDU24 >>> ENTMAIN
|
||||||
>>> XF2AUX,VDU24RETBAD
|
>>> XF2AUX,VDU24RETBAD
|
||||||
|
|
||||||
|
|
||||||
|
* Reset graphics window
|
||||||
|
SHRVDU26 >>> ENTMAIN
|
||||||
|
STZ SHRWINLFT+0
|
||||||
|
STZ SHRWINLFT+1
|
||||||
|
STZ SHRWINTOP+0
|
||||||
|
STZ SHRWINTOP+1
|
||||||
|
LDA #<639
|
||||||
|
STA SHRWINRGT+0
|
||||||
|
LDA #>639
|
||||||
|
STA SHRWINRGT+1
|
||||||
|
LDA #<199
|
||||||
|
STA SHRWINBTM+0
|
||||||
|
LDA #>199
|
||||||
|
STA SHRWINBTM+1
|
||||||
|
>>> XF2AUX,VDU26RET
|
||||||
|
|
||||||
|
|
||||||
* Table of addresses of SHR rows (in reverse order)
|
* Table of addresses of SHR rows (in reverse order)
|
||||||
SHRROWSL DB <$9c60
|
SHRROWSL DB <$9c60
|
||||||
DB <$9bc0
|
DB <$9bc0
|
||||||
|
|
Loading…
Reference in New Issue
Block a user