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

أدوات الموضوع

الصورة الرمزية alsatel07
alsatel07
:: مهندس متميز ::
تاريخ التسجيل: Jun 2014
الدولة: Usa
المشاركات: 359
نشاط [ alsatel07 ]
قوة السمعة:0
قديم 30-10-2020, 07:54 PM المشاركة 1   



السلام عليكم

ممكن تحويل هدا الكود من PIC16F628 الى PIC12F675 مع نزع RB4 و RB7 وشكرا








char counter1=0;
char counter3=0;
char counter2=0;
char counter4=0;
char x=0;
char y=0;

void InitTimer1(){
T1CON = 0x01;
TMR1IF_bit = 0;
TMR1H = 0xD8;
TMR1L = 0xF0;
TMR1IE_bit = 1;
INTCON = 0xC0;
}

void Interrupt(){
if (TMR1IF_bit){
TMR1IF_bit = 0;
TMR1H = 0xD8;
TMR1L = 0xF0;

counter1++;
counter2++;
counter3++;
counter4++;

if(counter1==150){counter1=0;
RA0_BIT=~RA0_BIT;
}
if(counter2==45){counter2=0;
RB7_BIT=~RB7_BIT;
}
if(counter4==10){counter4=0;
RB4_BIT=~RB4_BIT;

}
}

}

void main() {
cmcon=7; // stop cmparetors
porta=0; // porta 0v
portb=0; // portb 0v
trisa=0; //porta output
trisb=0; //portb output

InitTimer1(); // Initiating of Timer1


while(1){

for(x=0;x<5;x++){
portb.f0=1;portb.f1=0;portb.f2=0;portb.f3=0,
delay_ms(250);
portb.f0=0;portb.f1=1;portb.f2=0;portb.f3=0;
delay_ms(250);
portb.f0=0;portb.f1=0;portb.f2=1;portb.f3=0;
delay_ms(250);
portb.f0=0;portb.f1=0;portb.f2=0;portb.f3=1;
delay_ms(250);
}
for(y=0;y<5;y++){
portb.f0=0;portb.f1=0;portb.f2=0;portb.f3=1;
delay_ms(250);
portb.f0=0;portb.f1=0;portb.f2=1;portb.f3=0;
delay_ms(250);
portb.f0=0;portb.f1=1;portb.f2=0;portb.f3=0;
delay_ms(250);
portb.f0=1;portb.f1=0;portb.f2=0;portb.f3=0;
delay_ms(250);
}
}
}

اعلانات

الصورة الرمزية عبدالله حجازى
عبدالله حجازى
:: عضو ذهبي ::
تاريخ التسجيل: Apr 2011
الدولة: مصر .. محافظة دمياط
المشاركات: 1,688
نشاط [ عبدالله حجازى ]
قوة السمعة:111
قديم 31-10-2020, 12:37 AM المشاركة 2   
افتراضي


السلام عليكم ورحمه الله

واضح من الكود أنه عداد بأكثر من حاله
هل يوجد مخطط معين تعمل عليه
أو علي الأقل محاكي لكي نصل لكود مرتب ومستقر في العمل

كود:
  
 
char counter1=0;
char counter3=0;
char counter2=0;
char counter4=0;
char x=0;
char y=0;

void InitTimer1(){
T1CON = 0x01;
TMR1IF_bit = 0;
TMR1H = 0xD8;
TMR1L = 0xF0;
TMR1IE_bit = 1;
INTCON = 0xC0;
}

void Interrupt(){
if (TMR1IF_bit){
TMR1IF_bit = 0;
TMR1H = 0xD8;
TMR1L = 0xF0;

counter1++;
counter2++;
counter3++;
counter4++;

if(counter1==150){counter1=0;
RA0_BIT=~RA0_BIT;
}
if(counter2==45){counter2=0;
RB7_BIT=~RB7_BIT;
}
if(counter4==10){counter4=0;
RB4_BIT=~RB4_BIT;

}
}

}

void main() {
cmcon=7; // stop cmparetors
porta=0; // porta 0v
portb=0; // portb 0v
trisa=0; //porta output
trisb=0; //portb output

InitTimer1(); // Initiating of Timer1


while(1){

for(x=0;x<5;x++){
portb.f0=1;portb.f1=0;portb.f2=0;portb.f3=0,
delay_ms(250);
portb.f0=0;portb.f1=1;portb.f2=0;portb.f3=0;
delay_ms(250);
portb.f0=0;portb.f1=0;portb.f2=1;portb.f3=0;
delay_ms(250);
portb.f0=0;portb.f1=0;portb.f2=0;portb.f3=1;
delay_ms(250);
}
for(y=0;y<5;y++){
portb.f0=0;portb.f1=0;portb.f2=0;portb.f3=1;
delay_ms(250);
portb.f0=0;portb.f1=0;portb.f2=1;portb.f3=0;
delay_ms(250);
portb.f0=0;portb.f1=1;portb.f2=0;portb.f3=0;
delay_ms(250);
portb.f0=1;portb.f1=0;portb.f2=0;portb.f3=0;
delay_ms(250);
}
}
}


التعديل الأخير تم بواسطة : عبدالله حجازى بتاريخ 31-10-2020 الساعة 12:45 AM
اعلانات اضافية ( قم بتسجيل الدخول لاخفائها )
  

الصورة الرمزية alsatel07
alsatel07
:: مهندس متميز ::
تاريخ التسجيل: Jun 2014
الدولة: Usa
المشاركات: 359
نشاط [ alsatel07 ]
قوة السمعة:0
قديم 31-10-2020, 12:35 PM المشاركة 3   
افتراضي


مخطط الكود و شكرا على المساعدة

https://www.4shared.com/photo/Uup9IFBzea/1_online.html


التعديل الأخير تم بواسطة : alsatel07 بتاريخ 31-10-2020 الساعة 01:28 PM السبب: عدم وضوح الصورة

الصورة الرمزية alsatel07
alsatel07
:: مهندس متميز ::
تاريخ التسجيل: Jun 2014
الدولة: Usa
المشاركات: 359
نشاط [ alsatel07 ]
قوة السمعة:0
قديم 08-11-2020, 06:58 PM المشاركة 4   
win تم الحل


السلام عليكم

تم الحل شكرا

إضافة رد

العلامات المرجعية

«     الموضوع السابق       الموضوع التالي    »
أدوات الموضوع

الانتقال السريع إلى


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

Powered by vBulletin® Version 3.8.6, Copyright ©2000 - 2025