From 3394c2ace3a2c555cce22095f66cfc258873d8c0 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Thu, 5 Apr 2012 22:32:25 -0500 Subject: example asm file from the spec --- examples/spec.asm | 28 ++++++++++++++++++++++++++++ 1 file changed, 28 insertions(+) create mode 100644 examples/spec.asm diff --git a/examples/spec.asm b/examples/spec.asm new file mode 100644 index 0000000..3000d44 --- /dev/null +++ b/examples/spec.asm @@ -0,0 +1,28 @@ +; Try some basic stuff + SET A, 0x30 ; 7c01 0030 + SET [0x1000], 0x20 ; 7de1 1000 0020 + SUB A, [0x1000] ; 7803 1000 + IFN A, 0x10 ; c00d + SET PC, crash ; 7dc1 001a [*] + +; Do a loopy thing + SET I, 10 ; a861 + SET A, 0x2000 ; 7c01 2000 +:loop SET [0x2000+I], [A] ; 2161 2000 + SUB I, 1 ; 8463 + IFN I, 0 ; 806d + SET PC, loop ; 7dc1 000d [*] + +; Call a subroutine + SET X, 0x4 ; 9031 + JSR testsub ; 7c10 0018 [*] + SET PC, crash ; 7dc1 001a [*] + +:testsub SHL X, 4 ; 9037 + SET PC, POP ; 61c1 + +; Hang forever. X should now be 0x40 if everything went right. +:crash SET PC, crash ; 7dc1 001a [*] + +; [*]: Note that these can be one word shorter and one cycle faster by using the short form (0x00-0x1f) of literals, +; but my assembler doesn't support short form labels yet. -- cgit v1.2.3