rdp-rmagick 0.0.0

data/doc/ex/adaptive_threshold.rb

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

data/doc/ex/add_noise.rb

@@ -0,0 +1,17 @@
+#! /usr/local/bin/ruby -w
+require 'RMagick'
+
+# Demonstrate the Image#add_noise method
+NOISE_TYPES = [Magick::UniformNoise, Magick::GaussianNoise,
+               Magick::MultiplicativeGaussianNoise,
+               Magick::ImpulseNoise, Magick::LaplacianNoise,
+               Magick::PoissonNoise]
+
+img = Magick::Image.read('images/Flower_Hat.jpg').first
+
+NOISE_TYPES.each do |noise|
+    copy = img.add_noise(noise)
+    copy.write "add_noise_#{noise.to_s}.jpg"
+
+end
+exit

data/doc/ex/affine.rb

@@ -0,0 +1,48 @@
+#! /usr/local/bin/ruby -w
+require 'RMagick'
+
+# Demonstrate the affine primitive. Transform the
+# coordinate space to put the origin in the lower
+# left corner.
+
+imgl = Magick::ImageList.new
+imgl.new_image 200, 200, Magick::HatchFill.new('white','lightcyan2')
+
+gc = Magick::Draw.new
+
+max_x = imgl.columns
+max_y = imgl.rows
+
+# Translate the y origin to the bottom of the window.
+# Invert the y points by scaling by -1. Combine the
+# two operations using the affine method. That is, the
+# affine method is equivalent to:
+#       gc.translate 0, max_y
+#       gc.scale 1, -1
+gc.affine(1, 0, 0, -1, 0, max_y)
+gc.stroke('gray50')
+gc.fill('gray50')
+gc.stroke_width(1)
+
+# Draw up-pointing arrow.
+gc.polyline(10, 10, 10, max_y-10, 5, max_y-15, 15, max_y-15, 10, max_y-10)
+
+# Draw right-pointing arrow
+gc.polyline(10, 10, max_x-10, 10, max_x-15, 5, max_x-15, 15, max_x-10, 10)
+
+gc.draw(imgl)
+
+# Add labels. Use a different graphics context with a "normal"
+# coordinate system so the text isn't inverted.
+text_gc = Magick::Draw.new
+text_gc.pointsize(14)
+text_gc.font_weight(Magick::NormalWeight)
+text_gc.stroke('transparent')
+text_gc.text(15, max_y-15, "'0,0'")
+text_gc.text(max_x-20, max_y-16, "'+x'")
+text_gc.text(12, 15, "'+y'")
+text_gc.draw(imgl)
+
+imgl.border!(1, 1, "lightcyan2")
+
+imgl.write("affine.gif")

data/doc/ex/affine_transform.rb

@@ -0,0 +1,20 @@
+#! /usr/local/bin/ruby -w
+require 'RMagick'
+
+# Demonstrate the Image#affine_transform method
+
+img = Magick::Image.read("images/Flower_Hat.jpg").first
+
+# Construct a simple affine matrix
+flipflop = Magick::AffineMatrix.new(1, Math::PI/6, Math::PI/6, 1, 0, 0)
+
+# Apply the transform
+img = img.affine_transform(flipflop)
+
+# Scale the image, make the background transparent,
+# and write it to a JPEG file.
+img.scale!(250.0/img.rows)
+img = img.matte_replace(0,0)
+img.write("affine_transform.jpg")
+
+exit

data/doc/ex/arc.rb

@@ -0,0 +1,49 @@
+#! /usr/local/bin/ruby -w
+require 'RMagick'
+
+i = Magick::Image.new(300, 220, Magick::HatchFill.new("white","lightcyan2"))
+gc = Magick::Draw.new
+
+# Draw the border rectangle.
+gc.fill_opacity(0)
+gc.stroke_width(1)
+gc.stroke('gray50')
+gc.rectangle(40, 50, 250, 180)
+
+# Draw the circles around the rectangle corners and
+# arc endpoints. All the circles have a 3-pixel radius.
+gc.circle(40,   50,  40+3,  50)
+gc.circle(250, 180, 250+3, 180)
+gc.circle(250, 114, 250+3, 114)
+gc.circle(146,  50, 146+3,  50)
+
+# Annotate
+gc.font_weight(Magick::NormalWeight)
+gc.font_style(Magick::NormalStyle)
+gc.stroke('transparent')
+gc.fill("black")
+gc.fill_opacity(1)
+
+# xMagick recognizes the braces as delimiters.
+gc.gravity(Magick::NorthWestGravity)
+gc.text(42, 37, "{40, 50}")
+gc.text(188, 108, "{0 degrees}")
+
+gc.gravity(Magick::SouthEastGravity)
+gc.text(300-250, 220-195, "{250, 180}")
+
+gc.gravity(Magick::NorthGravity)
+gc.text(0, 67, "{270 degrees}")
+
+# Draw the arc
+gc.fill_opacity(0)
+gc.stroke('red').stroke_width(3)
+gc.arc(40, 50, 250,180, 0, 270)
+
+# Draw on the canvas
+gc.draw(i)
+
+i.border!(1,1, "lightcyan2")
+
+#i.display
+i.write("arc.gif")

