diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2001-05-16 21:05:22 +0000 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2001-05-16 21:05:22 +0000 |
| commit | 6887958e1e52cd538ff93c710a8aaa646464a1c2 (patch) | |
| tree | fde3c0bd707e349e3d0172f89141734d4bcdec51 /samples | |
| parent | 1b5cc80226de1b22d41bf794878d84346648eeb6 (diff) | |
| download | mdk-6887958e1e52cd538ff93c710a8aaa646464a1c2.tar.gz mdk-6887958e1e52cd538ff93c710a8aaa646464a1c2.tar.bz2 | |
0.3.2 release
Diffstat (limited to 'samples')
| -rw-r--r-- | samples/.cvsignore | 1 | ||||
| -rw-r--r-- | samples/stress5.mixal | 17 | ||||
| -rw-r--r-- | samples/stress6.mixal | 9 |
3 files changed, 26 insertions, 1 deletions
diff --git a/samples/.cvsignore b/samples/.cvsignore index 8856f7c..cfc0045 100644 --- a/samples/.cvsignore +++ b/samples/.cvsignore @@ -28,7 +28,6 @@ stress3.mls stress4.mix stress4.mls stress5.mix -stress5.mixal stress5.mls stress6.mix tape0.dev diff --git a/samples/stress5.mixal b/samples/stress5.mixal new file mode 100644 index 0000000..fce18cb --- /dev/null +++ b/samples/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 diff --git a/samples/stress6.mixal b/samples/stress6.mixal new file mode 100644 index 0000000..a80b7c9 --- /dev/null +++ b/samples/stress6.mixal @@ -0,0 +1,9 @@ +* checking input from binary device +INDEV EQU 1 device for input +OUTDEV EQU 2 device for output +MEM EQU 1000 + ORIG 2000 +START IN MEM(INDEV) + OUT MEM(OUTDEV) + HLT + END START |