Boot into BASIC
BASIC command to switch to WOZMON
This commit is contained in:
1 parent
deef96a6bc
commit
7033104799
3 files changed
+8
-7
No files matched your search
+5
-6
@@ -9,21 +9,20 @@ SAVE:
|
|||||||
ISCNTC:
|
ISCNTC:
|
||||||
lda $BC01
|
lda $BC01
|
||||||
cmp #$03
|
cmp #$03
|
||||||
beq @break
|
beq :+
|
||||||
rts
|
rts
|
||||||
@break:
|
:
|
||||||
jmp STOP
|
jmp STOP
|
||||||
|
|
||||||
MONRDKEY:
|
MONRDKEY:
|
||||||
lda $BC01
|
lda $BC01
|
||||||
bmi @skipped
|
bmi :+
|
||||||
sta $BC00 ; echo
|
sta $BC00 ; echo
|
||||||
@skipped:
|
:
|
||||||
rts
|
rts
|
||||||
|
|
||||||
MONCOUT:
|
MONCOUT:
|
||||||
sta $BC00
|
sta $BC00
|
||||||
|
|
||||||
rts
|
rts
|
||||||
|
|
||||||
.segment "WOZMON"
|
.segment "WOZMON"
|
||||||
@@ -31,5 +30,5 @@ MONCOUT:
|
|||||||
|
|
||||||
.segment "RESETVEC"
|
.segment "RESETVEC"
|
||||||
.word $0000 ; NMI vector
|
.word $0000 ; NMI vector
|
||||||
.word RESET ; RESET vector
|
.word COLD_START ; RESET vector
|
||||||
.word $0000 ; IRQ vector
|
.word $0000 ; IRQ vector
|
||||||
@@ -1,5 +1,7 @@
|
|||||||
init_token_tables
|
init_token_tables
|
||||||
|
|
||||||
|
keyword_rts "WOZMON", RESET
|
||||||
|
|
||||||
keyword_rts "END", END
|
keyword_rts "END", END
|
||||||
keyword_rts "FOR", FOR
|
keyword_rts "FOR", FOR
|
||||||
keyword_rts "NEXT", NEXT
|
keyword_rts "NEXT", NEXT
|
||||||
|
|||||||
+1
-1
@@ -46,7 +46,7 @@ int main(void) {
|
|||||||
|
|
||||||
printf("6502PC Emulator with MS Basic\n");
|
printf("6502PC Emulator with MS Basic\n");
|
||||||
printf("CTRL + G to exit\n");
|
printf("CTRL + G to exit\n");
|
||||||
printf("DF6AR to jump to BASIC\n");
|
printf("WOZMON available, BASIC at DF6A\n");
|
||||||
|
|
||||||
clock_gettime(CLOCK_MONOTONIC, &emulationStart);
|
clock_gettime(CLOCK_MONOTONIC, &emulationStart);
|
||||||
|
|
||||||
|
|||||||
Reference in new issue
Block a user