data/doc/ex/arcpath.rb

@@ -0,0 +1,33 @@
+#! /usr/local/bin/ruby -w
+require 'RMagick'
+
+# Demonstrate the "path" drawing primitive.
+
+imgl = Magick::ImageList.new
+imgl.new_image(450, 200, Magick::HatchFill.new('white','lightcyan2'))
+
+gc = Magick::Draw.new
+
+# Draw "pie chart"
+gc.fill('red')
+gc.stroke('blue')
+gc.stroke_width(2)
+gc.path('M110,100 h-75 a75,75 0 1,0 75,-75 z')
+gc.fill('yellow')
+gc.path('M97.5,87.5 v-75 a75,75 0 0,0 -75,75 z')
+
+# Draw wiggly line
+gc.fill_opacity(0)
+gc.stroke('#00cd00')
+gc.stroke_width(3)
+gc.path('M200,175 l 25,-12.5 ' +
+                'a12.5,12.5 -15 0,1 25,-12.5 l 25,-12.5 ' +
+                'a12.5,25   -15 0,1 25,-12.5 l 25,-12.5 ' +
+                'a12.5,37.5 -15 0,1 25,-12.5 l 25,-12.5 ' +
+                'a12.5,50   -15 0,1 25,-12.5 l 25,-12.5')
+
+gc.draw imgl
+imgl.border!(1,1, "lightcyan2")
+
+imgl.write('arcpath.gif')
+

data/doc/ex/arcs01.rb

@@ -0,0 +1,28 @@
+require 'rvg/rvg'
+
+Magick::RVG.dpi = 90
+
+rvg = Magick::RVG.new(12.cm, 5.25.cm).viewbox(0, 0, 1200, 400) do |canvas|
+    canvas.title = "Example arcs01 - arc commands in path data"
+    canvas.desc = <<-END_DESC
+        Picture of a pie chart with two pie wedges and a picture
+        of a line with arc blips
+    END_DESC
+    canvas.background_fill = 'white'
+    canvas.rect(1196, 395, 1, 1).styles(:fill=>'none', :stroke=>'blue', :stroke_width=>1)
+
+    canvas.path("M300,200 h-150 a150,150 0 1,0 150,-150 z").
+                styles(:fill=>'red', :stroke=>'blue', :stroke_width=>5)
+    canvas.path("M275,175 v-150 a150,150 0 0,0 -150,150 z").
+                styles(:fill=>'yellow', :stroke=>'blue', :stroke_width=>5)
+    canvas.path(<<-END_PATH
+           M600,350 l 50,-25
+           a25,25 -30 0,1 50,-25 l 50,-25
+           a25,50 -30 0,1 50,-25 l 50,-25
+           a25,75 -30 0,1 50,-25 l 50,-25
+           a25,100 -30 0,1 50,-25 l 50,-25
+           END_PATH
+           ).styles(:fill=>'none', :stroke=>'red', :stroke_width=>5)
+end
+
+rvg.draw.write('arcs01.gif')

data/doc/ex/arcs02.rb

