home *** CD-ROM | disk | FTP | other *** search
/ Mundo do CD-ROM 23 / CDROM23.iso / corel / Draw / Fill_out / Fills / Fountain / rainbow1.csc < prev    next >
Encoding:
Text File  |  1997-08-19  |  575 b   |  20 lines
  1. REM Favorite : Fill
  2.  
  3. WITHOBJECT "CorelDraw.Automation.8"
  4.     .StartOfRecording 
  5.     .SuppressPainting 
  6.     .RecorderStorePreselectedObjects FALSE
  7.     .RecorderSelectObjectByIndex TRUE, 1
  8.     .StoreColor 2, 0, 100, 100, 0, 0, 0, 100,  0
  9.     .StoreColor 2, 0, 60, 100, 0, 0, 0, 100,  18
  10.     .StoreColor 2, 0, 0, 100, 0, 0, 0, 100,  41
  11.     .StoreColor 2, 100, 0, 100, 0, 0, 0, 100,  57
  12.     .StoreColor 2, 100, 100, 0, 0, 0, 0, 100,  79
  13.     .StoreColor 2, 20, 80, 0, 20, 0, 0, 100,  100
  14.     .ApplyFountainFill 0, 0, 0, -1800, 256, 0, 3, 50
  15.     .ResumePainting 
  16.     .EndOfRecording 
  17. END WITHOBJECT
  18.  
  19.  
  20.