pikl 0.2.8-x86-mswin32 → 0.3.0-x86-mswin32

data/lib/pikl/image.rb

@@ -2,7 +2,7 @@ module Pikl
   
   class Image
 
-    def self.open(inpath, &block)      
+    def self.open(inpath, &block)
       image = Pikl::Image.new(inpath)
       image.instance_variable_set(:@block,block)
       
@@ -75,14 +75,10 @@ module Pikl
     end
 
     def rotate(angle, backcolor = "#FFFFFF", sample = :bilinear)
-
-      if ROTATE_ANGLE.has_key?(angle.to_i)
-        validate_rotate(angle)
-        Ext.pkl_rotate(@pkl_image, ROTATE_ANGLE[angle.to_i])
-      else
-        ci = color_int(backcolor)
-        Ext.pkl_rotate2(@pkl_image, angle.to_f, SAMPLES[sample.to_sym], ci[0], ci[1], ci[2], ci[3])
-      end
+      ci = color_int(backcolor)
+      color = Ext.pkl_color_rgb(ci[0], ci[1], ci[2])
+      Ext.pkl_rotate(@pkl_image, angle.to_f, SAMPLES[sample.to_sym], color)
+      Ext.pkl_color_close(color)
       self
     end
     
@@ -140,109 +136,6 @@ module Pikl
       self.height <= self.width
     end
 
-    # threshold=0-255
-    #  threshold=0の時は変化しません
-    #  threshold=255の時は全ての色にアンシャープ処理が働きます
-    # edge=-10 .. 10
-    # 	edge=0の時は変化しません
-    # 	edge>0の時は値が大きいほど先鋭化されます
-    # 	edge<0の時は値が小さいほどぼやけます
-    # 
-    # 	想定結果が得られる範囲は-10 .. 10程度です。
-    # 	これを超える場合は、品質の保証はありません
-    # 	※画質によりこの通りではありません。-10..10の範囲より小さくなる可能性があります。
-    def unshapmask(threshold, edge)
-      Ext.pkl_unsharp(@pkl_image, threshold.to_i, edge.to_f)
-      self
-    end
-
-    # コントラスト調整
-    #  コントラストを強くするということは、白い部分をより白く、
-    #  黒い部分をより黒くするような変換を意味します。
-    #  逆にコントラストを弱くした場合、白い部分と黒い部分の差が無くなり、灰色っぽい画像になります。
-    # <rate>
-    # 	範囲：-127 .. 127
-    # 	rate=0の時は変化しません
-    # 		* rateが0以上の時は周波数によるコントラスト強調がおこなわれます
-    # 		* rateが0未満の時は直線的に平坦化されます
-    def contrast(rate)
-      Ext.pkl_contrast(@pkl_image, rate.to_f)
-      self
-    end
-
-    # レベル補正
-    # 	ヒストグラムの平坦化をおこないます。各色の分布に偏りがある画像に有効な場合があります。
-    # 	coeff = 平坦化時の係数です。1が標準です。1より小さい場合は暗く、1より大きい場合は明るくなります(0.0..2.0)
-    # 	low  = 全ピクセル数に対して、切り捨てる暗い色の総数の割合(0-100%)
-    # 	high = 全ピクセル数に対して、切り捨てる明るい色の総数の割合(0-100%)
-    def level(low, high, coeff)
-      Ext.pkl_level(@pkl_image, low.to_f, high.to_f, coeff.to_f)
-      self
-    end
-
-    # 明るさ調整
-    # この明るさ調整は各色からcolor値を加算する単純な処理です。
-    # colorに255を指定すれば、ただの白い画像になります
-    # colorに-255を指定すると、ただの黒い画像になります。
-    def brightness(color)
-      Ext.pkl_brightness(@pkl_image, color.to_i)
-      self
-    end
-    
-    # 輝度(明るさ)・彩度(鮮やかさ)・色相(色合い)調整
-    #   * 具体的にどういうことかを理解したい場合は、mspaintの「色の編集」を見ると良いでしょう。
-    #   ym(輝度) -1 .. 1(0.1で10%up).0では変化なし
-    #   sm(彩度) -1 .. 1(0.1で10%up).0では変化なし
-    #   hd(色相) 360.0度回転(R=113.2/Ye=173.0/G=225.0/Cy=293.2/B=353.0/Mg=45.0).360の倍数では変化なし
-    def hls(ym, sm ,hd)
-      Ext.pkl_hls(@pkl_image, ym.to_f, sm.to_f, hd.to_f)
-      self
-    end
-    
-    # gamma correction
-    # _gm_ :: compensating rate.
-    # gm must be >= 0 and image is neutral if gm value is 1.0.
-    def gamma(gm)
-      Ext.pkl_gamma(@pkl_image, gm.to_f)
-      self
-    end
-    
-    # mosaic effect
-    # _width_ :: width for mosaic unit.
-    # _height_ :: height for mosaic unit. 
-    def mosaic(width, height)
-      Ext.pkl_mosaic(@pkl_image, width, height)
-      self
-    end
-    
-    # compose image
-    # _image_ :: another pikl image object.
-    # _xpos_ :: left position of composing image.
-    # _ypos_ :: top position of composing image.
-    def compose(image, xpos, ypos)
-      Ext.pkl_composite(@pkl_image, image.rawdata, xpos, ypos)
-      self
-    end
-    
-    # mediancut to decrease colors.
-    # _ncolors_ :: num of colors.(1..256)
-    # _dither_ :: dither. true/false
-    def mediancut(ncolors, dither)
-      dither = dither ? 1 : 0
-      Ext.pkl_mediancut(@pkl_image, 4, dither)
-      self
-    end
-    
-    # alphablend
-    # _image_ :: another pikl image object.
-    # _xpos_ :: left position of blend image.
-    # _ypos_ :: top position of blend image.
-    # _alpha_ :: alpha: α-value(0-255). 255 is complete transparent.
-    def alphablend(image, xpos, ypos, alpha)
-      Ext.pkl_alphablend(@pkl_image, image.rawdata, xpos, ypos, alpha);
-      self
-    end
-
     # regular expressions to try for identifying extensions
     def split_extensions(path)
       filename = path.split('/').last
