diff examples_forth/forthload.asm @ 57:2088fd998865

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_forth/forthload.asm	Mon Jul 23 16:07:12 2018 +0900
@@ -0,0 +1,11 @@
+* Load Forth into RAM.
+	org $8000
+	ldy #$8020
+	ldu #$0400
+	ldx #$3741
+movloop	lda ,y+
+	sta ,u+
+	leax -1,x
+	bne movloop
+	jmp $400
+	
\ No newline at end of file