changeset 2087 | 619e0288e4e1 |
parent 2083 | 117f2e5ca733 |
child 2096 | f3f0d358239f |
2086:069a179b1849 | 2087:619e0288e4e1 |
---|---|
1262 ! |
1262 ! |
1263 |
1263 |
1264 cyan |
1264 cyan |
1265 "return the cyan color - ST-80 compatibility" |
1265 "return the cyan color - ST-80 compatibility" |
1266 |
1266 |
1267 ^ self redPercent:0 greenPercent:100 bluePercent:100 |
1267 ^ self cyan:100 |
1268 |
1268 |
1269 " |
1269 " |
1270 Color cyan inspect |
1270 Color cyan inspect |
1271 " |
1271 " |
1272 |
1272 |
1273 "Modified: 23.4.1996 / 13:16:07 / cg" |
1273 "Modified: 23.4.1996 / 13:16:07 / cg" |
1274 ! |
|
1275 |
|
1276 cyan: cyan |
|
1277 "return a cyan color; |
|
1278 the argument cyan is interpreted as percent (0..100)" |
|
1279 |
|
1280 ^ self cyan:100 magenta:100-cyan yellow:100-cyan |
|
1281 |
|
1274 ! |
1282 ! |
1275 |
1283 |
1276 darkGray |
1284 darkGray |
1277 "return the dark grey color (English version ;-)" |
1285 "return the dark grey color (English version ;-)" |
1278 |
1286 |
1410 ! |
1418 ! |
1411 |
1419 |
1412 magenta |
1420 magenta |
1413 "return the magenta color - ST-80 compatibility" |
1421 "return the magenta color - ST-80 compatibility" |
1414 |
1422 |
1415 ^ self redPercent:100 greenPercent:0 bluePercent:100 |
1423 ^ self magenta:100 |
1416 |
1424 |
1417 " |
1425 " |
1418 Color magenta inspect |
1426 Color magenta inspect |
1419 " |
1427 " |
1420 |
1428 |
1421 "Modified: 23.4.1996 / 13:23:41 / cg" |
1429 "Modified: 23.4.1996 / 13:23:41 / cg" |
1430 ! |
|
1431 |
|
1432 magenta: magenta |
|
1433 "return a magenta color; |
|
1434 the argument magenta is interpreted as percent (0..100)" |
|
1435 |
|
1436 ^ self cyan:100-magenta magenta:100 yellow:100-magenta |
|
1437 |
|
1422 ! |
1438 ! |
1423 |
1439 |
1424 mediumGray |
1440 mediumGray |
1425 "return medium-grey color (US version ;-)" |
1441 "return medium-grey color (US version ;-)" |
1426 |
1442 |
1523 ! |
1539 ! |
1524 |
1540 |
1525 yellow |
1541 yellow |
1526 "return the yellow color - ST-80 compatibility" |
1542 "return the yellow color - ST-80 compatibility" |
1527 |
1543 |
1528 ^ self redPercent:100 greenPercent:100 bluePercent:0 |
1544 ^ self yellow:100 |
1529 |
1545 |
1530 "Modified: 23.4.1996 / 13:33:56 / cg" |
1546 "Modified: 23.4.1996 / 13:33:56 / cg" |
1547 ! |
|
1548 |
|
1549 yellow: yellow |
|
1550 "return a yellow color; |
|
1551 the argument yellow is interpreted as percent (0..100)" |
|
1552 |
|
1553 ^ self cyan:100-yellow magenta:100-yellow yellow:100 |
|
1554 |
|
1531 ! ! |
1555 ! ! |
1532 |
1556 |
1533 !Color class methodsFor:'obsolete'! |
1557 !Color class methodsFor:'obsolete'! |
1534 |
1558 |
1535 nameOrDither:colorName |
1559 nameOrDither:colorName |
4516 ! ! |
4540 ! ! |
4517 |
4541 |
4518 !Color class methodsFor:'documentation'! |
4542 !Color class methodsFor:'documentation'! |
4519 |
4543 |
4520 version |
4544 version |
4521 ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.113 1998-04-02 08:07:20 cg Exp $' |
4545 ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.114 1998-04-09 18:14:14 tz Exp $' |
4522 ! ! |
4546 ! ! |
4523 Color initialize! |
4547 Color initialize! |