Антиплагиат (1207202), страница 4
Текст из файла (страница 4)
Обмотки W3 и W4 осущ ествляют обратную связь. В них такж е наводитсяпеременное напряж ение, во время полож ительных полупериодов которого, транзисторы V1 и V2 поочередно закрываются, аво время отриц ательных - открываются. Цепочка RC служ ит для подачи на базы транзисторов начального отриц ательногонапряж ения смещ ения, то есть для некоторого начального приоткрывания транзисторов.
Из-за разброса параметровтранзисторов один из них в начальный момент времени будет открыт раньше, чем другой, и схема начнет работать.1.2.2 Разработка алгоритма и создание программного кодаЗа основу была взята лабораторная установка со статическим преобразователем напряж ения ППБ-50, который имеет схож еестроение и принц ип работы описанный выше. Данная программа предназначена для выполнения лабораторной работыhttp://dvgups.antiplagiat.ru/ReportPage.aspx?docId=427.21352150&repNumb=112/3226.05.2016Антиплагиат«Исследование работы преобразователей напряж ения».В основе э той программы леж ит тот ж е принц ип многооконности, как и в лабораторной работе «Тиристорный регулятор».Применимо к э той работе, данный принц ип позволяет одновременно следить за работой осц иллографа и делать измерениянепосредственно в рабочем окне программы.Стартовое окно программы имеет такой ж е вид, как и стартовое окно программы «Тиристорный регулятор».
Оно изображ енона рисунке 1.2 и полностью отраж ает рабочий потенц иал данной программы.При наж атии клавиши «Теория», открывается теоретический раздел программы «Инвертор». В э том разделе отображ енаинформац ия по данной лабораторной работе и методике её выполнения. На рисунке 1.9 показан скриншот данного окна.Рисунок 1.9 – окно «Теория» программы «Инвертор»Здесь такж е реализована функц ия прокрутки компонента TImage компонентом TScrollBox с помощ ью колесика мыши. Код э тойоперац ии представлен в описании программы «Тиристорный регулятор».Рабочее окно программы представлено на рисунке 1.10 и имеет полный набор функц ионала лабораторного учебного стенда.Клавиша S1 отвечает за работу данного ключа и запускает программу.
Как только загорится лампочка, стенд готов квыполнению лабораторной работы. Вольтметр V1 и амперметр A1 отображ ают напряж ение и ток входящ ий в инверторППБ-50, а вольтметр V2 и амперметр A2 соответственно выходящ ее напряж ение и ток.Рисунок1.10–рабочееокнопрограммы «Инвертор»: 1-индикаторвключения ключаS1; 2-резистор; 3-активноесопротивление в виде ламп накаливания.Программный код работы ключа выглядит следующ им образом:procedure TForm3.Button1Click(Sender: TObject);beginS1off.Visible:= not S1off.Visibleend;Амперметры и вольтметры запускаются по включению данного ключа и зависят от свойства Visible. Для плавного перехода иимитац ии аналогового включения используется компонент TTimer основной палитры компонентов. На нем установленазадерж ка 500 мс.Для плавного регулирования напряж ения резистор 2 такж е использует компонент TTimer. На языке ObjectPascal программныйкод выглядит следующ им образом:procedure TForm3.Timer1Timer(Sender: TObject);beginif TrackBar1.Position>TrackBar1.SelEndthenbeginTrackBar1.SelEnd:=TrackBar1.SelEnd+1end;if TrackBar1.Position<TrackBar1.SelEndthenbeginTrackBar1.SelEnd:=TrackBar1.SelEnd-1;end;end;Для плавного аналогового отображ ения значений амперметров и вольтметров такж е используется компонент TTimer сзадерж кой 500 мс.
Значения показателей были измерены по инвертору Энергия ПН-750 с поправкой на ток. Ток был вычитанпо номинальной мощ ности инвертора ППБ-50 по формуле:а) мощ ность, потребляемая преобразователемP1 = U1 I1 (1.1)где U1 – напряж ение, потребляемое преобразователем;I1 – ток, потребляемый преобразователем;б) мощ ность, отдаваема преобразователем в нагрузкуP2 = U2 I2 cos φ (1.2)где cos φ = 1, так как лампы накаливания являются активной нагрузкой;U2 – напряж ение, отдаваемое в нагрузку;I2 – ток, отдаваемый в нагрузку.Расчеты и измерения значений при разной степени нагруж ения инвертора ППБ-50 сведены в таблиц ы 1.2 – 1.5.Таблиц а 1.2 – Значения показателей холостого хода инвертораV1, ВI1, АV2, ВI2, А400,6492120,010410,6512140,013420,6702140,015430,6922150,017440,715http://dvgups.antiplagiat.ru/ReportPage.aspx?docId=427.21352150&repNumb=113/3226.05.2016Антиплагиат2160,020450,7362160,023460,7482170,025470,7612180,027480,7752180,029490,7902190,032500,8162200,036510,8282200,038520,8422210,041530,8512220,044Таблиц а 1.3 – Значения показателей при нагрузке лампы мощ ностью 10 ВтV1, ВI1, АV2, ВI2, А390,6192110,083400,6212130,095410,6302130,101420,6422140,107430,6742150,110440,6872150,113450,7042160,115460,7112170,11747http://dvgups.antiplagiat.ru/ReportPage.aspx?docId=427.21352150&repNumb=114/3226.05.2016Антиплагиат0,7252170,118480,7402180,120490,7592190,122500,7742200,125510,7972200,129520,8092210,130Таблиц а 1.4 – Значения показателей при нагрузке ламп мощ ностью 20 ВтV1, ВI1, АV2, ВI2, А380,6392100,125390,6412110,125400,6502120,127410,6622130,130420,6832130,133430,6992140,135440,7142140,137450,7262150,139Продолж ение таблиц ы 1.4V1, ВI1, АV2, ВI2, А460,7312160,142470,7562170,144480,765218http://dvgups.antiplagiat.ru/ReportPage.aspx?docId=427.21352150&repNumb=115/3226.05.2016Антиплагиат0,145490,7762190,147500,7992200,151510,8102210,153Таблиц а 1.5 – Значения показателей при нагрузке ламп мощ ностью 30 ВтV1, ВI1, АV2, ВI2, А370,6392090,127380,6422100,128390,6512110,132400,6632120,135410,6852120,137420,6992130,138430,7132140,142440,7272140,145450,7322160,147460,7572160,149470,7662170,151480,7772180,153490,7992190,154500,8112200,156На языке ObjectPascal программный код выглядит следующ им образом:procedure TForm3.Timer2Timer(Sender: TObject);http://dvgups.antiplagiat.ru/ReportPage.aspx?docId=427.21352150&repNumb=116/3226.05.2016Антиплагиатbeginif S1off.Visible=false then beginV1.Visible:=true; Button2.Enabled:=true;V2.Visible:=true; Form4.Button1.
Enabled:=true;A1. Visible:=true; Form4.Button2.[37]Enabled:=true;A2.Visible:=true;end;if S1off.Visible=true then beginV1.Visible:=false;Button2.Enabled:=false; Form4.Button1.Enabled:=false;V2.[38] Visible:=false; S2. Visible:=true; Form4.Button2. Enabled:=false;A1.
Visible:=false; Form4.[37]ANI.Visible:=false;A2.Visible:=false; Form4.ANI.Active:=false;end;if TrackBar1.SelEnd>0 thenV1.Caption:=IntToStr(TrackBar1.SelEnd+40)elseV1.Caption:='40';if TrackBar1.SelEnd=0 then beginA1.Caption:='0,649'; V2.Caption:='212'; A2.Caption:='0,010';end;if TrackBar1.SelEnd=1 then beginA1.Caption:='0,651'; V2.Caption:='214'; A2.Caption:='0,013';end;if TrackBar1.SelEnd=2 then beginA1.Caption:='0,670'; V2.Caption:='214'; A2.Caption:='0,015';end;if TrackBar1.SelEnd=3 then beginA1.Caption:='0,692'; V2.Caption:='215'; A2.Caption:='0,017';end;if TrackBar1.SelEnd=4 then beginA1.Caption:='0,715'; V2.Caption:='216'; A2.Caption:='0,020';end;if TrackBar1.SelEnd=5 then beginA1.Caption:='0,736'; V2.Caption:='216'; A2.Caption:='0,023';end;if TrackBar1.SelEnd=6 then beginA1.Caption:='0,748'; V2.Caption:='217'; A2.Caption:='0,025';end;if TrackBar1.SelEnd=7 then beginA1.Caption:='0,761'; V2.Caption:='218'; A2.Caption:='0,027';end;if TrackBar1.SelEnd=8 then beginA1.Caption:='0,775'; V2.Caption:='218'; A2.Caption:='0,029';end;if TrackBar1.SelEnd=9 then beginA1.Caption:='0,790'; V2.Caption:='219'; A2.Caption:='0,032';end;if TrackBar1.SelEnd=10 then beginA1.Caption:='0,816'; V2.Caption:='220'; A2.Caption:='0,036';end;if TrackBar1.SelEnd=11 then beginA1.Caption:='0,828'; V2.Caption:='220'; A2.Caption:='0,038';end;if TrackBar1.SelEnd=12 then beginA1.Caption:='0,842'; V2.Caption:='221'; A2.Caption:='0,041';end;if TrackBar1.SelEnd=13 then beginA1.Caption:='0,851'; V2.Caption:='222'; A2.Caption:='0,044';end;if S2.Visible=false then beginV1S2.Visible:=true; Button3.Enabled:=true;V2S2.Visible:=true;A1S2.Visible:=true;A2S2.Visible:=true;end;if S2.Visible=true then beginV1S2.Visible:=false; Button3.Enabled:=false;V2S2.Visible:=false;A1S2.Visible:=false;http://dvgups.antiplagiat.ru/ReportPage.aspx?docId=427.21352150&repNumb=117/3226.05.2016АнтиплагиатA2S2.Visible:=false;end;if TrackBar1.SelEnd>0 thenV1S2.Caption:=IntToStr(TrackBar1.SelEnd+39)elseV1S2.Caption:='39';if TrackBar1.SelEnd=0 then beginA1S2.Caption:='0,619'; V2S2.Caption:='211'; A2S2.Caption:='0,083';end;if TrackBar1.SelEnd=1 then beginA1S2.Caption:='0,621'; V2S2.Caption:='213'; A2S2.Caption:='0,095';end;if TrackBar1.SelEnd=2 then beginA1S2.Caption:='0,630'; V2S2.Caption:='213'; A2S2.Caption:='0,101';end;if TrackBar1.SelEnd=3 then beginA1S2.Caption:='0,642'; V2S2.Caption:='214'; A2S2.Caption:='0,107';end;if TrackBar1.SelEnd=4 then beginA1S2.Caption:='0,674'; V2S2.Caption:='215'; A2S2.Caption:='0,110';end;if TrackBar1.SelEnd=5 then beginA1S2.Caption:='0,687'; V2S2.Caption:='215'; A2S2.Caption:='0,113';end;if TrackBar1.SelEnd=6 then beginA1S2.Caption:='0,704'; V2S2.Caption:='216'; A2S2.Caption:='0,115';end;if TrackBar1.SelEnd=7 then beginA1S2.Caption:='0,711'; V2S2.Caption:='217'; A2S2.Caption:='0,117';end;if TrackBar1.SelEnd=8 then beginA1S2.Caption:='0,725'; V2S2.Caption:='217'; A2S2.Caption:='0,118';end;if TrackBar1.SelEnd=9 then beginA1S2.Caption:='0,740'; V2S2.Caption:='218'; A2S2.Caption:='0,120';end;if TrackBar1.SelEnd=10 then beginA1S2.Caption:='0,759'; V2S2.Caption:='219'; A2S2.Caption:='0,122';end;if TrackBar1.SelEnd=11 then beginA1S2.Caption:='0,774'; V2S2.Caption:='220'; A2S2.Caption:='0,125';end;if TrackBar1.SelEnd=12 then beginA1S2.Caption:='0,797'; V2S2.Caption:='220'; A2S2.Caption:='0,129';end;if TrackBar1.SelEnd=13 then beginA1S2.Caption:='0,809'; V2S2.Caption:='221'; A2S2.Caption:='0,130';end;if S3.Visible=false then beginV1S3.Visible:=true;V2S3.Visible:=true; Button4.Enabled:=true;A1S3.Visible:=true; Button2.Enabled:=false;A2S3.Visible:=true;end;if S3.Visible=true then beginV1S3.Visible:=false; Button4.Enabled:=false;V2S3.Visible:=false;A1S3.Visible:=false;A2S3.Visible:=false;end;if TrackBar1.SelEnd>0 thenV1S3.Caption:=IntToStr(TrackBar1.SelEnd+38)elseV1S3.Caption:='38';if TrackBar1.SelEnd=0 then beginA1S3.Caption:='0,639'; V2S3.Caption:='210'; A2S3.Caption:='0,125';end;if TrackBar1.SelEnd=1 then beginA1S3.Caption:='0,641'; V2S3.Caption:='211'; A2S3.Caption:='0,125';end;if TrackBar1.SelEnd=2 then beginA1S3.Caption:='0,650'; V2S3.Caption:='212'; A2S3.Caption:='0,127';end;if TrackBar1.SelEnd=3 then beginA1S3.Caption:='0,662'; V2S3.Caption:='213'; A2S3.Caption:='0,130';end;http://dvgups.antiplagiat.ru/ReportPage.aspx?docId=427.21352150&repNumb=118/3226.05.2016Антиплагиатif TrackBar1.SelEnd=4 then beginA1S3.Caption:='0,683'; V2S3.Caption:='213'; A2S3.Caption:='0,133';end;if TrackBar1.SelEnd=5 then beginA1S3.Caption:='0,699'; V2S3.Caption:='214'; A2S3.Caption:='0,135';end;if TrackBar1.SelEnd=6 then beginA1S3.Caption:='0,714'; V2S3.Caption:='214'; A2S3.Caption:='0,137';end;if TrackBar1.SelEnd=7 then beginA1S3.Caption:='0,726'; V2S3.Caption:='215'; A2S3.Caption:='0,139';end;if TrackBar1.SelEnd=8 then beginA1S3.Caption:='0,731'; V2S3.Caption:='216'; A2S3.Caption:='0,142';end;if TrackBar1.SelEnd=9 then beginA1S3.Caption:='0,756'; V2S3.Caption:='217'; A2S3.Caption:='0,144';end;if TrackBar1.SelEnd=10 then beginA1S3.Caption:='0,765'; V2S3.Caption:='218'; A2S3.Caption:='0,145';end;if TrackBar1.SelEnd=11 then beginA1S3.Caption:='0,776'; V2S3.Caption:='219'; A2S3.Caption:='0,147';end;if TrackBar1.SelEnd=12 then beginA1S3.Caption:='0,799'; V2S3.Caption:='220'; A2S3.Caption:='0,151';end;if TrackBar1.SelEnd=13 then beginA1S2.Caption:='0,810'; V2S3.Caption:='221'; A2S3.Caption:='0,153';end;if S4.Visible=false then beginV1S4.Visible:=true;V2S4.Visible:=true; Button5.Enabled:=true;A1S4.Visible:=true; Button3.Enabled:=false;A2S4.Visible:=true;end;if S4.Visible=true then beginV1S4.Visible:=false; Button5.Enabled:=false;V2S4.Visible:=false;A1S4.Visible:=false;A2S4.Visible:=false;end;if TrackBar1.SelEnd>0 thenV1S4.Caption:=IntToStr(TrackBar1.SelEnd+37)elseV1S4.Caption:='37';if TrackBar1.SelEnd=0 then beginA1S4.Caption:='0,639'; V2S4.Caption:='209'; A2S4.Caption:='0,127';end;if TrackBar1.SelEnd=1 then beginA1S4.Caption:='0,642'; V2S4.Caption:='210'; A2S4.Caption:='0,128';end;if TrackBar1.SelEnd=2 then beginA1S4.Caption:='0,651'; V2S4.Caption:='211'; A2S4.Caption:='0,132';end;if TrackBar1.SelEnd=3 then beginA1S4.Caption:='0,663'; V2S4.Caption:='212'; A2S4.Caption:='0,135';end;if TrackBar1.SelEnd=4 then beginA1S4.Caption:='0,685'; V2S4.Caption:='212'; A2S4.Caption:='0,137';end;if TrackBar1.SelEnd=5 then beginA1S4.Caption:='0,699'; V2S4.Caption:='213'; A2S4.Caption:='0,138';end;if TrackBar1.SelEnd=6 then beginA1S4.Caption:='0,713'; V2S4.Caption:='214'; A2S4.Caption:='0,142';end;if TrackBar1.SelEnd=7 then beginA1S4.Caption:='0,727'; V2S4.Caption:='214'; A2S4.Caption:='0,145';end;if TrackBar1.SelEnd=8 then beginA1S4.Caption:='0,732'; V2S4.Caption:='216'; A2S4.Caption:='0,147';end;if TrackBar1.SelEnd=9 then beginA1S4.Caption:='0,757'; V2S4.Caption:='216'; A2S4.Caption:='0,149';end;http://dvgups.antiplagiat.ru/ReportPage.aspx?docId=427.21352150&repNumb=119/3226.05.2016Антиплагиатif TrackBar1.SelEnd=10 then beginA1S4.Caption:='0,766'; V2S4.Caption:='217'; A2S4.Caption:='0,151';end;if TrackBar1.SelEnd=11 then beginA1S4.Caption:='0,777'; V2S4.Caption:='218'; A2S4.Caption:='0,153';end;if TrackBar1.SelEnd=12 then beginA1S4.Caption:='0,799'; V2S4.Caption:='219'; A2S4.Caption:='0,154';end;if TrackBar1.SelEnd=13 then beginA1S4.Caption:='0,811'; V2S4.Caption:='220'; A2S4.Caption:='0,156';end;if S5.Visible=false then beginButton4.Enabled:=false; TrackBar2.Position:=10;A2S5.Visible:=true;A2S4.Visible:=false;end;По техническим характеристикам инвертор ППБ-50 обладает мощ ностью 30 Вт.
![](https://s.studizba.com/z.php?f=/templates/si/i/noavatar.png&w=100&h=100&t=1"){kind=avatar}
