【パターン-3】ランダムにサークルパターンを描いてみよう

randを使って位置、大きさ、カラーをランダムな値にして円を描きます。
今回はRGBではなくHSBカラーで設定しています。

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
%!PS-Adobe-3.0 EPSF-3.0

%%BoundingBox: 0 0 240 240

%%Title:ランダムにサークルパターンを描く

/x rand 201 mod 100 sub def % x座標（-100〜100）

/y rand 201 mod 100 sub def % y座標（-100〜100）

/rad { rand 40 mod 1 add } def % 半径（1〜40）



/randam_color { % ランダムカラー 

    /h rand 11 mod 0.1 mul def % H色相（0~1）

    /s rand 7 mod 0.1 mul def % S彩度（0~0.6）

    /b rand 4 mod 5 add 0.1 mul def % B明度（0.5~0.8）

    h s b sethsbcolor % HSBカラーを設定する

} def



newpath % パスの初期化

0 1 50 { % 0から1づつ増やし50になるまで{ }内を繰り返す

     randam_color% ランダムカラープロシージャ呼び出し

     x y rad 0 360 arc fill %塗りつぶし円を描く

} for