Color.st
changeset 8047 84d3591c4da0
parent 7964 00097a2433d1
child 8063 e335948608ed
equal deleted inserted replaced
8046:40b9636819d8 8047:84d3591c4da0
  4006 darker
  4006 darker
  4007     "Squeak compatibility;
  4007     "Squeak compatibility;
  4008      return a new color, which is darker than the receiver.
  4008      return a new color, which is darker than the receiver.
  4009      Almost the same as darkened for Squeak compatibility."
  4009      Almost the same as darkened for Squeak compatibility."
  4010 
  4010 
  4011     ^ self mixed:0.8333 with:Black
  4011     ^ self mixed:1 with:Black
       
  4012     "/ ^ self mixed:0.8333 with:Black
  4012 
  4013 
  4013     "
  4014     "
  4014      (Color red) darker
  4015      (Color red) darker
  4015      (Color red) muchDarker
  4016      (Color red) muchDarker
  4016     "
  4017     "
  4017 
  4018 
  4018     "Modified: / 11-06-1996 / 18:10:37 / cg"
  4019     "Modified: / 05-07-2017 / 09:28:40 / cg"
  4019     "Modified (comment): / 03-02-2017 / 11:38:42 / cg"
       
  4020 !
  4020 !
  4021 
  4021 
  4022 lighter
  4022 lighter
  4023     "Squeak compatibility;
  4023     "Squeak compatibility;
  4024      return a new color, which is slightly lighter than the receiver.
  4024      return a new color, which is slightly lighter than the receiver.
  4025      Almost the same as lightened for Squeak compatibility."
  4025      Almost the same as lightened for Squeak compatibility."
  4026 
  4026 
  4027     ^ self mixed:0.8333 with:White
  4027     ^ self mixed:1 with:White
       
  4028     "/ ^ self mixed:0.8333 with:White
  4028 
  4029 
  4029     "
  4030     "
  4030      (Color red)
  4031      (Color red)
  4031      (Color red) lighter
  4032      (Color red) lighter
  4032      (Color red) muchLighter
  4033      (Color red) muchLighter
  4033      (Color red) veryMuchLighter
  4034      (Color red) veryMuchLighter
  4034     "
  4035     "
  4035 
  4036 
  4036     "Modified: / 11-06-1996 / 18:10:49 / cg"
  4037     "Modified: / 05-07-2017 / 09:29:18 / cg"
  4037     "Modified (comment): / 03-02-2017 / 11:38:47 / cg"
       
  4038 !
  4038 !
  4039 
  4039 
  4040 muchDarker
  4040 muchDarker
  4041     "Squeak compatibility:
  4041     "Squeak compatibility:
  4042      return a new color, which is much darker than the receiver"
  4042      return a new color, which is much darker than the receiver"
  4109      Color yellow alpha
  4109      Color yellow alpha
  4110      Color yellow alphaByte
  4110      Color yellow alphaByte
  4111     "
  4111     "
  4112 
  4112 
  4113     "Modified (comment): / 03-02-2017 / 11:40:03 / cg"
  4113     "Modified (comment): / 03-02-2017 / 11:40:03 / cg"
       
  4114 !
       
  4115 
       
  4116 twiceDarker
       
  4117     "Squeak compatibility:
       
  4118      return a new color, which is twice as dark as the receiver"
       
  4119 
       
  4120     ^ self darker darker
       
  4121 
       
  4122     "
       
  4123      (Color red) 
       
  4124      (Color red) darker
       
  4125      (Color red) twiceDarker
       
  4126      (Color red) muchDarker
       
  4127     "
       
  4128 
       
  4129     "Created: / 05-07-2017 / 09:27:16 / cg"
  4114 !
  4130 !
  4115 
  4131 
  4116 veryMuchLighter
  4132 veryMuchLighter
  4117     "Squeak compatibility:
  4133     "Squeak compatibility:
  4118      return a new color, which is very much lighter than the receiver"
  4134      return a new color, which is very much lighter than the receiver"