قسم الميكروكنترولر والروبوت ودوائر الاتصال بالحاسب الالي قسم المتحكمات الـ microcontroller و المعالجات microprocessor و التحكم الرقمي بالكمبيوتر CNC والانظمة الآلية والروبوت Robots

   

abdewidad
:: مهندس متميز ::
تاريخ التسجيل: Dec 2013
الدولة: casablanca
المشاركات: 712
نشاط [ abdewidad ]
قوة السمعة:
قديم 13-02-2015, 01:18 AM المشاركة 1   
افتراضي ساعة رقمية بمسجل الازاحة CD4017



السلام عليم اخواني
je présente Le CD 4017
lecd4017 est un circuit CMOS Compteur décimal/diviseur à 10
il active Un signal montant sur l'entrée d'horloge (14), avec l'entrée de validation d'horloge (13 ) au niveau bas incrémente le compteur.
Chaque sortie passant dans l'ordre à l'état haut.
Pour l'incrémentation sur un signal descendant l'entrée de validation d'horloge est mise au niveau haut.
Un niveau logique haut sur la broche (15) réinitialise le compteur



اعلانات

abdewidad
:: مهندس متميز ::
تاريخ التسجيل: Dec 2013
الدولة: casablanca
المشاركات: 712
نشاط [ abdewidad ]
قوة السمعة:
قديم 13-02-2015, 01:19 AM المشاركة 2   
افتراضي


كود:
unsigned short mask(unsigned short num);
unsigned char x=0,a=0,b=1,e=0,r=1,t=0,u=1;
int y=0,j=0;
//Timer0
//Prescaler 1:32; TMR0 Preload = 100; Actual Interrupt Time : 4,992 ms

//Place/Copy this part in declaration section
void InitTimer0(){
  OPTION_REG         = 0x84;
  TMR0                 = 100;
  INTCON         = 0xA0;
}

void Interrupt(){
  if (TMR0IF_bit){
    TMR0IF_bit         = 0;
    TMR0                 = 100;
 if(x==0) {porta=0;porta=1;portb=mask(a); }
  if(x==1) {porta=0;porta=1;portb=mask(b);}
  if(x==2) {porta=0;porta=1;portb=mask(e);}
  if(x==3) {porta=0;porta=1;portb=mask(r);}
  if(x==4) {porta=0;porta=1;portb=mask(t);}
  if(x==5) {porta=0;porta=1;portb=mask(u);}
  x++; y++;
  if(x==6) x=0;
  if(y==100) {a++; y=0;  }
  }
}


void main() {
InitTimer0();
trisb=0;
portb=0;
trisa=6;
porta=0;
for(;;){
if(a==10){b++;a=0;}
if(b==6){e++;b=0;}
if(e==10){r++;e=0;}
if(r==6){t++;r=0;}
if(t==10){u++;t=0;}
if(u==2&&t==4){u=0;t=0;r=0;e=0;b=0;a=0;}
if(ra1_bit==1) {delay_ms(400);  e+=1;  }
 if(ra2_bit==1) {delay_ms(400);  t+=1;  }
}    }
unsigned short mask(unsigned short num) {
switch(num){
case 0:return 192;
case 1:return 249;
case 2:return 164;
case 3:return 176;
case 4:return 153;
case 5:return 146;
case 6:return 130;
case 7:return 248;
case 8:return 128;
case 9:return 144;
}    }

اعلانات اضافية ( قم بتسجيل الدخول لاخفائها )

الصورة الرمزية سعيد قادر
سعيد قادر
:: عضو ذهبي ::
تاريخ التسجيل: Apr 2009
الدولة: العراق/ كوردستان
المشاركات: 2,892
نشاط [ سعيد قادر ]
قوة السمعة:
قديم 13-02-2015, 03:54 PM المشاركة 3   
افتراضي


شكرا لك ممكن ملف البروتيوس والمايكوسى لو سمحت


abdewidad
:: مهندس متميز ::
تاريخ التسجيل: Dec 2013
الدولة: casablanca
المشاركات: 712
نشاط [ abdewidad ]
قوة السمعة:
قديم 13-02-2015, 10:46 PM المشاركة 4   
افتراضي


شكرا لك ممكن ملف البروتيوس والمايكوسى لو سمحت
http://www.gulfup.com/?1atBCD


abdewidad
:: مهندس متميز ::
تاريخ التسجيل: Dec 2013
الدولة: casablanca
المشاركات: 712
نشاط [ abdewidad ]
قوة السمعة:
قديم 19-02-2015, 03:01 AM المشاركة 5   
افتراضي


لقد ثم رفع الملفات من جديد لتحقق فقط
http://www.gulfup.com/?wxvVnL


الصورة الرمزية mounir.rouabah
mounir.rouabah
:: عضو فضي ::
تاريخ التسجيل: Feb 2007
الدولة: الجـزائـــر
المشاركات: 561
نشاط [ mounir.rouabah ]
قوة السمعة:
قديم 19-02-2015, 12:55 PM المشاركة 6   
افتراضي


جزاك الله خيرا لكن لم أستطع فهم هذه اللغة الغربية لو شرحت بالعربي لكان أفضل لرواد المنتدى...
على مافهمت من الصورة فهي قيمة وسهلة الانجاز شكرا لك.


التعديل الأخير تم بواسطة : mounir.rouabah بتاريخ 19-02-2015 الساعة 01:00 PM

abdewidad
:: مهندس متميز ::
تاريخ التسجيل: Dec 2013
الدولة: casablanca
المشاركات: 712
نشاط [ abdewidad ]
قوة السمعة:
قديم 19-02-2015, 04:38 PM المشاركة 7   
افتراضي


جزاك الله خيرا لكن لم أستطع فهم هذه اللغة الغربية لو شرحت بالعربي لكان أفضل لرواد المنتدى...
على مافهمت من الصورة فهي قيمة وسهلة الانجاز شكرا لك.
اخي العزيز
هده ليست لغة غريبة
بل لغة mickroc pro


ABOUYAGINE
:: مهندس متواجد ::
تاريخ التسجيل: Jan 2012
المشاركات: 61
نشاط [ ABOUYAGINE ]
قوة السمعة:
قديم 19-02-2015, 06:51 PM المشاركة 8   
افتراضي


اخي العزيز
هده ليست لغة غريبة
بل لغة mickroc pro
السلام عليكم
طيب ممكن تشرح كود الميكروسي الذي وضعته ؟
شكرا



الساعة معتمدة بتوقيت جرينتش +3 الساعة الآن: 07:13 AM
موقع القرية الالكترونية غير مسؤول عن أي اتفاق تجاري أو تعاوني بين الأعضاء
فعلى كل شخص تحمل مسئولية نفسه إتجاه مايقوم به من بيع وشراء وإتفاق وأعطاء معلومات موقعه
التعليقات المنشورة لا تعبر عن رأي موقع القرية الالكترونية ولايتحمل الموقع أي مسؤولية قانونية حيال ذلك (ويتحمل كاتبها مسؤولية النشر)