![Schweitzer Engineering Laboratories SEL-321 Скачать руководство пользователя страница 364](http://html.mh-extra.com/html/schweitzer-engineering-laboratories/sel-321/sel-321_instruction-manual_1216711364.webp)
D-2
ONEBUS
Date Code 20011026
SEL-321/321-1 Instruction Manual
1
REM SCHWEITZER ENGINEERING LABORATORIES, INC.
2
REM 2350 NE Hopkins Court
3
REM Pullman, WA 99163-5603
4 REM
10
REM COMPUTE DOBLE SETTINGS FOR A ONE-BUS SYSTEM
20
REM HOMOGENEOUS SYSTEM
30
REM SOURCE VOLTS= 67 L-N
40 REM
50
REM ENTER IMPEDANCES FOR 100% OF LINE
60
INPUT "ENTER Z1: R,X";R1,S1
70
INPUT "ENTER Z0: R,X";R0,S0
75
INPUT "ENTER RF FOR GND FLTS";RF
80 REM
90
REM ENTER BUS LOC. FROM SOURCE
100 INPUT "DIST SOURCE TO BUS (PU OF LINE)";S
120 INPUT "DIST BUS TO FAULT (PU OF LINE)";F
130 REM
140 REM PHASE A TO GROUND
150 REM COMPUTE POS SEQ CURRENT
160 X = RO+2*R1: Y = S0+2*S1
170 R3 = R1-RO: S3 = S1-S0
180 AR=1/(S+F): AI=0
190 BR=X : BI=Y
195 BR=BR+3*RF/(S+F)
200 GOSUB
2000
210 I = RR : J = RI
220 IA = 3*67*I: JA=3*67*J
225 IB=0:JB=0:IC=0:JC=0
230 AR=X:AI=Y:BR=I:BI=J
232 GOSUB
1000
234 UA=67*(1-S*RR):VA=67*(-S*RI)
240 AR=R3 :AI=S3
250 BR=I :BI=J
260 GOSUB
1000
270 TR=S*RR :TS=S*RI
280 UB=67*(-0.5+TR)
290 VB=67*(-SQR(3)/2+TS)
300 UC=67*(-0.5+TR)
310 VC=67*(SQR(3)/2+TS)
315 FF$="A-G"
320 GOSUB
4041
500 REM B-C FAULT
510 AR=1:
AI=0
520 BR=2*R1*(S+F):BI=2*S1*(S+F)
530 GOSUB
2000
540 I=RR:J=RI
550 IA=0:JA=0
560 AR=I:AI=J:BR=0:BI=-67*SQR(3)
570 GOSUB
1000
580 IB=RR:JB=RI:IC=-IB:JC=-JB
590 UA=67:VA=0
600 AR=I:AI=J:BR=S*R1:BI=S*S1
610 GOSUB
1000
620 AR=RR:AI=RI:BR=0:BI=SQR(3)
630 GOSUB
1000
635 TR=RR:TS=RI
640 UB=67*(-0.5+TR)
650 VB=67*(-SQR(3)/2+TS)
660 UC=67*(-0.5-TR)
670 VC=67*(0.5*SQR(3)-TS)
675 FF$="B-C"
680 GOSUB
4041
900 INPUT "IMP BUS FAULT OR QUIT (I,B,F,Q)";A$
910 IF A$ = "I" THEN GOTO 50
920 IF A$ = "B" THEN GOTO 75
930 IF A$ = "F" THEN GOTO 120 ELSE GOTO 999
999 END
1000 REM MULT SUBROUTINE
1010 REM AR,AI * BR,BI = RR,RI
1020 RR=AR*BR-AI*BI
1030 RI=AI*BR+AR*BI
1040 RETURN
2000 REM DIVISION SUBROUTINE
2010 REM AR,AI / BR,BI = RR,RI
2020 D = BR*BR + BI*BI
2030 RR = AR*BR + AI*BI
2040 RR = RR/D
2050 RI = BR*AI - AR*BI
2060 RI = RI/D
2070 RETURN
3000 REM RECT TO POLAR CONV
3010 REM AR,AI, TO RH, TH
3020 PI = 3.14159265358
3030 IF (AR=0 AND AI=0) THEN RH=0: TH=0: RETURN
3040 IF (AR=0 AND AI>0) THEN RH=AI: TH=90:RETURN
3050 IF (AR=0 AND AI<0) THEN RH=-AI: TH=-90: RETURN
3060 IF (AR>0) THEN TH=(180/PI)*ATN(AI/AR)
3070 IF (AR<0) THEN TH=(180/PI)*ATN(AI/AR)+180
3080 IF TH>180 THEN TH = TH-360
3090 RH=SQR(AR*AR+AI*AI)
3100 RETURN
4041 AR=UA:AI=VA:GOSUB 3000
4042 UA=RH:VA=TH
4043 AR=UB:AI=VB:GOSUB 3000
4044 UB=RH:VB=TH-VA
4045 AR=UC:AI=VC:GOSUB 3000
4046 UC=RH:VC=TH-VA
4047 AR=IA:AI=JA:GOSUB 3000
4048 IA=RH:JA=TH-VA
4049 AR=IB:AI=JB:GOSUB 3000
4050 IB=RH:JB=TH-VA
4055 AR=IC:AI=JC:GOSUB 3000
4060 IC=RH:JC=TH-VA
4061 VA=0
4100 PRINT " VA VB VC IA IB IC"
4130 PRINT USING"##.# ";UA;UB;UC;IA;IB;IC,
4132 PRINT FF$
4140 PRINT USING"#### ";VA;VB;VC;JA;JB;JC
4150 RETURN
Содержание SEL-321
Страница 4: ......
Страница 10: ......
Страница 12: ......
Страница 78: ...2 54 Specifications Date Code 20011026 SEL 321 321 1 Instruction Manual Figure 2 4 Logic Symbol Legend ...
Страница 87: ...Date Code 20011026 Specifications 2 63 SEL 321 321 1 Instruction Manual Figure 2 21 Load Encroachment Logic ...
Страница 94: ...2 70 Specifications Date Code 20011026 SEL 321 321 1 Instruction Manual Figure 2 29 Voltage Element Logic ...
Страница 162: ......
Страница 171: ...Date Code 20011026 Event Reporting 4 9 SEL 321 321 1 Instruction Manual ...
Страница 263: ...SEL DIRECTION AND POLARITY CHECK FORM ...
Страница 264: ......
Страница 265: ...SEL DIRECTION AND POLARITY CHECK FORM ...
Страница 266: ......
Страница 270: ......
Страница 358: ......
Страница 360: ......
Страница 362: ......
Страница 366: ......
Страница 370: ......
Страница 390: ......