mirror of
https://github.com/blondie7575/WeeGUI.git
synced 2024-12-12 09:29:03 +00:00
Merge branch 'master' of https://github.com/blondie7575/WeeGUI
# Conflicts: # weegui.dsk
This commit is contained in:
commit
2ef6fc01b4
10
applesoft.s
10
applesoft.s
@ -483,7 +483,7 @@ WGAmpersand_CHKBX:
|
||||
lda #VIEW_STYLE_APPLESOFT
|
||||
ora WG_VIEWRECORDS+4,y
|
||||
sta WG_VIEWRECORDS+4,y
|
||||
|
||||
|
||||
jsr WGPaintView
|
||||
jsr WGBottomCursor
|
||||
|
||||
@ -520,7 +520,7 @@ WGAmpersand_PROG:
|
||||
lda #VIEW_STYLE_APPLESOFT
|
||||
ora WG_VIEWRECORDS+4,y
|
||||
sta WG_VIEWRECORDS+4,y
|
||||
|
||||
|
||||
jsr WGPaintView
|
||||
jsr WGBottomCursor
|
||||
|
||||
@ -886,7 +886,6 @@ WGAmpersand_FILL:
|
||||
jsr WGAmpersandNextArgument
|
||||
|
||||
jsr WGAmpersandIntArgument
|
||||
ora #$80 ; Convert to Apple format
|
||||
pha
|
||||
|
||||
jsr WGAmpersandEndArguments
|
||||
@ -971,7 +970,7 @@ WGAmpersand_PLOT:
|
||||
pla
|
||||
jsr WGPlot
|
||||
jsr WGBottomCursor
|
||||
|
||||
|
||||
rts
|
||||
|
||||
|
||||
@ -1048,7 +1047,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
|
||||
@ -1291,4 +1290,3 @@ WGAmpersandCommandTable:
|
||||
|
||||
|
||||
WGAmpersandCommandTableEnd:
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user