circuitikz-three-phase-load/example.tex at main · spmcv/circuitikz-three-phase-load · GitHub

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
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
\documentclass[multi, border=25]{standalone}
\usepackage[siunitx]{circuitikz}

\standaloneenv{circuitikz}

\ctikzsubcircuitdef{resistivewye}{u, v, w, n}{
    coordinate (#1-center)
    (#1-center) node[circ] (#1-n) {}
    \foreach[count=\i] \x  in {u, v, w}{
        (#1-center) + (\fpeval{\i*120.0}:4) node[circ] (#1-\x) {}
        (#1-\x) to[
            R,
            l=$R_{\x}$,
            v=$v_{\x}$,
            i=$i_{\x}$,
            name=#1-R\x
        ] (#1-n)
    }
}

\ctikzsubcircuitactivate{resistivewye}

\ctikzsubcircuitdef{inductivewye}{u, v, w, n}{
    coordinate (#1-center)
    (#1-center) node[circ] (#1-n) {}
    \foreach[count=\i] \x in {u, v, w}{
        (#1-center) + (\fpeval{\i*120.0}:4) node[circ] (#1-\x) {}
        (#1-\x) to[
            L,
            l=$L_{\x}$,
            v=$v_{\x}$,
            i=$i_{\x}$,
            name=#1-L\x
        ] (#1-n)
    }
}

\ctikzsubcircuitdef{motorwye}{u, v, w, n}{
    coordinate (#1-center)
    (#1-center) node[circ] (#1-n) {}
    \foreach[count=\i] \x in {u, v, w}{
        (#1-center) + (\fpeval{\i*120.0}:4) node[circ] (#1-\x) {}
        (#1-\x) to[
            L,
            l=$L_{\x}$,
            v=$V_{\x}$,
            i=$i_{\x}$,
            name=#1-L\x,
            label distance=4
        ] (#1-n)
        (#1-L\x.core west) -- (#1-L\x.core east)
    }
    (#1-center) + (30:0.35) node[
        currarrow,
        rotate=-45
    ] (#1-arc) {}
    (#1-arc) arc[
        start angle=30,
        end angle=330,
        x radius=0.35,
        y radius=0.35
    ]
}

\ctikzsubcircuitdef{cutemotorwye}{u, v, w, n}{
    coordinate (#1-center)
    (#1-center) node[circ] (#1-n) {}
    \foreach[count=\i] \x in {u, v, w}{
        (#1-center) + (\fpeval{\i*120.0}:4) node[circ] (#1-\x) {}
        (#1-\x) to[
            cute choke,
            twolineschoke,
            l=$L_{\x}$,
            v=$V_{\x}$,
            i=$i_{\x}$,
            name=#1-L\x,
            label distance=4
        ] (#1-n)
    }
    (#1-center)  + (30:0.35) node[
        currarrow,
        rotate=-45
    ] (#1-arc) {}
    (#1-arc) arc[
        start angle=30,
        end angle=330,
        x radius=0.35,
        y radius=0.35
    ]
}

\ctikzsubcircuitactivate{cutemotorwye}

\begin{document}

\begin{circuitikz}[american]
    \draw(0,0) \resistivewye{load1}{};
\end{circuitikz}

\begin{circuitikz}[american]
    \draw(0,0) \inductivewye{load2}{};
\end{circuitikz}

\begin{circuitikz}[american]
    \draw(0,0) \motorwye{load3}{};
\end{circuitikz}

\begin{circuitikz}[american]
    \draw(0,0) \cutemotorwye{load4}{};
\end{circuitikz}

\end{document}