summaryrefslogtreecommitdiffhomepage
path: root/samples
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2005-09-20 00:29:32 +0000
committerJose Antonio Ortega Ruiz <jao@gnu.org>2005-09-20 00:29:32 +0000
commitb5d17603c0512aab528db2c511f4b0b92c5681a9 (patch)
tree39db645301c90557902d5f8a5078aae75e658579 /samples
parent1c67dd553c547d330c2a248d29a359f946915a2f (diff)
downloadmdk-b5d17603c0512aab528db2c511f4b0b92c5681a9.tar.gz
mdk-b5d17603c0512aab528db2c511f4b0b92c5681a9.tar.bz2
New sample mixal
Diffstat (limited to 'samples')
-rw-r--r--samples/.cvsignore1
-rw-r--r--samples/m.mixal25
2 files changed, 26 insertions, 0 deletions
diff --git a/samples/.cvsignore b/samples/.cvsignore
index a2deabf..249a1c0 100644
--- a/samples/.cvsignore
+++ b/samples/.cvsignore
@@ -19,6 +19,7 @@ echo.mls
hello.mix
hello.mls
log
+m.mix
mixasm
mixvm
mixvm.core
diff --git a/samples/m.mixal b/samples/m.mixal
new file mode 100644
index 0000000..ae69b42
--- /dev/null
+++ b/samples/m.mixal
@@ -0,0 +1,25 @@
+X EQU 1000
+ ORIG 3000
+MAXIMUM STJ EXIT
+INIT ENT3 0,1
+ JMP CHANGEM
+LOOP CMPA X,3
+ JGE *+3
+CHANGEM ENT2 0,3
+ LDA X,3
+ DEC3 1
+ J3P LOOP
+EXIT JMP *
+START IN X+1(0)
+ JBUS *(0)
+ ENT1 100
+1H JMP MAXIMUM
+ LDX X,1
+ STA X,1
+ STX X,2
+ DEC1 1
+ J1P 1B
+ OUT X+1(1)
+ HLT
+ END START
+