Etoys Inbox: Morphic-kfr.69.mcz

A new version of Morphic was added to project Etoys Inbox:
http://source.squeak.org/etoysinbox/Morphic-kfr.69.mcz

==================== Summary ====================

Name: Morphic-kfr.69
Author: kfr
Time: 30 October 2011, 8:38:32 pm
UUID: a00a3ab0-6f2c-e344-a824-dbb170f45bb3
Ancestors: Morphic-kfr.68

filter stuff

=============== Diff against Morphic-kfr.68 ===============

Item was added:
+ ----- Method: SketchMorph>>blur:form: (in category 'filters') -----
+ blur: width form: filteredForm
+
+ | f fOut |
+ f _  filteredForm asFormOfDepth: 32.
+ fOut _ f deepCopy.
+ ScratchPlugin primBlur: f bits into: fOut bits width: width.
+      ^ fOut asFormOfDepth: 16.
+
+ !

Item was changed:
  ----- Method: SketchMorph>>brightnessShift: (in category 'filters') -----
  brightnessShift: shift
 
  self filters.
  filters add: { #filterBrightnessShift:form: .  shift}
 
 
  !

Item was added:
+ ----- Method: SketchMorph>>brightnessShift:form: (in category 'filters') -----
+ brightnessShift: shift form: filteredForm
+
+ | f fOut |
+ f _  filteredForm asFormOfDepth: 32.
+ fOut _ f deepCopy.
+ ScratchPlugin primShiftBrightness: f bits into: fOut bits by: shift.
+      ^ fOut asFormOfDepth: 16.
+
+ !

Item was removed:
- ----- Method: SketchMorph>>filterBlur:form: (in category 'filters') -----
- filterBlur: width form: filteredForm
-
- | f fOut |
- f _  filteredForm asFormOfDepth: 32.
- fOut _ f deepCopy.
- ScratchPlugin primBlur: f bits into: fOut bits width: width.
-      ^ fOut asFormOfDepth: 16.
-
- !

Item was removed:
- ----- Method: SketchMorph>>filterBrightnessShift:form: (in category 'filters') -----
- filterBrightnessShift: shift form: filteredForm
-
- | f fOut |
- f _  filteredForm asFormOfDepth: 32.
- fOut _ f deepCopy.
- ScratchPlugin primShiftBrightness: f bits into: fOut bits by: shift.
-      ^ fOut asFormOfDepth: 16.
-
- !

Item was removed:
- ----- Method: SketchMorph>>filterHueShift:form: (in category 'filters') -----
- filterHueShift: shift form: filteredForm
-
- | f fOut |
- f _  filteredForm asFormOfDepth: 32.
- fOut _ f deepCopy.
- ScratchPlugin primShiftHue: f bits into: fOut bits byDegrees: shift.
-      ^ fOut asFormOfDepth: 16.
-
- !

Item was removed:
- ----- Method: SketchMorph>>filterSaturationShift:form: (in category 'filters') -----
- filterSaturationShift: shift form: filteredForm
-
- | f fOut |
- f _  filteredForm asFormOfDepth: 32.
- fOut _ f deepCopy.
- ScratchPlugin primShiftSaturation: f bits into: fOut bits by: shift.
-      ^ fOut asFormOfDepth: 16.
-
- !

Item was added:
+ ----- Method: SketchMorph>>filtersAdd: (in category 'filters') -----
+ filtersAdd: aFilterWithValue
+
+
+ self filters.
+ filters do: [ : i | (i includes: aFilterWithValue first) ifTrue: [filters remove: i]].
+ filters add:  aFilterWithValue.
+ self generateRotatedForm.
+ self layoutChanged
+
+
+ !

Item was changed:
  ----- Method: SketchMorph>>hueShift: (in category 'filters') -----
  hueShift: shift
 
  self filters.
  filters add: { #filterHueShift:form: .  shift}
 
 
  !

Item was added:
+ ----- Method: SketchMorph>>hueShift:form: (in category 'filters') -----
+ hueShift: shift form: filteredForm
+
+ | f fOut |
+ f _  filteredForm asFormOfDepth: 32.
+ fOut _ f deepCopy.
+ ScratchPlugin primShiftHue: f bits into: fOut bits byDegrees: shift.
+      ^ fOut asFormOfDepth: 16.
+
+ !

Item was added:
+ ----- Method: SketchMorph>>removeAllFilters (in category 'filters') -----
+ removeAllFilters
+ filters := nil.
+ self generateRotatedForm.
+ self layoutChanged
+ !

Item was removed:
- ----- Method: SketchMorph>>resetAllFilters (in category 'filters') -----
- resetAllFilters
- filters := nil.
- !

Item was added:
+ ----- Method: SketchMorph>>saturationShift:form: (in category 'filters') -----
+ saturationShift: shift form: filteredForm
+
+ | f fOut |
+ 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