mirror of
https://github.com/mist64/msbasic.git
synced 2025-01-17 17:30:48 +00:00
cleanup
This commit is contained in:
parent
3f1fa76cae
commit
5d35b09a97
@ -27,6 +27,7 @@ STACK_TOP := $F8
|
|||||||
SPACE_FOR_GOSUB := $36
|
SPACE_FOR_GOSUB := $36
|
||||||
CRLF_1 := CR
|
CRLF_1 := CR
|
||||||
CRLF_2 := $80
|
CRLF_2 := $80
|
||||||
|
WIDTH := 40
|
||||||
|
|
||||||
; memory layout
|
; memory layout
|
||||||
RAMSTART2 := $2A00
|
RAMSTART2 := $2A00
|
||||||
|
@ -19,6 +19,7 @@ ZP_START2 = $63
|
|||||||
STACK_TOP := $FC
|
STACK_TOP := $FC
|
||||||
SPACE_FOR_GOSUB := $36
|
SPACE_FOR_GOSUB := $36
|
||||||
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
|
||||||
|
WIDTH := 72
|
||||||
|
|
||||||
; magic memory locations
|
; magic memory locations
|
||||||
L1800 := $1800
|
L1800 := $1800
|
||||||
|
@ -23,7 +23,7 @@ TXPSV := $00BA
|
|||||||
STACK_TOP := $FE
|
STACK_TOP := $FE
|
||||||
SPACE_FOR_GOSUB := $3E
|
SPACE_FOR_GOSUB := $3E
|
||||||
NULL_MAX := $F0
|
NULL_MAX := $F0
|
||||||
|
WIDTH := 80
|
||||||
; memory layout
|
; memory layout
|
||||||
RAMSTART2 := $0400
|
RAMSTART2 := $0400
|
||||||
|
|
||||||
|
@ -20,6 +20,7 @@ USR := $000A
|
|||||||
STACK_TOP := $FC
|
STACK_TOP := $FC
|
||||||
SPACE_FOR_GOSUB := $33
|
SPACE_FOR_GOSUB := $33
|
||||||
NULL_MAX := $0A
|
NULL_MAX := $0A
|
||||||
|
WIDTH := 72
|
||||||
|
|
||||||
; memory layout
|
; memory layout
|
||||||
RAMSTART2 := $0300
|
RAMSTART2 := $0300
|
||||||
|
16
init.s
16
init.s
@ -59,7 +59,7 @@ COLD_START2:
|
|||||||
sta GOSTROUT
|
sta GOSTROUT
|
||||||
sta JMPADRS
|
sta JMPADRS
|
||||||
.endif
|
.endif
|
||||||
.if .def(CONFIG_SMALL) || .def(MICROTAN) || .def(APPLE)
|
.if (!.def(CONFIG_RAM)) && (!.def(CONFIG_CBM_ALL))
|
||||||
sta USR
|
sta USR
|
||||||
.endif
|
.endif
|
||||||
|
|
||||||
@ -75,20 +75,12 @@ COLD_START2:
|
|||||||
sty USR+2
|
sty USR+2
|
||||||
.endif
|
.endif
|
||||||
.ifndef CONFIG_CBM_ALL
|
.ifndef CONFIG_CBM_ALL
|
||||||
.ifdef APPLE
|
lda #WIDTH
|
||||||
lda #$28
|
|
||||||
.else
|
|
||||||
.ifdef MICROTAN
|
|
||||||
lda #$50
|
|
||||||
.else
|
|
||||||
lda #$48
|
|
||||||
.endif
|
|
||||||
.endif
|
|
||||||
sta Z17
|
sta Z17
|
||||||
.ifdef APPLE
|
.ifdef APPLE
|
||||||
lda #$0E
|
lda #14
|
||||||
.else
|
.else
|
||||||
lda #$38
|
lda #56
|
||||||
.endif
|
.endif
|
||||||
sta Z18
|
sta Z18
|
||||||
.endif
|
.endif
|
||||||
|
Loading…
x
Reference in New Issue
Block a user