Listers,

 

I would like to be able to use a more diverse colour scheme to
thematicise a map through a mapbasic application. There is a always
varying number of map objects to colour so I cant hardcode the colour
scheme. I am able to generate a thematic map using a "from" and "to"
brush with one mid point inflection in the colour scheme. However the
colour scheme just doesn't vary enough to make real obvious distinctions
when there area a lot of map objects to thematicise. 

 

Can someone give me some ideas on how to use a much wider range of
colours in the thematic mapping process, please. Below is a snippet of
the thematicising code that I am presently using.

 

 

   Create Styles 

      From Brush(2, GREEN, 0)    'style for LOW range

      To  Brush (2, YELLOW, 0)  'style for HIGH range

      Vary Color By "RGB" 

      Number counta

       Inflect at Int(counta/2) With Brush(2, 16765160, 0)

      Into Variable  brush_styles 

 

   countab = 1

   Fetch First from entries

   Do While NOT EOT (entries)

   thisbrushstyle = brush_styles(countab)

 

   s_comoname = entries.Common_Name

 

   ashadevalustr = Chr$(34) & s_comoname & Chr$(34) & " " &
thisbrushstyle & " Pen(1,2,0)"

   If countab > 1 Then

     shadevalustr = shadevalustr & ", " & ashadevalustr 

   Else

     shadevalustr = ashadevalustr

   End If

   countab = countab + 1

   Fetch Next from entries

   Loop

 

   cmdstr = "shade window " &  map_id & " pestmment with Common_Name
ignore "" "" values " &  shadevalustr 

   Run command cmdstr 

 

Thanks

 

Doug Pease

GIS Officer

Livingstone Shire Council

PO Box 600

Yeppoon 4703

Qld Australia

 

Ph    07 49399957

Fax   07 49393290

 

_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _

This e-mail and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom
they are addressed.
If you have received this e-mail in error please notify the
originator of the message. This footer also confirms that this
e-mail message has been scanned for the presence of computer viruses.

Any views expressed in this message are those of the individual
sender, except where the sender specifies and with authority,
states them to be the views of Livingstone Shire Council.


Reply via email to