This commit is contained in:
Michael Steil 2008-10-18 05:37:45 +00:00
parent 56fb87ea81
commit c4d2e91ca4
5 changed files with 37 additions and 48 deletions

View File

@ -17,9 +17,8 @@ ZP_START2 = $55
;extra ZP variables
USR := $000A
; inputbuffer
INPUTBUFFER := $0200
CONFIG_NO_INPUTBUFFER_ZP := 1
CONFIG_INPUTBUFFER_0200 := 1

View File

@ -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

View File

@ -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

View File

@ -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

View File

@ -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