home *** CD-ROM | disk | FTP | other *** search
/ Revista do CD-ROM 37 / CD-ROM 37 / CD-ROM 37.iso / corel / Draw / Scripts / Presets / spectrl2.csc < prev    next >
Encoding:
Text File  |  1997-08-19  |  727 b   |  23 lines
  1. REM Off center spectral fill with reverse spectral fill on contour.
  2.  
  3. WITHOBJECT "CorelDraw.Automation.8"
  4.     .StartOfRecording 
  5.     .SuppressPainting 
  6.     .RecorderStorePreselectedObjects TRUE
  7.     .RecorderSelectObjectByIndex TRUE, 1
  8.     .StoreColor 2, 0, 100, 100, 0, 0, 0, 100,  0
  9.     .StoreColor 2, 100, 0, 0, 0, 0, 0, 100,  65
  10.     .StoreColor 2, 0, 100, 100, 0, 0, 0, 100,  75
  11.     .StoreColor 2, 0, 0, 100, 0, 0, 0, 100,  85
  12.     .StoreColor 2, 0, 100, 100, 0, 0, 0, 100,  100
  13.     .ApplyFountainFill 2, 0, -50, 0, 256, 0, 1, 50
  14.     .RecorderSelectObjectByIndex TRUE, 1
  15.     .StoreColor 2, 0, 0, 0, 0
  16.     .StoreColor 2, 100, 100, 0, 0
  17.     .StoreColor 2, 0, 0, 0, 0
  18.     .ApplyContour 2, 1523, 5, 0
  19.     .ResumePainting 
  20.     .EndOfRecording 
  21. END WITHOBJECT
  22.  
  23.