Page 102 | Table of Contents | Index | Page 104 |
Chapters | |||
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,
30 A, B, C, D, E |
(do ((i 0 (+ i 2))) ((= i (length point-seq))) (draw-line sheet (elt point-seq i) (elt point-seq (1+ i))))and
(do ((i 0 (+ i 4))) ((= i (length coord-seq))) (draw-line* sheet (elt coord-seq i) (elt coord-seq (+ i 1)) (elt coord-seq (+ i 2)) (elt coord-seq (+ i 3))))=> draw-polygon sheet point-seq &key (filled t) (closed t) ink clipping-region transformation line-
Page 102 | Table of Contents | Index | Page 104 |
Chapters | |||
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,
30 A, B, C, D, E |