[comp.sources.atari.st] v03i084: xmore -- Configurable "more" for various file types

koreth@panarthea.ebay.sun.com (Steven Grimm) (08/14/90)

Submitted-by: cs325ec@ux1.cso.uiuc.edu (Gregory Lemperle-Kerr)
Posting-number: Volume 3, Issue 84
Archive-name: xmore

eXtended more V1.0 by Gregory Mathias Lemperle-Kerr

	For use with Gemini/Mupfel & maybe Gulam.

	I use Gemini/Mupfel, so I can't guarantee Gulam will work.  If
shellp is past as a pointer to a null null terminated set of null terminated
VARIABLE=VALUE type strings, it will work.

	I originally started this as a more that would work with .PI3 files.
It still does that as well as .DOO files.  If you put the line:

alias more xmore

into your mupfel.mup or gemini.mup or gulam.g files, and place xmore.ttp into
one of your paths in $PATH, xmore will replace the more command.  It will
display degas and doodle pictures on its own, but after a frustrating bout
with .IMG displaying, I decided that there were enough external programs
that do a better job.  XMORE will search through the environment variables
for a variable of the form: MORE???=path\program,arg.  The ???'s can be 1-3
characters or nonexistant.  The extension of the program chosen will decide
which program will view it.  For example, in my mupfel.mup file, I have:

alias more xmore
setenv MOREDFT E:\BIN\MORE.TTP
setenv MOREDOC E:\TEMPUS.APP
setenv MORETXT C:\AUTO\QUICK\QVIEW.PRG
setenv MOREARC E:\BIN\ARC.TTP,v
setenv MORELZH E:\BIN\LZH.TTP,v
setenv MOREZOO E:\BIN\ZOO.TTP,v
setenv MOREPS  G:\USCRIPT\USCRIPT.PRG

(notice the MOREDFT which sets the default viewer if none of the extensions
	match that of the file)

I suppose the dvi viewer could be set up to take dvi files also.

Turbo C 2.0 source.  [Binaries in the binaries group. -sg]

Have fun.

		-- Greg

table
 !"#$%&'()*+,-./0123456789:;<=>?
