Maptitude - http://research.umbc.edu/~roswell/maptitude.html
Any chance you could upload this to
http://www.freebikemaps.org/mapt/upload.html
or to the
directionsmag.com web site?
Use the freebikemaps.org site if you think you'll be modifying the code,
and will want to overwrite the old with the new. Use the directionsmag.com
if it's "final." (and if you have the patience to wait a few extra
seconds, which actually, I rarely do, so I'd understand if you don't!)
By the way, sorry I've been out of email contact for a while. I'm working
on a documentation project that has nothing to do with geography. Also, a
little perl project so that a mental health authority can share comments
via the web...
But I'm still out here hoping to facilitate a repository of Maptitude
stuff.
I know it takes a little bit of time, but my hope is that all code shared
via email on this listserv will also be placed on one of these two web
pages.... a collection of code...
Margie
http://www.freebikemaps.org/mapt/upload.html
http://www.directionsmag.com/tools/
http://maptitude.listbot.com
On Wed, 7 Mar 2001 [EMAIL PROTECTED] wrote:
> Maptitude - http://research.umbc.edu/~roswell/maptitude.html
>
> Ooopss.
>
> Here is the code.
>
> Armando
>
> --------------------------------
>
> Macro "multitags"
>
> // ----------- Variables
> // search
> search_distance = 10
>
> // layer names
> polys="polys"
> points="points"
>
> //fields to use for tagging
> point_field="ID"
> poly_field="field_1"
>
> // string to separate point data in polygon tag
> separator=" - "
> // ----------------------
>
> SetLayer (polys)
> vp=GetLayer()
> myset=CreateSet("dummy")
>
> SetLayer (points)
> rh=GetFirstrecord(,)
>
> while rh<>null do
>
> tag=points.(point_field)
>
> c=GetPoint(rh2id(rh))
>
> setLayer(polys)
>
> n_selected = SelectByCircle(myset, "Several", Circle(c,search_distance))
>
> rh2=GetFirstRecord(myset,)
>
> while rh2<>null do
> vp.(poly_field)= vp.(poly_field)+separator+r2s(tag)
> rh2=GetNextRecord(myset,rh2,)
> end
>
> SetLayer (points)
> rh=GetNextRecord(,rh,)
> end
>
> endMAcro
>
>
> ______________________________________________________________________
> To unsubscribe, write to [EMAIL PROTECTED]
>
_________________________________________________________
Marjorie Roswell, Spatial Analyst
UMBC Center for Health Program Development and Management
1000 Hilltop Circle Fx: (410)455-6850
Baltimore, MD 21250 E: [EMAIL PROTECTED]
Ph: (410)455-6802 http://umbc.edu/~roswell/mipage.html
_________________________________________________________
______________________________________________________________________
To unsubscribe, write to [EMAIL PROTECTED]
