rmagick 1.7.1

data/doc/ex/cbezier2.rb

@@ -0,0 +1,40 @@
+#! /usr/local/bin/ruby -w
+require 'RMagick'
+
+imgl = Magick::ImageList.new
+imgl.new_image(470, 150, Magick::HatchFill.new('white','lightcyan2'))
+gc = Magick::Draw.new
+
+# Draw Bezier curve
+gc.stroke('red')
+gc.stroke_width(3)
+gc.fill_opacity(0)
+gc.bezier(25,125, 100,25, 400,25, 325,125)
+
+# Draw circles around end points
+gc.fill_opacity(0)
+gc.stroke('gray50').stroke_width(1)
+gc.circle(25,125, 28, 128)
+gc.circle(325,125, 328, 123)
+
+# Draw filled circles around control points
+gc.line(25,125, 100,25)
+gc.line(325,125, 400,25)
+gc.fill_opacity(1)
+gc.fill('gray50')
+gc.circle(100,25, 103,28)
+gc.circle(400,25, 403,28)
+
+# Annotate
+gc.fill('black')
+gc.stroke('transparent')
+gc.text(34,125, "'25,125'")
+gc.text(107,25, "'100,25'")
+gc.text(335,125, "'325,125'")
+gc.text(405,25, "'400,25'")
+
+gc.draw(imgl)
+imgl.border!(1,1, "lightcyan2")
+imgl.write('cbezier2.gif')
+exit(0)
+

data/doc/ex/cbezier3.rb

@@ -0,0 +1,40 @@
+#! /usr/local/bin/ruby -w
+require 'RMagick'
+
+imgl = Magick::ImageList.new
+imgl.new_image(540, 200, Magick::HatchFill.new('white','lightcyan2'))
+gc = Magick::Draw.new
+
+# Draw Bezier curve
+gc.stroke('red')
+gc.stroke_width(3)
+gc.fill_opacity(0)
+gc.bezier(100,150, 25,50, 475, 50, 400,150)
+
+# Draw circles around endpoints
+gc.fill_opacity(0)
+gc.stroke('gray50').stroke_width(1)
+gc.circle(100,150, 103, 153)
+gc.circle(400,150, 403, 153)
+gc.line(100,150, 25,50)
+gc.line(400,150, 475,50)
+
+# Draw filled circles around control points
+gc.fill_opacity(1)
+gc.fill('gray50')
+gc.circle(25,50, 28,53)
+gc.circle(475,50, 478,53)
+
+# Annotate
+gc.fill('black')
+gc.stroke('transparent')
+gc.text(107,150, "'100,150'")
+gc.text(30,50,  "'25,50'")
+gc.text(409,150, "'400,150'")
+gc.text(480,50, "'475,50'")
+
+gc.draw(imgl)
+imgl.border!(1,1, "lightcyan2")
+imgl.write('cbezier3.gif')
+exit(0)
+

data/doc/ex/cbezier4.rb

@@ -0,0 +1,41 @@
+#! /usr/local/bin/ruby -w
+require 'RMagick'
+
+imgl = Magick::ImageList.new
+imgl.new_image(390, 360, Magick::HatchFill.new('white','lightcyan2'))
+gc = Magick::Draw.new
+
+# Draw Bezier curve
+gc.stroke('red')
+gc.stroke_width(3)
+gc.fill_opacity(0)
+gc.bezier(20,180, 20,30, 320, 330, 320,180)
+
+# Draw circles around endpoints
+gc.fill_opacity(0)
+gc.stroke('gray50').stroke_width(1)
+gc.circle(20,180, 23, 183)
+gc.circle(320,180, 323, 183)
+
+# Draw filled circles around control points
+gc.line(20,180, 20,30)
+gc.line(320,180, 320,330)
+gc.fill_opacity(1)
+gc.fill('gray50')
+gc.circle(20,30, 23,33)
+gc.circle(320,330, 323,333)
+
+# Annotate
+gc.fill('black')
+gc.stroke('transparent')
+gc.text(29,180, "'20,180'")
+gc.text(29,33,  "'20,30'")
+gc.text(329,330, "'320,330'")
+gc.text(329,180, "'320,180'")
+
+gc.draw(imgl)
+imgl.border!(1,1, "lightcyan2")
+
+imgl.write('cbezier4.gif')
+exit(0)
+

