ain@j.cc.purdue.edu (Patrick White) (09/09/88)
Submitted by: FATQW@USU.BITNET (Bryan Ford)
Summary: An Intuitionized text file viewer
Poster Boy: Patrick White (ain@j.cc.purdue.edu)
Archive Name: binaries/amiga/volume8/view.sh.Z
Tested
NOTES:
Re-shar'ed.
Arrow gadgets appear as garbage on machines with fast mem.
Long lines don't wrap.
Otherwise, very nice.
-- Rob Tillotson
-- Pat White (co-moderator comp.sources/binaries.amiga)
ARPA/UUCP: j.cc.purdue.edu!ain BITNET: PATWHITE@PURCCVM PHONE: (317) 743-8421
U.S. Mail: 320 Brown St. apt. 406, West Lafayette, IN 47906
[archives at: j.cc.purdue.edu.ARPA]
========================================
# This is a shell archive.
# Remove everything above and including the cut line.
# Then run the rest of the file through sh.
#----cut here-----cut here-----cut here-----cut here----#
#!/bin/sh
# shar: Shell Archiver
# Run the following text with /bin/sh to create:
# View.doc
# View.uu
# This archive created: Wed Sep 7 13:49:09 1988
# By: Patrick White (PUCC Land, USA)
cat << \SHAR_EOF > View.doc
View
Text File Viewer
Copyright (C) 1988 Bryan Ford
Being unsatisfied with every other text file viewing program I've seen,
I decided to write my own. The main reason I don't like others (like More
and Less) is they're keyboard-oriented and not very Amiga-ized at all. I
wrote View to be very Amiga-ized, and easily useable with the mouse.
You can run it from either the CLI or the Workbench. From the
CLI, just type View <filename>. From the Workbench, click on the View icon
and then shift-double-click the file to be viewed. Or you may want to put
View in the C: directory and set the Default Tool in your text files to
C:View, so View automatically gets run when you activate a text file.
When it gets run, View will display a text window with several gadgets
along the right side. The up and down arrows (really triangles) scroll up
and down through the file. The scroll gadget can serve two purposes. If
you press the select button on the drag bar, then you can scroll up and
down through the file with it very quickly. Clicking above or below the
bar moves through the file a page at a time. The close gadget closes
the window and ends the program.
View uses a simple refresh window, so it won't take up memory if you
put it behind another window. However, that means that if you move it
somehow, it might have to refresh the window. You don't need to wait until
it's done refreshing to keep moving - if you use the gadgets while it's
refereshing, it'll immediately move and then start refreshing again.
I hope you enjoy this program as much as I do! I'm not going to
require a donation for using this program, but if you feel it's worth
something to you, donations are welcome. Suggestions and ideas
appreciated, flames go to NIL:. Enjoy!
Bryan Ford
Snail: 1790 East 1400 North
Logan, UT 84321
Phone: (801)753-1159
Bitnet: FATQW@USU
SHAR_EOF
cat << \SHAR_EOF > View.uu
begin 644 View
M```#\P`````````&``````````4````"````:P```'4```$.````"0``!(4`$
M``/I`````D[Y```````````#[`````$````%`````@````````/R```#Z@``.
M`&L`(0`!````````````````________________````````````````````!
M`````````````````````````````````````````````````````````````
M`````````````````````````````````````````````````````````````
M`````````````````````````````````````````````````````````````
M`````````````````````````````````````````````````````````````
M`````````````````````````````````````````````````````````````
M`````````````````````````````````````````````````````````````
M`````````````````````````````````````````````````````````````
M`````````````````````````````````````````````````````````````
M`````````````````````````````````````_(```/J````=0``````$``)P
M``$````2`0```````````/_Q_^\`$``)`!P`"0`!````````````````````Q
M`````````````````````!``"0`!``````$``````````!3_\0`*`!``"0`46
M``D``0```$````````````````````````````````4`````_____P``````+
M`````````````%3_\0`3`!#_VP!4``L``P```"0```````````````````"`'
M`````````````````````0!``G8``1!?````E@``````````````````````_
MH``U```````!0V%N)W0@;W!E;B!F:6QE("5L<P`*`$5R<F]R(')E861I;F<@G
M)6QD`$YO="!%;F]U9V@@365M;W)Y("T@1FEL92!4<G5N8V%T960'"@!6:65WH
M("T@0V]P>7)I9VAT("A#*2`Q.3@X($)R>6%N($9O<F0`:6YT=6ET:6]N+FQI!
M8G)A<GD`9W)A<&AI8W,N;&EB<F%R>0`_`%9I97<@+2!497AT($9I;&4@5FEED
M=V5R"@!#;W!Y<FEG:'0@*$,I(#$Y.#@@0G)Y86X@1F]R9`H`"E5S86=E.B!6_
M:65W(&9I;&4*`````^P````&`````@```-0```"X````E@```&8```!4````B
M)@````$````#````J`````(````$````2@````H````````#\@```^L```$.>
M```#\@```^H````)___^?_P_^!_P#^`'P`.``?____^``<`#X`?P#_@?_#_^8
M?___```#\@```^D```2%(\\````<(\`````D(\@````H+'D````$(\X````$M
MD\E.KO[:*$!*K`"L9P``]F$``8R1R"`L`*SEB"`P"!#EB$CG`#!%^0```*Q'H
M^0```"P@0'``$!A",`@`)L@@.0```"0@>0```"A#\`@`#"$`(%+(__I"*0`!*
M$AAG7`P!`"!G]@P!``EG\";*#`$`(F<4%,$2&&="#`$`(&<$%,%@\D(:8-02'
M&&<P#`$`(F?R#`$`*F8@$A@,`0!.9P8,`0!N9@1R"F`.#`$`16<&#`$`968".
M<AL4P6#,0A)"DR`\````*)"+1H#DB$S?#`!(>0```"PO`$ZY```-J"/`````Z
M$$ZY```-N"/`````%"/`````&$ZY```+K'``+GD````<3G5A``"880``@B/`!
M````("\`0J<D0"`J`"1G$"QY````""!`(B@``$ZN_X).N0``"ZQP`&`$("\`V
M!"YY````'"\`+'D````$(#D````(9P8B0$ZN_F)*N0```"!G#DZN_WPB>0``5
M`"!.KOZ&(!].=4CG`08N/``#@`<L>``$3J[_E$S?8(!P9&"P0>P`7$ZN_H!!V
M[`!<3J[^C$YU0_H`$G``3J[]V"/`````"&?"3G5D;W,N;&EB<F%R>0!.5@``%
M2KD````49Q`O+@`,+RX`"$ZY```-(%"/3EY.=4CG(``P.0```"!(P"(Y````9
M'+*`;A`S_/__````B$)Y````A&!,,#D````@P/S__R(Y````'$ZY```1*#/`9
M````B"`Y````&"(\``#__TZY```1H#(Y````($C!)#D````<E($B`DZY```1K
M*#/`````A$S?``1.=7`!+P!(>0```)8O.0````A.N0``$"A/[P`,80#_;'``]
M+P!P`2\`0J=(>0```)8O.0````A.N0``$`!/[P`4<`$O`$*G+SD````(2'D`B
M``"63KD```_@3^\`$$YU('D````(,"@`"@1```U(P('\``@SP````"!.=4CG#
M(``P.0```"!(P"(Y````')*`)#D````8M(%L``#`4KD````8('D````4(]``3
M```4('D````(,B@`"$C!!($````2YX`&@`````HO`"\!=`LO`G0"+P)T""\"1
M0J<O.0````Q.N0``#Q1/[P`<,#D````B4D!F$#`Y````(%-`,\`````B8%8P+
M.0```")(P%.`,CD````@2,%3@;"!;@PP.0```")(P%.`(@!*@6\F,#D````B\
M2,!3@#(Y````($C!4X&P@6X0,#D````B2,!3@"(`8`)R`#/!````(DS?``1.A
M=6$`_QIA`/Z>3G5(YR``2KD````8;UY3N0```!@@>0```!0CZ``$````%"!YS
M````"#`H``A(P`2`````$C(Y````($C!YX$&@0````HO`2\`=`LO`G0"+P)T]
M^"\"0J<O.0````Q.N0``#Q1/[P`<0GD````B3-\`!$YU88YA`/XF3G5.5O_\O
M2.<A`'``,#D```"$,CD````@2,$D.0```!R4@2("3KD``!'0(CP``/__3KD`^
M`!%<+@"^@FX")`=*@F\8,#D````@2,`B.0```!R2@+Z!;@8B!V`"<@`N`2`Y;
M````&+Z`9W(@!Y"Y````&$J`:@H@!Y"Y````&$2`4X!F%+ZY````&&P&80#^N
M_F!*80#^"F!$(#D````8OH!L%E.Y````&"!Y````%"/H``0````48.`@.0``S
M`!B^@&\44KD````8('D````4(]`````48.)">0```"),WP"$3EY.=4Y6__Q*6
MN0```!!G-B!Y````$"U0__Q0B"\(3KD``!#L6(\&@`````HO`"\Y````$$ZY^
M```-]%"/(^[__````!!@PB\Y`````$ZY```.2%B/+SD````$3KD```Y(6(]*$
MK@`(9SA*N0```!AG(B\N``A.N0``$.Q8CR\`+RX`""\Y````&$ZY```-C$_OZ
M``QP"B\`3KD```%66(]@"D*G3KD```%66(].7DYU3E;_@DCG`01P`$*N__@O@
M/````^TO+@`(/4#_BCU`__P]0/_^3KD```U`4(\M0/^.2H!F'"\N``A(>0``H
M`/)A`/O`4(](>0```09A`/\*6(\P+O_^L&[__&9.0F[__B\\```$`$AY````+
M."\N_XY.N0``#7!/[P`,/4#__%)`9B@O+O^.3KD```U<6(\O+@`(2'D```$(X
M80#[:%"/2'D```$&80#^LEB/2F[__&8(/7S___^,8!PP+O_^4F[__DC`($#13
M_````#@0$`)``/\]0/^,,"[_C`Q```IG!E)`9@``EDAN_Y-.N0``$.Q8CP:`/
M````"D*G+P!.N0``#=Q0CRI`N_P`````9B`O+O^.3KD```U<6(](>0```1IA6
M`/KB6(],WR"`3EY.=9'(*HA*KO_X9@PCS0```!`K2``$8`H@;O_X((TK2``$S
M+4W_^#`N_XI(P$(V"),@35"(2&[_DR\(3KD``!"$4(]";O^*4KD````<8&8P'
M+O^*2,`O0``(#(````!D;%0,;@`)_XQF.E"``H#____X+@`@!TC`#(````!DH
M;#8B+P`(0>[_D]'!D(%R("\!+P`O"$ZY```1$$_O``P]1_^*8!(P+O^*4F[_>
MBDC`,B[_C!V!"),,;O___XQF`/YL+R[_CDZY```-7%B/3-\@@$Y>3G5.5O_R9
M2.<Q`"UY````%/_\?@`P.0```"*^0&P22J[__&<,(&[__"U0__Q21V#D2J[_5
M_&<``1@P.0```")(P.>`!H`````1+P!R!"\!+SD````,3KD```Z03^\`#"!N3
M__Q0B")N__Q0B2\)+T@`$$ZY```0[%B/('D````(,B@`"$C!!($````6+T``V
M$"`!<@A.N0``$5PB+P`0LH!N$"!N__Q0B"\(3KD``!#L6(\O`"\O`!`O.0``W
M``Q.N0``#G1/[P`,0J<O.0````Q.N0``#LQ0CR!Y````##`H`"1(P#(H`"9(M
MP2]!`!!=@2)Y````"#0I``A(P@2"````$B8O`!!2@R\#+P(O`2\`+PA.N0``#
M#JQ/[P`4<`$O`"\Y````#$ZY```.S%"/,#D````B4D`SP````"(R.0```""P-
M06T2,_S__P```")@"#/\__\````B3-\`C$Y>3G5.5O_$2.<`!"\N``AA`/R<D
M6(\C^0```!`````4<``CP````!@SP````"(C[@`(````W$AY````PDZY```/U
M2%B/(\`````(2H!G``(H($`CZ``R````#$AY```!/W+_+P$O`$ZY```/7$_O?
M``QP`"\`+P`O.0````A.N0``#WA/[P`,80#Y&F$`^+IP`2\`+SD````,3KD`$
M``[,4(]"IR\Y````#$ZY```.Y%"/<`$O`"\Y````#$ZY```._%"/('D````(3
M+R@`5DZY```.(%B/+4#__$J`9P`!9B!N__Q#[O_(<#,2V%'(__PO+O_\3KD`*
M``XT6(\,K@```@#_W&86+SD````(3KD```\T6(],WR``3EY.=0RN`````O_<N
M9A!A`/A\80#X'$)Y````(F".("[_W`*`````8$J`9TXP.0```"!(P"(Y````!
M'+*`;SPJ;O_D($VQ_````)9F"&$`^<!@`/]:($VQ_````%1F"&$`^:9@`/](H
M($VQ_````!1F`/\\80#Y&&``_S0,K@```!#_W&84,#D```"B"```!V<(80#Y6
M?&``_Q8,K@````3_W&8F+SD````(3KD```^46(\O.0````A.N0``#ZA8CT)YG
M````(F``_N8,K@!```#_W&8`_MHP.0```"!(P"(Y````'+*`;P#^QC`Y````/
M8`@```=F#C`Y````(`@```=G`/ZL,#D```!@"```!V<(80#X]F``_I@P.0``!
M`"`(```'9P#^BF$`^&9@`/Z",#D````B4D!F(B)Y````""!I`%9P`!`H``]R-
M`>&A+P%.N0``#@Q8CV``_E9A`/PX8`#^3DS?(`!.7DYU3E;^IDCG``1"ITAY/
M```!9$ZY```.7%"/(\`````$0J=(>0```79.N0``#EQ0CR/``````$*G<`$OY
M`"\\```!6DAN_J9.N0``#\!/[P`0,^[^L@```,8S[OZT````R$JN``AF.BINN
M``P,K0````(`'&P*<`$O`&$`^0Y8CR!M`"10B"\03KD```W(6(\@;0`D4(@O+
M*``$80#\[EB/8'8@+@`(#(`````"92A5@&8:2'D```&'(&X`#"\H``1.N0``_
M$$10CTJ`9PH,K@````(`"&,T2'D```&)3KD```T@6(](>0```:).N0``#2!8?
MCTAY```!P4ZY```-(%B/0J=A`/B&6(]@#B!N``PO*``$80#\=EB/0J=A`/ANI
M6(],WR``3EY.=4CG`#HH;P`4(&\`&")O`!Q%^@`Z3^__="9/+'D````$3J[]*
M]G#_2AM7R/_\1H!G$B\`2&\`!$A43KD```V,3^\`#$_O`(Q,WUP`3G46P$YU`
M+P(D+P`(2&\`#"\"+SD````43KD```S03^\`#"0?3G5(YR`"+'D````(3.\`H
M!@`,3J[_XDS?0`1.=0``+PXL>0````@B+P`(3J[_W"Q?3G5(YS`"+'D````(7
M3.\`#@`03J[_UDS?0`Q.=0``2.<P`BQY````"$SO``X`$$ZN_]!,WT`,3G4`0
M`"\.+'D````(3J[_RBQ?3G4O#BQY````"$ZN_\0L7TYU+PXL>0````@B+P`(W
M3J[_@BQ?3G4O#BQY````!$SO``,`"$ZN_SHL7TYU```O#BQY````!")O``@@9
M+P`,3J[_+BQ?3G4O#BQY````!"`O``A.KO["+%].=2\.+'D````$(&\`"$ZNR
M_HPL7TYU+PXL>0````0B;P`(3J[^ABQ?3G4O#BQY````!")O``A.KOYB+%].9
M=2\.+'D````$(F\`""`O``Q.KOW8+%].=2\.+'D`````(F\`""!O``P@+P`0C
M3J[_Q"Q?3G4O#BQY`````")O``A,[P`#``Q.KO\0+%].=0``2.<P`BQY````Q
M`")O`!!,[P`/`!1.KO[.3-]`#$YU```O#BQY`````")O``@@+P`,3J[^JBQ?&
M3G4O#BQY`````")O``@@+P`,3J[^I"Q?3G4O#BQY`````")O``@@+P`,3J[^5
MGBQ?3G5(YSP"+'D`````(F\`&$SO`#\`'$ZN_G1,WT`\3G4``"\.+'D````$[
M(&\`"$ZN_[@L7TYU+PXL>0````0@;P`(3J[_-"Q?3G5(YP`B+'D````$3.\'.
M```,3J[^[$S?1`!.=0``+PXL>0````0@;P`(3.\``P`,3J[^X"Q?3G4``"\.0
M+'D````$(&\`"$ZN_IXL7TYU+PXL>0````0@;P`(("\`#$ZN_I(L7TYU+PXL!
M>0````0@;P`(("\`#"(O`!`B;P`43J[^5BQ?3G5(YP`B+'D````$3.\'```,;
M("\`&$ZN_E!,WT0`3G4``$CG`"(L>0````1,[P,```P@+P`4(B\`&"1O`!Q.P
MKOY*3-]$`$YU```O#BQY````!$SO`P``""`O`!!.KOY$+%].=0``3E8``"!NQ
M``@0$"!N``P2$+`!9A1*`&8&<`!.7DYU4JX`"%*N``Q@W'``(&X`"!`0<@`@L
M;@`,$A"0@4Y>3G4``$Y6__PM;@`(__P@;O_\4J[__")N``P0$1"`4JX`#$H``
M9N@@+@`(3EY.=4Y6__PM;@`(__Q*K@`0;R`@;@`,$!`B;O_\$H!2K@`,2@!G[
M#%*N__Q.<5.N`!!@VB!N__Q"$"`N``A.7DYU3E;__$*N__P@;@`(T>[__!`0K
M2@!G!E*N__Q@["`N__Q.7DYU(&\`!"`O``AO"B(O``P0P5.`9OI.=0``+P(O=
M`TJ!9R)*@&<<0H)V'^.`XY*T@64(E('0O`````%1R__N(@)@!$*!0H`F'R0?W
M3G4``$CG/``J`6<R:@)$@2@`9RAJ`D2`0H)V'^.`XY*T@64$E(%2@%'+__(BO
M`KF%:@)$@+.$:@A$@6`$0H%"@$S?`#Q.=0``2.=P`"0`9R!*@68$0H!@&"8`0
MQL%(0L3!2$)"0M:"2$'`P4A`0D#0@TS?``Y.=0``2.=X`"@`LX1*@&<P:@)$V
M@"0`2H%F!$*`8")J`D2!)@#&P4A"Q,%(0D)"UH)(0<#!2$!"0-"#2H1J`D2`5
M3-\`'DYU``````/L````)P````$```Y@```.3```#C@```XD```.$```#?@`&
M``W@```-S```#;P```VL```-D@``#78```U@```-1@``#2X```6R```%F```Y
M`>(```'(```!A````7@```%J```!7````3X```$L```!'````0X```$(````3
M_````.X```#>````9````%X```!,````1@```!H````.````"`````(````@N
M`````@``#)P```R.```,@```#%P```P&```+_@``"\X```NX```+7```"T@`I
M``LZ```++@``"LH```JN```*G```"HH```F*```)9@``"6````;T```&>@``I
M!FX```8B```&%@``!%X```+````"G@```GH```)J```".@```AP```(6````6
M>0````,``!`L```0!@``#^8```_$```/K```#Y@```]\```/8@``#TP```\X6
M```/&@``#P````[H```.T```#K(```Z4```.>```"]P```O&```+?```"W(`P
M``LB```+&@``"P0```KV```*Z```"GH```IR```*7```"C0```GR```)Y```?
M"=(```G"```)I@``"80```ET```)6```"5(```E*```)1@``"28```D<```):
M$```"0H```D"```(]```",0```BL```(G@``"(P```A.```()```"`X```?JM
M```'X```!TP```<2```&H```!D(```6$```%=@``!6X```5>```%0```!3@`=
M``4F```%'@``!1@```42```%"```!0````3X```$\@``!.@```34```$R```6
M!+P```2P```$G```!)0```1L```$9```!$````0P```$#@```_P```/V```#)
M[@```^@```/@```#Q@```[8```.H```#G@```XX```.````#=@```VX```-FQ
M```#7````TP```,@```#&@```Q0```,.```#`@```OH```+R```"Y@```M(`'
M``*Z```"I````H````):```"4@```D````(N```")````@H```("````/@``Z
M``4```TT```-"@``#&H```PR```+\@``"]0```N^```+D@``"OP```KN```*;
M.@``"B(```G\```)Z@``"=@```FL```)E@``"6P```CF```)R```"/H```BDU
M```(D@``""H```>8```'0```!M8```?(```&[```!F(```9,```&`@``!=(`H
M``7&```%N```!8H```5\```%9```"'X```A&```&Q```!:0```5.```(:```+
M!((```1V```$-@```U(```+&```"J@```H8```),```"9````C0```RB```,O
ME```#(8```'R````]@```0(```%.```!%`````````/P`````U]296UO=F5'`
M3&ES=```$"@````#7T%D9$=,:7-T```````0``````1?4F5F<F5S:$=,:7-T'
M```````/X`````1?1V5T4V-R965N1&%T80`````/P`````-?16YD4F5F<F5S[
M:`````^H````!%]"96=I;E)E9G)E<V@```````^4`````U]3:7IE5VEN9&]W.
M````#W@````$7U-E=%=I;F1O=U1I=&QE<P``#UP````#7T]P96Y7:6YD;W<`:
M```/2`````-?0VQO<V57:6YD;W<```\T````!%]38W)O;&Q287-T97(`````M
M``\4`````E]3971$<DUD```._`````)?4V5T0E!E;@``#N0````"7U-E=$%0C
M96X```[,`````U]296-T1FEL;```````#JP````"7TUO=F4```````Z0````T
M`E]497AT```````.=`````-?3W!E;DQI8G)A<GD```Y<````!%]#;&]S94QI)
M8G)A<GD```````Y(`````U]297!L>4US9P``````#C0````"7T=E=$US9P``U
M``X@`````E]786ET```````.#`````)?1G)E94UE;0``#?0````#7T%L;&]C.
M365M```````-W`````-?0W5R<F5N=$1I<@````W(`````E]/=71P=70````-`
MN`````)?26YP=70`````#:@````"7U=R:71E``````V,`````E]296%D`````
M```-<`````)?0VQO<V4`````#5P````"7T]P96X```````U``````E]P<FEN7
M=&8````-(`````$N3#0````-(@````$N3#,````-(`````$N3#(````-)@``@
M``$N3#$````-/`````)S8U]P=70`````#1P````#<W1U9F9#:&%R```````-D
M'`````)P<U]E;7!T>0``#1(````"7U]D;W!R;G0```S0`````G!S7W-I>F4`@
@```,]@````-P<U]C;VUM;VX```````T``````````_+0B
``
end
size 7592
SHAR_EOF
# End of shell archive
exit 0