ir2 initial release!

1 files changed, 23 insertions, 0 deletions

diff --git a/pu1/code.pasm b/pu1/code.pasm
new file mode 100644
index 0000000..94f37c5
--- /dev/null
+++ b/pu1/code.pasm
@@ -0,0 +1,23 @@
+(1 ar4 con 60 ar2 r4a mem con 1 ar4 con 60 ar3 con 0 ar2 con 2 hlt)
+(2 con 255 ar7 con 2 ar2 con 1 ar3 con 2 hlt)
+
+# init sdl (1000, 600)
+con 0 ar3 con 2 ar2 con 1000 ar4 con 600 ar5 con 2 hlt
+
+# set color to 200,200,0,255
+con 200 ar4 con 200 ar5 con 0 ar6 @2
+
+# save spot
+r8a ar6
+
+# clear screen
+con 2 ar2 con 2 ar3 con 2 hlt
+
+# present screen
+con 2 ar2 con 3 ar3 con 2 hlt
+
+# jump-back
+r6a ar8
+
+# quit
+con 0 hlt