O‘zbekicton recpublikaci oliy va o‘rta maxcuc ta’lim vazirligi

2.2 Dastur kodi

unsigned char i; //o‘zgaruvchini e’lon qilish

void ToneA() { // ToneA podprogrammasini xosil qilamiz
Sound_Play( 880, 50); } //chastotasi 880Gz bo‘lgan tovush xosil q.
void energya(){ // energya podprogrammasini xosil qilamiz
if(RB7_bit=1){ //agar RB7ga 1 signal kelsa
RA6_bit=1; // RA6dan 1 signal yuborilsin
delay_ms(5000); //pauza 5 sekund
}
else{ //aks xolda
RA6_bit=0; // RA6dan 0 signal yuborilsin
}
}
void bezapasnost(){ // bezapasnost podprogrammasini xosil qilamiz
if(RB7_bit=1){ //agar RB7ga 1 signal kelsa
Sound_Init(&PORTB, 4); //tovushni RB4 oyooqchasiga ulaymiz
for( i=0;i<2;i++){ //takrorlanish operatori
Sound_Play(650, 200); //chastotasi 650Gz bo‘lgan tovush xosil q.
RA7_bit=1; // RA7dan 1 signal yuborilsin
delay_ms(1000); //pauza 1 sekund
RA7_bit=0; // RA7dan 0 signal yuborilsin
delay_ms(1000); //puza 1 sekund
}}}
void main() { //asosiy dastur boshlandi
trisa=0; //A portini chiquvchi qilish
TRISB=0b10000011; // A portini 0,1 va 7-oyoqchalarini kiruvchi qilish
while(1){ //sikl
PORTA=0;
if(RB0_bit=1){ // agar RB7ga 1 signal kelsa
RB5_bit=1;
while(RB0_bit=1)
bezapasnost(); // bezapasnost podprogrammasini chaqirish
RB5_bit=0; }
if(RB1_bit=1){ //agar RB7ga 1 signal kelsa
RB6_bit=1;
while(RB1_bit=1)
energya() ; // energya podprogrammasini chaqirish
RB6_bit=0;}
}
}

Xuloca

Ushbu kurs ishi yozisdavomida men ko‘plab yangi ma’lumotlarga ega bo‘ldim. Misol qilib aytadigan bo‘lsam infra qizil nurlarning harakteristikalarini ularni ishlatilish soxalarini o‘rganib chiqdim. Undan tashqari infra qizil nur bilan ishlovchi HC-SR501 harakat sezuvchi datchik yordamida qurilma maketini yasadim va men uchun yangi bo‘gan ko‘nikmalar va bilimlarga ega bo‘ldim.
Men yasagan qurilma maketi yordamidan harakatni sezish va shuning hisobiga ko‘plab ishlarni avtomatlashtirishga erishishimiz mumkin bo‘ladi. Misol uchun bu qurilma maketida ikkita rejm mavjud bo‘lib ular quyidagilar:

1. 
   Havfsizlik rejmi bu rejmda harakat sezigan vaqtda qurilmamiz ovozli va yorug‘lik diodi orqali habar beradi.
   
2. 
   Energiya tejash rejmi bu rejmda harakat mavjud bo‘lmagan holda chiroqlar avtomatik o‘chiriladi. Bu bilan biz ma’lum miqdorda energiya tejalishiga erishamiz.
   

Foydalanilgan adabiyotlar

1. 
   Kashkarov A.P. 500 sxem dlya radiolyubiteley Elektronnыe datchiki. Sankt-peterburg 2008, 72c.
   
2. 
   Smolov V.B. Funksionalnыe preobrazovateli informatsii. Radio i svyaz. Maskva 1981, 114c.
   
3. 
   Petin V.A. Sozdanie umnogo doma na baze ARDUINO Moskva 2018. 75-79 s.
   
4. 
   http://www.hwsensor.com
   
5. 
   http://www.google.ru