Apple-2-SW/WeeGUI
1
0
Fork 0
mirror of https://github.com/blondie7575/WeeGUI.git synced 2024-12-13 00:29:12 +00:00
Code Issues Projects Releases Wiki Activity

Merge branch 'master' of https://github.com/blondie7575/WeeGUI

Browse Source 
# Conflicts:
#	weegui.dsk
This commit is contained in:
blondie7575 2017-12-20 12:41:47 -08:00
commit 2ef6fc01b4
1 changed files with 4 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
applesoft.s
View File

@ -483,7 +483,7 @@ WGAmpersand_CHKBX:
lda #VIEW_STYLE_APPLESOFT lda #VIEW_STYLE_APPLESOFT
ora WG_VIEWRECORDS+4,y ora WG_VIEWRECORDS+4,y
sta WG_VIEWRECORDS+4,y sta WG_VIEWRECORDS+4,y
jsr WGPaintView jsr WGPaintView
jsr WGBottomCursor jsr WGBottomCursor
@ -520,7 +520,7 @@ WGAmpersand_PROG:
lda #VIEW_STYLE_APPLESOFT lda #VIEW_STYLE_APPLESOFT
ora WG_VIEWRECORDS+4,y ora WG_VIEWRECORDS+4,y
sta WG_VIEWRECORDS+4,y sta WG_VIEWRECORDS+4,y
jsr WGPaintView jsr WGPaintView
jsr WGBottomCursor jsr WGBottomCursor
@ -886,7 +886,6 @@ WGAmpersand_FILL:
jsr WGAmpersandNextArgument jsr WGAmpersandNextArgument
jsr WGAmpersandIntArgument jsr WGAmpersandIntArgument
ora #$80 ; Convert to Apple format
pha pha
jsr WGAmpersandEndArguments jsr WGAmpersandEndArguments
@ -971,7 +970,7 @@ WGAmpersand_PLOT:
pla pla
jsr WGPlot jsr WGPlot
jsr WGBottomCursor jsr WGBottomCursor
rts rts
@ -1048,7 +1047,7 @@ WGAmpersand_GETstore:
iny iny
pla pla
sta (VARPNT),y sta (VARPNT),y
; String version: ; String version:
; sta WG_KEYBUFFER ; Store the key ; sta WG_KEYBUFFER ; Store the key
; lda #1 ; Create an Applesoft string record in the ; lda #1 ; Create an Applesoft string record in the
@ -1291,4 +1290,3 @@ WGAmpersandCommandTable:
WGAmpersandCommandTableEnd: WGAmpersandCommandTableEnd: