home *** CD-ROM | disk | FTP | other *** search
/ PC Welt 2006 March / PCWELT_3_2006.ISO / base / 05_common.mo / usr / share / elvis-2.2_0 / scripts / shade.ex < prev    next >
Encoding:
Text File  |  2004-02-22  |  277 b   |  12 lines
  1. "This script defines the hlobjectN colors as being shades of gray
  2. set hllayers=9
  3. switch current("background")
  4. case light {
  5.  for i (1 ... hllayers)
  6.  do eval color hlobject(i) on gray(90 - 3*i)
  7. }
  8. case dark {
  9.  for i (1 ... hllayers)
  10.  do eval color hlobject(i) on gray(10 + 4*i)
  11. }
  12.