Twenex Muddle.

[pdp10-muddle.git] / <mdl.int> / txpure.mid.3

diff --git a/<mdl.int>/txpure.mid.3 b/<mdl.int>/txpure.mid.3
new file mode 100644 (file)
index 0000000..fc80923
--- /dev/null
+++ b/<mdl.int>/txpure.mid.3
@@ -0,0 +1,23 @@
+
+TITLE SETPUR
+
+1PASS
+
+BOT==700000
+
+.GLOBAL .LPUR,.LIMPU,HIBOT,PHIBOT,REALGC
+REALGC==200000
+
+LOC 140
+
+.LIMPU==140
+
+HIBOT==BOT
+PHIBOT==BOT_<-10.>
+
+.LPUR==BOT
+
+LOC BOT
+
+END
+\f\ 3\f
\ No newline at end of file