mirror of
https://github.com/mist64/msbasic.git
synced 2024-09-21 02:27:33 +00:00
cleanup
This commit is contained in:
parent
56fb87ea81
commit
c4d2e91ca4
@ -17,9 +17,8 @@ ZP_START2 = $55
|
||||
;extra ZP variables
|
||||
USR := $000A
|
||||
|
||||
|
||||
; inputbuffer
|
||||
INPUTBUFFER := $0200
|
||||
|
||||
CONFIG_NO_INPUTBUFFER_ZP := 1
|
||||
CONFIG_INPUTBUFFER_0200 := 1
|
||||
|
||||
|
@ -34,11 +34,9 @@ ZP_START0A = $04
|
||||
ZP_START1 = $5A
|
||||
ZP_START2 = $65
|
||||
|
||||
;extra ZP variables
|
||||
; extra ZP variables
|
||||
Z03 := $0003
|
||||
Z96 := $020C
|
||||
|
||||
; overlay ZP variables
|
||||
USR := GORESTART
|
||||
|
||||
.else
|
||||
@ -49,19 +47,15 @@ ZP_START0A = $0E
|
||||
ZP_START1 = $03
|
||||
ZP_START2 = $13
|
||||
|
||||
;extra ZP variables
|
||||
; extra/override ZP variables
|
||||
Z03 := $000E
|
||||
Z96 := $0096
|
||||
|
||||
; overlay ZP variables
|
||||
POSX := $00C6
|
||||
TXPSV := LASTOP
|
||||
USR := GORESTART ; XXX
|
||||
|
||||
; override ZP variables
|
||||
POSX := $00C6
|
||||
|
||||
; inputbuffer
|
||||
INPUTBUFFER := $0200
|
||||
|
||||
CONFIG_NO_INPUTBUFFER_ZP := 1
|
||||
CONFIG_INPUTBUFFER_0200 := 1
|
||||
|
||||
@ -81,6 +75,12 @@ CRLF_2 := LF
|
||||
|
||||
RAMSTART2 := $0400
|
||||
|
||||
; magic memory locations
|
||||
.ifdef CBM1
|
||||
ENTROPY = $9044
|
||||
.else
|
||||
ENTROPY = $E844
|
||||
.endif
|
||||
|
||||
; monitor functions
|
||||
OPEN := $FFC0
|
||||
@ -100,11 +100,3 @@ CLALL := $FFE7
|
||||
LE7F3 := $E7F3; for CBM1
|
||||
MONCOUT := CHROUT
|
||||
MONRDKEY := GETIN
|
||||
|
||||
|
||||
.ifdef CBM1
|
||||
ENTROPY = $9044
|
||||
.else
|
||||
ENTROPY = $E844
|
||||
.endif
|
||||
|
||||
|
@ -18,30 +18,28 @@ ZP_START0A = $0F
|
||||
ZP_START1 = $06
|
||||
ZP_START2 = $15
|
||||
|
||||
;extra ZP variables
|
||||
; extra/override ZP variables
|
||||
TXPSV := $0049
|
||||
JMPADRS := $0093
|
||||
LOWTRX := $0094 ; $AB also EXPSGN?
|
||||
Z96 := $0096
|
||||
|
||||
; override ZP variables
|
||||
Z17 := $06FC
|
||||
Z18 := $06FD
|
||||
|
||||
; inputbuffer
|
||||
INPUTBUFFER := $0700
|
||||
|
||||
CONFIG_NO_INPUTBUFFER_ZP := 1
|
||||
|
||||
; magic memory locations
|
||||
L06FE := $06FE
|
||||
L6874 := $6874
|
||||
|
||||
; constants
|
||||
STACK_TOP := $FE
|
||||
SPACE_FOR_GOSUB := $49
|
||||
CRLF_1 := LF
|
||||
CRLF_2 := CR
|
||||
|
||||
; magic memory locations
|
||||
L06FE := $06FE
|
||||
L6874 := $6874
|
||||
|
||||
; memory layout
|
||||
RAMSTART2 := $0300
|
||||
CONST_MEMSIZ := $3FFF
|
||||
|
@ -15,6 +15,13 @@ ZP_START0A = $15
|
||||
ZP_START1 = $0A
|
||||
ZP_START2 = $63
|
||||
|
||||
; constants
|
||||
STACK_TOP := $FC
|
||||
SPACE_FOR_GOSUB := $36
|
||||
NULL_MAX := $F2 ; probably different in original version; the image I have seems to be modified; see PDF
|
||||
CRLF_1 := CR
|
||||
CRLF_2 := LF
|
||||
|
||||
; magic memory locations
|
||||
L1800 := $1800
|
||||
L1873 := $1873
|
||||
@ -23,10 +30,3 @@ L1873 := $1873
|
||||
MONRDKEY := $1E5A
|
||||
MONCOUT := $1EA0
|
||||
|
||||
; constants
|
||||
STACK_TOP := $FC
|
||||
SPACE_FOR_GOSUB := $36
|
||||
NULL_MAX := $F2 ; probably different in original version; the image I have seems to be modified; see PDF
|
||||
CRLF_1 := CR
|
||||
CRLF_2 := LF
|
||||
|
||||
|
26
zeropage.s
26
zeropage.s
@ -3,15 +3,6 @@
|
||||
INPUTBUFFERX = INPUTBUFFER & $FF00
|
||||
|
||||
; overlay ZP variables, can be overridden
|
||||
.ifndef JMPADRS
|
||||
JMPADRS := DSCLEN + 1
|
||||
.endif
|
||||
.ifndef LOWTRX
|
||||
LOWTRX := LOWTR
|
||||
.endif
|
||||
.ifndef TXPSV
|
||||
TXPSV := LINNUM
|
||||
.endif
|
||||
|
||||
|
||||
.feature org_per_seg
|
||||
@ -31,21 +22,24 @@ GOGIVEAYF:
|
||||
.org ZP_START0A
|
||||
Z15:
|
||||
.res 1
|
||||
.ifndef POSX
|
||||
.ifndef POSX; allow override
|
||||
POSX:
|
||||
.res 1
|
||||
.endif
|
||||
.ifndef Z17
|
||||
.ifndef Z17; allow override
|
||||
Z17:
|
||||
.endif
|
||||
.res 1
|
||||
.ifndef Z18
|
||||
.ifndef Z18; allow override
|
||||
Z18:
|
||||
.endif
|
||||
.res 1
|
||||
LINNUM:
|
||||
.ifndef TXPSV; allow override
|
||||
TXPSV:
|
||||
.endif
|
||||
.res 2
|
||||
.ifndef INPUTBUFFER
|
||||
.ifndef INPUTBUFFER; allow override
|
||||
INPUTBUFFER:
|
||||
.endif
|
||||
|
||||
@ -140,6 +134,9 @@ DSCPTR:
|
||||
.endif
|
||||
DSCLEN:
|
||||
.res 2
|
||||
.ifndef JMPADRS ; allow override
|
||||
JMPADRS := DSCLEN + 1
|
||||
.endif
|
||||
Z52:
|
||||
.res 1
|
||||
ARGEXTENSION:
|
||||
@ -165,6 +162,9 @@ TEMP2:
|
||||
EXPON:
|
||||
.res 1
|
||||
LOWTR:
|
||||
.ifndef LOWTRX ; allow override
|
||||
LOWTRX:
|
||||
.endif
|
||||
.res 1
|
||||
EXPSGN:
|
||||
.res 1
|
||||
|
Loading…
Reference in New Issue
Block a user