Apple-2-SW/msbasic
1
0
Fork 0
mirror of https://github.com/mist64/msbasic.git synced 2024-05-29 10:41:33 +00:00
Code Issues Projects Releases Wiki Activity

cleanup

Browse Source
This commit is contained in:
Michael Steil 2008-10-18 12:33:14 +00:00
parent 3f1fa76cae
commit 5d35b09a97
5 changed files with 8 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
defines_apple.s
View File

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

1
defines_kim.s
View File

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

2
defines_microtan.s
View File

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

1
defines_osi.s
View File

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

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