data/doc/ex/cbezier5.rb

@@ -0,0 +1,41 @@
+#! /usr/local/bin/ruby -w
+require 'RMagick'
+
+imgl = Magick::ImageList.new
+imgl.new_image(390, 150, Magick::HatchFill.new('white','lightcyan2'))
+gc = Magick::Draw.new
+
+# Draw Bezier curve
+gc.stroke('red')
+gc.stroke_width(3)
+gc.fill_opacity(0)
+gc.bezier(20,120, 95,20, 245,20, 320,120)
+
+# Draw circles around endpoints
+gc.fill_opacity(0)
+gc.stroke('gray50').stroke_width(1)
+gc.circle(20,120, 23, 123)
+gc.circle(320,120, 323, 123)
+
+# Draw filled circles around control points
+gc.line(20,120, 95,20)
+gc.line(320,120, 245,20)
+gc.fill_opacity(1)
+gc.fill('gray50')
+gc.circle(95,20, 98,23)
+gc.circle(245,20, 248,23)
+
+# Annotate
+gc.fill('black')
+gc.stroke('transparent')
+gc.text(29,120, "'20,120'")
+gc.text(104,20,  "'95,20'")
+gc.text(254,20,  "'245,20'")
+gc.text(329,120, "'320,120'")
+
+gc.draw(imgl)
+imgl.border!(1,1, 'lightcyan2')
+
+imgl.write('cbezier5.gif')
+exit(0)
+

data/doc/ex/cbezier6.rb

@@ -0,0 +1,51 @@
+#! /usr/local/bin/ruby -w
+
+require 'RMagick'
+
+imgl = Magick::ImageList.new
+imgl.new_image(400, 300, Magick::HatchFill.new('white','lightcyan2'))
+
+gc = Magick::Draw.new
+
+# Draw Bezier curve
+gc.stroke('red')
+gc.stroke_width(2)
+gc.fill_opacity(0)
+gc.bezier(50,150, 50,50, 200,50, 200,150, 200,250, 350,250, 350,150)
+
+# Draw filled circles for the control points
+gc.fill('gray50')
+gc.stroke('gray50')
+gc.fill_opacity(1)
+gc.circle(50,50, 53,53)
+gc.circle(200,50, 203,53)
+gc.circle(200,250, 203,253)
+gc.circle(350,250, 353,253)
+
+# Draw circles on the points the curve passes through
+gc.fill_opacity(0)
+gc.circle(50,150, 53,153)
+gc.circle(200,150, 203,153)
+gc.circle(350,150, 353,153)
+
+# Draw the gray lines between points and control points
+gc.line(50,50, 50,150)
+gc.line(200,50, 200,250)
+gc.line(350,150, 350,250)
+
+# Annotate
+gc.fill('black')
+gc.stroke('transparent')
+gc.text(30,170, "'50,150'")
+gc.text(30, 40, "'50,50'")
+gc.text(180,40, "'200,50'")
+gc.text(210,155,"'200,150'")
+gc.text(180,270,"'200,250'")
+gc.text(330,270,"'350,250'")
+gc.text(330,140,"'350,150'")
+gc.draw(imgl)
+
+imgl.border!(1,1, 'lightcyan2')
+
+imgl.write("cbezier6.gif")
+exit

data/doc/ex/channel.rb

@@ -0,0 +1,26 @@
+#! /usr/local/bin/ruby -w
+
+require 'RMagick'
+include Magick
+
+img = Image.read('images/Flower_Hat.jpg').first
+imgs = ImageList.new
+
+imgs << img
+imgs << img.channel(RedChannel)
+imgs.cur_image['Label'] = 'RedChannel'
+imgs <<  img.channel(GreenChannel)
+imgs.cur_image['Label'] = 'GreenChannel'
+imgs << img.channel(BlueChannel)
+imgs.cur_image['Label'] = 'BlueChannel'
+
+result = imgs.montage {
+    self.tile = "2x2"
+    self.background_color = 'black'
+    self.stroke = 'transparent'
+    self.fill = 'white'
+    self.geometry = Geometry.new(img.columns/2, img.rows/2, 5, 5)
+    }
+
+result.write('channel.jpg')
+

