.

Розробка програми для демонстрації роботи релейної схеми автоматич-ного регулювання температури(курсова робота)

Язык: украинский
Формат: реферат
Тип документа: Word Doc
1 1776
Скачать документ

//———————————————————
#include
#include
#include
#include #include //???‹??…˜˜? ˜I˜‹I?’…?
#include
#define pi 3.14
#define ESC 27
#define A 97
#define B 98
//———————————————————
float robota(void)
{
clrscr();
int gdriver=DETECT,gmode,errorcode;
float j,tmin,tmax,i,l,p;
initgraph(&gdriver,&gmode,””);
errorcode=graphresult();
if(errorcode!=grOk)
{printf(“Graphics error:%s\n”,grapherrormsg(errorcode));
printf(“Press any key to halt:”);
getch();exit(1);}
printf(“\n‚cY¤iai aY¬?Ya aaaa tmin=”);
scanf(“%f”,&tmin);
printf(“\n‚cY¤iai aY¬?Ya aaaa tmax=”);
scanf(“%f”,&tmax);
setgraphmode(getgraphmode()); // ‚?ai¤ § aY?aa®c®F® aY¦?¬a
setlinestyle(0,4,3); // § ¤ iaiai aa?«i «iii
setcolor(2); // § ¤ iaiai ?®«ia
rectangle(10,10,630,467); // ?®!a¤®c  ?ai¬®?aa?? 
//———————˜®!a¤®c  aaY¬?———————————
setcolor(2);
setlinestyle(0,0,0);
circle(403,260,3); // ?®!a¤®c  ?®« 
circle(403,105,3);
line(230,105,400,105); // ?®!a¤®c  «iii
line(320,105,320,125);
line(230,105,230,125);
line(230,140,230,180);
line(228,158,230,165);
line(232,158,230,165);
line(320,140,320,205);
line(320,225,320,260);
line(305,205,320,225);
setlinestyle(0,4,3);
rectangle(215,125,245,140); // ˜Y«Y ??1
rectangle(305,125,335,140); // ˜Y«Y ??2
setcolor(15); // aYa¬®¬Yaa
setlinestyle(0,0,0);
arc(230,172,0,180,7);
line(223,172,223,260);
line(237,172,237,260);
arc(230,271,122,416,12); // ?®!a¤®c  ¤aF?
setcolor(8);
arc(230,172,0,180,5);
line(225,172,225,262);
line(235,172,235,262);
line(225,253,235,253);
arc(230,271,120,416,10);
setfillstyle(1,4); // § ¤ iaiai aa?«i § ?®cYi
floodfill(230,254,8); // ?®®a¤? a? i ?®«ia ?®aaa 
setcolor(8);
line(210,253,220,253); // e? «  aYa¬®¬Yaa 
line(215,251,220,251);
line(215,249,220,249);
line(215,247,220,247);
line(215,245,220,245);
line(210,243,220,243);
line(215,241,220,241);
line(215,239,220,239);
line(215,237,220,237);
line(215,235,220,235);
line(210,233,220,233);
line(215,231,220,231);
line(215,229,220,229);
line(215,227,220,227);
line(215,225,220,225);
line(210,223,220,223);
line(215,221,220,221);
line(215,219,220,219);
line(215,217,220,217);
line(215,215,220,215);
line(210,213,220,213);
line(215,211,220,211);
line(215,209,220,209);
line(215,207,220,207);
line(215,205,220,205);
line(210,203,220,203);
line(215,201,220,201);
line(215,199,220,199);
line(215,197,220,197);
line(215,195,220,195);
line(210,193,220,193);
line(215,191,220,191);
line(215,189,220,189);
line(215,187,220,187);
line(215,185,220,185);
line(210,183,220,183);
setcolor(2);
line(237,260,400,260);
line(237,260,250,258);
line(237,260,250,262);
setlinestyle(2,4,0);
rectangle(155,255,285,440);
setlinestyle(0,4,0);
line(185,380,210,380);
rectangle(210,375,250,385);
line(250,380,320,380);
line(320,380,340,390);
line(185,380,185,410);
line(185,410,320,410);
line(320,410,340,420);
line(337,380,400,380);
line(337,410,400,410);
line(337,380,337,389);
line(337,410,337,419);
circle(403,380,3);
circle(403,410,3);
setcolor(4);
setlinestyle(0,4,3);
rectangle(195,345,265,395); // Faic c c??«ic Yaiai –
//———————–˜®§ cYi——————–//
settextstyle(6,0,1); // aa?«i aY?aaa
setcolor(12);
outtextxy(398,112,”+”); // c?cY¤Yi aY?aaa c Fa aeic®¬a aY¦?¬i
outtextxy(398,245,”-“);
outtextxy(398,394,”~”);
setcolor(6);
settextstyle(2,0,4);
outtextxy(322,362,”KM2″);
outtextxy(327,207,”KM1″);
outtextxy(330,110,”KM2″);
outtextxy(240,110,”KM1″);
outtextxy(236,153,”SK”);
outtextxy(165,420,”K”);
outtextxy(270,345,”EK”);
setcolor(7);
settextstyle(2,0,2);
outtextxy(196,250,”0″);
outtextxy(196,240,”10″);
outtextxy(196,230,”20″);
outtextxy(196,220,”30″);
outtextxy(196,210,”40″);
outtextxy(196,200,”50″);
outtextxy(196,190,”60″);
outtextxy(196,180,”70″);
//——————- ˜a®aeYa a®!®a? —————————-
while (!kbhit())
{setcolor(4);
for(j=253;j>253-tmax;j–) // ?®c a?®c  aY¬?Ya aaa 
{
line(226,j,234,j);delay(100);
}
setcolor(13);
{rectangle(215,125,245,140); // ˜Y«Y ??1
delay(1000); }
setcolor(2);
for(i=319;i>305;i–)
{line(i,205,319,224);

setcolor(0);
for(i=318;i>304;i–)
line(i,205,318,225); delay(1000); }
setcolor(13);
{rectangle(305,125,335,140); // ˜Y«Y ??2
delay(1000); }
setcolor(2);
{for(i=390;i>380;i–)
line(320,381,340,i);
for(l=420;l>410;l–)
line(320,411,340,l); // delay(100);

setcolor(0);
for(i=390;i>381;i–)
line(319,382,340,i);
for(l=420;l>411;l–)
line(320,412,340,l);
delay(1000); }
setcolor(1);
setlinestyle(0,4,3);
rectangle(195,345,265,395); //  Faic c c??«ic Yaiai –
line(195,360,265,360);
setcolor(0);
for(j=253-tmax;j305;i–)
line(i,205,319,224);
setcolor(0);
for(i=320;i>306;i–)
line(i,205,320,224);
delay(1000);
setcolor(2);
{rectangle(305,125,335,140); // ˜Y«Y ??2
delay(1000); }
setcolor(2);
{for(i=390;i>380;i–)
line(320,381,340,i);
for(l=420;l>410;l–)
line(320,411,340,l); delay(10); }

setcolor(0);
{for(i=390;i>379;i–)
line(320,379,341,i);
for(l=420;l>409;l–)
line(320,409,341,l);
setcolor(2);
setlinestyle(0,0,0);
line(337,380,341,380);
line(337,380,337,390);
line(337,410,341,410);
line(337,410,337,420);
delay(1000); }
setcolor(4);
setlinestyle(0,4,3);
{rectangle(195,345,265,395); // Faic c c?«ic Yaiai +
line(195,360,265,360); delay(1000); }
setcolor(4);
for(j=253;j>253-tmax;j–) //?®c a?®c  aY¬?Ya aaa 
{
line(226,j,234,j);delay(100);
}
}
getch();
closegraph();
return 0;
}
//————‚?cY¤Yi   Y?a  ?a?ae??a a®!®a?———————-
float prunzup(void)
{int gdriver=DETECT,gmode,errorcode;
initgraph(&gdriver,&gmode,””);
errorcode=graphresult();
if(errorcode!=grOk)
{printf(“Graphics error:%s\n”,grapherrormsg(errorcode));
printf(“Press any key to halt:”);
getch();exit(1);}
setbkcolor(15);
setlinestyle(0,4,3);
setcolor(2);
rectangle(10,10,630,467);
settextstyle(0,0,1);
setcolor(8);
outtextxy(20,16,”?®a ?a?© aYa¬®¬Yaa SK,caa ®c«Y?© a ? ¬Yai K,?a? ¤®aiFYi ?Yc®F® aici”);
outtextxy(20,26,”aY¬?Ya aaa? § ¬?? Y ?®«® ?®aae?? aY«Y KM1,i?Y a?a aei®caY © c¬?? Y c??® ccY “);
outtextxy(20,36,”aY«Y KM2,i?Y ac®i¬? a®§¬?? ic?¬? ?®a ?a ¬? ?a???iY ?®¤ ca Y«Y?aa®YYaFii “);
outtextxy(20,46,”¤®  Faic c  EK.’Y¬?Ya aaa  c ? ¬Yai ?®c? Y §?¦ac a?ai;?®«? ?®a ?a aYa¬®-“);
outtextxy(20,56,”¬Yaa  §®ca a®§i¬?Yaiai,aY«Y KM1 i KM2 ci¤?aaaiai,i  Faic c EK §®ca ®¤Ya-“);
outtextxy(20,66,”¦?ai ¦?c«Yi.”);
setcolor(6);
outtextxy(188,16,”SK”);
outtextxy(388,16,”K”);
outtextxy(324,26,”KM1″);
outtextxy(60, 36,”KM2″);
outtextxy(124,46,”EK”);
outtextxy(260,56,”KM1 i KM2″);
outtextxy(516,56,”EK”);
getch();
closegraph();
return 0; }

