【基本-8】座標変換（せん断）について

せん断でググっても説明が何だかわかりにくいです。
ここでは簡単に、例えば四角形を平行四辺形のように変換することとします。実際は菱形にもなります。

グレー部分が元の図形で、変換後は赤で示しています。

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
%!PS-Adobe-3.0 EPSF-3.0

%%BoundingBox: 0 0 240 240

%%Title:座標変換（せん断・回転）

0 0 240 240 rectstroke % 黒背景

120 120 translate % 座標の原点を中央に移動

2 setlinewidth % 線幅2ポイント



/box { % 変形前の図形

  .5 setgray -50 -50 100 100 rectfill  % グレー四角形

  .7 setgray -50 30 20 20 rectfill  % 左上のグレー四角形

   0 0 50 0 360 arc stroke % 円

   -40 -10 moveto % （-40,-10)に移動

  /Helvetica findfont 24 scalefont setfont (Sample) show % テキスト表示

} def



/cbox { % 変形後の図形（赤）

  1 0 0 setrgbcolor -50 -50 100 100 rectstroke

  -50 30 20 20 rectfill

  0 0 50 0 360 arc stroke

  -40 -10 moveto

  /Helvetica findfont 24 scalefont setfont (Sample) show

} def

newpath % パスの初期化

box % 変形前の図形

gsave % グラフィックス状態の保存

[ 1 0 0 1 0 0 ] concat % 座標変換（ノーマル状態）

newpath

cbox % 変形後の図形（赤）

grestore % グラフィックス状態の復元

1
2
% x軸マイナス方向へせん断

[ 1 0 -1  1 ] concat

1
2
% x軸マイナス方向へせん断

[ 1 0 -30 sin 1 ] concat

1
2
% x軸マイナス方向へせん断・90度回転

[ 120 cos 90 sin -90 sin 90 cos ] concat

1
2
% x軸マイナス方向へせん断・180度回転

[ -90 sin 90 cos 30 sin -90 sin ] concat

1
2
% x軸マイナス方向へせん断・270度回転

[ 60 cos -90 sin 90 sin -90 cos ] concat

1
2
% x軸プラス方向へせん断

[ 1 0 30 sin 1 ] concat

1
2
% x軸プラス方向へせん断・90度回転

[ 60 cos 90 sin -90 sin 90 cos ] concat

1
2
% x軸プラス方向へせん断・180度回転

[ 180 cos 180 sin -30 sin 180 cos ] concat

1
2
% x軸プラス方向へせん断・270度回転

[ -30 sin 270 sin -270 sin 270 cos ] concat

1
2
% y軸プラス方向へせん断

[ 1 -30 sin 0 1 ] concat

1
2
% y軸プラス方向へせん断・90度回転

[ 90 cos 90 sin -90 sin 30 sin ] concat

1
2
% y軸プラス方向へせん断・180度回転

[ 180 cos -210 sin -180 sin 180 cos ] concat

1
2
% y軸プラス方向へせん断・270度回転

[ 270 cos 270 sin -270 sin -30 sin ] concat

1
2
% y軸マイナス方向へせん断

[ 1 30 sin  0 1 ] concat

1
2
% y軸マイナス方向へせん断・90度回転

[ 90 cos 90 sin -90 sin 120 cos ] concat

1
2
% y軸マイナス方向へせん断・180度回転

[ 180 cos 210 sin -180 sin 180 cos ] concat

1
2
% y軸マイナス方向へせん断・270度回転

[ 270 cos 270 sin -270 sin 300 cos ] concat