 |
:: عضو ذهبي ::
تاريخ التسجيل: Apr 2011
الدولة: مصر .. محافظة دمياط
المشاركات: 1,688
|
|
نشاط [ عبدالله حجازى ]
قوة السمعة:111
|
|
30-05-2020, 04:10 AM
المشاركة 1
|
|
السلام عليكم ورحمه الله
دائرة الكترونيه للتحكم في ملئ خزان للماء مع اظهار نسبة الماء داخل
الخزان والسيطرة علي المضخة بالتشغيل والإقاف
مع انذار للمستوي الغير مسموح به لملئ الخزان
كود:
// **** ENG . ABDALLA HYGAZY **** //
// *** ELEMAN.ELECTRONIC*YAHOO.COM *** //
unsigned short mask(unsigned short num);
unsigned char a3=0,a2=0,a1=0;
void interrupt(){
portb=1;
portd=mask(a1);
delay_ms(5);
portb=2;
portd=mask(a2);
delay_ms(5);
portb=4;
portd=mask(a3);
INTCON=0b00100000;
TMR0=0;
}
void main() {
int x=0;
adcon1=0x06;
OPTION_REG=0b10000101;
INTCON=0b10100000;
TMR0=217;
TRISB=0; PORTB=0;
TRISC=0; PORTC=0;
TRISD=0; PORTD=0;
TRISA=63; PORTA=0;
TRISE=1; PORTE=0;
//**********************************//
staret:
a1=0; a2=0; a3=0;
while(1){
if(porta.f5==1){goto loop1;};
//*********************************//
}
loop1:
while(1){
a3=0;a2=2;a1=5;
if(porta.f4==1){goto loop2;}
if(porta.f5==0){goto staret;}
portc.f1=1;
}
loop2:
while(1){
a3=0;a2=5;a1=0;
if(porta.f3==1){goto loop3;}
if(porta.f4==0){goto loop1;}
portc.f1=1;
}
loop3:
while(1){
a3=0;a2=7;a1=0;
if(porta.f2==1){goto loop4;}
if(porta.f3==0){goto loop2;}
portc.f1=1;
}
loop4:
while(1){
a3=0;a2=8;a1=0;
if(porta.f1==1){goto loop5;}
if(porta.f2==0){goto loop3;}
portc.f1=1;
}
loop5:
while(1){
a3=0;a2=9;a1=0;
if(porta.f0==1){goto loop6;}
if(porta.f1==0){goto loop4;}
portc.f1=1;
}
loop6:
while(1){
portc.f1=0;
a3=1;a2=0;a1=0;
if(porta.f0==0){goto loop5;}
if(porte.f0==1){for(;;){if(porta.f0==0){goto loop5;}portc.f0=1;delay_ms(400);portc.f0=0;delay_ms(200);}}
}
}
unsigned short mask(unsigned short num){
switch (num){
case 0 : return 0xC0;
case 1 : return 0xF9;
case 2 : return 0xA4;
case 3 : return 0xB0;
case 4 : return 0x99;
case 5 : return 0x92;
case 6 : return 0x82;
case 7 : return 0xF8;
case 8 : return 0x80;
case 9 : return 0x90;
}
}
//*************** END ******************//
لتحميل المشروع
https://drive.google.com/drive/folde...VZ?usp=sharing
بالتوفيق
..
|