data/doc/ex/channel_threshold.rb

@@ -0,0 +1,48 @@
+#! /usr/local/bin/ruby -w
+require 'RMagick'
+
+# Demonstrate the Image#channel_threshold method
+
+img = Magick::Image.read('images/Flower_Hat.jpg').first
+
+# Make the "before" image
+imgs = Magick::ImageList.new
+imgs << img.copy
+imgs.cur_image['Label'] = "\n\n"
+imgs << img.copy
+imgs.cur_image['Label'] = "\n\n\n"
+
+montage = imgs.montage {
+    self.background_color = "white"
+    self.geometry = "#{img.columns}x#{img.rows}+10+10"
+    self.tile = "2x1"
+    }
+montage.border!(1,1,"black")
+montage.write("channel_threshold_before.jpg")
+
+# Now the "after" image.
+# Channel threshold values should be a %-age of MaxRGB
+# Let the opacity threshold default to MaxRGB.
+img2 = img.channel_threshold(Magick::MaxRGB*0.75,
+                             Magick::MaxRGB*0.50)
+img2['Label'] = "channel_threshold(\nMagick::MaxRGB*0.75,\nMagick::MaxRGB*0.50)"
+
+img3 = img.channel_threshold(Magick::MaxRGB*0.50,
+                             Magick::MaxRGB*0.25,
+                             Magick::MaxRGB*0.25)
+img3['Label'] = 'channel_threshold(\nMagick::MaxRGB*0.50,\nMagick::MaxRGB*0.25,\nMagick::MaxRGB*0.25)'
+
+# Montage the two sample images
+imgs = Magick::ImageList.new
+imgs << img2 << img3
+
+montage = imgs.montage {
+    self.background_color = "white"
+    self.geometry = "#{img.columns}x#{img.rows}+10+10"
+    self.tile = "2x1"
+    }
+
+# Give the montage a black border
+montage.border!(1,1,'black')
+montage.write('channel_threshold_after.jpg')
+exit

data/doc/ex/charcoal.rb

@@ -0,0 +1,12 @@
+#! /usr/local/bin/ruby -w
+require 'RMagick'
+
+# Demonstrate the Image#charcoal method
+
+img = Magick::Image.read('images/Flower_Hat.jpg').first
+
+img = img.charcoal(0.75)
+
+img.write('charcoal.jpg')
+
+exit

data/doc/ex/chop.rb

@@ -0,0 +1,29 @@
+#!/usr/local/bin/ruby -w
+require 'RMagick'
+
+# Demonstrate the Image#chop method
+
+img = Magick::Image.read('images/Flower_Hat.jpg')[0]
+
+# Chop the specified rectangle out of the img.
+chopped = img.chop(0, img.rows/2, img.columns/2, img.rows)
+
+# Make a "before" image by highlighting the chopped area.
+gc = Magick::Draw.new
+gc.fill('white')
+gc.stroke('transparent')
+gc.fill_opacity(0.25)
+gc.rectangle(0, img.rows/2, img.columns/2, img.rows)
+gc.draw(img)
+
+img.write('chop_before.jpg')
+
+# Create a image to use as a background for
+# the after image. Make the chopped image the
+# same size as before the chop.
+bg = Magick::Image.new(img.columns, img.rows)
+
+chopped = bg.composite(chopped, Magick::NorthEastGravity, Magick::OverCompositeOp)
+
+chopped.write('chop_after.jpg')
+exit

data/doc/ex/circle.rb

