equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 1991 by Claus Gittinger |
4 COPYRIGHT (c) 1991 by Claus Gittinger |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 This software is furnished under a license and may be used |
7 This software is furnished under a license and may be used |
237 imageUnderShadow function:#and. |
239 imageUnderShadow function:#and. |
238 imageUnderShadow fillRectangleX:right y:0 width:shW height:height. |
240 imageUnderShadow fillRectangleX:right y:0 width:shW height:height. |
239 imageUnderShadow fillRectangleX:0 y:bot width:width height:shH. |
241 imageUnderShadow fillRectangleX:0 y:bot width:width height:shH. |
240 |
242 |
241 blackIs0 ifFalse:[ |
243 blackIs0 ifFalse:[ |
242 imageUnderShadow foreground:(Color black onDevice:graphicsDevice) background:clr0. |
244 imageUnderShadow foreground:self blackColor background:clr0. |
243 imageUnderShadow function:#or. |
245 imageUnderShadow function:#or. |
244 imageUnderShadow fillRectangleX:right y:0 width:shW height:height. |
246 imageUnderShadow fillRectangleX:right y:0 width:shW height:height. |
245 imageUnderShadow fillRectangleX:0 y:bot width:width height:shH. |
247 imageUnderShadow fillRectangleX:0 y:bot width:width height:shH. |
246 ] |
248 ] |
247 ] ifTrue:[ |
249 ] ifTrue:[ |