fix commands

This commit is contained in:
stid 2019-12-28 13:48:56 -08:00
parent a877122710
commit 145e00f85c
2 changed files with 7 additions and 4 deletions

View File

@ -1,4 +1,4 @@
// BasicUpstart2(start)
BasicUpstart2(start)
#import "mem_map.asm"
* = $8000 "Main"

View File

@ -38,6 +38,7 @@ backspace: {
}
exec: {
.break
lda MemMap.SHELL.buffer // Check first char
cmp #'!'
beq stidExec // if ! is stid mon command
@ -52,15 +53,16 @@ stidExec: {
lda MemMap.SHELL.buffer, y
cmp #'h'
cmp #$48
beq cmdHelp
cmp #'r'
cmp #$52
beq cmdReset
done:
rts
// STID Commands
cmdHelp:
print(helpString)
jmp done
@ -242,7 +244,8 @@ helpString:
.text "r : hard reset"
.byte $8e
.text "z : zero page params"
.byte $8e
.text "----------------------"
.byte $8e, 0
#import "mem_map.asm"