テクスチャの歪みに関連して使用する四角形のグリッド。
例
次の例では、DisplacementMesh を使って画像を歪める方法を示しています。スライダをさまざまに移動すると、歪みが適用される範囲のサイズと位置が変わります。
| 例: DisplacementMesh の使用 | |
 | |
{import * from CURL.GRAPHICS.IMAGEFILTER}
{value
|| Define the source pixmap - a black and white grid
let pixmap:Pixmap = {Pixmap 300, 300}
{for-pixel p:Pixel at x, y in pixmap do
{if {floor x/10} mod 3 == 0 or {floor y/10} mod 3 == 0 then
set p = {Pixel.create 1, 1, 1}
}
}
set pixmap = {filter-pixmap blur, pixmap, amount=20%}
|| Create the meshes
let src-mesh:DisplacementMesh = {DisplacementMesh 30, 30}
let dst-mesh:DisplacementMesh = {DisplacementMesh 30, 30}
{dst-mesh.twirl 90degrees}
let out:FillPattern = {warp pixmap, dst-mesh, src-mesh}
let fill:Fill = {Fill width = 2in, height = 2in, background = out}
|| The sliders for controlling the DisplacementMesh
let sba:Scrollbar =
{Scrollbar
width=2in, direction="horizontal",
min=-360, max=360,
blocksize=60, unitsize=10
}
let sbx:Scrollbar =
{Scrollbar
width=2in, direction="horizontal",
min=0, max=1,
blocksize=.1, unitsize=.01
}
let sby:Scrollbar =
{Scrollbar
height=2in, direction="vertical",
min=0, max=1,
blocksize=.1, unitsize=.01
}
let sbr:Scrollbar =
{Scrollbar
width=2in, direction="horizontal",
min=0, max=.7,
blocksize=.1, unitsize=.01
}
let eh:EventHandler =
{on e:Adjustment at s:Scrollbar do
{dst-mesh.twirl
{sba.get-scroll-value} * 1deg,
center =
{Fraction2d
{sbx.get-scroll-value},
{sby.get-scroll-value}
},
radius = {sbr.get-scroll-value}
}
set fill.background =
{warp pixmap, dst-mesh, src-mesh}
}
|| Set the sliders initial values
{sbx.set-scroll-value 0.5}
{sby.set-scroll-value 0.5}
{sbr.set-scroll-value 0.5}
{sba.set-scroll-value 90.0}
{sba.add-event-handler eh}
{sbx.add-event-handler eh}
{sby.add-event-handler eh}
{sbr.add-event-handler eh}
{VBox
{VBox {HBox fill, sby}, sbx},
{HBox {text Radius}, sbr},
{HBox {text Rotation}, sba}
}
}
|