mirror of
https://github.com/blondie7575/WeeGUI.git
synced 2026-04-19 09:19:48 +00:00
Merge pull request #7 from a2-4am/master
bugfix: &FILL should support mousetext characters [fixes #6]
This commit is contained in:
+4
-6
@@ -468,7 +468,7 @@ WGAmpersand_CHKBX:
|
||||
lda #VIEW_STYLE_APPLESOFT
|
||||
ora WG_VIEWRECORDS+4,y
|
||||
sta WG_VIEWRECORDS+4,y
|
||||
|
||||
|
||||
jsr WGPaintView
|
||||
jsr WGBottomCursor
|
||||
|
||||
@@ -505,7 +505,7 @@ WGAmpersand_PROG:
|
||||
lda #VIEW_STYLE_APPLESOFT
|
||||
ora WG_VIEWRECORDS+4,y
|
||||
sta WG_VIEWRECORDS+4,y
|
||||
|
||||
|
||||
jsr WGPaintView
|
||||
jsr WGBottomCursor
|
||||
|
||||
@@ -871,7 +871,6 @@ WGAmpersand_FILL:
|
||||
jsr WGAmpersandNextArgument
|
||||
|
||||
jsr WGAmpersandIntArgument
|
||||
ora #$80 ; Convert to Apple format
|
||||
pha
|
||||
|
||||
jsr WGAmpersandEndArguments
|
||||
@@ -956,7 +955,7 @@ WGAmpersand_PLOT:
|
||||
pla
|
||||
jsr WGPlot
|
||||
jsr WGBottomCursor
|
||||
|
||||
|
||||
rts
|
||||
|
||||
|
||||
@@ -1033,7 +1032,7 @@ WGAmpersand_GETstore:
|
||||
iny
|
||||
pla
|
||||
sta (VARPNT),y
|
||||
|
||||
|
||||
; String version:
|
||||
; sta WG_KEYBUFFER ; Store the key
|
||||
; lda #1 ; Create an Applesoft string record in the
|
||||
@@ -1276,4 +1275,3 @@ WGAmpersandCommandTable:
|
||||
|
||||
|
||||
WGAmpersandCommandTableEnd:
|
||||
|
||||
|
||||
BIN
Binary file not shown.
Reference in New Issue
Block a user