Original files for VIEW.

src/kmp/kmp.teco

@@ -0,0 +1,36 @@
+! -*- Teco -*- init file for KMP !
+
+-1 fs ^I Disable 
+et FILE > 
+
+fsxjname-(f6NT)"e oDone'
+
+fsxjname-(f6DUMPT)"e
+  fj j :s:"l ftUse JCL 164000.fsexit'
+  1fs fnam syntax
+  0,.k [1 hfx1 et KMP; DSK: FOO START  et 1  ]1
+  e? "n ftFile not found? 164000.fsexit'
+  "# fsdfile[1 fsrgetty"n@'ftReading file "1"...!''! ]1 '
+  er  @y hfx*fs^REnterw :i..L fsrgetty"n@'ftDumping... ew  @ej TS 
 
+  fsdfile[1 fsrgetty"n@'ftDumped to "1"!''!
+  164000.fsexit'
+
+fsxjname-(f6DUMPE)"e
+  fj j :s:"l ftUse JCL 164000.fsexit'
+  1fs fnam syntax
+  0,.k [1 hfx1 et KMP; DSK: FOO START  et 1  ]1
+  e? "n ftFile not found? 164000.fsexit'
+  "# fsdfile[1 fsrgetty"n@'ftReading file "1"...!''! ]1 '
+  er  @y fsrgetty"n@' ftAttempting to macro buffer... :m(hfx*)'
+
+@:iJ|
+  fsversion:\  [1
+  fsuname  :f6 [2
+  fsjname  :f6 [3
+  fsdfile      [4
+  :i..JTECO.1 (2 3) Default= 4   |
+qJ fsmode macro
+1fs mode change
+:i* mJ  fs ^R Display oDone'
+ 
+!Done! 0u..H 

src/turnip/view.start

@@ -0,0 +1 @@
+turnip/view.comprs