[رسول العراق]

السلام عليكم

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

وشكرا

#define KeyPulse portb.f0

void main(){

signed char x;

cmcon=0x07;

trisb=0b00001111;
trisa=0b00000000;

portb=0;
porta=0;

porta.f1=1; delay_ms(2000);
porta.f1=0; delay_ms(20);

loop:

for (x=0; x<2; x++)

while (KeyPulse == 0){}
delay_ms(50);
while (KeyPulse ==1 ){}
delay_ms(50);

if((portb.F1==1)&&(portb.F2==1)&&(portb.F3==1))

{portb.F5=1;delay_ms(1000);portb.F5=0;}


for (x=0; x<3; x++)

while (KeyPulse == 0){}
delay_ms(50);
while (KeyPulse == 1){}
delay_ms(50);

if((portb.F1==1)&&(portb.F2==1)&&(portb.F3==0))

{portb.F5=1;delay_ms(1000);portb.F5=0;}

goto loop;

}

[عبدالله حجازى]

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

أخي الكريم ..
برجاء ارفاق الدائره الخاصه بهذا البرنامج لكي نستطيع محكاة نتائج الكود أو البرنامج

[Elhachmivb]

لو ممكن فكرة البرنامج و دارة لكتابة البرنامج النهائي


dim x as byte


while true



'بعد الضغط على مفتاح b.o يزداد x بمقدار 1 كل 50 ميلي ثانية
while portb.0 = 0
inc(x)
delay_ms(50)
wend


'بعد الضغط عل المفتاح يتناقص بمقدار 1 كل 50 ميلي ثانية
while portb.1 = 0
dec(x)
delay_ms(50)
wend

'فحص مفتاحين b0و b1

while (portb.0=0) and (portb.1 =0)
x=0
wend

wend

[ماجد عباس محمد]

اولا المفروض هذا موضوع جديد وليس ردا على الموضوع الاصلى
ثانيا المطلوب غير واضح. هل شرح للكود ام ماذا

ثالثا رجاء وضع اى كود داخل علامة # كود اعلى مربع النص لتسهيل قراءته

[Elhachmivb]

اعتذر الاستاذ ماجد ... قصدي رد عل الأخ .. و وضعت له مثال ب mikrobasic

[ماجد عباس محمد]

شكرا على المساعدة