Справочные данные двигателей постоянного тока продолжительного режима работы
|
N/N |
Тип двигателя |
PН КВт
|
UН В |
n об/мин |
IН A |
RЯ+RДП |
RПАР Ом |
Число активных проводников якоря N |
Число параллельных ветвей якоря 2а |
Число витков полюса параллельной обмотки WПАР |
Магнитный поток полезный мВб |
Ток возбуждения параллельной обмотки IН, А |
Максимально допускаемая частота вращения об/мин |
Момент инерции якоря J кгм2 |
Масса двигателя Q кг |
|
|
П11 |
0,7 |
220 |
3000 |
4,3 |
5,3 |
670 |
1708 |
2 |
4000 |
2,72 |
0,27 |
3450 |
0,0125 |
18,5 |
|
|
П21 |
1,5 |
220 |
3000 |
9 |
1,99 |
600 |
1224 |
2 |
4800 |
3,2 |
0,30 |
3450 |
0,042 |
38 |
|
|
П22 |
2,2 |
220 |
3000 |
12,5 |
1,03 |
712 |
864 |
2 |
4800 |
4,7 |
0,25 |
3000 |
0,052 |
44 |
|
|
П31 |
3,2 |
220 |
3000 |
17,5 |
0,642 |
285 |
720 |
2 |
3600 |
5,7 |
0,62 |
3000 |
0,09 |
54,5 |
|
|
П32 |
4,5 |
220 |
3000 |
24,3 |
0,352 |
270 |
504 |
2 |
3600 |
8,2 |
0,65 |
3000 |
0,116 |
67,5 |
|
|
П41 |
6 |
220 |
3000 |
33 |
0,36 |
280 |
540 |
2 |
2100 |
3,7 |
0,60 |
3000 |
0,15 |
75 |
|
|
П51 |
6 |
220 |
1500 |
33,2 |
0,472 |
132 |
682 |
2 |
1500 |
5,8 |
1,27 |
3000 |
0,35 |
114 |
|
|
П52 |
8 |
220 |
1500 |
43,5 |
0,269 |
150 |
496 |
2 |
1500 |
8,2 |
1,11 |
3000 |
0,40 |
124 |
|
|
П61 |
11 |
220 |
1500 |
59,5 |
0,187 |
133 |
496 |
2 |
1800 |
8,2 |
1,25 |
2250 |
0,56 |
131 |
|
|
П62 |
14 |
220 |
1500 |
73,5 |
0,128 |
116 |
370 |
2 |
1600 |
11,1 |
1,44 |
2250 |
0,65 |
187 |
|
|
П71 |
19 |
220 |
1500 |
103 |
0,124 |
76,8 |
396 |
2 |
1250 |
10,1 |
2,04 |
2250 |
1,4 |
290 |
|
|
П72 |
25 |
220 |
1500 |
132 |
0,083 |
67 |
324 |
2 |
1600 |
12,5 |
2,34 |
2250 |
1,6 |
330 |
|
|
П81 |
32 |
220 |
1500 |
166 |
0,075 |
95,5 |
324 |
2 |
1600 |
12,4 |
1,64 |
2250 |
2,7 |
385 |
|
|
П82 |
42 |
220 |
1500 |
218 |
0,046 |
40,4 |
234 |
2 |
936 |
17,4 |
3,89 |
2250 |
3,1 |
435 |
|
|
П91 |
55 |
220 |
1500 |
287 |
0,0257 |
35,8 |
210 |
2 |
870 |
19,8 |
4,39 |
2250 |
5,9 |
605 |
|
|
П92 |
75 |
220 |
1500 |
381 |
0,0138 |
31,8 |
162 |
2 |
830 |
20,1 |
4,94 |
1900 |
7 |
205 |
|
|
П101 |
100 |
220 |
1500 |
508 |
0,0131 |
37,8 |
304 |
2 |
950 |
13,7 |
4,16 |
1800 |
10,3 |
865 |
|
|
П102 |
125 |
220 |
1500 |
632 |
0,079 |
32,5 |
228 |
2 |
840 |
13,0 |
4,84 |
1800 |
12,0 |
985 |
|
|
П111 |
160 |
220 |
1500 |
809 |
0,0638 |
28 |
216 |
2 |
850 |
13,5 |
5,61 |
1800 |
20,4 |
1180 |
|
|
П113 |
200 |
220 |
1500 |
1000 |
0,0495 |
24 |
184 |
2 |
750 |
16,2 |
6,55 |
1800 |
23 |
1370 |
|
|
Д32 |
17 |
440 |
1190 |
45 |
0,534 |
36 |
738 |
2 |
1140 |
57 |
4,3 |
|
|
|
|
|
Д41 |
15 |
440 |
710 |
40 |
0,695 |
70 |
984 |
2 |
1480 |
17 |
2,2 |
|
|
|
Mas:tArr;
{ Процедура создания сетки и осей координат }
procedure Fon;
begin
SetColor(Red);
Line(0+Round(GetMaxX/2), 0, 0+Round(GetMaxX/2), GetMaxY);
Line(0, Round(GetMaxY/2), GetMaxX, Round(GetMaxY/2));
SetColor(1);
OutTextXY(GetMaxX-40, Round(GetMaxY/2-20), 'M');
OutTextXY(0+Round(GetMaxX/2), 0+20, 'N')
end;
{ Процедура построения графика }
Procedure Graphic(Mas:tArr);
Var
s:string;
Begin
x:=0;
Gd := Detect;
InitGraph(Gd, Gm, '');
if GraphResult <> grOk then
Halt(1)
else
Begin
Fon;
koefy:=GetMaxY/3/ymax;
koefx:=GetMaxX/3/xmax;
SetColor(Blue);
For m:=0 to number do
Begin
y:=round(koefy*Mas[m,1]);
x:=round(koefx*Mas[m,0]);
NewX:=x+320{Round(GetMaxX/2)};NewY:={Round(GetMaxY/2)}240-y;
If m=0 then
Begin
OldX:=NewX;
OldY:=NewY;
End;
SetLineStyle(0,1,3);
Line(OldX, OldY, NewX, NewY);
SetLineStyle(0,1,1);
SetColor(Green);
Ellipse(NewX, NewY, 0, 360, 5, 5);
SetLineStyle(1,1,1);
Line(NewX,NewY,NewX,Round((GetMaxY+1)/2));
Line(NewX,NewY,Round((GetMaxX+1)/2),NewY);
SetLineStyle(0,1,1);
SetColor(Blue);
MoveTo(NewX,(Round((GetMaxY+1)/2)+2));
Str(Mas[m,0]:1:1,s);
OutText(s);
MoveTo((Round((GetMaxX+1)/2)+2),NewY);
Str(Mas[m,1]:1:1,s);
OutText(s);
OldX:=NewX;OldY:=NewY;
End;
End;
Readln;
CloseGraph;
End;
{ Основная программа }
Begin
ClrScr;
Write('Введи номинальный ток : ');Readln(I);
Write('Введи номинальное напряжение : ');Readln(Un);
Write('Введи номинальную скорость : ');Readln(w);
Write('Введи сопротивление якорной цепи : ');Readln(Riac);
Write('Введи долю от номинального тока : ');Readln(I1);
Write('Введи долю от номинальной скороcти : ');Readln(k);
I:=I*I1;
w1:=w*k;
CeF:=Un/w;
Writeln('Произведение коэф.Се и потока =',CeF);
Rdob:=(w1*CeF-Un)/(-I)-Riac;
Writeln('Добавочное сопротивление R=',Rdob);
Write('Введи кол-во расчетных точек =');Readln(number);{До 9}
number:=number+1;
shag:=(2*I/number);
ymax:=0;
For m:=0 to number do
Begin
Ic:=((-I)+m*shag);
w:=(Un-Ic*(Riac+Rdob))/(CeF);
Mas[m,0]:=Ic;Mas[m,1]:=w;
If abs(Ic)>xmax then xmax:=round(abs(Ic));
If abs(w)>ymax then ymax:=round(abs(w));
Write('Ток I=',Ic:5:10);
Writeln(' Скорость n=',w:5:10);
End;
Readln;
Graphic(Mas);
end.