السلام عليكم ورحمة الله وبركاتة
بعد عناء طويل جدا جدا
صممت هذا الكود باستخدام 74hc164 مع الميكرو pic16f84a
وهذا الكود يعمل بطريقة ((المسح الضوئى )) وهو كود بسيط جدا
ملحوظة هامة: حتى تفهم الكود ارفع الاوسكوليتر لاعلى درجة وشاهد
ثم اخفضها الى اقل درجة وشاهد الحركة السريعة والبطيئة
الكود عبارة عن كلمة
((لفظ الجلالة)) فى وضع ثابت
بالاضافة الى (( نقطة متحركة من اقصى اليمين اقصى اليسار ))
واتمنى ان يستفيد منة الاخرين
تفضلو حملوا
((((((الكود مع ملف البيريتوس مع صورة __ اذكر اسم الله واضغط__)))
وان لم يعمل الرابط الاول
اضغط هنا
واجدد شكرى لاستاذى ومعلمى ((م/احمد سمير ))
وكل من شارك فى هذا الموضوع
++++++++++++++++++++++++
ولا يزال : البحث جارى
عن التعامل مع مسجلات الازاحة كما يجب
لان هذة الطريقة تستهلك مساحة الميكرو بسرعة رهيبة
ويجب اللجؤ الى الاختصارات والداتا وخلافة...........
واليكم الكود
كود:
char x;
void main() {
portb=0;
porta=0;
TRISA=0;
TRISB=0;
loop:
for (x=0;x<100;x++) {
/////////////////////////===بداية كود لفظ الجلالة====/////////////////////
porta.f1=1; porta.f1=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
portb=0b00111110; delay_ms(1);
//////////////////////////////////////////////
porta.f1=1; porta.f1=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
portb=0b00000000; delay_ms(1);
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
//////////////////////////////////////////////
porta.f1=1; porta.f1=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
portb=0b00111110; delay_ms(1);
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
//////////////////////////////////////////////
porta.f1=1; porta.f1=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
portb=0b00100000; delay_ms(1);
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
//////////////////////////////////////////////
porta.f1=1; porta.f1=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
portb=0b00111110; delay_ms(1);
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
//////////////////////////////////////////////
porta.f1=1; porta.f1=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
portb=0b00100000; delay_ms(1);
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
//////////////////////////////////////////////
porta.f1=1; porta.f1=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
portb=0b00111100; delay_ms(1);
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
//////////////////////////////////////////////
porta.f1=1; porta.f1=0;
portb=0b00001100; delay_ms(1);
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
}
//////////////////////=======نهااية كود لفظ الجلالة=====/////////////
//++++++++++++++بداية كود النقطة المتحركة++++++
/////////for (x=0;x<20;x++) {
//////////////////////////////////////////////
porta.f1=1; porta.f1=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
portb=0b10000000; delay_ms(100);
//////////////////////////////////////////////
porta.f1=1; porta.f1=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
portb=0b01000000; delay_ms(100);
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
//////////////////////////////////////////////
porta.f1=1; porta.f1=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
portb=0b00100000; delay_ms(100);
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
//////////////////////////////////////////////
porta.f1=1; porta.f1=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
portb=0b00010000; delay_ms(100);
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
//////////////////////////////////////////////
porta.f1=1; porta.f1=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
portb=0b00001000; delay_ms(100);
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
//////////////////////////////////////////////
porta.f1=1; porta.f1=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
portb=0b00000100; delay_ms(100);
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
//////////////////////////////////////////////
porta.f1=1; porta.f1=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
portb=0b00000010; delay_ms(100);
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
//////////////////////////////////////////////
porta.f1=1; porta.f1=0;
portb=0b00000001; delay_ms(100);
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
porta.f0=1;porta.f1=1; porta.f1=0; porta.f0=0;
///////////////نهاية كود النقطة المتحركة/////// }
////////++++++++++++++++
goto loop; /////
}
ملحوظة قمت بوضع فواصل بين كل امر والاخر
حتى يتسنى لنا فهم الاوامر كل على حدة
واتمنى من الله
ان يفيد هذا الموضوع كل من يحتاج الية