home *** CD-ROM | disk | FTP | other *** search
/ PC Extra 07 & 08 / pca1507.iso / Software / psp8 / Data1.cab / Ellipse.PspScript < prev    next >
Encoding:
Text File  |  2003-04-22  |  2.0 KB  |  60 lines

  1. from JascApp import *
  2.  
  3. def ScriptProperties():
  4.     return {
  5.         'Author': '',
  6.         'Copyright': '',
  7.         'Description': '',
  8.         'Host': 'Paint Shop Pro',
  9.         'Host Version': '8.00'
  10.         }
  11.  
  12. def Do(Environment):
  13.     App.Do( Environment, 'PresetShapes', {
  14.             'LineWidth': 1, 
  15.             'Angle': 0, 
  16.             'ConstrainRect': App.Constants.Boolean.true, 
  17.             'Antialias': App.Constants.Boolean.true, 
  18.             'BBox': ((35.5,47.5),140), 
  19.             'Fill': {
  20.                 'Color': (0,0,0), 
  21.                 'Pattern': None, 
  22.                 'Gradient': None, 
  23.                 'Texture': None, 
  24.                 'Identity': r'Material'
  25.                 }, 
  26.             'Stroke': {
  27.                 'Color': (255,255,0), 
  28.                 'Pattern': None, 
  29.                 'Gradient': None, 
  30.                 'Texture': None, 
  31.                 'Identity': r'Material'
  32.                 }, 
  33.             'JointStyle': App.Constants.JointStyle.Miter, 
  34.             'CreateAsVector': App.Constants.Boolean.true, 
  35.             'RetainStyle': App.Constants.Boolean.true, 
  36.             'LineStyle': {
  37.                 'Name': r'_Solid', 
  38.                 'FirstCap': (r'Butt',7.21,7.21), 
  39.                 'LastCap': (r'Butt',1,1), 
  40.                 'FirstSegCap': None, 
  41.                 'LastSegCap': None, 
  42.                 'UseSegmentCaps': App.Constants.Boolean.false, 
  43.                 'Segments': None
  44.                 }, 
  45.             'LineStyleIndex': 0, 
  46.             'ShapeName': r'Ellipse', 
  47.             'ShapeOrientation': App.Constants.Orientation.Normal, 
  48.             'keShapeIconSizeLarge': App.Constants.Boolean.true, 
  49.             'Position': (35.5,47.5), 
  50.             'LeftTop': (35.5,47.5), 
  51.             'RightBottom': (175.5,187.5), 
  52.             'RotationMode': 0, 
  53.             'MiterLimit': 10, 
  54.             'GeneralSettings': {
  55.                 'ExecutionMode': App.Constants.ExecutionMode.Silent, 
  56.                 'AutoActionMode': App.Constants.AutoActionMode.Match
  57.                 }
  58.             }) 
  59.  
  60.