@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_
begin 644 xmore.arc
M&@A834]212Y#    VR@ $ 8  *$4>!DJ@GP*   ,(]*X&<.F#IDR('C,H4,Fz
MS1L7:'PT4!!P8,&#">F\F0-1(D6!! TBY%$&#YV.$RN&Q*B0(9LT8E!^M"@Ry
MX4(Y L_(5'EQY!@Z>>"4V0FR9\(V>0Z:X1AQXD0V;]R<22"FCIDM.&! &M!Ex
MQ].H4U7,&2/&JX*)=MZD(0-B3A@[9<;**5/&#8JT:U-,3+!G+U2I(,:83;#7w
MS!LY*,;T@,%DQQ@>6;<Z7K%"KX($5*UN&=.EAPH48\6L&)-B,.'+?9PJP,MVv
M[D*Y=.VRMLS7+]C @PL?!I%X<>/'D0=,KKPWP>?0HU/TJ'J5\^#49U>K9=OFu
M<)F#9Q*C"2,'A HW8=J4H=WWLD Z(,R0R7W9+5S8=5&4+DRFAY$W0NV"%\]"t
M2I$@1,QWF1%SA4$&"NJQ, ,-+(16&@A[$5B&@0B2H: ,6@W0(%D")F $01N5s
M46&'=Z"1!ALBKB&&B73(1UL"9Y1!QQC;(4:BB2BB$(**++HXF&MTP&=7A]"Ar
M-1T(U<U%QAMO:,>==_N-MU=Y"9R7WGI[[>5>7&/,%5^'ZMF'7WQ1]O=?@(-)q
M2&&",V"XU89B=/@A5'.(J-Z-)Z:X8AHMIO!BC#/6*-]@)>:I(X]\^K@7D$(.p
MNE>1"EA9THQMP.%D=V+%P$)@-7HWAPSD[54HBKRAD&D(BZ5@@@FF?HKJ"3V<o
MX&=Q:9C!VZF>?4K;5G/148<<=L'080)EL%'G7EM1N15E<\0PV+(K?/KL - En
MT.NO=L5 I&JL(6F=''78M1>-W!DW!QK%L@$'"^/6:%R9[9:K AQRO'%&E*%>m
M1BZF< RV+PCTVKM%##+@T-5>0SS11!-!.$$$""^Y4<9@$0\UQAMMM!&&&V1\l
M04<8)VX!0V<PL%>EK2B@ $</-\E!(V(!WQM>&2R<4+.?J#I1!1-,O$AE C>-k
M 4<>*%3LPL49;]SQQR>R ,<*VIH6=!@M&HVTQAQ[##(;+(@ @@C#5EOLL9<Ej
ML'+,449+AQPHVH7VS!W>--#0*M=[AM-VEUDT6"FHW,+;XODYV-15"V0QQE@Oi
MO34+^%)LN MMGT$'&BROW7;1CU^MM-8G=DCO>6:@($()<X! .A=NB("WO2Q8h
MC?CF3+/1(10EE3$&"C"L?K<)%3>(+AOJ;AM=MTG291(*\<IA[N_JLJNON]_!g
M/67R($RZ!0T'/_^D6/U2/^]@YR4 0AHLF,%&&&>8++?01$_*@LH]@+:VRV@@f
M5N8)+L@*M9\*=EAKJ2OK@<YXE@(^\ %^/<#7BZPWLL4,QC"(28,#T\"#&>P@e
M#91YT?]0D(8Y0.4.94",]=+0A5E=9BLC[(Q&Z@ 'H8C0)%L@88>L-P.2#6YEd
MYTI7]RX#002=[PP.-!_Z4"6#'0CQ#!DLSL]R"#P<[A SHT)(JY@'!Q"@"@3"c
M0M8 E#6 #4Y1AR#H00] <((FR&I5I@(-%?<7QC&>X EG9-5QU@BJ-I)1"G%,b
M(Q/5M8(9I,".)RB"K'9%@ U.:@R50H'[]O@T&I@P 9 H@+(*4#QPV64.ZRH3a
M(U=0 [6Q+3Z3$ARR"G#$'CAKE-7:RB8K]\E+4C$%4)M6M8"V-O8ITB1=(X(1z
MJ  VTU0+4E;2F$"09QXWT $SW#G#&)R7@'T91P7)M ,SG2F65TY/>\J+TL!Ly
MD+T$_&4J;% ?67H !33D80YB"$.=''49.-0A2*(K Q;H4)>#L*4)U@&!%6+@x
M AB 0 QY ,$1YG*&PP2T"50SD3I!P(0R5"J$*&K!$D(H!R[   8WZ.5>-IA,w
MTBBQ.$&C6YFBN86.MB &)33-!HTP!S.D00X+04&9A,6#+)YP .Z$IPB<\ ;Tv
MW"=<9 B!13&JT;*-K0Q:Y*(1 $6&C[$3D@-@ RLOUS@M;G KVF1#"VHHQA- u
M(8]9;8$,.A.K) S2@"D+*U=C!0>PSFP+6AUK5],@JZT@BP#%PXY,X3:MHXX/t
M95A]JU;7>@(BN%4\<#TI6=]XU@/N%;&#72P9#EN&Q**TJV^HZP#NFE<F/78\s
M?3464D^(5^M,2HTZ9!Q?M3A+L8FV.#F=@^B<0!>V; P$R:R#>(PYU!N$H*C6r
MDA&V<$<D&@A834]212Y46%0 VR@ -P0  *$4I!M=-1(&   ,9;#0*>.&3!DRq
M(-J\D5,&A)48+F" $),'Q!&&9Q96;!*&#IHT8>: 8%*F#9PR<MB4:;$$I9P&p
M"F#"3&!D(8@Z<QK>2>/18LDT;M*\:%('CIDR;$"82!@FCYB&1^JP"=/&A4P%o
M"9+<S.FS#5"A1(TB90%BSAL06L>$<7."#H@S=<+(63L0JE2J(':R27IGX1H7n
M(-":@3D'#5(V<$"D$0DGI-N0(,* @/,&Z$ Y(.B<E>Q&:M+.>S.C].JFX\&Rm
M9=R^,0,"=-++I$V3@6DEB)0D080P*=*C-I,J13+G.5F6CAR@9^:0Y9DW3>B^l
M<OY>S0IB89HS0,/LK3B'CMR!"#TNCBQ2LD*&F=%TS/M&*D+H:YKW= $ER0P0k
M9IR7F6-501*WW3F7%!EO[)?>>I#=<1AY(+A Q!-/X*<??X$EP5H>[4U6AUL>j
M-<0&4&7H<)5V((ET7D-XG'B596=A6 =F;11U%!LNQ)B836?\%%2-156'&5Q3i
M576&A"HI%UE!DTTU!HHGND ''8FQ"-,;;C2T&@@N8M:81R(!!0()4 1!!1)Dh
MI;B03@*"P! <2C;484)G@C#&&VVTL189@*'EEEYLP$3&8FPV!8)!9T!VYZ!Og
MO$&&2I.E,08=+QI(I6)TB/3&'6Z0)<:&D9EQ663XR8&3<1TA-U%[=,"TTWQ)f
M-''$H(!.E0=R9&EET!AI&!2>>AP:AIZ"Z!'4WAEH@% &'I>5EA0<<KQQQEQMe
MS &31^L1".I33Z($@AIOB)$G%DT\(45P?*(FUQC%>M1L'<2FUQ!!=J31K!MMd
M$.26'7*!)$:1,)EADV3X'A?&OE:R]J:_<K2A PCACOL#) /TL"4:7##K++0Lc
MR'5&GE08!L+# YP@DEIN3-10#"W, !.Z<H7Q*$J68N8&E<<NYIT;='#L\;$#b
MN3%'&I->^:;%S^*%[ALYE5SNK;F6H>I'Z$[6;-%M-!=:O&7<06F>-6%V+%5La
MEK%<R6U49..,/":6GTJU@J">'2&.^"%D)X)@)D.$I08OP^(608015(!0A Y<z
M")&$$UPT7(0+5% !1=X]V\'WN \.(3CA5!31!!153.%"$% \KD!.D4]>!!58y
M!#X$X4%40<437$1111)#+!&[%4D4<05]4AP!^=Z*VV;YX(4?SH7PC#O.@AV_x
MNR&YXDQH@<3EQ2,>/1+)0[%\\\_WK06$U!N.^/=/9+_]Z'H[;SH44P1V!.&=w
M#W$;%%1P$?_\5/#N>TP*H# S'8YRD\<4][? W0%JQ2*=2-YD$#.$02KW2D/6v
MM)4&ULRL2M4QV,Z019"?44E:6+$3':)&+=5HL"%K*T,*KJ*5.12%,EQA8+Q u
M@#5@R:D];$#(4U#CEAYI)C-A6$-#R###%):'#6;I#TRH\"(QG,5R,HA(6=HCt
DAR4IIDMN& ,;ZJ K)?(/"6& &W[JX 8O)B !+6B!13 "$QH s
 r
end