home *** CD-ROM | disk | FTP | other *** search
/ Mundo do CD-ROM 23 / CDROM23.iso / corel / Draw / Scripts / Presets / design12.csc < prev    next >
Encoding:
Text File  |  1997-08-19  |  1.2 KB  |  36 lines
  1. REM 3D Drop shadow to front    Font used: USA Black (Italic)
  2.  
  3. WITHOBJECT "CorelDraw.Automation.8"
  4.     .StartOfRecording 
  5.     .SuppressPainting 
  6.     .RecorderStorePreselectedObjects TRUE
  7.     .RecorderSelectObjectByIndex TRUE, 1
  8.     .ApplyOutline 0, 0, 0, 0, 0, 0, 0, -1, -1, FALSE, 0, 0, FALSE
  9.     .RecorderSelectObjectByIndex TRUE, 1
  10.     .StoreColor 2, 20, 80, 0, 20, 0, 0, 100,  0
  11.     .StoreColor 2, 20, 20, 0, 0, 0, 0, 100,  48
  12.     .StoreColor 2, 20, 80, 0, 20, 0, 0, 100,  100
  13.     .ApplyFountainFill 0, 0, 0, 900, 256, 0, 3, 50
  14.     .RecorderSelectObjectByIndex TRUE, 1
  15.     .DuplicateObject 0, 0
  16.     .RecorderSelectObjectByIndex TRUE, 2
  17.     .StretchObject 1, 1, 0.253968, 1, FALSE, TRUE, 2
  18.     .RecorderSelectObjectByIndex TRUE, 2
  19.     .SkewObject 31800000, 0, 2
  20.     .RecorderSelectObjectByIndex TRUE, 2
  21.     .MoveObject -2539, 6857
  22.     .RecorderSelectObjectByIndex TRUE, 2
  23.     .OrderToBack 
  24.     .RecorderSelectObjectByIndex TRUE, 2
  25.     .StoreColor 2, 0, 0, 0, 50, 0, 0, 100,  0
  26.     .StoreColor 2, 20, 20, 0, 0, 0, 0, 100,  48
  27.     .StoreColor 2, 0, 0, 0, 0, 0, 0, 100,  100
  28.     .ApplyFountainFill 0, 0, 0, -900, 256, 0, 0, 50
  29.     .RecorderSelectPreselectedObjects TRUE
  30.     .RecorderSelectObjectsByIndex FALSE, 2, -1, -1, -1, -1
  31.     .Group 
  32.     .ResumePainting 
  33.     .EndOfRecording 
  34. END WITHOBJECT
  35.  
  36.