その他一覧へ戻る

細胞壁

鉄TeX機能紹介/TikZサンプル/細胞壁.tex鉄TeX機能紹介 / TikZhybrid

レンダリング結果

1ページ / 同名PDFあり
細胞壁 preview
PDFを開く
TeXソース
TeXソース
入力コード
\documentclass[b5j,10pt,twoside]{tetsujsarticle}
\usepackage{tetsuryoku}
\pagestyle{empty}
\begin{document}

\makeatletter
\pgfdeclaredecoration{free hand}{start}
{
  \state{start}[width = +0pt,
                next state=step,
                persistent precomputation = \pgfdecoratepathhascornerstrue]{}
  \state{step}[auto end on length    = 3pt,
               auto corner on length = 3pt,               
               width=+2pt]
  {
    \pgfpathlineto{
      \pgfpointadd
      {\pgfpoint{2pt}{0pt}}
      {\pgfpoint{rand*0.1pt}{rand*0.1pt}}
    }
  }
  \state{final}
  {}
}
 \tikzset{free hand/.style={
    decorate,
    decoration={free hand}
    }
 } 
\def\freedraw#1;{\draw[free hand] #1;} 


\tikzset{
  use path for main/.code={%
    \tikz@addmode{%
      \expandafter\pgfsyssoftpath@setcurrentpath\csname tikz@intersect@path@name@#1\endcsname
    }%
  },
  use path for actions/.code={%
    \expandafter\def\expandafter\tikz@preactions\expandafter{\tikz@preactions\expandafter\let\expandafter\tikz@actions@path\csname tikz@intersect@path@name@#1\endcsname}%
  },
  use path/.style={%
    use path for main=#1,
    use path for actions=#1,
  }
}
\makeatother



\begin{tikzpicture}
\path[name path=a, free hand]
(0,0) rectangle (2,1)
(0,0) -- + (-150:0.5)
(2,0) -- + (-30:0.5)
(2,1) -- + (30:0.5)
(0,1) -- + (150:0.5)
;
\draw[use path=a, line width = 5pt, color=black];
\draw[use path=a, line width = 4pt, color=white];
\draw (0.4,1) -- +(-0.1,0.2) node[anchor = south west, inner sep =0pt,outer sep=0pt, xshift=-4pt]{細胞壁};
\draw (0.6,0.6) -- +(-0.2,-1) node[below, inner sep =0pt,outer sep=0pt]{液胞};
\draw (1.5,0.5) -- +(1,0.1) node[right,inner sep =0pt,outer sep=0pt] {\parbox<t>{3zw}{細胞膜}};
\draw[line width=.5pt] 
(0.9,2.5pt) .. controls +(-0.5,0) and +(0,-0.2) .. (0.1,0.4)
 .. controls +(0,0.2) and +(-0.5,0) .. (1,0.85)
 .. controls +(0.4,0) and +(0,0.2) .. (1.5,0.5) 
 .. controls +(0,-0.2) and +(0.2,0) .. cycle
;
\draw[line width=.5pt] 
 (0.9,0.5) .. controls +(-0.2,-0.1) and +(0,-0.2) .. (0.5,0.6)
 .. controls +(0,0.1) and +(-0.2,0) .. (0.9,0.7)
 .. controls +(0.1,0) and +(0.2,0.1) .. cycle
;
\filldraw[color=black, fill=black!20!white, line width=0.5pt] (0.8, 0.25) ellipse (0.07 and 0.05) -- +(0.4,-0.7) node[below, inner sep =0pt,outer sep=0pt]{核};
\end{tikzpicture}



\end{document}