summaryrefslogtreecommitdiffhomepage
path: root/samples/tests/stress5.mixal
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2004-06-09 13:13:08 +0000
committerJose Antonio Ortega Ruiz <jao@gnu.org>2004-06-09 13:13:08 +0000
commit6609d3d0d93c7f5fee96dbe8cd9a19acee3bf9d3 (patch)
tree59393ae717462450edd82a856e942bcb3d4ee627 /samples/tests/stress5.mixal
parent0e9f85afc65fbe21a43bf5e78a23ae3277c4f627 (diff)
downloadmdk-6609d3d0d93c7f5fee96dbe8cd9a19acee3bf9d3.tar.gz
mdk-6609d3d0d93c7f5fee96dbe8cd9a19acee3bf9d3.tar.bz2
initial revision
Diffstat (limited to 'samples/tests/stress5.mixal')
-rw-r--r--samples/tests/stress5.mixal17
1 files changed, 17 insertions, 0 deletions
diff --git a/samples/tests/stress5.mixal b/samples/tests/stress5.mixal
new file mode 100644
index 0000000..fce18cb
--- /dev/null
+++ b/samples/tests/stress5.mixal
@@ -0,0 +1,17 @@
+* checking output to binary device
+OUTDEV EQU 1 device for output
+FROM EQU 1000
+TO EQU 1099
+INITVAL EQU 1
+STEP EQU 10
+ ORIG 2000
+START ENTA INITVAL
+ ST1 0
+LOOP STA FROM,1
+ INC1 1
+ INCA STEP
+ CMP1 =TO-FROM+1=
+ JNE LOOP
+ OUT FROM(OUTDEV)
+ HLT
+ END START