This commit is contained in:
Michael Steil 2008-10-17 05:27:27 +00:00
parent 3306035d62
commit 853d1a095d
10 changed files with 20 additions and 24 deletions

View File

@ -45,3 +45,6 @@ MAX_EXPON = 10
.endif .endif
STACK := $0100 STACK := $0100
CR=13
LF=10

View File

@ -4,14 +4,13 @@ CONFIG_11 := 1
CBM2_APPLE := 1 CBM2_APPLE := 1
CONFIG_SAFE_NAMENOTFOUND := 1 CONFIG_SAFE_NAMENOTFOUND := 1
CBM1_APPLE := 1 CBM1_APPLE := 1
CBM_APPLE := 1
APPLE_MICROTAN := 1 APPLE_MICROTAN := 1
.define CONFIG_SCRTCH_ORDER 3 .define CONFIG_SCRTCH_ORDER 3
CONFIG_PRINT_CR := 1 ; print CR when line end reached CONFIG_PRINT_CR := 1 ; print CR when line end reached
CONFIG_IO_MSB := 1 ; all I/O has bit #7 set CONFIG_IO_MSB := 1 ; all I/O has bit #7 set
; INPUTBUFFER > $0100 ; INPUTBUFFER > $0100
CRLF_1 := $0D CRLF_1 := CR
CRLF_2 := $80 CRLF_2 := $80
ZP_START = $55 ZP_START = $55

View File

@ -2,7 +2,6 @@
CONFIG_CBM_ALL := 1 CONFIG_CBM_ALL := 1
CONFIG_CBM1_PATCHES := 1 ; ** don't turn off! ** CONFIG_CBM1_PATCHES := 1 ; ** don't turn off! **
CBM1_APPLE := 1 CBM1_APPLE := 1
CBM_APPLE := 1
CONFIG_DATAFLAG := 1 CONFIG_DATAFLAG := 1
CONFIG_BUG_GET_ERROR := 1; treat GET error like READ error CONFIG_BUG_GET_ERROR := 1; treat GET error like READ error
CONFIG_PRINTNULLS := 1; whether PRINTNULLS does anything CONFIG_PRINTNULLS := 1; whether PRINTNULLS does anything
@ -19,7 +18,6 @@ CBM2_KBD := 1 ; 2 weird instances
CBM2_MICROTAN := 1 CBM2_MICROTAN := 1
CBM2_KIM := 1 CBM2_KIM := 1
CBM2_APPLE := 1 CBM2_APPLE := 1
CBM_APPLE := 1
CONFIG_DATAFLAG := 1 CONFIG_DATAFLAG := 1
CONFIG_EASTER_EGG := 1 CONFIG_EASTER_EGG := 1
; CONFIG_SMALL := 1 ; test :-) ; CONFIG_SMALL := 1 ; test :-)
@ -32,8 +30,8 @@ CONFIG_NO_CR := 1; terminal doesn't need explicit CRs on line ends
CONFIG_NO_LINE_EDITING := 1; support for "@", "_", BEL etc. CONFIG_NO_LINE_EDITING := 1; support for "@", "_", BEL etc.
.define CONFIG_SCRTCH_ORDER 2 .define CONFIG_SCRTCH_ORDER 2
CRLF_1 := $0D CRLF_1 := CR
CRLF_2 := $0A CRLF_2 := LF
.ifdef CBM1 .ifdef CBM1
ZP_START = $65 ZP_START = $65

View File

@ -10,8 +10,8 @@ CONFIG_SAFE_NAMENOTFOUND := 1
; INPUTBUFFER > $0100 ; INPUTBUFFER > $0100
CONFIG_NO_POKE := 1 CONFIG_NO_POKE := 1
CRLF_1 := $0A CRLF_1 := LF
CRLF_2 := $0D CRLF_2 := CR
ZP_START = $15 ZP_START = $15

View File

@ -7,8 +7,8 @@ CONFIG_ROR_WORKAROUND := 1
CONFIG_MONCOUT_DESTROYS_Y := 1 CONFIG_MONCOUT_DESTROYS_Y := 1
.define CONFIG_SCRTCH_ORDER 2 .define CONFIG_SCRTCH_ORDER 2
CRLF_1 := $0D CRLF_1 := CR
CRLF_2 := $0A CRLF_2 := LF
ZP_START = $63 ZP_START = $63

View File

@ -14,8 +14,8 @@ CONFIG_NULL := 1
CONFIG_PRINT_CR := 1 ; print CR when line end reached CONFIG_PRINT_CR := 1 ; print CR when line end reached
.define CONFIG_SCRTCH_ORDER 1 .define CONFIG_SCRTCH_ORDER 1
CRLF_1 := $0D CRLF_1 := CR
CRLF_2 := $0A CRLF_2 := LF
ZP_START = $85 ZP_START = $85

View File

@ -5,8 +5,8 @@ CONFIG_DATAFLAG := 1
.define CONFIG_SCRTCH_ORDER 3 .define CONFIG_SCRTCH_ORDER 3
CRLF_1 := $0D CRLF_1 := CR
CRLF_2 := $0A CRLF_2 := LF
ZP_START = $65 ZP_START = $65

View File

@ -1581,7 +1581,7 @@ L3D3E:
cpy #DECTBL_END-DECTBL cpy #DECTBL_END-DECTBL
.ifdef CONFIG_CBM_ALL .ifdef CONFIG_CBM_ALL
beq LDD96 beq LDD96
cpy #$3C cpy #$3C ; XXX
.endif .endif
bne L3CF6 bne L3CF6
; ---------------------------------------------------------------------------- ; ----------------------------------------------------------------------------

11
init.s
View File

@ -398,14 +398,13 @@ QT_TERMINAL_WIDTH:
.endif .endif
QT_BYTES_FREE: QT_BYTES_FREE:
.byte " BYTES FREE" .byte " BYTES FREE"
.ifndef CBM_APPLE .ifdef CBM1
.byte $0D,$0A,$0D,$0A .elseif .def(CBM2)
.endif
.ifdef CBM2
.byte $0D,$00 .byte $0D,$00
.endif .elseif .def(APPLE)
.ifdef APPLE
.byte $00 .byte $00
.else
.byte $0D,$0A,$0D,$0A
.endif .endif
QT_BASIC: QT_BASIC:
.ifdef OSI .ifdef OSI

View File

@ -2,9 +2,6 @@
.segment "CODE" .segment "CODE"
CR=13
LF=10
QT_ERROR: QT_ERROR:
.ifdef KBD .ifdef KBD
.byte " err" .byte " err"