From a769f65a13db5546e427989d85f9646303f4fa32 Mon Sep 17 00:00:00 2001
From: mrb0nk500 <b0nk@b0nk.xyz>
Date: Tue, 8 Dec 2020 10:42:10 -0500
Subject: - Implemented support for the Orthogonal extension into   both the
 assembler, and the emulator.

  I finally figured out how I could get support for the
  Ortho extension implemented into the old assembler.

  The only reason for doing this, is to buy me some
  while I start work on the new assembler, and to help
  me get an idea for how to do the same in the new
  assembler.
---
 test/ortho.s | 35 +++++++++++++++++++++++++++++++++++
 1 file changed, 35 insertions(+)
 create mode 100644 test/ortho.s

(limited to 'test/ortho.s')

diff --git a/test/ortho.s b/test/ortho.s
new file mode 100644
index 0000000..bc70d3d
--- /dev/null
+++ b/test/ortho.s
@@ -0,0 +1,35 @@
+.org 0
+count:
+	.res 8
+.org $40000
+mem:
+	.res 256
+
+.org $8000
+reset:
+	cps
+	lds.d #$3FFFF
+	and #0
+	tay
+	xor b, b
+	xor.q count, count
+;	cmp.q (count), y
+	cmp.qo (count), y
+	lea.o (count), y
+	lea mem
+loop:
+	inc b
+	inc.q count
+;	mov.q e, count
+	mov (b+e), b
+	mov a, (b+e)
+	bra loop
+
+.org $FFC0
+.qword reset
+
+a
+;.org reset
+;v
+;q
+d
-- 
cgit v1.2.3-13-gbd6f