int main(void)
{int gdriver=DETECT,gmode,errorcode,i;
initgraph(&gdriver,&gmode,””);
errorcode=graphresult();
if(errorcode!=grOk)
{printf(“Graphics error:%s\n”,grapherrormsg(errorcode));
printf(“Press any key to halt:”);
getch();exit(1);}
//—————-’?aa«i?© «?aa —————————————
settextstyle(0,0,1);
setcolor(15);
outtextxy(10,26,”“?a iai??© ¤Ya¦ c?© aicYaa?aYa c®¤®F® F®a?®¤ aaac  a  ?a?a®¤®?®a?aaac i”);
settextstyle(0,0,3);
setcolor(2);
outtextxy(160,86,”?“˜‘?‚? ˜?˜?’?”);
settextstyle(0,0,1);
setcolor(4);
outtextxy(280,126,”  aY¬a:”);
settextstyle(0,0,1);
setcolor(6);
outtextxy(80,146,”‘˜®§a®!?  ?a®Fa ¬? ¤«i ¤Y¬®aaa aeii a®!®a? aY«Y©®i aaY¬?”);
outtextxy(120,156,”  ca®¬ a?c®F® aYFa«ic i aY¬?Ya aaa?.'”);
setcolor(5);
outtextxy(270,166,”‚ ai a ue39″);
setcolor(8);
outtextxy(440,300,” ‚??® c:”);
setcolor(7);
outtextxy(440,310,” aaa¤Ya 1-F® ?aaaa”);
outtextxy(440,320,” ae ?a«iaYa:˜? i KI‘”);
outtextxy(440,330,” a?Yaei «iiaai:?“’˜-13″);
outtextxy(440,340,” ??®cai??© ˜.”);
setcolor(2);
outtextxy(275,450,”˜I‚˜…-2002″);
getch();
//—————— ‘?aaY¬Y ¬Yi —————————————-
r_key:
int key;
initgraph(&gdriver,&gmode,””);
errorcode=graphresult();
if(errorcode!=grOk)
{printf(“Graphics error:%s\n”,grapherrormsg(errorcode));
printf(“Press any key to halt:”);
getch();exit(1);}
settextstyle(0,0,1);
setcolor(10);
outtextxy(20,16,”[A] ˜a?ae?? a®!®a? aY«Y©®i aaY¬?  ca®¬ a?c®F® aYFa«ic i aY¬?Ya aaa? “);
outtextxy(20,36,”[B] „Y¬®aaa aeii a®!®a?”);
outtextxy(20,56,”[ESC] ‚?•I„”);
setcolor(1);
rr_key:
key=getch();

if(key==A)
{ prunzup();

closegraph();
clrscr();
goto r_key;
}

else if(key==ESC) exit(0);

else if(key==B)
{ robota();
clrscr();
goto r_key;
}
else goto rr_key;
return(0);
}

Нашли опечатку? Выделите и нажмите CTRL+Enter

Похожие документы
Обсуждение

Ответить

Курсовые, Дипломы, Рефераты на заказ в кратчайшие сроки
Заказать реферат!
UkrReferat.com. Всі права захищені. 2000-2020