d.sites and displaying labels

Chris Lesher clesher at ag.gov
Mon Aug 8 13:15:17 EDT 1994


Mike,
	I have a quickie program called d.sites.label that
I wrote at one time that does what you want.  I must apologize
for the total lack of documentation but it's pretty simple
to use:

$ d.sites.label help

Usage:
 d.sites.label sitefile=name [anchor=name] [color=name] [font=name]
   [width=value] [height=value]

Parameters:
  sitefile   Site file to display labels for.
    anchor   Direction beside site to place text
             options: c,n,s,e,w,ne,nw,se,sw
             default: c
     color   Color to display text in
             default: green
      font   Font to display text in
             default: romanp
     width   Width of letters
             default: 10
    height   Height of letters
             default: 10

To extract the program save this mail message in a file and
use the uudecode comand to un-encode it:

uudecode filename

This will create the file d.sites.label.tar.Z.  Then do

uncompress < d.sites.label.tar.Z |tar xvf -

----------
Chris Lesher (clesher at ag.gov), LNK Corporation
c/o USDA Foreign Agriculture Service, Remote Sensing Branch, Wash. DC

begin 644 d.sites.label.tar.Z
M'YV09%S,24.GS!P7;,*(*</F!8"'$"-*G$BQHL6+&#-6A,'Q1HT:(`!PA!'#
M!HR0'&/(N$$#Y<B7(T'`J&%#1 at P:-6/`D"$SQ at R3-@"`J*&QJ-&C2)-2K#.'
M3A at Y(F&P,8BF#%2E$]FX68/5(LR345^&[$JVK-FS:-$&'%CP8,*%#=N$2>/&
MQ9BT>,^.M$&C9=B28%.N]/L5Q at V2-F32M(E3!HR^/6D<OB$41M[+F"\R=0J5
MX]0Y5:^:U<H5[U>78C.K7LUZ]0L5/6++GDV[MNW;N'/KGJT@@6\0P$&L)6 at 0
MH4*&"G8K7\Z\N8H7"D;0'<.F#IDR('@T)<,FC1 at 7:'Q$GU[]>O8S:0Z&'^^&
MNG7LVNF02?,&O'CI[<O#ETL'C7T%T5UG!EW8$5&$$4%4P0057PSQ!!-/2`&"
M"&?(4489;H at 08!D#NE'@@0DN^(413SA!Q81RO"&7&W!H.(*`!()@(((*,GA%
M$D10@<2$.KD(HX<R at ECC%T at 4D<012)PH0H\;=O at AC2(^88014Q2A9`T^<ACC
MC"$R"`4300Q11!-%F#CA&!HJ(!==*#QUQA at L@."F'2DH0!<=<LKQY at X*C('&
M4R"H,.<67?"YAP+`-25''6/@^00<=-#G1J!LE?'%&Y#&*6A[:+PAQZ69!CK&
M&VQX"BH=FIKQAAMTG,IGHG0LVB@(CT:Z:J!WI$%&?Z=J6E4:9Z#1*J9TO`J"
MGX"J4.F`4QF+K!R!R at 7''&44BR@(1B3!1!&4$O>%&6082\8;=8 at Q%0AEA-%4
MG&YXVI^S?T*KPG5SC&'LG2#@P4(>][)Z+*F>]HLG'9BR(,8;=!#<!@M3F8&J
M',`*"R^@N;HQ[AU?N!%&&V5LP5>AURK**)Y#,,3&%U6%008(%J*WZL3RAL%I
MP-?BF^NN:,3Y:[#6`O=LH*JRRN>UXY9[+A%?U/$%P5^0\46*=Z!0M+EEI!`G
MTDHS[?2H;$A-+M4I""R<'&%@7.D7;S&$`K[Z]I9`<,'AFP<+;L,-'+YOF&$&
MM:C6;;?-NO9']V]_^[NSL(._73B>7'N:N-W'Q at OTJGT3#O?/*A2$1^6*7RZY
M"G`D-$89'+,:-H#`'?$%>@.Y05";>MJQ!0Q=G!ZRM\2"T`,(JO]H*;&2HG!Z
MHKA#VH(/:Y21A^X3+IO&5"(8>S:QQ].1!QS8[4Y%%E`4\<445$B1A!-'2%\\
M'<=;&$<=:5BX\NY9%#&%^06=>CR]8T`,J:3,BS`%<2!@%G8()ISTA"X,RTL;
M&^800$^Y('JHD]/,/I6[W?5.2QXZ5?"&)T$_F8IZR%->_V3F03E`$#@D[!0%
MC><#ZV&/>=OKWO?"-[[R72N%'V2A^MCG/N8YX0G&PN$*T><#_.G/5I/:G0B(
MT+XR-(I_"QF(>2H%`@(><'15+,/F3MA!%=K/!S*;PQVLPCPN#>E+81I3F:@0
MQ`E^$7BK8J`2X>0&%LR!!65 at P1U8X"$^[I%:=KP#!*_5N"$R[X).TN"JA.<L
M@`WQ>,E;WAP=R<5"?M&%V0-!#+T'/O&1KY&E>J0/=MC$]X'@AZ#,(1&-F(;]
MW4J)0W!D%=]0P#D<<'F:PQ-=*NG(+X9QC-#:G1E%Y"`(26%HP`G:L"!UR*9A
M\'>N=`,CKZ7,+T:R?\KD8C5!B$D8<H^3-/PD-2GW15+V<'>H'">KOLC*:/;/
M")2;92UOF<7- at 6"7QMHF"W])1F$*240D,A$R07`S7E60=\Y,)!RER<&"HL&:
M(E2B0[GHT$M>+Y.;_,+XJ%"$(Q3AF->J*`C-6093IA,X(F5A.Y'8ORL$#@T@
MR!L(II(PJ\R!HB_UI1O$V,\@0<E&.-+10`^W3#Q9,*$$4B1#C454B$IR0D3E
M8E.Y>5%ORG"C'?TH4\L0L:*FKPSK*Z4/@7BMJ:K4(/EK)4N5B`2N\BRF9IAI
MM0HBAYMNM:LZY6DP?=HE(AD)26P$4,W,@`+5P>$IU)(#[-X4ISFEH$YPT^+K
M8F`[XA5$@,R;WCYW"DQC28MOS>R0TP2(`A&<K3M-N6F<G#>5.(E`!`U]*?/"
M0+`TH""E1.2G'#A(U-G6%@5FS2UGK<)!93)/G\+5:RKWBK18A3$A]2LD"BP)
M0MUR,`V$+:3N=@>#%(#@4)>3Y>YB8*P^1!"[*/ALM;9[2 at 4QP;O@#8X9X``Q
M5A%V.U:1 at VN'TQ;CP$4'((AE'=BPLG;A"5,8`D&E&(C9$AR$"QD:'-Q86S5C
M`4>R=$`!9<L;02'.UHW5':X<!GHV<(46P6[XPH(O16`44#A.ZJ7#=>_K+1/'
MIKU,>.]WKY5,^M[IOO+)KVM%^P7JO(%:*B8.@`5,8!`8.*;8F]2"`_@\[#@8
MPB*0<'`HS$'@6(@.=9"#-&7`0?->2W5GJ):*U5RQBZ'`!"V35&5!(`508:AI
M$+.#5:8)'*3QK0YP0$%WC86T-+=J#&'^0IMO2Y>+96QC%;Z6G]6,Z$\MNLUO
MP)C&.,;!0JNY7A:Z,Z:C9@*"P2%.)CA8PE2$ZH:A"@1P[BH'Z\PW13<ZTR at P
MM<$0IC"&<>AALA[H'=!0912T(`8@",%1#9WD at KBXQF1`=;K6!>MVR4%PL,;?
M8W<,-_1.FPX\B/.J7##&IH"`#WQ`E[KH,,HRN*PNWSXW'W@,-VOW)]SNEI1`
MR-4?>3O97>$1=UWLC0;(VLW"Z%H@=N(+-SPP;VVFP]K2WM"T(I,*!=_N<G">
M"G$92UQK3\,UP34.'#*0S6S>4B`*]#6W&NCQI2P@*@L*R0)EL@!_+!"BQLT+
M')[3N<BE0K+)TZ!GQ9[.O*U)NM*7SO2F._WI4(^ZU*?.W^(H\`5'D$OR!#CU
MR^P%,G\QB4M4PA+4P(0&,IB!8G+2F,>TA"0U0'L,*M/UND-D,T^)RF="@Q;2
MY.4T88F)W0=/>*.,(#J\T[J6SJ4J:%7=+<=A0W0`Q(0D"$%^S",!"HB0A"F@
M,0N5%X)W-2^%((#OHZ$?/0H<%*$A.,$*J0>!YH_0^=13OO,GVIW)R]9L2RG0
M!;1<4UW>H``H'*$)F4>!$,;WA2`P`0I("$*#FD"$%+S@\?Y%C@(T;_PFI`#`
MFJ\\^%0?>OG5*0&:'\(0R$\$(X#I"%/P;@MH20(@`"?\N">_Y<V_?124/_X`
M=GA],A4RHP.](0=M``(M(`=Q]01"H`0NH'E!(`5#@`3>I0)^H``Q4`,ZT!9T
MQ3!IP"$*,`=Y,`<JTP9TH0,JH`,E88!. at 3TJR((WX()C(`8Q&`,X8(`G>(,Y
MH`,GJ``(1C8$(P<QZ!@&"#%S4(0Q8(`K8(!R,@:C4@>LH@,OP!1R\`+=(095
MR"APH(-UT!\Q:`,LN(1!\(55P2II,`:TQ3]34"XDV!2D0X5T4(,O(`8IV"<I
MX at 8Q.(,WH0-#D(<@T(9B\(8%T094:(4O<((OD#^K8H!LT(4KF(,JH0-,$"-0
M4%]T%8AN6(*%B'U7MWLH5S^_=Q>%9Q1?1Q at I(79107:H"!,R8!+(-A-L5Q-N
MUQ.3$10R48I2AW>=(154815]MQ5_!Q-FQQ%CH8O(J(NOT1S,V(S.Z#:*`XJ]
MAS:19Q?)X8S8F(VX\1QVXB_2>%J1UW'Y\CAQXR]SXS=WXR]YLS?50H[IB"<.
MY8[W9#ANA3CH.(^,XTCRB#DV=X^8DTO[^#E71#H8(F,*$%_X0@;Z0@;\4C/^
M,@=O(#:ZIFJ]YFHL`#$\(S93X09G\"X15&=M\`9Z]@4*,0<KMR^SMC1:U"H#
MH0=EP&@XHS/U*&/&0FM.83%/L36.-%V.E)+*A`+*-&=UQFRY]`4'@P>YMI*H
MIFNP1I&L!FL6"6L8*2P<M)$="5.[,Y7HXVH#]1H at T`1O,!]F@$M5`0)P<&0$
MP3_7$67SP9$Q-2G]@1WK"%HRLS(#63IXPHV)0DN[TW$I@`)>8S15,Y?5\@(Q
MX`(T<!,SYF*Q, at 9M$&AW69"NE2'>=6/=Q6W!H9`]T`)6V1\O(`,(QY";29@]
M`P)]D'#4<D]`)@>."9FB0Y"LXEHW59G<!5_TIIF<B2%7^9FAF0<]0)HK0%3E
MA9K8 at 5Z*TIHH$)FQ.2%E`%OL=9D,)QQX\)MZPS>]V0-$Q9O7<IH,D9K&V9B/
MF9ROB9>N)4BT*1.V"3>X29JYR9$>J9Z^F9V at N9W$J9J,R9KAJ9RO)@(>XIR6
MF9Z9.9T0>9TM,*#TV9W%N9K(J9^3:9[/":`E-YWM>94%&I&WZ9L5.IP(:I_'
MF9_C*9G-TYSG"9VW*:`6"I_8.9,K8*`]5Y_?B9^N&0:C0Y[-XZ#_B9D1NIF=
MB089>J$IVE4K>J*FZ:(*ZJ$R"IO[B28C"J'2J:.ZZ9GSB:+RR6'7`I(B:2D6
MTC4*>7-YD)*YE)2;<W0*D(QD6J9F>J9HFJ9JNJ9LVJ9N^J9P&J=R.J=T6J=V
1>J=XFJ=ZNJ=\VJ=^^J>`>AED
`
end




More information about the grass-user mailing list