Apple-2-SW/msbasic
1
0
Fork 0
mirror of https://github.com/mist64/msbasic.git synced 2025-03-11 08:32:37 +00:00
Code Issues Projects Releases Wiki Activity

cleanup

Browse Source
This commit is contained in:
Michael Steil 2008-10-12 20:43:37 +00:00
parent 24a4657e04
commit d9b7a0a91c
7 changed files with 9 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
TODO.txt
View File

@ -2,7 +2,6 @@
* use linker magic to compile files separately * use linker magic to compile files separately
* convert messy init code into completely different * convert messy init code into completely different
files without ifdefs (not much in common!) files without ifdefs (not much in common!)
* generate keyword and pointer list together
* generalize CHRGOT definition * generalize CHRGOT definition
* rename all labels that point to RTS to RTSn * rename all labels that point to RTS to RTSn
* add AppleSoft comments * add AppleSoft comments

1
defines_apple.s
View File

@ -46,7 +46,6 @@ MONCOUT := $FDED
STACK_TOP := $F8 STACK_TOP := $F8
SPACE_FOR_GOSUB := $36 SPACE_FOR_GOSUB := $36
RAMSTART3 := $2A00
RAMSTART2 := $2A00 RAMSTART2 := $2A00
LF689 := $F689 LF689 := $F689

1
defines_cbm.s
View File

@ -97,7 +97,6 @@ STACK_TOP := $FA
NULL_MAX := $0A NULL_MAX := $0A
RAMSTART2 := $0400 RAMSTART2 := $0400
RAMSTART3 := $0400
OPEN := $FFC0 OPEN := $FFC0

1
defines_kbd.s
View File

@ -53,7 +53,6 @@ SAVE := $FFF7
STACK_TOP := $FE STACK_TOP := $FE
SPACE_FOR_GOSUB := $49 SPACE_FOR_GOSUB := $49
RAMSTART3 := $0300
CONST_MEMSIZ := $3FFF CONST_MEMSIZ := $3FFF
RAMSTART2 := $0300 RAMSTART2 := $0300

1
defines_osi.s
View File

@ -50,5 +50,4 @@ STACK_TOP := $FC
SPACE_FOR_GOSUB := $33 SPACE_FOR_GOSUB := $33
NULL_MAX := $0A NULL_MAX := $0A
RAMSTART3 := $0300
RAMSTART2 := $0300 RAMSTART2 := $0300

14
msbasic.s
View File

@ -24,10 +24,8 @@ KBD := 1
.ifdef CONFIG_SMALL .ifdef CONFIG_SMALL
BYTES_FP := 4 BYTES_FP := 4
BYTES_PER_VARIABLE := 6
.else .else
BYTES_FP := 5 BYTES_FP := 5
BYTES_PER_VARIABLE := 7
.endif .endif
.ifdef APPLE .ifdef APPLE
@ -35,9 +33,8 @@ BYTES_PER_ELEMENT := 6 ; ???
.else .else
BYTES_PER_ELEMENT := BYTES_FP BYTES_PER_ELEMENT := BYTES_FP
.endif .endif
BYTES_PER_VARIABLE := BYTES_FP+2
MANTISSA_BYTES := BYTES_FP-1 MANTISSA_BYTES := BYTES_FP-1
BYTES_PER_FRAME := 2*BYTES_FP+8 BYTES_PER_FRAME := 2*BYTES_FP+8
FOR_STACK1 := 2*BYTES_FP+5 FOR_STACK1 := 2*BYTES_FP+5
FOR_STACK2 := BYTES_FP+4 FOR_STACK2 := BYTES_FP+4
@ -6598,9 +6595,10 @@ POLY_ATN:
RAMSTART1: RAMSTART1:
GENERIC_CHRGET: GENERIC_CHRGET:
inc TXTPTR inc TXTPTR
bne L4047 bne GENERIC_CHRGOT
inc TXTPTR+1 inc TXTPTR+1
L4047: GENERIC_CHRGOT:
GENERIC_TXTPTR = GENERIC_CHRGOT + 1
lda $EA60 lda $EA60
.ifdef KBD .ifdef KBD
jsr LF430 jsr LF430
@ -6900,8 +6898,8 @@ L4129:
L4136: L4136:
.endif .endif
.ifndef KIM .ifndef KIM
ldx #<RAMSTART3 ldx #<RAMSTART2
ldy #>RAMSTART3 ldy #>RAMSTART2
.else .else
lda #<QT_WANT lda #<QT_WANT
ldy #>QT_WANT ldy #>QT_WANT

7
zeropage.s
View File

@ -110,11 +110,10 @@ FACEXTENSION:
STRNG2: STRNG2:
.res 2 .res 2
CHRGET: CHRGET:
.res 7
.res 6 .res 6
CHRGOT: CHRGOT = GENERIC_CHRGOT-GENERIC_CHRGET + CHRGET
.res 1 TXTPTR = <(GENERIC_TXTPTR-GENERIC_CHRGET + CHRGET)
TXTPTR:
.res 6
.ifndef CONFIG_SMALL .ifndef CONFIG_SMALL
L00CF: L00CF:
.res 11 .res 11