Apple-2-SW/Applecorn
1
0
Fork 0
mirror of https://github.com/bobbimanners/Applecorn.git synced 2024-06-20 22:29:31 +00:00
Code Issues Projects Releases Wiki Activity

MOVE (aka PLOT 4,x,y) now works in SHR

Browse Source
This commit is contained in:
Bobbi Webber-Manners 2023-01-03 21:08:13 -05:00
parent 37af780df0
commit b2eb6cad62
2 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
applecorn.po
View File

Binary file not shown.

7
mainmem.shr.s
View File

@ -219,7 +219,7 @@ SHRCHAR640 PHY ; Preserve Y
* $90+x - draw circle
* $98+x - fill circle
*
* TODO: Only does point plotting ATM
* TODO: Need to properly handle k
SHRPLOT >>> ENTMAIN
JSR SHRCOORD ; Convert coordinates
LDA A1L ; Preserve converted x
@ -229,6 +229,10 @@ SHRPLOT >>> ENTMAIN
LDA A2L ; Preserve converted y
PHA
LDA SHRVDUQ+4 ; k
AND #$03
CMP #$00 ; Buts 0,1 clear -> just move
BEQ :S2
LDA SHRVDUQ+4 ; k
AND #$F0 ; Keep MS nybble
CMP #$00 ; Move or draw line
BNE :S1
@ -598,7 +602,6 @@ SHRLINEHI MX %00 ; Tell Merlin 16 bit M & X
:LIM DW $0000 ; x1 gets stashed here
* Convert high-resolution screen coordinates
* from 1280x1024 to 640x200 or 320x200
* On return: X-coordinate in A1L/H, Y-coordinate in A2L (A2H=0)