KTUG마당은 KTUG를 방문하는 모든 이용자가 대화를 나누고 소식을 전하는 곳입니다.

  • 로그인 없이 자유롭게 글을 읽고 쓸 수 있는 철학은 처음과 같이 계속됩니다.
  • Team Blog의 글을 이곳 게시판의 "정보글"로 모았습니다. Team blog는 기고자가 올린 글에 질문을 받는 부담을 줄이기 위하여 댓글을 허용하지 않았습니다. 그러나 이곳 게시판으로 모으면서 댓글을 달 수 있습니다. 게시물을 작성하실 때 댓글을 원하지 않으시면 댓글을 허용하시지 않으시기를 바랍니다. 또한 불필요한 소모성 댓글을 달지 않도록 주의하여 주시기를 바랍니다.
  • TeX과 관련된 질문이나 답변은 QnA 마당을 이용하십시오. TeX과 관련된 질문은 지웁니다
  • MathJax를 이용한 수식조판을 사용하실 수 있습니다. 여기를 참조하세요.
  • 스팸 글을 막기 위하여 짧은 시간 내에 다시 글이 등록되는 IP를 막거나, 광고 글을 막기 위하여 금지어로 .com, .net 등을 설정하고 있습니다. 다소간의 불편함이 있으시더라도 양해 바랍니다.
    • 금지어에서 stackexchange, stackoverflow, ctan, overleaf, , github, google.com, gmail.com, .org, .io, sil.org, wiki.com, tistory.com등은 해제하였습니다.
  • 사용하는 편집기는 CKeditor입니다. 편집기에서 [enter]를 누르면 <p> 태그가 들어가고, 문단으로 생각하고 한줄을 비웁니다. 글줄만 바꾸려면 shift-enter 를 누르시면 <BR>가 들어가므로 용도에 맞게 나누어 쓸 수 있습니다.

자유글 메타포스트로 그린 태극기

2015.10.18 14:36

kimperf 조회 수:15683

케이턱에서 많은 도움을 받고 있는 엔드유저입니다.

사소한 것이지만 나름대로 뿌듯해서 올려봅니다.

시간과 정성을 들여 해결책을 주시는 모든 분들게 감사드립니다. 


verbatimtex

\input kotexutf.tex


etex;


beginfig(1)


numeric u, ang; path p,q,s; u := 30mm;


vardef arcsind primary x = angle((sqrt(1-x*x),x)) enddef;


ang := arcsind(2/sqrt(13)); %approximately 33.69;


fill fullcircle scaled u withcolor blue;


%1 태극기 바탕 가로 : 세로 = 3 : 2


draw ((-1.5,-1)--(1.5,-1)--(1.5,1)--(-1.5,1)--cycle)scaled u;


%2 태극


p = ((-0.5,0){down}..{up}(0,0){up}..


{down}(0.5,0){up}..(0,0.5){left}..cycle) scaled u;


fill p rotated -ang withcolor red;


fill p rotated -(ang+180) withcolor blue;


%3 긴 괘 그리기


q = ((3/4, 1/4)--(3/4, -1/4)--(5/6, -1/4)--(5/6, 1/4)--cycle)


scaled u;


for i=ang, (180-ang), (180+ang), (360-ang):


fill q rotated i withcolor black;


fill q shifted (1/8u, 0) rotated i withcolor black;


fill q shifted (1/4u, 0) rotated i withcolor black;


endfor;


%4 짧은 괘 만들기


s = ((3/4, 1/48)--(3/4, -1/48)--(5/6, -1/48)--(5/6, 1/48)--cycle)


scaled u;


unfill s rotated ang;


unfill s rotated -ang;


unfill s shifted (1/8u,0) rotated (180+ang);


unfill s shifted (1/8u,0) rotated (360-ang);


unfill s shifted (1/4u,0) rotated ang;


unfill s shifted (1/4u,0) rotated (360-ang);


endfig;end%-------------------------------------------

번호 제목 글쓴이 날짜 조회 수
830 eps 그림 넣기 DohyunKim 2011.08.19 4489
829 우분투/데비안 리눅스에서 TeX Live 관련 더미 패키지 만들기 MadToad 2011.08.30 5520
828 설치정보: Ubuntu Linux 개인 계정에 koTeXLive2011 설치하기. 양사장 2011.09.01 9677
827 pdf의 특정 페이지를 그림으로 넣기 DohyunKim 2011.09.01 4505
826 팀 블로그에 대한 단상 [2] Progress 2011.09.06 28924
825 시 한 편 감상 file nova de hi 2011.09.07 24019
824 영문 Windows 7-64 bit, kotexlive2011: Font Cache Update Error [2] 양사장 2011.09.08 20576
823 pdfjam 사용법 몇가지 DohyunKim 2011.09.19 4505
822 윈도우즈 8 dev preview에서 테스트해봤습니다. [2] 에드 2011.09.19 22541
821 palatino와 xltxtra [2] file yihoze 2011.09.19 13618
820 lualatex 실행을 방해하는 이상한 truetype 폰트 karnes 2011.09.23 4561
819 텍에 관한 질문이 아니고 FAQ 사이트에 관한 글입니다. 맥사용자 2011.09.29 34527
818 [TIP] Sumatrapdf에서 texmaker로 inverse search karnes 2011.09.29 5065
817 [고전소설] 전운치전 [4] file nova de hi 2011.10.01 35421
816 ipe 맥에서 사용하기 (메뉴얼 설치) [5] serene 2011.10.02 9142
815 ifthen, calc를 대신하는 etoolbox file karnes 2011.10.07 4478
814 naver에서 나눔글꼴 eco 를 공개하였습니다. file 샘처럼 2011.10.08 35527
813 Windows 7 (64bit) ko.TeX Live 2011 Font cache problem [1] file nova de hi 2011.10.10 41782
812 KTUG 10주년 기념행사? [3] nova de hi 2011.10.10 36444
811 [공지] 한국텍학회 회비를 입금한 분들 중 회원 미등록자 분들께 [7] 관리자 2011.10.20 123306



XE Login