@@ -0,0 +1,61 @@
+require 'rvg/rvg'
+
+Magick::RVG.dpi = 90
+
+PathStyles = {:fill=>'none', :stroke=>'red', :stroke_width=>6}
+BaseEllipsesStyles = {:font_size=>20, :font_family=>'Verdana',:fill=>'none', :stroke=>'#888', :stroke_width=>2}
+
+rvg = Magick::RVG.new(12.cm, (5.25).cm).viewbox(0, 0, 1200, 525) do |canvas|
+    canvas.title = "Example arcs02 - arc options in paths"
+    canvas.desc = <<-END_DESC
+        Pictures showing the result of setting
+        large-arc-flag and sweep-flag to the four
+        possible combinations of 0 and 1.
+    END_DESC
+    canvas.background_fill = 'white'
+
+    base_ellipses = Magick::RVG::Group.new.styles(BaseEllipsesStyles) do |base|
+        base.ellipse(100, 50, 125, 125)
+        base.ellipse(100, 50, 225, 75)
+        base.text(35, 70, "Arc start")
+        base.text(225, 145, "Arc end")
+    end
+
+    canvas.rect(1196, 522, 1, 1).styles(:fill=>'none', :stroke=>'blue', :stroke_width=>1)
+
+    canvas.g.styles(:font_size=>30, :font_family=>'Verdana', :font_weight=>'normal', :font_style=>'normal') do |grp|
+
+        grp.use(base_ellipses)
+
+        grp.g.translate(400,0) do |grp2|
+            grp2.text(50, 210, 'large-arc-flag=0')
+            grp2.text(50, 250, 'sweep-flag=0')
+            grp2.use(base_ellipses)
+            grp2.path("M 125,75 a100,50 0 0,0 100,50").styles(PathStyles)
+        end
+
+        grp.g.translate(800,0) do |grp2|
+            grp2.text(50, 210, 'large-arc-flag=0')
+            grp2.text(50, 250, 'sweep-flag=1')
+            grp2.use(base_ellipses)
+            grp2.path("M 125,75 a100,50 0 0,1 100,50").styles(PathStyles)
+        end
+
+        grp.g.translate(400, 250) do |grp2|
+            grp2.text(50, 210, 'large-arc-flag=1')
+            grp2.text(50, 250, 'sweep-flag=0')
+            grp2.use(base_ellipses)
+            grp2.path("M 125,75 a100,50 0 1,0 100,50").styles(PathStyles)
+        end
+
+        grp.g.translate(800, 250) do |grp2|
+            grp2.text(50, 210, 'large-arc-flag=1')
+            grp2.text(50, 250, 'sweep-flag=1')
+            grp2.use(base_ellipses)
+            grp2.path("M 125,75 a100,50 0 1,1 100,50").styles(PathStyles)
+        end
+
+    end
+end
+
+rvg.draw.write('arcs02.gif')

data/doc/ex/average.rb

@@ -0,0 +1,15 @@
+#! /usr/local/bin/ruby -w
+# Demonstrate ImageList#average method
+require 'RMagick'
+
+images = Magick::ImageList.new("images/Button_A.gif", "images/Button_B.gif", "images/Button_C.gif")
+
+group = images.append false
+group.compression = Magick::LZWCompression
+group.write "average_before.gif"
+
+average_image = images.average
+
+average_image.compression = Magick::LZWCompression
+average_image.write "average_after.gif"
+exit

data/doc/ex/axes.rb

@@ -0,0 +1,64 @@
+#!/usr/local/bin/ruby -w
+
+require 'RMagick'
+
+# Demonstrate the use of RMagick's Draw class
+# and show the default coordinate system.
+
+# Create a canvas to draw on. Use the HatchFill class to
+# cross-hatch the background with light gray lines every 10 pixels.
+canvas = Magick::ImageList.new
+canvas.new_image(250, 250, Magick::HatchFill.new('white', 'gray90'))
+
+# Draw a border around the edges of the canvas.
+border = Magick::Draw.new
+border.stroke('thistle')
+border.fill_opacity(0)
+border.rectangle(0,0, canvas.columns-1, canvas.rows-1)
+border.draw(canvas)
+
+# Draw gold axes with arrow-heads.
+axes = Magick::Draw.new
+axes.fill_opacity(0)
+axes.stroke('gold3')
+axes.stroke_width(4)
+axes.stroke_linecap('round')
+axes.stroke_linejoin('round')
+axes.polyline(18,canvas.rows-10, 10,canvas.rows-3, 3,canvas.rows-10,
+              10,canvas.rows-10, 10,10, canvas.columns-10,10,
+              canvas.columns-10,3, canvas.columns-3,10, canvas.columns-10, 18)
+axes.draw(canvas)
+
+# Draw a red circle to show the direction of rotation.
+# Make it slightly transparent so the hatching will show through.
+circle = Magick::Draw.new
+circle.stroke('tomato')
+circle.fill_opacity(0)
+circle.stroke_opacity(0.75)
+circle.stroke_width(6)
+circle.stroke_linecap('round')
+circle.stroke_linejoin('round')
+circle.ellipse(canvas.rows/2,canvas.columns/2, 80, 80, 0, 315)
+circle.polyline(180,70, 173,78, 190,78, 191,62)
+circle.draw(canvas)
+
+# Label the axes and the circle.
+labels = Magick::Draw.new
+labels.font_weight(Magick::NormalWeight)
+labels.fill('black')
+labels.stroke('transparent')
+labels.font_style(Magick::ItalicStyle)
+labels.pointsize(14)
+labels.gravity(Magick::NorthWestGravity)
+labels.text(20,30, "'0,0'")
+labels.gravity(Magick::NorthEastGravity)
+labels.text(20,30, "'+x'")
+labels.gravity(Magick::SouthWestGravity)
+labels.text(20,20, "'+y'")
+labels.gravity(Magick::CenterGravity)
+labels.text(0,0, "Rotation")
+labels.draw(canvas)
+
+#canvas.display
+canvas.write("axes.gif")
+exit

