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

cleanup

Browse Source
This commit is contained in:
Michael Steil 2008-10-12 19:54:16 +00:00
parent 3f00cde052
commit 309b714632
6 changed files with 18 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
defines_apple.s
View File

@ -48,10 +48,6 @@ MONCOUT := $FDED
STACK_TOP := $F8 STACK_TOP := $F8
SPACE_FOR_GOSUB := $36 SPACE_FOR_GOSUB := $36
NUM_TOKENS := $1C NUM_TOKENS := $1C
BYTES_PER_ELEMENT := 6 ; ??? should be 5 on Apple
BYTES_PER_VARIABLE := 7
BYTES_FP := 5
MANTISSA_BYTES := BYTES_FP-1
MAX_EXPON = 10 MAX_EXPON = 10
RAMSTART3 := $2A00 RAMSTART3 := $2A00

4
defines_cbm.s
View File

@ -96,10 +96,6 @@ STACK_TOP := $FA
.endif .endif
NUM_TOKENS := $23 NUM_TOKENS := $23
NULL_MAX := $0A NULL_MAX := $0A
BYTES_PER_ELEMENT := 5
BYTES_PER_VARIABLE := 7
BYTES_FP := 5
MANTISSA_BYTES := BYTES_FP-1
.ifdef CBM1 .ifdef CBM1
MAX_EXPON = 12 MAX_EXPON = 12
.else .else

4
defines_kbd.s
View File

@ -54,10 +54,6 @@ STACK_TOP := $FE
SPACE_FOR_GOSUB := $49 SPACE_FOR_GOSUB := $49
NUM_TOKENS := $1D NUM_TOKENS := $1D
NULL_MAX := $0A NULL_MAX := $0A
BYTES_PER_ELEMENT := 4
BYTES_PER_VARIABLE := 6
BYTES_FP := 4
MANTISSA_BYTES := BYTES_FP-1
MAX_EXPON = 10 MAX_EXPON = 10
RAMSTART3 := $0300 RAMSTART3 := $0300

4
defines_kim.s
View File

@ -47,9 +47,5 @@ STACK_TOP := $FC
SPACE_FOR_GOSUB := $36 SPACE_FOR_GOSUB := $36
NUM_TOKENS := $1D NUM_TOKENS := $1D
NULL_MAX := $F2 ; probably different in original version; the image I have seems to be modified; see PDF NULL_MAX := $F2 ; probably different in original version; the image I have seems to be modified; see PDF
BYTES_PER_ELEMENT := 5
BYTES_PER_VARIABLE := 7
BYTES_FP := 5
MANTISSA_BYTES := BYTES_FP-1
MAX_EXPON = 10 MAX_EXPON = 10

4
defines_osi.s
View File

@ -51,10 +51,6 @@ STACK_TOP := $FC
SPACE_FOR_GOSUB := $33 SPACE_FOR_GOSUB := $33
NUM_TOKENS := $1C NUM_TOKENS := $1C
NULL_MAX := $0A NULL_MAX := $0A
BYTES_PER_ELEMENT := 4
BYTES_PER_VARIABLE := 6
BYTES_FP := 4
MANTISSA_BYTES := BYTES_FP-1
MAX_EXPON = 10 MAX_EXPON = 10
RAMSTART3 := $0300 RAMSTART3 := $0300

18
msbasic.s
View File

@ -22,6 +22,24 @@ KBD := 1
.include "defines_kbd.s" ; 10 .include "defines_kbd.s" ; 10
.endif .endif
.ifdef CONFIG_SMALL
BYTES_FP := 4
BYTES_PER_ELEMENT := 4
BYTES_PER_VARIABLE := 6
.else
BYTES_FP := 5
.ifdef APPLE
BYTES_PER_ELEMENT := 6 ; ??? should be 5 on Apple
.else
BYTES_PER_ELEMENT := 5
.endif
BYTES_PER_VARIABLE := 7
.endif
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