home *** CD-ROM | disk | FTP | other *** search
/ Mundo do CD-ROM 23 / CDROM23.iso / corel / Draw / Scripts / Presets / roundin.csc < prev    next >
Encoding:
Text File  |  1997-08-19  |  608 b   |  23 lines
  1. REM Grey contour to center.
  2.  
  3. WITHOBJECT "CorelDraw.Automation.8"
  4.     .StartOfRecording 
  5.     .SuppressPainting 
  6.     .RecorderStorePreselectedObjects TRUE
  7.     .RecorderSelectObjectByIndex TRUE, 1
  8.     .ApplyOutline 762, 0, 0, 0, 100, 0, 0, -1, -1, FALSE, 1, 0, FALSE
  9.     .StoreColor 2, 0, 0, 0, 50
  10.     .SetOutlineColor
  11.     .RecorderSelectObjectByIndex TRUE, 1
  12.     .StoreColor 2, 0, 0, 0, 50
  13.     .ApplyUniformFillColor
  14.     .RecorderSelectObjectByIndex TRUE, 1
  15.     .StoreColor 2, 0, 0, 0, 0
  16.     .StoreColor 2, 0, 0, 0, 0
  17.     .StoreColor 2, 0, 0, 0, 0
  18.     .ApplyContour 0, 1269, 13, 0
  19.     .ResumePainting 
  20.     .EndOfRecording 
  21. END WITHOBJECT
  22.  
  23.