Color.st
changeset 2388 8a7f4bb3847c
parent 2379 b2a844aabc93
child 2455 9d61d6c0d0f9
--- a/Color.st	Fri Oct 02 12:55:34 1998 +0200
+++ b/Color.st	Fri Oct 09 13:51:08 1998 +0200
@@ -1398,6 +1398,18 @@
     "Modified: 24.2.1997 / 21:33:28 / cg"
 !
 
+lightBlue
+    "return a light blue color"
+
+    ^ self redPercent:50 greenPercent:50 bluePercent:100
+
+    "
+     Color lightBlue inspect
+    "
+
+    "Modified: 23.4.1996 / 13:23:08 / cg"
+!
+
 lightGray
     "return the lightGrey color (US version ;-)"
 
@@ -1413,6 +1425,18 @@
     "Modified: 24.2.1997 / 21:33:41 / cg"
 !
 
+lightGreen
+    "return a light green color"
+
+    ^ self redPercent:50 greenPercent:100 bluePercent:50
+
+    "
+     Color lightGreen inspect
+    "
+
+    "Modified: 23.4.1996 / 13:23:08 / cg"
+!
+
 lightGrey
     "return the lightGrey color (English version ;-)"
 
@@ -1425,6 +1449,18 @@
     "Modified: 28.5.1996 / 20:51:11 / cg"
 !
 
+lightRed
+    "return a light red color"
+
+    ^ self redPercent:100 greenPercent:50 bluePercent:50
+
+    "
+     Color lightRed inspect
+    "
+
+    "Modified: 23.4.1996 / 13:23:08 / cg"
+!
+
 magenta
     "return the magenta color - ST-80 compatibility"
 
@@ -4560,6 +4596,6 @@
 !Color class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.122 1998-10-01 10:51:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.123 1998-10-09 11:51:08 cg Exp $'
 ! !
 Color initialize!