Mercurial > hg > Members > kono > os9 > sbc09

diff examples/input.asm @ 57:2088fd998865

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
sbc09 directry clean up
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 23 Jul 2018 16:07:12 +0900
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/examples/input.asm	Mon Jul 23 16:07:12 2018 +0900
@@ -0,0 +1,35 @@
+	;6809 Benchmark program.
+
+	org $100
+
+	lds #$100	
+
+	ldb #'a'
+	jsr outc	
+	
+	
+	ldx #40
+inloop	jsr inc
+	jsr outc
+	leax -1,x
+	bne inloop
+	
+        ldb #'b'
+	jsr outc
+	jmp realexit 
+
+error	ldb #'e'
+	jsr outc
+	jmp realexit
+
+outc	swi2
+	rts
+
+inc	swi3
+	rts
+
+realexit sync
+
+enddata
+  
+	end