home *** CD-ROM | disk | FTP | other *** search
/ Corel Draw 7 / CD7_PROGRAM.ISO / draw / scripts / presets6 / dropleft.csc < prev    next >
Encoding:
Text File  |  1996-10-24  |  1.3 KB  |  39 lines
  1. REM 
  2. REM REM Converted from a DRAW PRESET binary to a DRAW RECORDING script
  3.  
  4. WITHOBJECT "CorelDraw.Automation.7"
  5.     .StartOfRecording 
  6.     .SuppressPainting 
  7.     .RecorderStorePreselectedObjects TRUE
  8.     .RecorderSelectObjectByIndex TRUE, 1
  9.     .ApplyOutline 0, 0, 0, 0, 0, 0, 0, -1, -1, FALSE, 0, 0, FALSE
  10.     .RecorderSelectObjectByIndex TRUE, 1
  11.     .DuplicateObject 0, 0
  12.     .RecorderSelectObjectByIndex TRUE, 2
  13.     .StretchObject 0.759959, 1, 0.759959, 1, FALSE, FALSE, 7
  14.     .RecorderSelectObjectByIndex TRUE, 2
  15.     .ApplyUniformFillColor 2, 0, 0, 0, 40
  16.     .RecorderSelectObjectByIndex TRUE, 1
  17.     .ApplyUniformFillColor 2, 0, 0, 0, 0
  18.     .RecorderSelectPreselectedObjects TRUE
  19.     .RecorderSelectObjectsByIndex FALSE, 2, -1, -1, -1, -1
  20.     .ApplyBlend TRUE, 20, 0, FALSE, 0, FALSE, FALSE, 0, 0, 0, TRUE, TRUE, FALSE, FALSE, 0, 0, 0, 0
  21.     .RecorderSelectObjectByIndex TRUE, 1
  22.     .DuplicateObject 0, 0
  23.     .RecorderSelectObjectByIndex TRUE, 4
  24.     .MoveObject 18795, 16001
  25.     .RecorderSelectObjectByIndex TRUE, 4
  26.     .ApplyUniformFillColor 2, 0, 100, 100, 0
  27.     .RecorderSelectObjectByIndex TRUE, 4
  28.     .OrderToFront 
  29.     .RecorderSelectObjectByIndex TRUE, 4
  30.     .MoveObject 11937, 11937
  31.     .RecorderSelectObjectByIndex TRUE, 4
  32.     .MoveObject -6603, -9397
  33.     .RecorderSelectPreselectedObjects TRUE
  34.     .RecorderSelectObjectsByIndex FALSE, 4, 3, 2, -1, -1
  35.     .Group 
  36.     .ResumePainting 
  37.     .EndOfRecording 
  38. END WITHOBJECT
  39.