@@ -267,11 +160,6 @@ module Pikl
       error("left is outside the range.  #{x}") if x > self.width.to_i
       error("top is outside the range.  #{y}") if y > self.height.to_i
     end
-
-    def validate_rotate(angle)
-      validate_numeric(angle)
-      error("invalid angle. # => #{angle}") unless ROTATE_ANGLE.has_key?(angle)
-    end
     
     def validate_resize(width, height)
       validate_auto(width, height)
@@ -307,6 +195,125 @@ module Pikl
       #self.close
       raise Pikl::ParameterException.new(message)
     end
+    
+
+##--soezimaster add.
+    # オープン済みファイルディスクリプタからPiklを生成する
+    def fdopen(fd)
+      self.close
+      error("invalid parameter. # => #{fd}") unless fd.class.name == 'File'
+      @pkl_image = Ext.pkl_fdopen(fd)
+    end
+    
+    # 複製
+    def dup(src)
+      self.close
+      error("invalid parameter. # => #{src}") unless src.class.name == 'Pikl::Image'
+      @pkl_image = Ext.pkl_dup(src.rawdata)
+    end
+    
+    # 新規のキャンバスを作成する
+    def canvas(width, height, colorspace, color)
+      self.close
+      error("invalid parameter. # => #{color}") if color.nil?
+      error("invalid parameter. # => #{color}") if color.class.name != 'Pikl::Color'
+      error("invalid parameter. # => #{colorspace}") unless COLORSPACE.include?(colorspace)
+      validate_pix(width)
+      validate_pix(height)
+      @pkl_image = Ext.pkl_canvas(width, height, COLORSPACE[colorspace], color.rawdata)
+    end
+    
+    # オープン済みファイルディスクリプタ(もしくはIO)にイメージを書き出す
+    def output(fd, format, compress=nil)
+      raise Pikl::ImageProcessException.new("image already closed.") unless @pkl_image
+      error("invalid parameter. # => #{fd}") unless ['File', 'IO'].include?(fd.class.name)
+      validate_format(format)
+      if compress
+        validate_compress(compress)
+        Ext.pkl_compress(@pkl_image, compress.to_i)
+      end
+      
+      Ext.pkl_output(@pkl_image, fd, EXTENSIONS_FORMATS[format.to_s.downcase] || format.to_i)
+      self.close unless(@block)
+      @pkl_image
+    end
+    
+    # 色数を数える
+    def count
+      Ext.pkl_count(@pkl_image) if(@pkl_image)
+    end
+    
+    # カラースペースを返す
+    def colorspace
+      nil unless(@pkl_image)
+      COLORSPACE.find{ |k, v|
+        v == Ext.pkl_colorspace(@pkl_image)
+        return k
+      }
+    end
+    
+    # 特定ピクセルの色を取り出す
+    def getcolor(x, y, colormodel)
+      nil unless(@pkl_image)
+      validate_position(x, y)
+      error("invalid parameter. # => #{colormodel}") unless COLORMODEL.include?(colormodel)
+      Ext.pkl_get_color(@pkl_image, x, y, COLORMODEL[colormodel])
+    end
+    
+    # 特定ピクセルに色をセットする
+    def setcolor(x, y, colormodel, color)
+      nil unless(@pkl_image)
+      validate_position(x, y)
+      error("invalid parameter. # => #{colormodel}") unless COLORMODEL.include?(colormodel)
+      validate_numeric(color)
+      error("invalid parameter. # => #{color}") unless color>=0 && color<=255
+      Ext.pkl_set_color(@pkl_image, x, y, COLORMODEL[colormodel], color)
+    end
+    
+    # 特定ピクセルの色を取り出す
+    def getpixel(x, y)
+      return unless @pkl_image
+      validate_position(x, y)
+      color = Ext.pkl_get_pixel(self.rawdata, x, y)
+      
+      case self.colorspace
+        when :GRAY
+          v = { 'gray' => Ext.pkl_color(color, COLORMODEL[:gray]) }
+        when :RGB
+          v = {
+            'red'   => Ext.pkl_color(color, COLORMODEL[:red]),
+            'green' => Ext.pkl_color(color, COLORMODEL[:green]),
+            'blue'  => Ext.pkl_color(color, COLORMODEL[:blue]) }
+        when :CMYK
+          v = {
+            'cyan'    => Ext.pkl_color(color, COLORMODEL[:cyan]),
+            'magenta' => Ext.pkl_color(color, COLORMODEL[:magenta]),
+            'yellow'  => Ext.pkl_color(color, COLORMODEL[:yellow]),
+            'black'   => Ext.pkl_color(color, COLORMODEL[:black]) }
+        else
+          v=nil
+      end
+      Ext.pkl_color_close(color)
+      return v
+    end
+
+    # 特定ピクセルに色を設定する
+    def setpixel(x, y, color, auto=true)
+      return unless @pkl_image
+      validate_position(x, y)
+      error("invalid parameter. # => #{color}") if color.nil?
+      error("invalid parameter. # => #{color}") if color.class.name != 'Pikl::Color'
+      Ext.pkl_set_pixel(@pkl_image, x, y, color.rawdata)
+      color.close if(auto)
+    end
+    
+    def validate_position(x, y)
+      validate_numeric(x)
+      validate_numeric(y)
+      error("value is outside the range.  #{x}") if x<0 || x>=self.width
+      error("value is outside the range.  #{y}") if y<0 || y>=self.height
+    end
+    
   end
 end
 

