Apple-2-SW/msbasic
1
0
Fork 0
mirror of https://github.com/mist64/msbasic.git synced 2024-12-21 01:30:42 +00:00
Code Issues Projects Releases Wiki Activity

cleanup

Browse Source
This commit is contained in:
Michael Steil 2008-10-13 03:25:57 +00:00
parent 4574fd1983
commit 91e3811751
5 changed files with 6 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
chrget.s
View File

@ -12,6 +12,7 @@ GENERIC_TXTPTR = GENERIC_CHRGOT + 1
.endif
cmp #$3A
bcs L4058
GENERIC_CHRGOT2:
cmp #$20
beq GENERIC_CHRGET
sec

2
defines_kbd.s
View File

@ -39,8 +39,6 @@ Z14 := $000F;64 ; Ctrl+O flag
JMPADRS := $0093;A1
LOWTRX := $0094;AA ; $AB also EXPSGN?
RNDSEED := $00D4
L0207 := $0207
L020A := $020A
;L2A13 := $2A0A

2
defines_osi.s
View File

@ -36,8 +36,6 @@ INPUTFLG := $0062
CPRMASK := $0063
Z14 := $0064 ; Ctrl+O flag
RNDSEED := $00D4
L0207 := $0207
L020A := $020A
MONRDKEY := $FFEB

6
misc1.s
View File

@ -94,12 +94,12 @@ L2923:
LETSTRING:
.ifndef CONFIG_SMALL
pla
.endif
; ----------------------------------------------------------------------------
; INSTALL STRING, DESCRIPTOR ADDRESS IS AT FAC+3,4
; ----------------------------------------------------------------------------
PUTSTR:
.endif
.ifdef CONFIG_CBM_ALL
ldy FORPNT+1
.ifdef CBM1
@ -110,7 +110,7 @@ PUTSTR:
bne LC92B
jsr FREFAC
cmp #$06
.ifdef CBM2_KBD
.ifdef CBM2
bne IQERR1
.else
beq LC8E2
@ -155,7 +155,7 @@ LC912:
rts
LC91C:
lda (INDEX),y
jsr L00CF
jsr CHRGOT2
bcc LC926
IQERR1:
jmp IQERR

8
zeropage.s
View File

@ -110,13 +110,9 @@ FACEXTENSION = STRNG1+1
STRNG2:
.res 2
CHRGET:
.res 7
.res 6
CHRGOT = GENERIC_CHRGOT-GENERIC_CHRGET + CHRGET
TXTPTR = <(GENERIC_TXTPTR-GENERIC_CHRGET + CHRGET)
.ifndef CONFIG_SMALL
L00CF:
CHRGOT = <(GENERIC_CHRGOT-GENERIC_CHRGET + CHRGET)
CHRGOT2 = <(GENERIC_CHRGOT2-GENERIC_CHRGET + CHRGET)
RNDSEED = <(GENERIC_RNDSEED-GENERIC_CHRGET + CHRGET)
.endif