home *** CD-ROM | disk | FTP | other *** search
/ Mundo do CD-ROM 23 / CDROM23.iso / corel / Draw / Scripts / Presets / design19.csc < prev    next >
Encoding:
Text File  |  1997-08-19  |  995 b   |  31 lines
  1. REM 90 Deg. Swirl with 10 step blend      Font used: AvantGarde Bk BT
  2.  
  3. WITHOBJECT "CorelDraw.Automation.8"
  4.     .StartOfRecording 
  5.     .SuppressPainting 
  6.     .RecorderStorePreselectedObjects TRUE
  7.     .RecorderSelectObjectByIndex TRUE, 1
  8.     .DuplicateObject 0, 0
  9.     .RecorderSelectObjectByIndex TRUE, 2
  10.     .RotateObject 90000000, FALSE, 0, 0
  11.     .RecorderSelectObjectByIndex TRUE, 2
  12.     .OrderToBack 
  13.     .RecorderSelectObjectByIndex TRUE, 2
  14.     .StoreColor 2, 0, 0, 0, 0
  15.     .ApplyUniformFillColor
  16.     .RecorderSelectPreselectedObjects TRUE
  17.     .RecorderSelectObjectsByIndex FALSE, 2, -1, -1, -1, -1
  18.     .ApplyBlend TRUE, 10, 0, FALSE, 0, FALSE, FALSE, 0, 0, 0, TRUE, TRUE, FALSE, FALSE, 0, 0, 0, 0
  19.     .RecorderSelectObjectByIndex TRUE, 1
  20.     .DuplicateObject 0, 0
  21.     .RecorderSelectObjectByIndex TRUE, 4
  22.     .StoreColor 2, 0, 100, 100, 0
  23.     .ApplyUniformFillColor
  24.     .RecorderSelectPreselectedObjects TRUE
  25.     .RecorderSelectObjectsByIndex FALSE, 4, 3, 2, -1, -1
  26.     .Group 
  27.     .ResumePainting 
  28.     .EndOfRecording 
  29. END WITHOBJECT
  30.  
  31.