반응형
포스트 스크립트 예제 책을 좀 보다가 재미있는 게 있어서 예제를 아주 살짝 변형해서 그려 봄. 소스를 프린터로 쏘니까 프린터가 그걸 알아먹고 예쁜 그림을 그려주는 게 신기했음.
%%-- variables and procedures
/depth 0 def
/maxdepth 14 def
/down { /depth depth 1 add def } def
/up { /depth depth 1 sub def } def
% print a vertical line
/DoLine
{ 0 144 rlineto currentpoint
stroke translate 0 0 moveto
} def
/FracArrow
{
% reduce scale
gsave .7 .7 scale
10 setlinewidth
down DoLine
% depth < maxdepth
depth maxdepth le
{
70 rotate FracArrow
-100 rotate FracArrow
} if
up
grestore
} def
%-- begin program
300 400 moveto
FracArrow
stroke
showpage
see also : daewonyoon.tistory.com/351 : 파이썬 터틀로 프랙탈트리 그리기
728x90
'프로그래밍 > 미분류' 카테고리의 다른 글
[SO 번역] MIME 타입에서 "vnd"는 무슨 의미인가? (0) | 2022.03.21 |
---|---|
[Ubuntu] 윈도우에서 xubuntu 16.01 로 mstsc 연결하였는데, tab 키가 안 먹었다. (0) | 2021.11.12 |
[번역] 대화형 서비스 (from msdn) (0) | 2020.11.25 |
[프린터] FilterGraphics 래스터데이터 조작 (0) | 2020.11.23 |
[번역] 프린트 서브시스템의 기본개념 (0) | 2020.11.23 |