قد يكون شبيها نوعا ما بأجهزة PLC وهو تشغيل و إطفاء عدة مخارج ( 4 مخارج في هذا المشروع ) و يمكن التوسيع حتى تصبح 8 مخارج ..
يكمن و من خلال برنامج البرمجة Bascom AVR ضبط زمن تشغيل و إطفاء كل مخرج بشكل مستقل عن الآخر .
فينتج عندنا سلسلة أوامر تتوقف عند آخر أمر .
و يمكن تكرار عمل هذه السلسة لعدة مرات يمكن تحديد عددها أيضا .
ويمكن الاستمرار تكرار السلسلة دائما .

وصف عمل هذه التجربة :
بعد ثانيتان من التشغيل يعمل المخرج الأول و الثاني
و بعد ثانية يعمل المخرج الثالث و الرابع
وبعد ثانية يتوقف المخرج الثاني و الرابع
و بعد ثانية يتوقف المخرج الأول
و بعد ثانية يتوقف الثالث

ملف التجربة ( البروتوس ) .

هذا رابط فيه برنامج Bascom-AVR-1.11.9.0

لقد قمت بتحميله و تجريبه و إنشاء الله يعمل

أما بالنسبة للتجربة السابقة هذا هو الكود الخاص بها

$regfile = "m8def.dat"

$crystal = 8000000

'--------------------

Config Portb = &B11111111

Portb = $b00000000

'----------------------------------------

R1 Alias Portb.1

R2 Alias Portb.2

R3 Alias Portb.3

R4 Alias Portb.4

'-----------------------------------------

Dim I As Byte

'-----------------------------------------

For I = 0 To 0

              Waitms 200

              Set R1

              Set R2

              Waitms 100

              Set R3

              Set R4

              Waitms 100

              Reset R2

              Reset R4

              Waitms 100

              Reset R1

              Waitms 100

              Reset R3

          Next I

End

إعداد المهندس أبو زكووور

للرد ومناقشة الموضوع أضغط هنا