--- a/ColorValue.st Tue May 02 01:06:45 1995 +0200
+++ b/ColorValue.st Wed May 03 02:01:17 1995 +0200
@@ -21,7 +21,7 @@
COPYRIGHT (c) 1995 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libview2/ColorValue.st,v 1.2 1995-03-07 21:54:53 claus Exp $
+$Header: /cvs/stx/stx/libview2/ColorValue.st,v 1.3 1995-05-03 00:01:17 claus Exp $
'!
!ColorValue class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
version
"
-$Header: /cvs/stx/stx/libview2/ColorValue.st,v 1.2 1995-03-07 21:54:53 claus Exp $
+$Header: /cvs/stx/stx/libview2/ColorValue.st,v 1.3 1995-05-03 00:01:17 claus Exp $
"
!
@@ -77,6 +77,18 @@
"
!
+hue:hue saturation:sat brightness:light
+ "return a color.
+ The hue, saturation and brightness values are given in 0..1 instead of
+ degrees / percent"
+
+ ^ Color hue:hue*360 light:light*100 saturation:sat*100
+
+ "
+ ColorValue hue:0 saturation:1 brightness:0.5
+ "
+!
+
scaledRed:r scaledGreen:g scaledBlue:b
"ST-80 compatibility.
Return a color from r, g and b values;