tikz/triangle-9-point-circle

tikz/triangle-9-point-circle/triangle-9-point-circle.tex

@@ -0,0 +1,91 @@
+\documentclass{article}
+\usepackage[pdftex,active,tightpage]{preview}
+\setlength\PreviewBorder{2mm}
+\usepackage{tikz}
+\usepackage{tkz-euclide}
+\usetkzobj{all}
+\usetikzlibrary{shapes, calc, decorations} 
+\usepackage{amsmath,amssymb}
+\usepackage{helvet}
+\usepackage[eulergreek]{sansmath}
+
+\begin{document}
+\begin{preview}
+\begin{tikzpicture}[very thick,font=\sansmath\sffamily]
+    \tkzDefPoint(0,1){A}
+    \tkzDefPoint(4,0){B}
+    \tkzDefPoint(3,6){C}
+
+    \tkzLabelPoints[below left,font=\sansmath\sffamily](A)
+    \tkzLabelPoints[below right,font=\sansmath\sffamily](B)
+    \tkzLabelPoints[above,font=\sansmath\sffamily](C)
+
+    % Draw polygon
+    \tkzDrawPolygon[thick,fill=gray!10](A,B,C)
+
+    % Mark angles
+    % \tkzMarkAngle[arc=l,size=0.6cm,fill=green!30](B,A,C)
+    % \tkzLabelAngle[pos=0.3](B,A,C){$\alpha$}
+
+    % \tkzMarkAngle[arc=l,size=0.6cm,fill=red!30](C,B,A)
+    % \tkzLabelAngle[pos=0.4](C,B,A){$\beta$}
+
+    % \tkzMarkAngle[arc=l,size=0.6cm,fill=blue!30](A,C,B)
+    % \tkzLabelAngle[pos=0.4](A,C,B){$\gamma$}
+
+    % Label lines
+    % \tkzLabelSegment[below](A,B){$c$}
+    % \tkzLabelSegment[left](A,C){$b$}
+    % \tkzLabelSegment[right](B,C){$a$}
+
+    % Get mid points
+    \tkzDefMidPoint(A,B) \tkzGetPoint{F}
+    \tkzDefMidPoint(A,C) \tkzGetPoint{E}
+    \tkzDefMidPoint(B,C) \tkzGetPoint{D}
+    \tkzLabelPoints[right,font=\sansmath\sffamily](D)
+    \tkzLabelPoints[left,font=\sansmath\sffamily](E)
+    \tkzLabelPoints[below,font=\sansmath\sffamily](F)
+
+    \tkzDefCircle[circum,/tikz/overlay](D,E,F)\tkzGetPoint{Icircle}\tkzGetLength{rIN}
+    \tkzDrawCircle[R](Icircle,\rIN pt)
+
+    % Get 'Hoehe'
+    \tkzInterLC[/tikz/overlay](B,C)(A,B)\tkzGetPoints{hah1}{hah2}
+    \tkzDefMidPoint(hah1,hah2) \tkzGetPoint{G}
+    \tkzLabelPoints[right,font=\sansmath\sffamily](G)
+
+    \tkzInterLC[/tikz/overlay](A,B)(C,A)\tkzGetPoints{hch1}{hch2}
+    \tkzDefMidPoint(hch1,hch2) \tkzGetPoint{H}
+    \tkzLabelPoints[below,font=\sansmath\sffamily](H)
+
+    \tkzInterLC[/tikz/overlay](A,C)(B,A)\tkzGetPoints{hbh1}{hbh2}
+    \tkzDefMidPoint(hbh1,hbh2) \tkzGetPoint{I}
+    \tkzLabelPoints[left,font=\sansmath\sffamily](I)
+
+    % 'Hoehenschnittpunkt'
+    \tkzInterLL(A,G)(C,H)\tkzGetPoint{S}
+    \tkzLabelPoints[above right,font=\sansmath\sffamily](S)
+
+    % More points
+    \tkzInterLC[/tikz/overlay,R](A,G)(Icircle,\rIN pt)\tkzGetPoints{G}{J}
+    \tkzLabelPoints[above,font=\sansmath\sffamily](J)
+
+    \tkzInterLC[/tikz/overlay,R](B,I)(Icircle,\rIN pt)\tkzGetPoints{L}{I}
+    \tkzLabelPoints[above,font=\sansmath\sffamily](L)
+
+    \tkzInterLC[/tikz/overlay,R](C,H)(Icircle,\rIN pt)\tkzGetPoints{H}{K}
+    \tkzLabelPoints[above left,font=\sansmath\sffamily](K)
+
+    % Draw rest
+    \tkzDrawSegments[dashed](A,G C,H B,I)
+    \tkzDrawSegments[red,very thick](A,J J,S)
+    \tkzDrawSegments[green,very thick](C,K K,S)
+    \tkzDrawSegments[blue,very thick](B,L L,S)
+
+    \tkzDrawPoints[size=2,fill=black](D,E,F,I,G,H,S,J,L,K,Icircle)
+
+    % Draw polygon
+    \tkzDrawPolygon[thick](A,B,C)
+\end{tikzpicture}
+\end{preview}
+\end{document}