From 7f4de0b8dc0a55e2e29e5550ad99a0869f72fe5d Mon Sep 17 00:00:00 2001 From: Lars Brinkhoff Date: Mon, 12 Nov 2018 14:24:14 +0100 Subject: [PATCH] Original files for VIEW. --- Makefile | 2 +- src/kmp/kmp.teco | 36 ++++++++++++++++++++++++++++++++++++ src/turnip/view.1 | Bin 0 -> 11341 bytes src/turnip/view.start | 1 + 4 files changed, 38 insertions(+), 1 deletion(-) create mode 100644 src/kmp/kmp.teco create mode 100644 src/turnip/view.1 create mode 120000 src/turnip/view.start diff --git a/Makefile b/Makefile index 7edcd12c..bce87f3a 100644 --- a/Makefile +++ b/Makefile @@ -26,7 +26,7 @@ SRC = syseng sysen1 sysen2 sysen3 sysnet kshack dragon channa \ draw wl taa tj6 budd sharem ucode rvb kldcp math as imsrc gls demo \ macsym lmcons dmcg hack hibou agb gt40 rug maeda ms kle aap common \ fonts zork 11logo kmp info aplogo bkph bbn pdp11 chsncp sca music1 \ - moon teach ken lmio1 llogo chsgtv clib sys3 lmio + moon teach ken lmio1 llogo chsgtv clib sys3 lmio turnip DOC = info _info_ sysdoc sysnet syshst kshack _teco_ emacs emacs1 c kcc \ chprog sail draw wl pc tj6 share _glpr_ _xgpr_ inquir mudman system \ xfont maxout ucode moon acount alan channa fonts games graphs humor \ diff --git a/src/kmp/kmp.teco b/src/kmp/kmp.teco new file mode 100644 index 00000000..4d82f3b7 --- /dev/null +++ b/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  diff --git a/src/turnip/view.1 b/src/turnip/view.1 new file mode 100644 index 0000000000000000000000000000000000000000..e225e643631e38daf1e719a2956d5e5107b79e29 GIT binary patch literal 11341 zcmdT~X>S`xnx088z)G0}&X;5dguE|3&Pwu-ZITx4fOecXIwn>mUsB>j;~`pPwb)X# zo9sifjQr;L4f{M*)dxk|g9U;GmI&fjSH1UHZ*~2aG;cNKPz@seaI3z&T*tfL;U{%q zTFQU?Lw?Lo5=kTR{CAQ>W0m@28b|;5D7)4nyB%pg7Xdo5prvujyntzX7aAY7~ z?ESbT-R6!uZhqTd+VQbFj8gHUEF6l8<0wufG1w-tN>qHV3?PJ%bOc7?6F+nVvscC{ zN!$~)RP52RYGwQmDsC>&@$*=nh#Lgaz)k%qwECY@uE=y#zLU+78@q#4#WIM-V;3^U z${m&l!L}`I+fv8b$v7H95dG5v$aDuwJAr#bDBlNEbw9?ZO|X zqjf?ggP1xa(v;W@W^GWo7N85RUjq6k<)4gF!VUdo62K4_emF!d@Mooag?(WZzE^QX zGr8Crt3evYmwH#e?KQToy79>>^;XprSg_W&2;X2Q{rw_}huVVheA)72aT9STlQ^2h zzMH}o@S0}VVQSbh6g6+l&9-=nsKLm@aZ*DV;fG}LOTsWulTsgqHv9kiLiS+^Y|eLY zMd4}+{SM9wE0LjQGmR!NSbdp94Q4*!g_j_QAn(;~gwo1hNzZ>nforQd%Ez7#{l|v~ z4Y(5WO%O$ALa)HK1Q>4oRgTF1yHmPht>@j%+H!r%`(&kE>)i;n6hN~3vCx`fZxhA7C@lNIasWgA^KKcA#pZ?*$ zYG*R?-tEd~y`LZN?b*%!mEC{I=e3Ht$zc`1l z4xJYG&zYj8mFH$bDx~71?^35_C?n3QVE3zFaI?0iU_vwpz2C|O(lLG1o@W_)z4a@q zO@9Zj-(Op4ulH(=cB|v`6np?bI6u{{twFqrRm4nu;2oLd{|yYE@S>hutbTQc>oZ$> zzT-S%D$7;zhDnKqS79)d9EKoKGTj4P-_d? zXR#^N_o&sB(CP&KLUOdS3?r4W13(5(%JS-^D{uNYR(5an;aGj$#DBkBtFNw7FF6`u z)AeEGk5LVO zsLpFm*ktSuMmVL^*5PhkLM6Zt?pDC7bDgT}#uAC9O*Ew3L5brtWeekJB&b{0A5tt-}84@I_Nj6+vz=!@OHjk6Jc^gZ`YZrUgYMN@EE5B z-QF1`&h-j#J!=phYPy^gna;CSM)%z_#Uq`GNRwI(uM4xNRwA;nn#REAkV9q^9mX}k3;k?X`JcdL2mjY_A>-`VH;g#Dp6nA zO>fJXR<3L=gR`<3{ZuWxGq)M9b&zqzxUqJquv5!67Hsb5&0MjY=OXE`v&j=3cnOFnn_9}c1d3J$ z}ls??5K03f*hj-VJ=5?Rm>21Zq7{mz$JyO3v@<5oad12&GiBX zGrE=2vonIyTZ}xp-}L-(wVU%9ZAm^X%*TR|bO@ipP>tk|Zzv3Qc3`)0vk9jAk=I{& z(`=UAfR8yGW>##Fp`_ks$;D0u;Oj zlmKQ;*~)fM1M%zm`_1M{&Tw;Hb8YEmD|;DFDR0v97S zgG6!ufQB5yL!dyN0B?|pB9nhgn^Oh%`bdZkJ|ZQC(p~r#j)wpM|N3MhcR+Re@^&W> z=T^Jbx^2|f`$x8)<6%3Rq!>kE`U~K1tirW#?vt>{c)!_h;aCb4v{v@Z)FJ!sB_y7} zN@xr*NBSl~XPb^BfZ>R+rNOo4R`$Osq?Xe{Y{uwxpTt}V{Q<-P6XOqgn&X@vt?a%9 z52YRw@Lx<(4S7s~y$q*l_JfOD7UKd!3`P|+*<{F>ENgN;ibn-7e!mDut6@}`M^IrG zwDw3_cCc-NXt6kTv}(iZX$!XvnQq>=pgF-z4l}PJbQkgQgXd?P6}Ql^E?Yl)djZvA z9fp{0HaFVsmV@BC{=HMy6&kWdqx9{C^G=p?-WWmQLA;!}(!dxD{I)uTG{ZwbAQV2d7aPdBo z?}Z~{ys;RbSDB-~8_qQZw)8MTeH~?eL{FbrCh)^Ptcsx3$6Z9m@*n$A+<(+R!NItn zMtb#F;T9$2UY(1ae*a+N4iq(^J$;+SxAF%bQHU> zA6zcL^d+>_f8L*F*y=1J^`uhL_?6?l~S&DxO$3aL^W@#1$9`b)c`9B6zqXdT3;gX;^cb z?;*{!bt>LT85#h4?7>@g8m`tNOuQLj1~$4P6QJ^`RLV<&2xa&q$;8O{A978e$>fTh zg$vEgszXeKLFr-mVR@jWrrR(VKgW@-4zNR6Qoxj9ya^o@khw*GKp(45P#Sd!);$0& z$1vp5cQYR})aSB`K4R8Tx%1BRZ_eHFe`_jKVhD|bSaHGJT#QQ2Bu8%GHBE^9j`l^g z%buVRTLoD|J(}^~J*w%Miv36zeZ+o4f z^bv{T;*R52H#8!ja%V}N&)TbUzn<;Q7V=PkQ0G-TLikUzElM7KOz>^;aDwWE3+X1= z06k<3j?=3?I>!f+ZW)#f*)S}8Dw`Ow%N6IGRX*z|iK0=$uekKeO;FI@My}QKHJfTb zLiS5}F4K<^eQt=BV<5~cXD;1}?8@u5i9%IEbHm{bdG(U=hP5)EU{j|T*jaJ(KjS0v zvyW!&G&)A1_mv*>5EpKJuD!YT(;u$wnQOxu+N6n1Te$Xt`S(!+Wst=QYz6l#+O8#J zh*=7lCi&wm$XhCnu=wPo>aTLhQ{K57Aff7xjfin)s{0>m9Bu&ii`=B8y18pEPjTUh z%OI_Y&%U;Iox4wee8y7q^><(O9`B$;-+azLMQ*M+`o8(Ln7`2~+&z5#Y&-vJquXh< z8V$l#-rrp3dhg~}D9c~p#Pe6Wc;);Qn#|{b9FwDG3)MT;hLUqW;RTwo>ob?ZkAjqH zY{(j}vySoQ%_Y=?b_$=+@LM1q1t_@a*GgP?%OcC~ggA^x4~2Ri>iei|%w3apTGP1w zuX1j@k9GR`HTcU5^#bi>ZB<9}f&S#7_A9j=3h!`D7k7;qBC`>6L6GKu%1UzK<0jo) zDf+sXoAoVnNnr1U4;JuAl+Pl0SWe*;_w~V4-!=`#v%W((V0g%XEc~_!a@#5_P-}e$ zQy_iuTOQE~4?O(8LBl7!@Q&n|bKOew&v0@1X^G1VK-0T(s~O1=%rc@6OH}*6Ig4Za zx3{{DmS2Lth@!FSjrhsOB*^d$5I#k+GgJ8i(f8Yb@{Fc)&)@#?8wNX;Dh>c(nBT|* zsN(3F%_&|iP-E>cx4Jyb>$Tc%81GrYgHePdp`MN{R7FLyr&)f2bcaKHzJ*Z@{tKlG zHQc$Qd1|y|+-kJO#q@BgwbotlEpbExO!ei?y-sJN>ohjFuU*;K*86~XEZxQi{^0J` zMz`C_cXukgJ9@WsjAC$xYnuX~bN9}@jh18BxKjbRqX8z-Tc7;>a86w1Jt*Gl9}!sA8ifraU=5`lt3mt-pK$B@6G2muqC+gg9_k00n*&< zZtow0>!#0SrQ_WEf@#m{Y7VptM36CTM*dj$+yTBjAnW;D2}aSM?%dU<*F}uL6mulZ zEz{eUcyIF*WGV1lB2G~B{r4cwJgc8*Wv@ns?JC)3`+ zi?;J(TDrz=A0NBme4u>;I-dBZ6HZ4cFVOSdITXf8a<(7^J;L1KBgY$m<+)*k`dnYW zHwO;@44NzOv?vn}{>9*(U&*1a(boWuTv~>Sm4Nf+3it?F8EJ80lufs^PuPzhI)b}z geUE5#PoPDvWG1l{Q{~ha+lrPVCTq~#9tQdU03sNm1^@s6 literal 0 HcmV?d00001 diff --git a/src/turnip/view.start b/src/turnip/view.start new file mode 120000 index 00000000..880f06db --- /dev/null +++ b/src/turnip/view.start @@ -0,0 +1 @@ +turnip/view.comprs \ No newline at end of file