madd@bucsb.bu.edu.UUCP (Jim "Jack" Frost) (01/31/87)
Enclose is the newest version of MORE.COM. I apologize to everyone
that got hold of version 1.0 and had problems with it. Honestly, I
didn't think there would be a problem that was related to machine size.
The newer version has a couple of new things. First, it can hold about
three times as many lines as before. Second, it prints the percentage
through the file if it can. Third, I fixed the bug for machines with
more than 512K.
For those of you who missed the first posting, MORE.COM is designed
for your PC and acts much like the UNIX utility "less". It is designed
to run on near-compatibles (like Tandy 1000, THE PC+, IBM PC/XT/AT,
and Leading Edge). It should run on most of them. The only reason
why it won't run on all MS-DOS machines is that is uses its own screen
writing functions to improve its speed by several times.
For those of you who sent me mail: thank you. I read everything and
attempt to reply to it. Our mailer has been busted, so that's been
spotty. Basically, I'll look at your suggestions and may implement them
if I have the time. I do have source code online now, so if you want it
just write and give me a good path back to you (preferably around the
harvard mailer, which spits back everything). I'd appreciate any
modifications being sent to me and not just posted. This way things
stay neater. I'll post same-day if the modifications check out ok.
Several people responded to my original posting saying that my program
ran very fast under fansi-console. Note that since my program bypasses
every screen output routine, it runs that fast anyway. I don't have
fansi, so I program around it.
Enough said, here's the uuencoded version. Feel free to distribute it
to anyone. It is copyrighted, but the message is plain -- it's legal
to give it to anyone, so long as you don't sell it. Enjoy!
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
- Jim Frost * The Madd Hacker -
UUCP: ..!harvard!bu-cs!bucsb!madd | ARPANET: madd@bucsb.bu.edu
CSNET: madd%bucsb@bu-cs | BITNET: cscc71c@bostonu
-------------------------------+---+------------------------------------
"Oh beer, oh beer." -- Me | [=(BEER) <- Bud the Beer (cheers!)
-- cut here --
begin 644 more.com
MZ7DLD)#-JT-O<'ER:6=H="`H0RD@,3DX-2!"3U),04Y$($EN8P($`+%7`#PS
M`````````````````````````````````````````````````````!1$969A
M=6QT(&1I<W!L87D@;6]D95`9`?\`#P<'<`\'!W`.!P=/+HHG"N3Y=`Y#+HH'
M4.C8"%C^S'7S^,-Y`/\'"78+QP82`&X`+L8&E`$`OB``)HL$+J.5`2:+1`(N
MHY<!^B;'!,0!)HQ,`OOK(AY0,\".V,<&(`#;`2ZCD@%8'R[_+I4!+L8&E`'_
M+O\NE0'H-``N_P:2`2Z`/I0!_W7P+J&7`?HFB40"+J&5`2:)!/LNH9(!`\"C
M$@##B\.+R.,%Z`,`XOO#48L.$@#B_EG#5;0/S1!=.@8&`'0&H`8`Z:$`5;@`
M!HH^"`"+#@0`+HL6:@'^SO[*S1"T`HL6!``R_\T07<-345)5Z$$`M`:P`8H^
M"`"*[HH.!``NBQ9J`?[._LHZ[G4",L#-$%U:65O#4U%25>@6`+0'Z]-0H`$`
MH@@`6,-0H```H@@`6,.T`S+_S1##4U%25>CR_[@`!HH^"`"+RBZ*%FH!_LK-
M$%U:65O#Z/@"+J!M`3S_=095M`_-$%W&!@0``,8&!0``Q@8)`/\\![=0LP"^
M;P%T(+YW`3P"=!8\!'("L`.S_SP#=`VW*#P!=`<RP+,`OG,!H@8`B!X'`"Z(
M/FH!+HL$HP``+HM$`J,"`%6T#\T0.@8&`'0'H`8`,N3-$%WI6/_#4%-14E97
M59R&U@,6!``N.C9K`7,-+CH6:@%S!K0",O_-$)U=7UY:65M8P^DO!^@O_XK"
M*@8$`/[`,N3#Z"'_BL8J!@4`_L`RY,-;/!EW!"ZB:P%8/%!W!"ZB:@%8+CH&
M:P%S!?[(H@4`6"XZ!FH!<P7^R*($`/_C)!^H$'0$)`\,@(`F"`!P"`8(`,,D
M![$$TN"`)@@`CP@&"`##5:,,`,<&"@```,<&#@```,<&$`#'`*`)`#+DS1`S
MVX@>(`"T"\T0_L>T"\T07</&!@D`!+@_`>O'Q@8)``7K],8&"0`&N'\"Z+7_
MN`\`ZT8D#XHF(`"`Y!`*Q*(@`%4R_XH>(`"T"\T07<-5BAX@`(#C[[0"@#X)
M``1T`K0!.L1R!2K$@,L0B!X@`+<!BMBT"\T07>O(58O8M`O-$%W#6[E_`H`^
M"0`&=`.Y/P$]QP!W`Z,0`%@[P7<#HPP`6#L&$`!S`Z,.`%@[!@P`<P.C"@#_
MXUM:65.T#`O)>!P##@H`.PX,`'<2"])X#@,6#@`[%A``=P15S1!=P[0,HQ0`
M7UA:6XD>'`#HE`")#A@`Z.,+DEM7B1X:`.B#`(D.%@#HT@N+V#O:?CN+P@/`
M*\.C'@"+RT'H<P"A'@`+P'X4`\(#PBO#*\.C'@"A&``!!AP`ZP<#P@/"HQX`
MH18``08:`.+2PXO#`\`KPJ,>`(O*0>@X`*$>``O`?A0#PP/#*\(KPJ,>`*$6
M``$&&@#K!P/#`\.C'@"A&``!!AP`XM+#,\DKPW0%>`)!PTG#45*A%`"+#AH`
MBQ8<`.@?_UI9PXO8N-TTNA(`.]-S&O?SB]CD8:@#=0@,`^9AL+;F0XK#YD**
MQ^9"P^1A)/SF8<.16U_K*5!1L033Z`/865@E#P##.]IU`CO!PP/!`]KKY2:+
M100FBUT&4`O#6,-;!U.)/B8`C`8H`(O!!0<`NP`0<@(SVR3XZ+S_B\B+T\<&
M+@`B`(P>,`#$/B(`Z,+_="7HL/]S#8D^+@",!C``)L0]Z^GH<P!T"2O!&]HE
M#P#K-B;$/>M4Z&``B\>,P^B+_Z.*`8D>C`%14HO(B].+Q(S3@^L.Z%__,\#H
M:/]:67<#Z6\),\`SVU-0)O]U`B;_-8O'C,/H5/^+^([#)H\%)H]%`B:/100F
MCT4&!@;$-BX`)HD\)H]$`@?#!@;$-B8`)HD\)H]$`@?#D5M?ZP%;!U.+P2:+
M#2:+50(%!P"[`!!R`C/;)/CH[OZC*@")'BP`Q#XB`(O'C,/HZOYS5R:+!2:+
M70+HWOYS!HOXCL/K[@:+\8["_S8L`/\V*@`FB00FB5P")H]$!":/1`8')HD-
M)HE5`B:+100FBUT&Z#P`=`,FQ#TFBT4$)HM=!B:+#2:+50+K)HD.(@")%B0`
MB_F.PB:)!2:)70*+R(O3H2H`BQXL`":)100FB5T&HS(`B1XT``/'C,,#'C0`
MZ$O^Z%;^=5&AB@&+'HP!Z$K^=#$&B_&.PB:+!":+7`(FBTP$)HM4!@<FB04F
MB5T"H3(`BQXT`.@I_B:)100FB5T&,\##B3Z*`8P&C`%7,\#\N00`\ZM?,\##
M,\DSTC/VQ#XB`.@"_G0(Z!T`)L0]Z_.+Q(S3@^L0Z-/],\`K'HP!<@/H`P"+
MPL,[\W,"B_/HT?V+R(O3P^C`_XO&PUL'H8H!)HD%BQ:,`2:)50+_XUL')L0]
MB3Z*`8D^(@",!HP!C`8D`#/`Q#XB`+D$`/SSJ__C@#Z2`0"P_W4*M`'-%K``
M=`+^R"4!`,(!`*"2`<8&D@$`"L!U(C+DS18*P'4,B":2`;`;"N1U$+`#@#Z4
M`0%U!SP#=0/I?`<RY,(!`%A:4%)54NC[^5@\#74&BA8$`.MH/`IU"_[&+CHV
M:P%R6^L_/`AU"CH6!`!T3_[*ZTL\!W4(M`XR_\T0ZT52M`DR_[D!`(H>"`#-
M$%K^PBXZ%FH!<B>*%@0`_L8N.C9K`7(:_LY2N`$&BCX(`(L.!``NBQ9J`?[.
M_LK-$%JT`C+_S1!=@#Z4`0%U$DSH)O]T#$SH.?\\$W4$3.@Q_UC#6%I0M`7K
M$Y!86E"T!.L+D+0#Z`4`,N3"`0"`_#UT%(#\/'0/@/P^=#*`_(!T1U7-(5W#
M5E&+-GH!BPY\`8,\`'0+1D;B]UE>N`0`^<-9'@8?Z-K_'W("B01>PU%6BS9Z
M`8L.?`$Y''4$QP0``$9&XO1>6>NYBS9Z`8L.?`&+'`O;=`FT/NBF_\<$``!&
M1N+MPS/`HW(!OT`"B3YZ`8D.?`$SP!X'_/.KCL`FQP:,`&(*)HP.C@#HH_?&
M!I0!`+XF"K\V`1X'#A^Y'@#\\Z4&'S/`HY(!HH`!HX(!HX0!Q@:!`7[&!C8`
M#<-3"&P(GP@]"44)30F?"&P(___!`/__@@#__T,`___$`/__Q0#__\$`````
M``````#__\$```````````#/4U%25U8RY%#_%CH!7E]:65O#4U%25U9,_Q8X
M`>ON58OLAUX"+HH'0PK`=`7HT?_K\X=>`EW#Z.7_#0H`PSQA<@8\>G<"+"##
M4(K$Z`$`6%#0R-#(T,C0R.@!`%@D#P20)Q1`)^N:"N1T"/FX``!X`O[(P^A.
M`5Z,R"X#1`8N`T0(+@-$"BX[!@(`=@/I1`&,RRX#7`:.VRX#7`@NBQ8"`"O3
M+CM4#'($+HM4#(OZN/[_@>H`$',+B\(%`!"Q!-/@,](#TX[2B^"C=`$SP*.*
M`8D>C`&C(@")'B0`5\0^(@"Y!`#\\ZM?+O<$`0!U#8S(CL`#WRO8M$KH^?TN
MBT0"HW8!+HM$!*-X`2Z+!"Z+3`Y15NA8_EY9OT`"`_D#^8D^7@$NBT00HV`!
M`_@+P'0+QP9:`0``Q@9<`0")/FH!+HM$$J-L`0O`=`O'!F8!`0#&!F@!`(/&
M%%8SP([`)J$``*..`2:A`@"CD`$FQP8``#(0)HP.`@#W!G(!"`!T#";'!@P`
M\`\FC`X.`/<&<@$$`'0%Q@:4`0''!GX!T!`SP*.(`:*6`8L.8`$>OUH!Z!<7
MBPYL`1Z_9@'H$!?&!OH!`.BB]L.T,.@K_0K`=`'#NE\,ZP.Z30P.'[0)Z!?]
MNG4,M`GH#_VT`.@*_4YO="!E;F]U9V@@;65M;W)Y)$EN8V]R<F5C="!$3U,@
M=F5R<VEO;B0-"E!R;V=R86T@86)O<G1E9`T*)%`>OUH!Z,(7'K]F`>B[%S/`
MCL"AC@$FHP``H9`!)J,"`%CW!G(!`0!U!;1,Z)_\M(#HFOS_-G8!N`(]4!X'
MCAYX`<M;+HL'"\!T-1X.'PX',]*+!PO`=`93`]A"Z_2+RUN+\X/&!(M_`COW
M=`LKS@/Q`_E.3_WSI$IUX\<'```?@\,$_^->+CL4=06#Q@__YE!25K^6`3+`
MBN"*!0K`=`-'Z_57"N1T#H#\.G0)@/Q<=`3&!5Q'1D8NB@2(!49'"L!U];@`
M/;J6`1X'Z`#\B]A?7EK&!0!R*2Z)%+@`0C+MBLZ*\C+2Z.7[67(5M#^-5`\>
M#A_HU_L?<@>T/NC/^^N*LO!6Z:@"6^A2`5.^M@"_E@$>![D@`/SSI<-,_Q8V
M`<-;65.*T(KQ_LK^SNF+]8O0"])T!.@6`)-;*^!,B_P>#A\6!_RJD?.D'__C
M,]*_@``NB@TR[4<SV^,/+HH%/"!T!#P)=01'2>OOB_?C#RZ*!3P@=`@\"70$
M1TGK[XO'*\9T!$-*==*3PX@.Y@&)/N@!6X\&Z@%96%-1N[8`Z/("ZR.(#N8!
MB3[H`5N/!NH!6EB_]`&/!8]%`H]%!%-0D;NV`.CW$%G$/N@!5XH6Y@$R]I,M
MM@`KR'8-1R;&!2#^QCKR=!7B\Y&[M@"*!T-')H@%_L8Z\G0"XO%?)H@UPS+`
MZP*P`:+G`8D^\`%;CP;R`8\&[`&/!NX!Z$<`4S/`N[8`.`=T,#@&YP%U#NCP
M`G(AQ#[L`2:)!>L2O_0!Z`42<A"+]\0^[`'\I:6E,\`X!W0$DRVU`,0^\`$F
MB07#N4``ZP.Y?P"_M@!8B_0VBA0R]CO*=@*+RD)&O[8`'@<6'_SSI`8?Q@4`
M`^+_X+0LZ#[ZB0[^`8D6_`'#6XS:B_<?7P?\\Z2.VO_C6XS:B_<?*^&+_!8'
M_/.DCMK_XUM97P?\\ZK_XY&,VEM?!UX?_#OW<P<#\0/Y3D_]\Z2.VO_C6UA5
M'E!74XOWCMC\K5"MB]BMB\BMB]"MB^BM4*V+^*U0K8[`'UY8PYP&5U6+[,1^
M"ORKB\.KB\&KB\*K6*N+QJM8JXS8JUBK6*M;@\0$'UW_XSO!<P'#LI#K=I`[
MP7P%.\)_`<.RD>MHD(O$*\%R%#T``G(/L033Z(S1`\$[!HP!<@'#LO_K29!;
M6)U3@`Z4`0),Z%;X=`1,Z&GX@":4`0$\`W0!PX\&A@&#!H8!`KH!`.LC,\"&
M!H`!PX`^@`$`=0'#BA:``;8!ZPQ;6)U3L@2/!H8!M@)2Z+3Y6J&&`2T#`(<&
MB`$+P'4+4E+_-H@!_Q9^`5J`_@%S%.@=^EY##0I5<V5R($)R96%K`.LPQ@;Z
M`?]W"^@"^@T*22]/`.L.Z/?Y#0I2=6XM=&EM90#HZ?D@97)R;W(@`(K"Z`WZ
MZ-GY+"!00ST`H8@!Z/?YZ,KY#0I0<F]G<F%M(&%B;W)T960-"@"P`>FY^\($
M``O`>0+WV,-0Z`@`6]'HF??SDL.+'OX!BP[\`5-1BL>*^XK=BNDRR=#8T=O1
MV5@#R%@3V+CI8@/(N!DV$]B)'OX!B0[\`8O#PPO`>0;WV,8'+4,R[;H0)^@5
M`+KH`^@/`+ID`.@)`+(*Z`0`BLCK%#+)_L$KPG/Z`\+^Q?[)=03^S70&@,$P
MB`]#PS/`@#\DN@H`=0.R$$-0B@?H,/F*R%B`Z3!R)8#Y"G(2@/H0=1N`Z0>`
M^0IR$X#Y$',.4O?B6G(1,NT#P7/.ZPF`^A!T!(O(`\G#B@^`^2UU`4-1Z*K_
M67()@/DM=0+WV/C#/0"`=0:`^2UU`</YPUL'B_<FB@PR[4$KX8O\'@8?%@?\
M\Z0?_^->+HH,,NU!*^&+_!X.'Q8'_/.D'__F6HK!B]PVB@\R[0/90S;$/XOT
M.LAV!8K(-H@$01X6'_SSI!^-9P3_XEL'B_<R[2OA3(O\-H@-1QX&'Q8'_/.D
M'__C6S+MB_0VB@0RY"O!B_X#^`O`="=Y$8OG-HH,01X6'Q8'_/.D'^L4-H@,
M`_D#\4$>%A\6!_WSI!]'B^?_X^A%`+@!`'0!2`O`P^@Y`+@!`'4!2`O`P^@M
M`+@!`',!2`O`P^@A`+@!`'8!
2`O`P^@5`+@!`'<!2`O`P^@)`+@!`'(!2`O`
MPXO\@\<$-HH-,NU'B_<#\3:*%#+V1HO>`]J*P8KB.\IV`H?*"\ET"QX6!Q8?
M_/.F'W4".N!:68OC4?_BCP:&`8O\-HH5,O:+]T8#\C:*#`+1<B8VB!0R[2OY
MB^=!'E86!Q8?_/.DB_Y>3D^+RD']\Z0?1XOG_R:&`;(0Z?W\CP:&`>B#]XO(
M6.AR`4B+]#:*%#+VB_P#^BO0=A4#\#O1=A,#\8O1'A8'%A_]\Z0?ZP(STH?W
M-H@4B^;_)H8!6XO\-HH%,N0#X$3_XX\&A@&+_#:*%3+V1XOW`_(VB@PR[4:+
MW@/9,\`KT7(>0`O)=!E"'A8'%A_\45=6\Z9>7UET!T!'2G7Q,\`?B^/_)H8!
MB`X``J,"`EN/!@8"CP8(`HDF"@*,%@P"4\0^!@(&5P;HVOVX`0!0H0("2.A"
M_\0^"@(&Z,?]Z/7^Q#X&`@;HO/W_-@("
N/\`Z"7_Z.#^B@X``NC7_>E7_Z,$
M`EN/!@("CP8&`H\&"`)3Q#X&`@97!NB*_;@!`%"A`@)(Z/+^H0("`P8$`@KD
M=1+$/@8"!NAL_5"X_P#HV/[HD_ZQ_^B,_<-;6/[(=02&Q/_CB1Z&`;(0Z;G[
MB_0VBEP",O\VBT`#BN"P`3:)0`/#6P/BB_0VB@0ZP708,N0#\(O\,NT#^9%!
M'A8?%@?]\Z0?1XOG_^,*Y'4%"L!T`<.R$>EP^UM:B_>#[""+_%$6!_P*[70'
M,L"J_LUU^QZ.VO.D'UFT("KE*N%T!S+`JO[,=?O_XUN#[""+_!8'N1``,\#\
M\ZO_X^CO`#8(!\.16UA3*LAR%C+M08KAZ-L`BLPV"`?0X',#0[`!XO3#B_1&
M1C:+?"`VCD0BBM4R]@/R,NT>%A_\\Z0?PB0`6XK5,O8R[8OT`_(#\8O\@\<@
M._=T#DY/'A8'%A_]\Z0?1XOG_^.X`0#K`C/`Z)4`asf@sbcs.UUCP (02/04/87)
The recent posting of this program came to our site short and sort of
chewed up (lines within the uuencoding were not complete). Could it
possibly be reposted if this has happened at other sites (otherwise
could the author e-mail me a copy)?
Sorry for posting this rather than sending mail, but our news program
doesn't seem to like sending private responses.
Thanks,
--
Alan S. Fink
UUCP: {allegra, hocsd, philabs, ogcvax}!sbcs!asf
ARPA: asf%sunysb.csnet@csnet-relay.ARPA
CSNET: asf@sunysb.edu