A new version of Morphic was added to project Etoys Inbox:
http://source.squeak.org/etoysinbox/Morphic-kfr..76.mcz==================== Summary ====================
Name: Morphic-kfr..76
Author: kfr.
Time: 7 November 2011, 6:54:46 pm
UUID: d98a768d-9bd9-9847-abf2-8bc0033d18f1
Ancestors: Morphic-kfr..75
return unchanged form on value 0 in filter
=============== Diff against Morphic-kfr..75 ===============
Item was changed:
----- Method: SketchMorph>>blur:form: (in category 'filters') -----
blur: aWidth form: filteredForm
| f fOut fWidth |
+ aWidth = 0 ifTrue:[^ filteredForm].
f := filteredForm asFormOfDepth: 32.
fWidth := f width + (aWidth - 1) max: f width.
fOut := f deepCopy.
ScratchPlugin
primBlur: f bits
into: fOut bits
width: fWidth.
^ fOut asFormOfDepth: 16!
Item was changed:
----- Method: SketchMorph>>brightnessShift:form: (in category 'filters') -----
brightnessShift: aShift form: filteredForm
| f fOut shift |
+ aShift = 0 ifTrue:[^ filteredForm].
shift := aShift min: 100 max: -100.
f := filteredForm asFormOfDepth: 32.
fOut := f deepCopy.
ScratchPlugin
primShiftBrightness: f bits
into: fOut bits
by: shift.
^ fOut asFormOfDepth: 16!
Item was changed:
----- Method: SketchMorph>>hueShift:form: (in category 'filters') -----
hueShift: aShift form: filteredForm
| f fOut shift |
+ aShift = 0 ifTrue:[^ filteredForm].
shift := aShift min: 180 max: -180.
f := filteredForm asFormOfDepth: 32.
fOut := f deepCopy.
ScratchPlugin
primShiftHue: f bits
into: fOut bits
byDegrees: shift.
^ fOut asFormOfDepth: 16!
Item was changed:
----- Method: SketchMorph>>saturationShift:form: (in category 'filters') -----
saturationShift: aShift form: filteredForm
| f fOut shift |
+ aShift = 0 ifTrue:[^ filteredForm].
shift := aShift min: 100 max: -100.
f := filteredForm asFormOfDepth: 32.
fOut := f deepCopy.
ScratchPlugin
primShiftSaturation: f bits
into: fOut bits
by: shift.
^ fOut asFormOfDepth: 16!
_______________________________________________
etoys-dev mailing list
[hidden email]
http://lists.squeakland.org/mailman/listinfo/etoys-dev