mirror of
https://github.com/mist64/msbasic.git
synced 2024-09-21 02:27:33 +00:00
cleanup
This commit is contained in:
parent
8e642aa97a
commit
4a75e2edf8
@ -43,7 +43,7 @@ MONCOUT := $FDFA
|
||||
LC000 := $C000
|
||||
LC009 := $C009
|
||||
LDE24 := $DE24
|
||||
LDE42 := $DE42 ; PRIMM ?
|
||||
PRIMM := $DE42
|
||||
LDE48 := $DE48
|
||||
LDE53 := $DE53
|
||||
LDE7F := $DE7F
|
||||
|
2
flow1.s
2
flow1.s
@ -274,6 +274,7 @@ L271C:
|
||||
sty CURLIN+1
|
||||
RET1:
|
||||
rts
|
||||
|
||||
.ifdef KBD
|
||||
PRT:
|
||||
jsr GETBYT
|
||||
@ -293,6 +294,7 @@ LE68E:
|
||||
bpl LE68E
|
||||
rts
|
||||
.endif
|
||||
|
||||
.if .def(CONFIG_NULL) || .def(CBM1)
|
||||
; CBM1 has the keyword removed,
|
||||
; but the code is still here
|
||||
|
4
init.s
4
init.s
@ -9,9 +9,9 @@ FNDLIN2:
|
||||
; ----------------------------------------------------------------------------
|
||||
COLD_START:
|
||||
.ifdef KBD
|
||||
lda #$81
|
||||
lda #<LFD81
|
||||
sta $03A0
|
||||
lda #$FD
|
||||
lda #>LFD81
|
||||
sta $03A1
|
||||
lda #$20
|
||||
sta $0480
|
||||
|
@ -9,7 +9,8 @@
|
||||
sta TXTTAB+1
|
||||
jsr SCRTCH
|
||||
sta STACK+255
|
||||
jsr LDE42
|
||||
LFD81:
|
||||
jsr PRIMM
|
||||
.byte $1B,$06,$01,$0C
|
||||
.byte "INTELLIVISION BASIC"
|
||||
.byte $0D,$0A,$0A
|
||||
@ -21,7 +22,7 @@
|
||||
lda #$FF
|
||||
sta ($04),y
|
||||
jsr LDE8C
|
||||
.byte $0C
|
||||
.byte $0C ; NOP $xxxx
|
||||
jmp RESTART
|
||||
OUTQUESSP:
|
||||
jsr OUTQUES
|
||||
@ -326,6 +327,9 @@ LFFED:
|
||||
bne LFFB6
|
||||
rts
|
||||
.byte $FF
|
||||
; NMI
|
||||
.addr LC000
|
||||
; RESET
|
||||
.addr LC000
|
||||
; IRQ
|
||||
.addr LC009
|
||||
|
Loading…
Reference in New Issue
Block a user