☰

电网单线图

tag-icon • tag-icon tikz-pgf diagrams circuits
电网单线图

我正在寻找一种绘画方式单线图配电网。到目前为止，我遇到过 CircuiTikZ，但这个包似乎面向不同类型的电路图，并且不包含总线等基本组件。有人知道我可以为此使用的包吗？

以下是此类图表的示例：

光伏设备安装中低压配电网络的运行 - Georg Kerber

答案1

我从事电力系统工作，喜欢使用 LaTex。多年来，我一直在寻找合适的库来绘制单线图，包括输电线、电力变压器、发电机、电动机、负载、仪器变压器等。但直到现在，都没有成功。我使用电路宏它使用 M4 宏预处理器生成 .pic 文件，然后使用 dpic（或 gpic）生成 .tex 文件。它不适用于 Power Systems，但很有用。

示例代码：

% `Loop.m4'
.PS
cct_init
ifdef(`AND_gate',,`include(liblog.m4)')
xgap = 0.6
define(`dimen_',0.75)
dim1 = 1; dim2 = 0.75 ; dim3=0.5
P0 : Here
box fill_(0.9) wid 1 "Xingu" "\SI{500}{\kV}"
P01 : Here
move to P0
move down 0.4
"$R_0=\SI{1,682}{\ohm}$" wid 0.1 ht 0.1 at Here ljust
move to P01
source(right_ dim2, G); llabel(,YY,); rlabel(,18~\%,)
P1 : Here
move down 0.2
line thick 3*linethick up 0.4 
move up 0.1
"$s$" wid 0.1 ht 0.1 at Here
move to P1
move right 0.1
move down 0.1
arrow right 0.2
move down 0.1
move left 0.2
"$I^s$" wid 0.1 ht 0.1 at Here
move to P1
move right 1.5
move up 0.1
"$l=\SI{2600}{\km}$" wid 0.1 ht 0.1 at Here
move to P1
line right 3.0
P2 : Here
move down 0.2
line thick 3*linethick up 0.4 
move up 0.1
"$r$" wid 0.1 ht 0.1 at Here
move to P2
source(right_ dim2, G); llabel(,YY,); rlabel(,18~\%,)
P3 : Here
box fill_(0.9) wid 1 "Nova Igua\c{c}u" "\SI{500}{\kV}"
move to P3
move down 0.4
"$Z_0=a+b$" wid 0.1 ht 0.1 at Here ljust
move to P1
move right 0.6
move up  0.3
RELE : BOX_gate(PP,,,,21)
line left 0.15 from last [].In1
move left 0.1
"$V^s$"
line left 0.15 from last [].In2
move left 0.1
"$I^s$"
move to P1
move right 0.2
move down 0.2
"$R_0=\SI{2600}{\km}$" wid 0.1 ht 0.1 at Here ljust
move to P1
move right 2.8
move down 0.2
"$R_0=\SI{2600}{\km}$" wid 0.1 ht 0.1 at Here rjust
.PE

按照手册使用 M4 宏和 dpic 可以生成一个 .tex 文件来生成下图（我在 .tex 文件中做了一些更改，修改了一些文本）。

在此处输入图片描述

我想为电力系统编写一个库，将其包含在电路宏中。

答案2

出于兴趣，这里是伦佐·法比安的代码没有那些内容move：

.PS
log_init
xgap = 0.6
define(`dimen_',0.75)
  dim1 = 1; dim2 = 0.75 ; dim3=0.5
  X: box fill_(0.9) wid 1 "Xingu" "\SI{500}{\kV}"
  { "$R_0=\SI{1,682}{\ohm}$" wid 0.1 ht 0.1 at X.sw below ljust }
  source(right_ dim2, G); llabel(,YY,); rlabel(,18~\%,)
  { B1: line thick 3*linethick up 0.4 with .c at Here
    "$s$" wid 0.1 ht 0.1 }
  { arrow right 0.2 from last line.c+(0.1,-0.1) }
  { "$I^s$" wid 0.1 ht 0.1 at last line.start below }
  line right 3.0 "$l=\SI{2600}{\km}$" wid 0.1 ht 0.1 above
  { B2: line thick 3*linethick up 0.4 with .c at Here
    "$r$" wid 0.1 ht 0.1 above }
  source(right_ dim2, G); llabel(,YY,); rlabel(,18~\%,)
  NI: box fill_(0.9) wid 1 "Nova Igua\c{c}u" "\SI{500}{\kV}"
  "$Z_0=a+b$" wid 0.1 ht 0.1 at NI.sw below ljust
  RELE : BOX_gate(PP,,,,) with .w at B1+(0.6,0.3)
  line left 0.15 from last [].In1
  "$V^s$" rjust
  line left 0.15 from last [].In2
  "$I^s$" rjust
  "$R_0=\SI{2600}{\km}$" wid 0.1 ht 0.1 at B1+(0.2,-0.2) ljust
  "$R_0=\SI{2600}{\km}$" wid 0.1 ht 0.1 at B1+(2.8,-0.2) rjust
.PE

相关内容