data/lib/pikl/version.rb

@@ -1,8 +1,8 @@
 module Pikl #:nodoc:
   module VERSION #:nodoc:
     MAJOR = 0
-    MINOR = 2
-    TINY  = 8
+    MINOR = 3
+    TINY  = 0
 
     STRING = [MAJOR, MINOR, TINY].join('.')
   end

data/test/test_pikl_image.rb

@@ -313,20 +313,6 @@ class TestPiklImage < Test::Unit::TestCase
       
     end
     
-    def test_validate_rotate
-      Pikl::Image.open(SAMPLE_IMAGE) do |img|
-    
-        assert_raise(Pikl::ParameterException){img.validate_rotate(15)}
-        assert_nil(img.validate_rotate(0))
-        assert_nil(img.validate_rotate(90))
-        assert_nil(img.validate_rotate(180))
-        assert_nil(img.validate_rotate(270))
-        assert_nil(img.validate_rotate(360))
-    
-      end
-      
-    end
-    
     def test_validate_resize
       Pikl::Image.open(SAMPLE_IMAGE) do |img|
     

data/test/test_pikl_image2.rb

@@ -0,0 +1,541 @@
+require File.dirname(__FILE__) + '/test_helper.rb'
+
+class TestPiklImage < Test::Unit::TestCase
+
+  SAMPLE_IMAGE = File.dirname(__FILE__) + '/sample.jpg'
+  SAMPLE_OUTPUT = File.dirname(__FILE__) + '/output.jpg'
+  TESTOUT_DIR = File.dirname(__FILE__) + '/out'
+  
+  SAMPLE_IMAGE_W = 120
+  SAMPLE_IMAGE_H = 160
+
+  def setup
+    #out�̉����������I
+  end
+
+  def teardown
+    if File.exists? SAMPLE_OUTPUT
+      File.delete SAMPLE_OUTPUT
+    end
+  end
+
+
+  def test_fdopen
+    assert_raise(Pikl::ParameterException){
+      f = "test"
+      pk = Pikl::Image.new(Pikl::DEFAULT_IMAGE)
+      pk.fdopen(f)
+      pk.close
+    }
+    
+    f = open(SAMPLE_IMAGE, "rb")
+    pk = Pikl::Image.new(Pikl::DEFAULT_IMAGE)
+    pk.fdopen(f)
+    pk.save(TESTOUT_DIR + "/fdopen.jpg");
+    pk.close
+  end
+
+  def test_dup
+    assert_raise(Pikl::ParameterException){
+      src = "test"
+      pk = Pikl::Image.new(Pikl::DEFAULT_IMAGE)
+      pk.dup(src)
+      pk.close
+    }
+    
+    src = Pikl::Image.new(SAMPLE_IMAGE)
+    pk = Pikl::Image.new(Pikl::DEFAULT_IMAGE)
+    pk.dup(src)
+    src.close
+    pk.save(TESTOUT_DIR + "/dup.jpg");
+    pk.close
+  end
+
+  def test_canvas
+    pk = Pikl::Image.new(Pikl::DEFAULT_IMAGE)
+    pk.canvas(100, 100, :GRAY, Pikl::Color.gray(100))
+    pk.save(TESTOUT_DIR + "/canvas_gray.jpg")
+    pk.close
+    
+    pk = Pikl::Image.new(Pikl::DEFAULT_IMAGE)
+    pk.canvas(100, 100, :RGB, Pikl::Color.rgb(0xff, 0xff, 0xff))
+    pk.save(TESTOUT_DIR + "/canvas_rgb.jpg")
+    pk.close
+    
+    pk = Pikl::Image.new(Pikl::DEFAULT_IMAGE)
+    pk.canvas(100, 100, :CMYK, Pikl::Color.cmyk(0xff, 0, 0xff, 0xff))
+    pk.save(TESTOUT_DIR + "/canvas_cmyk.jpg")
+    pk.close
+  end
+
+  def test_output
+    f = open(TESTOUT_DIR+'/output.jpg', "wb")
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.output(f, pk.format)
+    #pk.output($stdout, pk.format)
+    pk.close
+    f.close
+  end
+  
+  def test_count
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    assert_equal(pk.count, 12979)
+    pk.close
+  end
+  
+  def test_colorspace
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    assert_equal(pk.colorspace, :RGB)
+    pk.close
+  end
+  
+  def test_getcolor
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    assert_equal(pk.getcolor(0, 0, :red), 207)
+    assert_equal(pk.getcolor(0, 0, :green), 206)
+    assert_equal(pk.getcolor(0, 0, :blue), 201)
+    pk.close
+  end
+  
+  def test_setcolor
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    for y in 0..100 do
+      for x in 0..100 do
+        pk.setcolor(x, y, :red, 255)
+      end
+    end
+    pk.save(TESTOUT_DIR + "/setcolor.jpg")
+    pk.close
+  end
+  
+  def test_getpixel
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    color = pk.getpixel(0,0)
+    assert_equal(color['red'], 207)
+    assert_equal(color['green'], 206)
+    assert_equal(color['blue'], 201)
+    pk.close
+  end
+  
+  def test_setpixel
+    color = Pikl::Color.rgb(100,100,100)
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    for y in 0..100 do
+      for x in 0..100 do
+        pk.setpixel(x, y, color, false)
+      end
+    end
+    pk.save(TESTOUT_DIR + "/setpixel.jpg")
+    pk.close
+    color.close
+  end
+  
+  def test_invert
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.invert
+    pk.save(TESTOUT_DIR + "/invert.jpg")
+    pk.close
+  end
+  
+  def test_alphaedge
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.alphaedge(8, 1.5, 1.5, 1.0, 30, 50)
+    pk.save(TESTOUT_DIR + "/alphaedge.jpg")
+    pk.close
+  end
+  
+  def test_crayon
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.crayon
+    pk.save(TESTOUT_DIR + "/crayon.jpg")
+    pk.close
+  end
+  
+  def test_edgeposter
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.edgeposter(4, 9.0, 9.0, 1.0, 1)
+    pk.save(TESTOUT_DIR + "/edgeposter.jpg")
+    pk.close
+  end
+  
+  def test_hydrangea
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.hydrangea
+    pk.save(TESTOUT_DIR + "/hydrangea.jpg")
+    pk.close
+  end
+  
+  def test_rinkaku
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.rinkaku
+    pk.save(TESTOUT_DIR + "/rinkaku.jpg")
+    pk.close
+  end
+  
+  def test_voronoi_zone
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.voronoi_zone(5)
+    pk.save(TESTOUT_DIR + "/voronoi_zone.jpg")
+    pk.close
+    
+    color = Pikl::Color.rgb(0, 0, 0)
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.voronoi_zone(5, color)
+    pk.save(TESTOUT_DIR + "/voronoi_zone_edge.jpg")
+    pk.close
+    color.close
+    
+  end
+  
+  def test_voronoi_count
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.voronoi_count(300)
+    pk.save(TESTOUT_DIR + "/voronoi_count.jpg")
+    pk.close
+    
+    color = Pikl::Color.rgb(0, 0, 0)
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.voronoi_count(300, color)
+    pk.save(TESTOUT_DIR + "/voronoi_count_edge.jpg")
+    pk.close
+    color.close
+  end
+  
+  def test_sepia
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.sepia(0.89, 0.8, 0.5)
+    pk.save(TESTOUT_DIR + "/sepia.jpg")
+    pk.close
+  end
+  
+  def test_oilpaint
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.oilpaint(4)
+    pk.save(TESTOUT_DIR + "/oilpaint.jpg")
+    pk.close
+  end
+  
+  def test_kuwahara
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.kuwahara(4)
+    pk.save(TESTOUT_DIR + "/kuwahara.jpg")
+    pk.close
+  end
+  
+  def test_blot
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.blot(4)
+    pk.save(TESTOUT_DIR + "/blot.jpg")
+    pk.close
+  end
+  
+  def test_vtr
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.vtr(3, 10, 10)
+    pk.save(TESTOUT_DIR + "/vtr.jpg")
+    pk.close
+  end
+  
+  def test_dither
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.dither
+    pk.save(TESTOUT_DIR + "/dither.jpg")
+    pk.close
+  end
+  
+  def test_edgepaint
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.edgepaint
+    pk.save(TESTOUT_DIR + "/edgepaint.jpg")
+    pk.close
+  end
+
+  def test_edge
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.edge
+    pk.save(TESTOUT_DIR + "/edge.jpg")
+    pk.close
+  end
+  
+  def test_contour
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.contour
+    pk.save(TESTOUT_DIR + "/contour.jpg")
+    pk.close
+  end
+
+  def test_focus
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.focus
+    pk.save(TESTOUT_DIR + "/focus.jpg")
+    pk.close
+  end
+  
+  def test_emboss
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.emboss
+    pk.save(TESTOUT_DIR + "/emboss.jpg")
+    pk.close
+  end
+  
+  def test_custom_emboss
+    mask = [-1, -1, -1,
+            -1,  8, -1,
+            -1, -1, -1]
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.emboss2(mask, 3, 3)
+    pk.save(TESTOUT_DIR + "/custom_emboss.jpg")
+    pk.close
+  end
+  
+  def test_noisecut
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.noisecut
+    pk.save(TESTOUT_DIR + "/noisecut.jpg")
+    pk.close
+  end
+  
+  def test_blur
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.blur(3)
+    pk.save(TESTOUT_DIR + "/blur.jpg")
+    pk.close
+    
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.gaussblur(3.0)
+    pk.save(TESTOUT_DIR + "/gaussblur.jpg")
+    pk.close
+    
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.rblur
+    pk.save(TESTOUT_DIR + "/rblur.jpg")
+    pk.close
+    
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.ablur
+    pk.save(TESTOUT_DIR + "/ablur.jpg")
+    pk.close
+    
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.wblur
+    pk.save(TESTOUT_DIR + "/wblur.jpg")
+    pk.close
+    
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.mblur(30.0, 5)
+    pk.save(TESTOUT_DIR + "/mblur.jpg")
+    pk.close
+  end
+  
+  def test_shadowframe
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.shadowframe(10)
+    pk.save(TESTOUT_DIR + "/shadowframe.jpg")
+    pk.close
+  end
+  
+  def test_randomshadow
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+  
+    canvas = Pikl::Image.new(Pikl::DEFAULT_IMAGE)
+    canvas.canvas(300, 300, :RGB, Pikl::Color.rgb(0xff, 0xff, 0xff))
+
+    canvas.randomshadow(pk, 100, 100, 10)
+    canvas.randomshadow(pk, 50, 50, 10)
+    canvas.randomshadow(pk, 0, 0, 10)
+
+    canvas.save(TESTOUT_DIR + "/randomshadow.jpg")
+    canvas.close
+    pk.close
+  end
+  
+  
+  def test_color_emboss
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.color_emboss(100, 70)
+    pk.save(TESTOUT_DIR + "/color_emboss.jpg")
+    pk.close
+  end
+  
+  def test_pixelate
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.pixelate(2)
+    pk.save(TESTOUT_DIR + "/pixelate.jpg")
+    pk.close
+  end
+  
+  def test_grid
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.grid(5, 5, 100)
+    pk.save(TESTOUT_DIR + "/grid.jpg")
+    pk.close
+  end
+
+  def test_posterize
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.posterize(8)
+    pk.save(TESTOUT_DIR + "/posterize.jpg")
+    pk.close
+  end
+  
+  def test_cutcolor
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.cutcolor(0b10101100)
+    pk.save(TESTOUT_DIR + "/cutcolor.jpg")
+    pk.close
+  end
+  
+  def test_gray
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.gray
+    pk.save(TESTOUT_DIR + "/gray.jpg")
+    pk.close
+    
+    pk = Pikl::Image.new(TESTOUT_DIR + "/gray.jpg")
+    pk.blackwhite
+    pk.save(TESTOUT_DIR + "/blackwhite.jpg")
+    pk.close
+  end
+  
+  def test_tileslit
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.tileslit(10,5)
+    pk.save(TESTOUT_DIR + "/tileslit.jpg")
+    pk.close
+  end
+  
+  def test_splitframe
+    color = Pikl::Color.rgb(200,100,255)
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.splitframe(color, 5, 5, 3, 2)
+    pk.save(TESTOUT_DIR + "/splitframe.jpg")
+    pk.close
+  end
+  
+  def test_vignette
+    color = Pikl::Color.rgb(0,0,0)
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.vignette(color, 50, 80)
+    pk.save(TESTOUT_DIR + "/vignette.jpg")
+    pk.close
+    color.close
+  end
+  
+  def test_vaseline
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.vaseline(80)
+    pk.save(TESTOUT_DIR + "/vaseline.jpg")
+    pk.close
+  end
+  
+  def test_vv
+    color = Pikl::Color.rgb(0,0,0)
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.vv(color, 50, 80)
+    pk.save(TESTOUT_DIR + "/vv.jpg")
+    pk.close
+    color.close
+  end
+  
+  def test_film
+    color = Pikl::Color.rgb(200,100,150)
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.film(color, 30)
+    pk.save(TESTOUT_DIR + "/film.jpg")
+    pk.close
+    color.close
+  end
+  
+  def test_swirl
+    color = Pikl::Color.rgb(200,100,150)
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.swirl(0.005, -1, -1, color)
+    pk.save(TESTOUT_DIR + "/swirl.jpg")
+    pk.close
+    color.close
+  end
+  
+  def test_wave
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.wave(15.0, 5.0)
+    pk.save(TESTOUT_DIR + "/wave.jpg")
+    pk.close
+  end
+  
+  def test_dots
+    color = Pikl::Color.rgb(200,100,150)
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.dots(3, color)
+    pk.save(TESTOUT_DIR + "/dots.jpg")
+    pk.close
+    color.close
+  end
+  
+  def test_colordither
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.colordither(50)
+    pk.save(TESTOUT_DIR + "/colordither.jpg")
+    pk.close
+  end
+  
+  def test_fantasy
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.fantasy(1, 0.5, 1.0, 0)
+    pk.save(TESTOUT_DIR + "/fantasy.jpg")
+    pk.close
+  end
+  
+  def test_illust
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.illust(50,20,50)
+    pk.save(TESTOUT_DIR + "/illust.jpg")
+    pk.close
+  end
+  
+  def test_pattern
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.pattern(3,9)
+    pk.save(TESTOUT_DIR + "/pattern.jpg")
+    pk.close
+  end
+  
+  def test_tile
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.tile(5,5,50)
+    pk.save(TESTOUT_DIR + "/tile.jpg")
+    pk.close
+  end
+  
+  def test_affine
+    color = Pikl::Color.rgb(200,100,150)
+    pk = Pikl::Image.new(SAMPLE_IMAGE)
+    pk.affine(300, 300, color, 2.0, 2.0, 30.0, 50, 50)
+    pk.save(TESTOUT_DIR + "/affine.jpg")
+    pk.close
+    color.close
+  end
+  
+  
+  def test_special
+    Pikl::Image.open(SAMPLE_IMAGE) do |img|
+      img.posterize(8)
+      img.noisecut
+      
+      img2 = Pikl::Image.new(Pikl::DEFAULT_IMAGE)
+      img2.dup(img)
+      img2.level(5.0, 5.0, 1.0)
+      
+      img.brightness(50)
+      img.edge(30)
+      
+      img.alphablend(img2, 0, 0, 70)
+      
+      img.save(TESTOUT_DIR + "/special.jpg")
+      img.close
+      img2.close
+    end
+  end
+  
+end
+
+