@@ -0,0 +1,31 @@
+#! /usr/local/bin/ruby -w
+require 'RMagick'
+
+imgl = Magick::ImageList.new
+imgl.new_image(250, 250, Magick::HatchFill.new('white','LightCyan2'))
+
+gc = Magick::Draw.new
+
+# Draw the circle
+gc.fill_opacity(0)
+gc.stroke('red').stroke_width(3)
+gc.circle(125,125, 25, 125)
+
+# Draw a little gray circle on the perimeter
+gc.stroke_width(1)
+gc.stroke('gray50')
+gc.circle(25,125,28,128)
+
+# Draw a dot at the center
+gc.fill_opacity(1)
+gc.circle(125,125, 128,128)
+
+# Annotate the dots
+gc.fill('black')
+gc.stroke('transparent')
+gc.text(132,125, "'125,125'")
+gc.text(32,125, "'25,125'")
+gc.draw(imgl)
+
+imgl.border!(1,1, 'lightcyan2')
+imgl.write("circle.gif")

data/doc/ex/clip_path.rb

@@ -0,0 +1,56 @@
+#! /usr/local/bin/ruby -w
+
+require 'RMagick'
+
+points = [145, 65, 174,151, 264,151, 192,205,
+          218,291, 145,240,  72,291,  98,205,
+           26,151, 116,151]
+
+pr = Magick::Draw.new
+
+# Define a clip-path.
+# The name of the clip-path is "example"
+pr.define_clip_path('example') {
+    pr.polygon(*points)
+    }
+
+# Enable the clip-path
+pr.clip_path('example')
+
+# Composite the Flower Hat image over
+# the background using the clip-path
+girl = Magick::ImageList.new
+girl.read("images/Flower_Hat.jpg")
+
+cols = rows = nil
+
+# Our final image is about 290 pixels wide, so here
+# we widen our picture to fit. The change_geometry
+# method will adjust the height proportionately.
+
+girl.change_geometry("290") do |c,r|
+    pr.composite(0,0, c, r, girl)
+    cols = c
+    rows = r
+end
+
+# Create a canvas to draw on, a bit bigger than the star.
+canvas = Magick::Image.new(cols, rows)
+
+star = Magick::Draw.new
+star.stroke('black')
+star.fill('black')
+star.polygon(*points)
+star.draw(canvas)
+canvas = canvas.blur_image(0, 20)
+
+# Draw the star over the background
+pr.draw(canvas)
+
+# Crop away all the solid white border pixels.
+crop = canvas.bounding_box
+canvas.crop!(crop.x, crop.y, crop.width, crop.height)
+
+canvas.write("clip_path.gif")
+
+exit

data/doc/ex/coalesce.rb

@@ -0,0 +1,60 @@
+#! /usr/local/bin/ruby -w
+require 'RMagick'
+
+buttons = Magick::ImageList.new
+
+# Read 25 alphabet image files, scale to 1/4 size
+letter = 'A'
+26.times {
+    if letter != 'M'            # "M" is not the same size as the other letters
+        tiny = Magick::Image.read('images/Button_' + letter + '.gif').first
+        tiny.scale! 0.25
+        buttons << tiny
+    end
+    letter.succ!
+    }
+
+# Create a image that will hold the alphabet images in 5 rows and 5 columns.
+cells = Magick::ImageList.new
+cells.new_image buttons.columns*5, buttons.rows*5 do
+    self.background_color = "#000000ff"     # transparent
+    end
+cells.matte = true
+
+offset = Magick::Rectangle.new(0,0,0,0)
+
+# Create 2 arrays from which we can randomly choose row,col pairs
+row = [0]*5 + [1]*5 + [2]*5 + [3]*5 + [4]*5
+col = (0..4).to_a * 5
+
+# The coalesce method composites the 2nd image over the 1st, the 3rd image
+# over the result, and so forth, respecting the page offset of the images.
+
+srand 1234
+25.times { |i|
+    # Randomly select a row and column for this copy of the "tinya" image.
+    # Compute the x,y position of this copy in pixels and store the
+    # result in the image's page attribute. Append a copy of the image
+    # to the image array in "a".
+    n = rand row.length
+    x = row.delete_at n
+    y = col.delete_at n
+
+    button = buttons[i]
+    offset.x = x*button.columns
+    offset.y = y*button.rows
+    button.page = offset
+    button.matte = true
+    cells << button
+    }
+
+puts "This may take a few seconds..."
+cells.delay = 10
+cells.iterations = 10000
+res = cells.coalesce
+res.write "coalesce_anim.gif"
+res[25].write "coalesce.gif"
+exit
+
+
+