summaryrefslogtreecommitdiff
path: root/cmpen472hw12_McDonnell/bin/main.dbg
diff options
context:
space:
mode:
Diffstat (limited to 'cmpen472hw12_McDonnell/bin/main.dbg')
-rw-r--r--cmpen472hw12_McDonnell/bin/main.dbg12
1 files changed, 12 insertions, 0 deletions
diff --git a/cmpen472hw12_McDonnell/bin/main.dbg b/cmpen472hw12_McDonnell/bin/main.dbg
index 2a24b35..dead2ce 100644
--- a/cmpen472hw12_McDonnell/bin/main.dbg
+++ b/cmpen472hw12_McDonnell/bin/main.dbg
@@ -152,6 +152,8 @@ CheckInput
lbeq cTypeWrite ; If A == 'Q', branch to cTypeWrite
cmpa #'M' ; Compare A to 'M'
beq cMDCommand ; If A != 'M', Check if MD command
+ cmpa #'G' ; Compare A to 'G'
+ beq cGoTo ; If A != 'G', Check if GO command
cmpa #'S' ; Compare A to 'S'
lbne cUnknownCMD ; If A != 'S', Command unknown
ldaa 0,x ; Load next character but don't increment
@@ -166,6 +168,16 @@ CheckInput
jsr Zeros ; Fill buffer with Zeros
pulx ; Restore X from the stack
bra cDone ; branch always to cDone
+cGoTo ldaa 1,x+ ; Load next character
+ cmpa #'O' ; Compare to 'O'
+ lbne cUnknownCMD ; If A != 'S', Command unknown
+ ldaa 0,x ; Load next character but don't increment
+ cmpa #'$' ; Compare A to '$'
+ lbne cUnknownCMD ; If A != '$', branch to unknown command
+ jsr ReadHex ; ReadHex to Read the memory Address
+ lbeq cBadAddr ; If Z == 1, branch to cBadAddr
+ jsr 0,y ; Launch address in Y
+ bra cNoPrint ; Done with command
cMDCommand ldaa 1,x+ ; Load next character into A
cmpa #'D' ; Compare do 'D' character
bne cUnknownCMD ; If A != 'D', unknown command