cleanup

defines_apple.s

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

defines_cbm.s

@@ -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
-
+POSX			:= $00C6
-; overlay ZP variables
 TXPSV			:= LASTOP
 USR				:= GORESTART ; XXX
 
-; override ZP variables
+; inputbuffer
-POSX			:= $00C6
-
 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
-

defines_kbd.s

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

defines_kim.s

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

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