home *** CD-ROM | disk | FTP | other *** search
/ Corel Draw 7 / CD7_PROGRAM.ISO / draw / scripts / presets6 / design10.csc < prev    next >
Encoding:
Text File  |  1996-10-24  |  2.9 KB  |  78 lines
  1. REM Metallic plaque      Font used: Glacier
  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.     .DuplicateObject 0, 0
  10.     .RecorderSelectObjectByIndex TRUE, 2
  11.     .MoveObject 9143, 0
  12.     .RecorderSelectObjectByIndex TRUE, 2
  13.     .ApplyUniformFillColor 2, 0, 0, 0, 0
  14.     .RecorderSelectObjectByIndex TRUE, 1
  15.     .DuplicateObject 0, 0
  16.     .RecorderSelectObjectByIndex TRUE, 3
  17.     .OrderToFront 
  18.     .RecorderSelectObjectByIndex TRUE, 3
  19.     .ApplyFountainFill 0, 0, 0, 900, 256, 0, 3, 50
  20.     .SetFountainFillColor 0, 2, 0, 0, 0, 50
  21.     .SetFountainFillColor 46, 2, 0, 0, 0, 0
  22.     .SetFountainFillColor 100, 2, 0, 0, 0, 50
  23.     .RecorderSelectObjectByIndex TRUE, 3
  24.     .MoveObject 4571, 0
  25.     .RecorderObjectScaleInfo 63449175, 19938993, 507995, -330197
  26.     .CreateRectangle 0, 0, 0, 0, 0
  27.     .RecorderSelectObjectByIndex TRUE, 4
  28.     .ApplyFountainFill 0, 0, 0, 1372, 256, 0, 0, 50
  29.     .SetFountainFillColor 0, 2, 0, 0, 0, 50
  30.     .SetFountainFillColor 100, 2, 0, 0, 0, 0
  31.     .RecorderSelectObjectByIndex TRUE, 4
  32.     .OrderToBack 
  33.     .RecorderSelectObjectByIndex TRUE, 4
  34.     .DuplicateObject 0, 0
  35.     .RecorderSelectObjectByIndex TRUE, 5
  36.     .StretchObject 0.958515, 1, 0.958515, 1, FALSE, FALSE, 1
  37.     .RecorderSelectObjectByIndex TRUE, 5
  38.     .StretchObject 1, 1, 0.958998, 1, FALSE, FALSE, 6
  39.     .RecorderSelectObjectsByIndex TRUE, 4, 5, -1, -1, -1
  40.     .AlignObjects 3, 0
  41.     .RecorderSelectObjectByIndex TRUE, 5
  42.     .ApplyFountainFill 0, 0, 0, -427, 256, 0, 0, 50
  43.     .SetFountainFillColor 0, 2, 0, 0, 0, 50
  44.     .SetFountainFillColor 100, 2, 0, 0, 0, 0
  45.     .RecorderSelectObjectByIndex TRUE, 5
  46.     .DuplicateObject 0, 0
  47.     .RecorderSelectObjectByIndex TRUE, 6
  48.     .StretchObject 1, 1, 0.954869, 1, FALSE, FALSE, 2
  49.     .RecorderSelectObjectByIndex TRUE, 6
  50.     .StretchObject 1, 1, 0.950249, 1, FALSE, FALSE, 6
  51.     .RecorderSelectObjectByIndex TRUE, 6
  52.     .StretchObject 0.982104, 1, 1, 1, FALSE, FALSE, 4
  53.     .RecorderSelectObjectByIndex TRUE, 6
  54.     .StretchObject 0.985423, 1, 1, 1, FALSE, FALSE, 8
  55.     .RecorderSelectObjectsByIndex TRUE, 5, 6, -1, -1, -1
  56.     .AlignObjects 3, 0
  57.     .RecorderSelectObjectByIndex TRUE, 6
  58.     .ApplyFountainFill 0, 0, 0, 1800, 256, 0, 0, 50
  59.     .SetFountainFillColor 0, 2, 0, 0, 0, 50
  60.     .SetFountainFillColor 100, 2, 0, 0, 0, 0
  61.     .RecorderSelectObjectsByIndex TRUE, 4, 5, 6, -1, -1
  62.     .ApplyOutline 0, 0, 0, 0, 0, 0, 0, -1, -1, FALSE, 0, 0, FALSE
  63.     .RecorderSelectObjectByIndex TRUE, 4
  64.     .DuplicateObject 0, 0
  65.     .RecorderSelectObjectByIndex TRUE, 7
  66.     .ApplyUniformFillColor 2, 0, 0, 0, 100
  67.     .RecorderSelectObjectByIndex TRUE, 7
  68.     .MoveObject 5587, -4317
  69.     .RecorderSelectObjectByIndex TRUE, 7
  70.     .OrderToBack 
  71.     .RecorderSelectObjectsByIndex TRUE, 7, 6, 5, 4, 3
  72.     .RecorderSelectPreselectedObjects FALSE
  73.     .RecorderSelectObjectsByIndex FALSE, 2, -1, -1, -1, -1
  74.     .Group 
  75.     .ResumePainting 
  76.     .EndOfRecording 
  77. END WITHOBJECT
  78.