UISelectionPanel.st
changeset 2517 0b6a4dedf64b
parent 2506 b85f4799add5
child 2518 41bacafffaa3
equal deleted inserted replaced
2516:6c0bc4ed2d88 2517:0b6a4dedf64b
  1080         window: 
  1080         window: 
  1081        (WindowSpec
  1081        (WindowSpec
  1082           label: 'Morphs'
  1082           label: 'Morphs'
  1083           name: 'Morphs'
  1083           name: 'Morphs'
  1084           min: (Point 10 10)
  1084           min: (Point 10 10)
  1085           bounds: (Rectangle 0 0 441 218)
  1085           bounds: (Rectangle 0 0 433 286)
  1086         )
  1086         )
  1087         component: 
  1087         component: 
  1088        (SpecCollection
  1088        (SpecCollection
  1089           collection: (
  1089           collection: (
  1090            (ArcMorphSpec
  1090            (ArcMorphSpec
  1091               name: 'Circle'
  1091               name: 'Circle'
  1092               layout: (LayoutFrame 3 0 3 0 63 0 63 0)
  1092               layout: (LayoutFrame 3 0 3 0 63 0 63 0)
  1093               lineColor: (Color 100.0 0.0 0.0)
  1093               lineColor: (Color 100.0 0.0 0.0)
  1094             )
  1094             )
  1095            (ArcMorphSpec
  1095            (ArcMorphSpec
  1096               name: 'Arc1'
  1096               name: 'FilledCircle'
  1097               layout: (LayoutFrame 3 0 70 0 63 0 133 0)
  1097               layout: (LayoutFrame 3 0 70 0 63 0 133 0)
  1098               lineColor: (Color 100.0 0.0 0.0)
       
  1099               startAngle: -45
       
  1100               sweepAngle: 270
       
  1101             )
       
  1102            (ArcMorphSpec
       
  1103               name: 'Arc2'
       
  1104               layout: (LayoutFrame 3 0 143 0 63 0 206 0)
       
  1105               lineColor: (Color 100.0 0.0 0.0)
       
  1106               startAngle: -45
       
  1107               sweepAngle: 270
       
  1108               closePath: true
       
  1109             )
       
  1110            (ArcMorphSpec
       
  1111               name: 'Pie'
       
  1112               layout: (LayoutFrame 3 0 213 0 63 0 276 0)
       
  1113               lineColor: (Color 100.0 0.0 0.0)
       
  1114               startAngle: -45
       
  1115               sweepAngle: 270
       
  1116               pie: true
       
  1117             )
       
  1118            (ArcMorphSpec
       
  1119               name: 'FilledCircle'
       
  1120               layout: (LayoutFrame 70 0 3 0 133 0 63 0)
       
  1121               foregroundColor: (Color 100.0 100.0 0.0)
  1098               foregroundColor: (Color 100.0 100.0 0.0)
  1122               fill: true
  1099               fill: true
  1123             )
  1100             )
  1124            (ArcMorphSpec
  1101            (ArcMorphSpec
  1125               name: 'FilledArc2'
       
  1126               layout: (LayoutFrame 70 0 143 0 133 0 206 0)
       
  1127               foregroundColor: (Color 100.0 100.0 0.0)
       
  1128               fill: true
       
  1129               startAngle: -45
       
  1130               sweepAngle: 270
       
  1131               closePath: true
       
  1132             )
       
  1133            (ArcMorphSpec
       
  1134               name: 'FilledPie'
       
  1135               layout: (LayoutFrame 70 0 213 0 133 0 276 0)
       
  1136               foregroundColor: (Color 100.0 100.0 0.0)
       
  1137               fill: true
       
  1138               startAngle: -45
       
  1139               sweepAngle: 270
       
  1140               pie: true
       
  1141             )
       
  1142            (ArcMorphSpec
       
  1143               name: 'FilledCircleL'
  1102               name: 'FilledCircleL'
  1144               layout: (LayoutFrame 143 0 3 0 206 0 63 0)
  1103               layout: (LayoutFrame 3 0 143 0 63 0 206 0)
  1145               foregroundColor: (Color 100.0 100.0 0.0)
  1104               foregroundColor: (Color 100.0 100.0 0.0)
  1146               fill: true
  1105               fill: true
  1147               lineColor: (Color 100.0 0.0 0.0)
  1106               lineColor: (Color 100.0 0.0 0.0)
  1148             )
  1107             )
  1149            (ArcMorphSpec
  1108            (RectangleMorphSpec
  1150               name: 'FilledArc1L'
  1109               name: 'RectangleMorph1'
  1151               layout: (LayoutFrame 143 0 70 0 206 0 133 0)
  1110               layout: (LayoutFrame 70 0 3 0 133 0 63 0)
       
  1111               foregroundColor: (Color 100.0 100.0 0.0)
       
  1112               fill: false
       
  1113               lineColor: (Color 100.0 0.0 0.0)
       
  1114             )
       
  1115            (RectangleMorphSpec
       
  1116               name: 'RectangleMorph2'
       
  1117               layout: (LayoutFrame 70 0 72 0 133 0 135 0)
       
  1118               foregroundColor: (Color 100.0 100.0 0.0)
       
  1119               fill: true
       
  1120             )
       
  1121            (RectangleMorphSpec
       
  1122               name: 'RectangleMorph3'
       
  1123               layout: (LayoutFrame 70 0 139 0 133 0 202 0)
  1152               foregroundColor: (Color 100.0 100.0 0.0)
  1124               foregroundColor: (Color 100.0 100.0 0.0)
  1153               fill: true
  1125               fill: true
  1154               lineColor: (Color 100.0 0.0 0.0)
  1126               lineColor: (Color 100.0 0.0 0.0)
  1155               startAngle: -45
       
  1156               sweepAngle: 270
       
  1157             )
  1127             )
  1158            (ArcMorphSpec
  1128            (ArcMorphSpec
  1159               name: 'FilledArc2L'
  1129               name: 'FilledPieL'
  1160               layout: (LayoutFrame 143 0 143 0 206 0 206 0)
  1130               layout: (LayoutFrame 143 0 143 0 206 0 206 0)
  1161               foregroundColor: (Color 100.0 100.0 0.0)
  1131               foregroundColor: (Color 100.0 100.0 0.0)
  1162               fill: true
  1132               fill: true
  1163               lineColor: (Color 100.0 0.0 0.0)
  1133               lineColor: (Color 100.0 0.0 0.0)
  1164               startAngle: -45
  1134               startAngle: -45
  1165               sweepAngle: 270
  1135               sweepAngle: 270
  1166               closePath: true
  1136               pie: true
  1167             )
  1137             )
  1168            (ArcMorphSpec
  1138            (ArcMorphSpec
  1169               name: 'FilledPieL'
  1139               name: 'FilledPie'
  1170               layout: (LayoutFrame 143 0 213 0 206 0 276 0)
  1140               layout: (LayoutFrame 143 0 70 0 206 0 133 0)
  1171               foregroundColor: (Color 100.0 100.0 0.0)
  1141               foregroundColor: (Color 100.0 100.0 0.0)
  1172               fill: true
  1142               fill: true
       
  1143               startAngle: -45
       
  1144               sweepAngle: 270
       
  1145               pie: true
       
  1146             )
       
  1147            (ArcMorphSpec
       
  1148               name: 'Pie'
       
  1149               layout: (LayoutFrame 143 0 3 0 206 0 63 0)
  1173               lineColor: (Color 100.0 0.0 0.0)
  1150               lineColor: (Color 100.0 0.0 0.0)
  1174               startAngle: -45
  1151               startAngle: -45
  1175               sweepAngle: 270
  1152               sweepAngle: 270
  1176               pie: true
  1153               pie: true
  1177             )
  1154             )
  1178            (ArcMorphSpec
  1155            (LineSegmentMorphSpec
  1179               name: 'FilledCircleLB'
  1156               name: 'Line1'
  1180               layout: (LayoutFrame 213 0 3 0 276 0 63 0)
       
  1181               foregroundColor: (Color 100.0 100.0 0.0)
  1157               foregroundColor: (Color 100.0 100.0 0.0)
  1182               backgroundColor: (Color 0.0 100.0 0.0)
       
  1183               fill: true
  1158               fill: true
  1184               lineColor: (Color 100.0 0.0 0.0)
  1159               lineColor: (Color 100.0 0.0 0.0)
  1185             )
  1160               startPoint: (Point 225 29)
  1186            (ArcMorphSpec
  1161               endPoint: (Point 246 53)
  1187               name: 'FilledArc1LB'
  1162             )
  1188               layout: (LayoutFrame 213 0 70 0 276 0 133 0)
  1163            (LineSegmentMorphSpec
       
  1164               name: 'LineSegmentMorph1'
  1189               foregroundColor: (Color 100.0 100.0 0.0)
  1165               foregroundColor: (Color 100.0 100.0 0.0)
  1190               backgroundColor: (Color 0.0 100.0 0.0)
       
  1191               fill: true
  1166               fill: true
  1192               lineColor: (Color 100.0 0.0 0.0)
  1167               lineColor: (Color 100.0 0.0 0.0)
  1193               startAngle: -45
  1168               startPoint: (Point 213 9)
  1194               sweepAngle: 270
  1169               endPoint: (Point 261 32)
  1195             )
  1170               showArrow: true
  1196            (ArcMorphSpec
       
  1197               name: 'FilledArc2LB'
       
  1198               layout: (LayoutFrame 213 0 143 0 276 0 206 0)
       
  1199               foregroundColor: (Color 100.0 100.0 0.0)
       
  1200               backgroundColor: (Color 0.0 100.0 0.0)
       
  1201               fill: true
       
  1202               lineColor: (Color 100.0 0.0 0.0)
       
  1203               startAngle: -45
       
  1204               sweepAngle: 270
       
  1205               closePath: true
       
  1206             )
       
  1207            (ArcMorphSpec
       
  1208               name: 'FilledPieLB'
       
  1209               layout: (LayoutFrame 213 0 213 0 276 0 276 0)
       
  1210               foregroundColor: (Color 100.0 100.0 0.0)
       
  1211               backgroundColor: (Color 0.0 100.0 0.0)
       
  1212               fill: true
       
  1213               lineColor: (Color 100.0 0.0 0.0)
       
  1214               startAngle: -45
       
  1215               sweepAngle: 270
       
  1216               pie: true
       
  1217             )
       
  1218            (RectangleMorphSpec
       
  1219               name: 'RectangleMorph1'
       
  1220               layout: (LayoutFrame 283 0 3 0 346 0 63 0)
       
  1221               foregroundColor: (Color 100.0 100.0 0.0)
       
  1222               backgroundColor: (Color 0.0 100.0 0.0)
       
  1223               fill: false
       
  1224               lineColor: (Color 100.0 0.0 0.0)
       
  1225             )
       
  1226            (RectangleMorphSpec
       
  1227               name: 'RectangleMorph2'
       
  1228               layout: (LayoutFrame 283 0 70 0 346 0 130 0)
       
  1229               foregroundColor: (Color 100.0 100.0 0.0)
       
  1230               backgroundColor: (Color 0.0 100.0 0.0)
       
  1231               fill: true
       
  1232               lineColor: (Color 100.0 0.0 0.0)
       
  1233             )
  1171             )
  1234            )
  1172            )
  1235          
  1173          
  1236         )
  1174         )
  1237       )
  1175       )