You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
koffice/chalk/plugins/viewplugins/scripting/samples/ruby/torture-painting.rb

133 lines
4.5 KiB

# This file is part of Chalk
#
# Copyright (c) 2006 Cyrille Berger <cberger@cberger.net>
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
require "krosschalkcore"
class TorturePainting
def initialize()
doc = Krosschalkcore::get("ChalkDocument")
@script = Krosschalkcore::get("ChalkScript")
@image = doc.getImage()
@width = @image.getWidth()
@height = @image.getHeight()
@script.setProgressTotalSteps(30 * 10)
testColorspace("RGBA")
testColorspace("RGBA16")
testColorspace("RGBAF16HALF")
testColorspace("RGBAF32")
testColorspace("CMYK")
testColorspace("CMYKA16")
testColorspace("CMYK")
testColorspace("CMYKA16")
testColorspace("LABA")
testColorspace("LMSAF32")
end
def randomizeStyle(painter)
painter.setFillStyle(4 *rand)
painter.setStrokeStyle(2 *rand)
end
def testColorspace(cs)
print "Torturing for ", cs, "\n"
layer = @image.createPaintLayer("torture", 255 * rand, "RGBA" );
torture(layer)
end
def torture(layer)
layer.beginPainting("torture painting")
painter = layer.createPainter()
# create painting color
blackcolor = Krosschalkcore::newRGBColor(0,0,0)
# set painting color
painter.setPaintColor( blackcolor )
# get the pattern
pattern = Krosschalkcore::getPattern("Bricks")
# set the pattern
painter.setPattern(pattern)
# define the paint operation
painter.setPaintOp("paintbrush")
# randomly rect or circle paint
for i in 1..30
# set painting color
painter.setPaintColor( Krosschalkcore::newRGBColor(rand*255,rand*255,rand*255) )
painter.setBackgroundColor( Krosschalkcore::newRGBColor(rand*255,rand*255,rand*255) )
painter.setOpacity( rand*255 )
# set the brush
if(rand < 0.5)
painter.setBrush( Krosschalkcore::newRectBrush(rand*20,rand*20,rand*10,rand*10) )
else
painter.setBrush( Krosschalkcore::newCircleBrush(rand*20,rand*20,rand*10,rand*10) )
end
# paint a point
tqshape = rand * 7
painter.setStrokeStyle(1)
if( tqshape < 1 )
painter.paintAt(rand * @width , rand * @height,1.1)
elsif(tqshape < 2 )
xs = Array.new
ys = Array.new
for i in 0..6
xs[i] = rand*@width
ys[i] = rand*@height
end
painter.paintPolyline(xs,ys)
elsif(tqshape < 3)
painter.paintLine(rand * @width, rand * @height, 1.1, rand * @width, rand * @height,1.1)
elsif(tqshape < 4)
painter.paintBezierCurve(rand * @width, rand * @height, 1.1, rand * @width, rand * @height, rand * @width , rand * @height, rand * @width, rand * @height, 1.1)
elsif(tqshape < 5)
randomizeStyle(painter)
painter.paintEllipse(rand * @width, rand * @height, rand * @width, rand * @height, 1.1)
elsif(tqshape < 6)
xs = Array.new
ys = Array.new
for i in 0..6
xs[i] = rand*@width
ys[i] = rand*@height
end
randomizeStyle(painter)
painter.paintPolygon(xs, ys)
elsif(tqshape < 7)
randomizeStyle(painter)
painter.paintRect(rand * @width, rand * @height, rand * @width, rand * @height, 1.1)
end
@script.incProgress()
end
layer.endPainting()
end
end
TorturePainting.new()