home *** CD-ROM | disk | FTP | other *** search
/ Mundo do CD-ROM 23 / CDROM23.iso / corel / Draw / Fill_out / Outlines / dash_ar2.csc < prev    next >
Encoding:
Text File  |  1997-08-19  |  1.8 KB  |  41 lines
  1. REM Favorite : Outline Style,Outline Width,Outline Arrow Head,Outline Arrow Tail
  2.  
  3. WITHOBJECT "CorelDraw.Automation.8"
  4.     .StartOfRecording 
  5.     .SuppressPainting 
  6.     .RecorderStorePreselectedObjects FALSE
  7.     .SetOutlineWidth 14111
  8.     .SetOutlineMiscProperties 2, 6, 0, 0, 100, 0, FALSE, FALSE
  9.     .BeginDrawArrow TRUE, 394462, 7
  10.     .AddArrowPoint 571500, 0, FALSE, FALSE, TRUE, TRUE, 0, 0
  11.     .AddArrowPoint 37338, -271272, FALSE, FALSE, TRUE, FALSE, 0, 1
  12.     .AddArrowPoint -1016000, -271272, FALSE, FALSE, TRUE, FALSE, 0, 1
  13.     .AddArrowPoint -476250, 0, FALSE, FALSE, TRUE, FALSE, 0, 1
  14.     .AddArrowPoint -1016000, 299974, FALSE, FALSE, TRUE, FALSE, 0, 1
  15.     .AddArrowPoint 37338, 299974, FALSE, FALSE, TRUE, FALSE, 0, 1
  16.     .AddArrowPoint 571500, 0, FALSE, FALSE, FALSE, TRUE, 0, 1
  17.     .EndDrawArrow 
  18.     .SetOutlineArrow 0
  19.     .BeginDrawArrow FALSE, 0, 14
  20.     .AddArrowPoint -254000, 254000, FALSE, FALSE, TRUE, TRUE, 0, 0
  21.     .AddArrowPoint -508000, 254000, FALSE, FALSE, TRUE, FALSE, 0, 1
  22.     .AddArrowPoint -762000, 0, FALSE, FALSE, TRUE, FALSE, 0, 1
  23.     .AddArrowPoint -508000, -254000, FALSE, FALSE, TRUE, FALSE, 0, 1
  24.     .AddArrowPoint -254000, -254000, FALSE, FALSE, TRUE, FALSE, 0, 1
  25.     .AddArrowPoint -508000, 0, FALSE, FALSE, TRUE, FALSE, 0, 1
  26.     .AddArrowPoint -254000, 254000, FALSE, FALSE, FALSE, TRUE, 0, 1
  27.     .AddArrowPoint 254000, 254000, FALSE, FALSE, TRUE, TRUE, 0, 0
  28.     .AddArrowPoint 0, 254000, FALSE, FALSE, TRUE, FALSE, 0, 1
  29.     .AddArrowPoint -254000, 0, FALSE, FALSE, TRUE, FALSE, 0, 1
  30.     .AddArrowPoint 0, -254000, FALSE, FALSE, TRUE, FALSE, 0, 1
  31.     .AddArrowPoint 254000, -254000, FALSE, FALSE, TRUE, FALSE, 0, 1
  32.     .AddArrowPoint 0, 0, FALSE, FALSE, TRUE, FALSE, 0, 1
  33.     .AddArrowPoint 254000, 254000, FALSE, FALSE, FALSE, TRUE, 0, 1
  34.     .EndDrawArrow 
  35.     .SetOutlineArrow 1
  36.     .ResumePainting 
  37.     .EndOfRecording 
  38. END WITHOBJECT
  39.  
  40.  
  41.