data/doc/ex/baseline_shift01.rb

@@ -0,0 +1,18 @@
+require 'rvg/rvg'
+
+rvg = Magick::RVG.new(150, 100) do |canvas|
+    canvas.background_fill = 'white'
+    canvas.text(40, 35).styles(:font_weight=>'bold', :font_size=>28) do |txt|
+        txt.tspan('H')
+        txt.tspan('2').styles(:font_size=>20, :fill=>'red', :baseline_shift=>'sub')
+        txt.tspan('O')
+    end
+    canvas.text(40, 80).styles(:font_style=>'italic', :font_size=>28) do |txt|
+        txt.tspan('e=mc')
+        txt.tspan('2').styles(:font_size=>20, :fill=>'red', :baseline_shift=>'super')
+    end
+    canvas.rect(149, 99).styles(:fill=>'none', :stroke=>'blue')
+end
+
+rvg.draw.write('baseline_shift01.gif')
+

data/doc/ex/bilevel_channel.rb

@@ -0,0 +1,9 @@
+#! /usr/local/bin/ruby -w
+
+require 'RMagick'
+
+img = Magick::Image.read('images/Flower_Hat.jpg').first
+result = img.bilevel_channel(2*Magick::QuantumRange/3, Magick::RedChannel)
+result.write('bilevel_channel.jpg')
+exit
+

data/doc/ex/blur_image.rb

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

data/doc/ex/border.rb

@@ -0,0 +1,10 @@
+#! /usr/local/bin/ruby -w
+require 'RMagick'
+
+# Demonstrate the Image#border method
+
+img = Magick::Image.read('images/Flower_Hat.jpg').first
+
+img.border!(10,10,'rgb(255,110,140)')
+img.write('border.jpg')
+exit

data/doc/ex/bounding_box.rb

@@ -0,0 +1,44 @@
+#! /usr/local/bin/ruby -w
+require 'RMagick'
+
+img = Magick::Image.new(200,200) { self.background_color = "#ffffcc" }
+
+# Draw a blue circle.
+gc = Magick::Draw.new
+gc.stroke_width(5)
+gc.stroke("blue")
+gc.fill_opacity(0)
+gc.circle(100,100, 100,150)
+gc.draw(img)
+
+# Get the bounding box. Use the values to draw
+# a gray square surrounding the circle. Highlight
+# the corners with tiny red circles.
+
+bb = img.bounding_box
+gc = Magick::Draw.new
+gc.stroke("gray50")
+gc.fill_opacity(0)
+gc.rectangle(bb.x, bb.y, bb.x+bb.width, bb.y+bb.height)
+gc.stroke("red")
+gc.circle(bb.x, bb.y, bb.x+2, bb.y+2)
+gc.circle(bb.x+bb.width, bb.y, bb.x+bb.width+2, bb.y+2)
+gc.circle(bb.x, bb.y+bb.height, bb.x+2, bb.y+bb.height+2)
+gc.circle(bb.x+bb.width, bb.y+bb.height, bb.x+bb.width+2, bb.y+bb.height+2)
+
+
+gc.fill("black")
+gc.stroke("transparent")
+gc.font_weight(Magick::NormalWeight)
+gc.font_style(Magick::NormalStyle)
+gc.pointsize(9)
+gc.text(bb.x-15, bb.y-5, "\'#{bb.x},#{bb.y}\'")
+gc.text(bb.x+bb.width-15, bb.y-5, "\'#{bb.x+bb.width},#{bb.y}\'")
+gc.text(bb.x-15, bb.y+bb.height+15, "\'#{bb.x},#{bb.y+bb.height}\'")
+gc.text(bb.x+bb.width-15, bb.y+bb.height+15, "\'#{bb.x+bb.width},#{bb.y+bb.height}\'")
+
+
+gc.draw(img)
+
+img.write("bounding_box.gif")
+exit