[comp.sys.zenith.z100] ZVTREE Z100 subdirectory display

todd@stiatl.UUCP (Todd Merriman) (02/24/89)

This is a subdirectory display utility for the Z100.
It is adapted from VTREE.

begin 644 zvtree.arc
M&@A:5E12144N05--``3?'Q0``%<28ZF$2@$H```,.Q)HL4)%2I$B(%JT`!$$
MA)4T<^J$80."BIPR95K,H2.GSA@Z=2Z2`1%1#)DT%S^^D9,'!!N(=!HH"-@#
MD@&9.W`F2(!B3`H08][`R2,GS1DT=$`,01-&#ILR<T!`*4-'SQLV9%B`B)$#
M1PV<.A,$F3.G3!LQ3^6`,)/FJ8X$0YXT6;NR39B8,W=**1.G#DJS9=S0F?.6
MR),I(&2X@`%B)0@T1M&4D1,62M,P;:A.)IS@"1PZ:=ZXF0B"2%$[94!,@5-F
M3!JV8^Z&=@,V[]XV;U"/3"*D20LH0T"<D1,&#N0Q0)D2_[@91!@W(R_"81-F
M3)F1=]+000-"2V#MW+7$@`%#Y_#BQZ..45Z=3O/GT0-CO@Z"SION!`T6<1%V
M_(L<+^!@`PAA4?$&&2,U,5E1=KE!8%X)&%$'2!<I]48;;=3A1AJQ@2;:'&$%
M00=U@H6AU1%!R(03"$T$,8043^@`0FE)3`$%$T%D`<))<TP71AY1A4$21VFX
M<49]D[51Y%WT9;<="">0<(),1-1X8XX)M/CB$PE,45`23APA4Y9/6)$`$5BP
M\(011DQ1!!6J?1GFF$V4*182+,"0`Q)C@DE%`C+$P*<""13A!!%-J*C`$&X>
ML=,499R1F6!CBD56'9G!-84.C!9QA%9$;-KIIR`4(6JC6DUQJJ>*[O2$'&<D
M0%X-2\EDQ!!"[,1$&&*4P48"0N3AWDX[@'!%6Q0%56*1.YZ6&AR79>8>90I4
M^FJLY.$``QI4EF%&&'6P00<15`21P*Z]_AKLL`D46T59(YGA&!MOO+%&"V%(
M%L9(936U'E2M=@:KK.-M*U,1@K'T5@)*M`$'L)$62:Q4<KQQ7AL@!,912W"\
M421>.C7QQD:EW16&3BU`DH"BD/J+QEBNI:%%`F2(D<`/+(B@`Q<JN*"""'E.
M_(-P5$5%AK,DL39&P#4G<`(*0_PTA%!$19;44DT]%=5455V5U59=U3!EM0J8
ME@9J1<A1L1QO-7U"$F[8,5$:(_&X1K-GER%ENZ6J[5AF9(5Q1AE4CFS%9FFO
M3;/-)^S5UU]1&8:88HRML'>Q0;CQQG:39>RW6H#/(3CA"@CQG!N3[>1V?@?1
MI99W&SXI'GDGL!###+;#D#L+48Y]!''&B::ZS3#$(`8:O!M1>^\3S\[8><9Q
M&!5N9*0FFDR_H_>&&68L3O#QO!^Q_-Y\0Y\>"-1;S[VM*&WTJA-EX$&']S`D
M`,D`Q1I!W9'RJM6O'/\"D0*84`;4L&$.<*/9'61E/_R5YB\J88E+"N@K$*"`
M,3T`0<4VEP*9M`R`:)@"D8SD/1'PS&=`JQ_?8):&-.C!=2`0P40HPA:MB<"#
M97`9%#PFF-2188$S`,$*0/`$[I4E*1]<#PMEQC>$C61[JLDA")>HA2$5Q4A4
M*M<./^;#!1;1#$<L%72@4+%8\0T*U+$.#,<0DHL(IC3EHE(8YH"&J6EH?C^\
M60/SYQ@TK,2%HJ$#:5Z".J"\X8Z*"LA26G.WH^4-!')[R4GHT!+XE.8P#MG,
M;%`&"1(H2@@1<\/"AN`PL3`A3VQ"P\06.8:[]<\A<QN)V5"C&J6]AD.RN1ZA
M&.8&/9S)6:MIS1.6P+<DF(&(2]`*'"IFG>L$C(!A.%.:9EF&Q*V$;T_@G!RR
M4Q80+/-CSG'0@OX&%=$-+@0'^UP1\*"=MXC,#G=B00XF1D9P;N2*1ZH4W.87
M*%7R[7YB:$ELV$#((TDN8/L$U+8FEKF1Q$\[BJ)F,,<PS,)8"4<Z,IT;4$>M
M2KTSGC-8*-_>E1K)U><^@TL*YQZTDX3V<V+W.YP<YC`;$#@!4[WJZ"Y)^;`@
MG%(&$X-4:EX#`NV<("J4:XQ:>)6;U%1*"6$HPYD,MYEA%O.8<WB#,IF)$3*L
MC&RZRJ$T64`$JL[4FG+`IC:Y^:PK)N4YGEL;^LHY.G3NLF$/0^LZM7-&M\XU
M<(,#@0DRQLZD)#(!1Z#*CB#22*2]DB,8X>0%(FK6.50T2[DQ)0NV<"LA=(%O
MB4V*(VD)+>)(JW-FJ!C&.FNMM/J4!3X-*D:*>DRC1D4/D[D/"JKWK7#1H8-W
M[64"G+`Y(G@+7.*Z*@@T1P>MS&$-:8"#<]92ACL4U0WW](B'L!NPCP8!3USQ
M9[%"NZ/C^A9OJ-&G8``5`_&"`*`"G6&1#'H8A+IA#*:<&!5"@EWTIB8(,LH@
M8^SC7X8$>"N*(NZXS"LN=V:6"*>,+=\@E10(G[3`;L!IYU``8!!D,`;`W4D0
M$*39$P#A!*L4#6KDH-+[K.<RS%&+"((`M(S186F[_.@6DOBR.<1,"UV`+1/.
M.*&B)H59A_2?%-=CQ?E6:@A8V2-#"-ID(RTV)=N-2O_NT!0R'+:L(.B9"DBR
M9.Z\LB0M.`F6_PBPO*3,KC)I0AB*Q(1ZP<'!\$339LD5A"WV4`Z?!:UBV:@V
MC<&Q(?LZ6CD]FMGOVBX(JKQ?L2A<'\D<6KW\;*^4X0L4^5KYH&#%+#R%D*8M
M$-"`"'1#H(M%:@V689E0T5A4GF+`2HW8JZ1F`:FE7-8ZH&6H27EEHB]"%B?O
MM)2<;1\=WA<_.@19A9.>+5&W`Y&B:EG99';94X5KA"*1`7[RZ_93)F;,Y6[.
MN="5;E8S8\CJ/8C1\+S"2D8"!8Z`8,>^)@)*[/AG(8*`U,_F&[^3LI&F#,8Y
M22E/J#^JYR^&D<=4Y)N^URQ!`O^/R?V#-US2-)Y(.W#BK;&/!.]")#%,*#47
MYU:.&XTG&A3!X_GS]EJP74/2M72]+Y7T>P<0T$X3=+Z7G$+`\-HE/[*X(E"A
M@YQO[%ZATA8$=RC#"6AYALVA[R[K452WH0-N.HB[#'B.)PV,`',BKA4BJ6$+
M=);;[)D_!=/L+3NG!UK0H"N*"DE?^GK>HH3[)@#O&Q$11\A]S"'HR`S[,S?!
MJ:(598$FPS9G6"F)*[*+?'T.$\NF9+:)=JUH#GTK27M;VBP3P--!\&P3=9>2
ML&<M\G!:JU9-$LQMW8Y]+"H$YO.32[FNU-1;+3N>_1`#%>2.\\WT3Q>2FD.^
MDCQLVY=;_W:SOTYXQ6N%7D(!01VD^TK4R4_KAX3.Q!&VL;?<>O4L"*F4IS![
MVPL&]_=9?@1;,IK,[/YAO9>*O8,?Y!.X`,71-E2U10='!0(NH%0&>(`:PQ)/
M!7W>UG74IUQ9=7UVIGW<YQC>!S)Y@01A0$ORHB$C(2211#=7QGP2M(#.YV:0
M<$.A!C?X)6]R0&_[-P7YMF_A-RW^!G"@977/L3F;UQBHHW%#4&JGYBNI%GLW
M=1:=`T6T9H3E]6I/-09XX$MU9B^0ED-DP&/5MT'-11+I=EW54R+;%3`\E0`P
M*(/`1X-B,'$#USE#!'"V,V'2=DQL,5/!%GY>=E>^1%RK41UED$`2J%7F!H8:
MDTO<%6IJ""QILFLZ)T(&1XAX@'`@@%L5HRAP$X9T4(5WIGJO=0)@@&(Z)U.@
M,5`N422I\6++,2T:YV@Q4"FF9X;SIG]I6(-RT(9J\898$&3:<C\JMQ-*X$M'
ML#E3(QA%4@=E@#5I-5+=1%0;@2R@5R%J-FO>HH$[X5VG=`)0`@)2IGF3P5;:
MUTU"@A;/L0:5@@77Y&C?A3W"&$C%>(S*P2DSE`#U)!C(R%!K]TUO!%&A!@5U
M0$<;MWX=F!HKU80'9$B(M'"9-82V8P-2!C_T$0,#(HYNL`91X6V%.(:E0R)K
MH(EAUXE0(F54`!D5B7N6)I'DN$OFZ%IXDHX[%8_S2`?UR#=7T%;@I(^Z8F?`
MHI&::(\C@7T7J!8KE8$!LT,/,X12MA=$0D&5EAH$J1XW:%_XQ8@.M`0<<C?;
MMY03A&J0J%Y1B04@F1UJU"NQT8^I<0>Q6!W601;/A).7J#$[R3>:"$,SA)5-
MF6!OT(?6`3=O489G*(OWIH9L>(-N^&^Y&(<!^'1U2#*B$7E]1X7UL@97N"]:
MJ%S,Y871-5TO00<C0CI"6&I$,$=U=(-(J&%JP82F"'_>Y%9R1$<OV9'7&`:@
MZ$!(\$=642(404BGR!XQMHK@]60NZ58Q62PON91M4"D[^9FLZ58\Z1(5^$IW
MX$=/89"40C:*)!FM!$.X`8T0)')I`!475CW3HB2%M$Q"T3FXF1PP-BT"%!`I
MXP.*4H60J2]96&8ZP(_^R'X`25KV1F#R)W+T-Q_OMG+PQ'ZMUV>O-QFQ1VE9
M%1)JE'MQ)*!GPGH.IUC&U5OBPF=R*%I)MR3;=6':THNJIV=5(F5!<$#W@286
M1)8]R21R$&*JIY`T,`-2%J/HF8K-06`<\1QS8`:342E[\3#O-`<VHW/O))"2
M@3%%,I1"L7I21EYB4!V-M)W-MUP`^ADZ58TL]VAE1VE"@CK6I7N[Y%*:IG-S
MYVGT)71DPTIK8$R9DP>5!W:<V')D)V71AY49Z':1)Z9RQW/Q]7.?5E]WA5]#
M\!Q>YVV9XX.I(W`Z$D9$%1MN<`+!)G.+28:\)RR^MW\5BESC4B[^1GRYHTK%
M@GQ$I7Q2RH#!Y4MJRJ9NX*:A5WW,I155IYE"LC'.<09S1AN[M(K7.`>Q62RS
M612U*4@4<0<O`$F3,8JDD2YO<`>\:3OW!XLQZ)?XMH8V>$>#"8>MJ(>(M3G!
M>"#!61$B:6W"42\C052V-7-VV%V-=HUVT*N9Q&*X-*S%:G2`9)L:9#7-FJV^
M6$I38'1)$8QTT*UD4(_%PHU`R10.DIAW"(**,JB"$7V'JDTZ8(V\`YM2]JOU
M*JRE6$BHV!X]"J&L^*Q]^7M_28NVF(.%J:\,`XS<2J[?&I+55FU5=R"(B6V3
MBI#PU(E2)V5U%G5J\11FD!1!(0<<E:^M!:UH6++46HN">8N$J8LPP(M\HS^"
M,XC9R9D*`+`"BXQ[^9L?\ZW#N1UW4:,>NU0FJJXY^YKNBK'!.DBF2+:[";*]
MV9($)8_`J1SVB*AJ@8_4R(G7^)&-""UAZ2VAAZ=4:G\H>8XK.2@[,:AU^Y)@
MZU<KU2-^>%C$57M^57_J4X+S%TXA"`>LL78$QF-^AH/W9&SL"0GNB;,;9SLR
MRC=)F%.-<4P=&V,5Z2":JW%5LEFD>Z"`UD1K!T6$YD:+YS+.X6,MI`<R\9).
M,!\<>2X'(J1-JE@KU9]3JKEPJXJ[]"J:)6'%HJ9/=ZZ4>!_AR:$KT8"%`AU%
MU+R94BSE-H%0)W45,K8K%1AY6"DB-#)#ZD!3$)!`F#'!BU5E=KPQH[R)JY*P
MQ;APX;7TB+>8<X]^I1W.8:)?99PXR;S.BY/%$I>O9!?LE"$8DV%*6)JTJQP"
M=##J:P;L"Z<4BXTH-F&C>#?AJ)&26+_048Z*F\"^^;AWVQ1]!4XK99(:MP7(
M&9IW%&1&.6G^^TK4@8-D`)K>.;;VJW5I@`=5``<\%G8[5F:EBZ!DE02P6UT`
M_$3'-$<%7&5GP)4)L,4ZY+NQ5[H7=J>UJ[U8.J`2:D2*Q6,BA$\RZ8RX04O,
M<D(JD"=HW)DL4`-2E@0$&!6BP08MP1:T-,>;X:.O)FK22Z1-9637A;4WAU^F
M1D$'!#>Q-Y,G4"&+F9455#VOUCF:PZP0FFQVR&SR$W!]]6I-D7:.D7+HNA&V
M1F)$['I<!&@L$*,3`S]?RJG9066]PG;7X4QW54IR1F<XR3>F<YU726"]<@9%
MLB%81)UF*!FX>Q]7BZ=!4B$?"!U:`1KLALU0:H$7!FMV$!K]2!*^9KVFFKI&
M$*"4%WJ7MY?(5H2AK&I!(X<"&+^EG!I/>IW,PH7HBW=R()Y,4GWP&W4'/<$4
M00:+"6>[](HC.X,FV[0H&V0W8`2\^'S``J57_`2H,W'5-[9/,4=)<<HU1Q<,
MR[JO=3LDVFEJDP:CXVH4@JL[D9+QQ)*-R\`PB;?_-`#5QK?.7,>:-1XY?9X\
MVM0)(-3HJ,".^RN0B]3%<C]VL091S';6=9Z?A-)PH-)E,'%AM[L3BD1E%G$;
M3!4%B'TR7+P@5,@0JI`W4#\ZI\@&B16/X;][G;V3#+*GQ-<.1,I4ILO"-HFY
M1<EP(%Q3$!N7[$`$M,@[<A_Z6"G&A5\CVHCWX7X'1V#CB[:M:P,TT)#+:M"+
M/<`)O09<%H,"Y-2=R`7N:@3S`M,D01UTA+]TX%600`"L!J6Q3091D7*0+=F4
MO;_%`F82+!K6D=R^--ESQ-P,8:O,\DIJ9M`5\M+QW,UJ_-G\&]JOAYISP-L@
MJF.]&\Q!-J+%8LQC/+L$G+QXW<EKO-Y_%GM!\!$205`M<<J2##JA9]H$VM91
MY#)[/%^PN]K%$;HC(<B$3&`V^:)I@L@ZUVV1K)OJ^611%MSNF[`K4=R<BY%Z
M4<E!:MU%2IS7U;>=O<8`?803,Y/C"@*O#81,"<I#W&VQ+`==5WP3PX&T9'$#
MG(&>9W4QP,N[E(B_;*#L/<RO*YP7$<^'%#G([(S+K*)/!<VW^I;#;<W2A<VA
MQ,WY1#8.#='N\18NM5`Z5^8<VE868UJ'M=5-0<]B4#$3\K8*D9JW-UT!_K^3
M.P87$1B<A`,Z07Z=XR3<\5T]$`,P9#[20]ARH!6*SAB/U78!7AMRGGKVJ4IH
M$C!/(`5#K<!*X`0S0T:",1RZ&V%#)G%,0#2C;6F7+K<L`%0__$9]+AJ+U2/4
MD8(WEVGN5:9^>J99_C!3@`2?#B>F_MLWF^S#H0.5LNEB@06<?5%8DCW!`]3R
MN*1!X)5?Y=00)F038V$I19*YF9X?2]MX0NM0#DZW[B`\XB.\G@!Z"E-\ZG-U
M!VH[424V@E$@8.U^M#X*D.P8C3K.ODM$*4T!@Y2'9;`[8C+.<1%S]!B3D1I2
MO'99I11R8;ATM!)O%14=4VR_QDD%[T$?;:UIA2Z^@K3V(]P6<D=&@Q(`G)0G
MK`!.1$86LQ-\40<)@-K^9N"`6:U_)G'E$A55)_$7T;"-LA-.A*:5XD1BM#$R
MH0&0D(<:"%I65%)%12Y#3TT`!-\^`@``5Q+[JNY<6@(```SK_$`"`$`'%Q4N
M5`!`,20%B"%OX.21D^8,&CH/T821PZ;,'!!0RM#1\X8-&18@8N3`42.)&SMA
MV*0A`X),FCEK:E*T4X:$E#)QZJ21XQ$$D2=30,AP`0/$"A)6J$@I4@2$F3=R
M0&@IXR8-'31:8\"`T4"!`A(;C*`]0@(`I`$'$P(P$$#3`((\_M51T,A"BP"T
M$C0+T0R$KBF`!8>@!6,P#P%S#/0%$F!=.5!<`"@`5L<`K0R#_0%3!(T`$%$#
M`O!;9($/8`V#%WF8$V#`-D`^Y`0`4$?"L4-:[@+0E3H7!`"TG`Q>1X#6D\%S
M!J2S!V"1#=>`^%2`4*?=(&,>`/%P0:?</^`#%CF@/4[(H%_!`]`YL6(;+#"T
M`MQ##P`0'0*P*$4..A4$$(5Q``0HPX`*!"#./5D,,80XV[P77QT-J.='`+"$
MD1\Z\0#PH!76N?8+(-5=D\L*`,Q#BA>TP+;8<R'(@0%NE0#`W3RPS)&?A:G1
ML0$L=N2W3@4=_@A?D`K`4D9^@3P27'_HE)*@AP&@XTF"`J)S"0"Y-%"=#WH$
MP,IF=""@RH+H%"(BCUWR`4`B#FR8")D!_&-`F;[4$4`N!;1(BIZT&6.`;@`,
M8H!K*Z2CC3^#^$`;`'0XL5]P__Q1AP.P-,!F$`DJP*8.`/Q2G!$)`B"/*T_D
M`D2"7/2SZJI'W%FFGGSZ"2@`_+CXSWH!&*I;`(.XP&@ZA?A3F!0*D%,'`J31
M(L!R%D"A"QN)#89%M-.&H,L;V8:@Q3`:"%I65%)%12Y$3T,`!-]6`0``5Q)&
MK*G)G@$```P[$FBQ0D5*D2(@6K0`$02$E31SZH1A`X**G#)E6LRA(Z?.&#IU
M+I(!$5$,F307/[Z1DP<$&XAT&B@(V`.2`9D[<"9(@&),"A!CWL#)(R?-&31T
M0`Q!$T8.FS)S0$`I0T?/&S9D6("(D0-'#9PZ$P29,Z=,&S%/Y8`PD^:IC@1#
MGC19N[)-F)@S=THI$Z<.2K-EW-"9\Y;(DRD@9+B``6(E"#1&T921$Q9*TS!M
MJ$XFG.`)'#IIWKB9"()(43ME0$R!4V9,&K9C[H9V`S;OWC9O4(],(J1)"RA#
M0)R1$P8.Y#%`F1+_N!E$&#<C+\)A$V9,F9%WTM!!`T)+8.W<M<2``4/G\.+'
MHXY17IU.\^?1`V.^#H+.F^X$#19Q$7;\BQPOX&`#"&%1\089(S4Q65%VN4%@
D7@D840=(%RGU1AMMU.%&&K&!)MH<805!!W6"A:'5$4'(!!H`
`
end

RDYSART@WSMR-SIMTEL20.ARMY.MIL (Dick Dysart STEWS-TE-LG 6125) (02/27/89)

IF, you are going to send a coded program, such as ZVTREE, in this coded form
PLEASE include brief outline describing proper procedure to decode !!!
This will save head scratching time trying to remember which of many hex to bin
procedures to use.
AND, it makes for a more complete write-up.. Why not send ZVTREE.ARC, in .ARC
form to PD1:<HZ100> collection ??
Show me FTP route and I'll help get it up in collection.  GERN, can't you help?

Dick..
-------

GUBBINS@RADC-TOPS20.ARPA (Gern) (03/02/89)

I consider it very bad Netiquette to send Binary/coded/etc programs/files
to a mailing list.  Please Everyone - don't do this.  Send FTP pick-up
info to INFO-HZ100-REQUEST@RADC-TOPS20.ARPA and I will (hopefully) be able
to get it, sanitize, and include it in the PD LIB distribution disks (for
people who can't FTP) and for the SIMTEL20 directory for FTP access.

I also feel that it is not nice to send source code for any program longer
than three screens long to the mailing list.

The PD LIB is geared more for source code programs.   When SIMTEL20 is able
to convert to ZIP archive format, I will again clean-up, resanitize, up-date,
catalog, etc...  all the HZ100 PD lib stuff and convert it to ZIP.

Cheers,
Gern
-------

todd@stiatl.UUCP (Todd Merriman) (03/02/89)

In article <12474562128.11.GUBBINS@RADC-TOPS20.ARPA> GUBBINS@RADC-TOPS20.ARPA (Gern) writes:
>I consider it very bad Netiquette to send Binary/coded/etc programs/files
>to a mailing list......

I guarantee you will never see a posting from me again, on 
comp.sys.zenith.z100.  I am dismayed that, for what I thought was an attempt 
to share useful code with an endangered species of computer enthusiasts, 
would be met with anything but gratitude.  I will, henceforth, confine my 
distribution to the local HUG bulletin board and others who appreciate my 
time and effort.

	...!gatech!stiatl!todd
	Todd Merriman 404-377-8638
	Atlanta, GA

GUBBINS@RADC-TOPS20.ARPA (Gern) (03/03/89)

Sir:

There is a BIG difference to uploading a file to a MICRO-stand-alone-dial-
it-up-BBOARD where users can chose what to download and that of sending a
mystery encoded somewhat large message file to a Defense Data Network Interest
List where it is retransmitted directly to over 3000+ subscribers. This cloggs
up the already grossly overloaded Internet traffic as it goes especially
when other methods (FTP) are in place to handle the task in a proper fashion
to make your work available to even more users that will have the choice of
downloading it or not.   This is the same Netiquette that is used in all
the 300+ Internet Interest Groups.

I have been informed by some associates that your mystery file is a UUencoded
ARC file that contains COM, DOC and ASM source, and that it appears to be
a very nice and useful program.    I am sure INFO-HZ100 subscribers will
look forward to any program submissions of yours in the future.

Cheers,
Gern
-------

FNRJH@ALASKA.BITNET (Robert Jessie Hale III) (03/04/89)

    I just want the rest of you to know that I was pleaseed to see Todd's
attempt to send a real honest Z100 program around.   I do have to say most
people like me don't know what to do with what we got and have little space
for our mailboxes.    I think part of the problem is we should have a place
advertized to send the program.   Not FTP.   I am others I know can never!
get on the simtel20 computer...  Don't know why it is always down for me.
I got on last december for a week then never again.
make that "I and others I know" not I am...    Please contribute to an
endangered species.

                     Robert J. Hale III
                     ISECCo    Director
                     ^---  Space Group.
                     University of Alaska Fairbanks.