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

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

ahmeedodeh
:: مهندس ::
تاريخ التسجيل: Mar 2011
المشاركات: 28
نشاط [ ahmeedodeh ]
قوة السمعة:0
قديم 16-03-2011, 08:23 PM المشاركة 1   
ha مساعده في برنامج mikroC Twitter FaceBook Google+



السلام عليكم

ممكن مساعده بسيطه
انا عندي كود بدي اياه ينفذه لما يصير على portb
5فولت او 3.3 فولت
يعني بس بدي المساعده بجملة if
هاد الي كتبته بس بعطيني انه في خطء
طبعا الكود عباره عن برنامج اتصال عن طريق at command


void main() {
trisb=255;
start:
if (portb.0==1) then {
UART1_Init(9600);
Delay_ms(100);
UART1_Write_Text("AT");
UART1_Write(13);
UART1_Write(10);
Delay_ms(100);
UART1_Write_Text("ATD111111111111;");
UART1_Write(13);
UART1_Write(10);
Delay_ms(100);
};
else goto start;
end if;
goto start;
end;
}

اعلانات

حمودي1010
:: مهندس جيد ::
تاريخ التسجيل: Apr 2007
المشاركات: 237
نشاط [ حمودي1010 ]
قوة السمعة:0
قديم 16-03-2011, 09:19 PM المشاركة 2   
افتراضي


السلام عليكم

ممكن مساعده بسيطه
انا عندي كود بدي اياه ينفذه لما يصير على portb
5فولت او 3.3 فولت
يعني بس بدي المساعده بجملة if
هاد الي كتبته بس بعطيني انه في خطء
طبعا الكود عباره عن برنامج اتصال عن طريق at command


void main() {
trisb=255;
start:
if (portb.0==1) then {
UART1_Init(9600);
Delay_ms(100);
UART1_Write_Text("AT");
UART1_Write(13);
UART1_Write(10);
Delay_ms(100);
UART1_Write_Text("ATD111111111111;");
UART1_Write(13);
UART1_Write(10);
Delay_ms(100);
};
else goto start;
end if;
goto start;
end;
}
السلام عليكم
في اعتقادي اقلب الحاضنة الملونة بالون الاحمر
وانزع نقطة فاصلة من وراء الحاضنة الملونة باللون الازرق

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

almoflehy
:: مهندس جيد ::
تاريخ التسجيل: Apr 2007
الدولة: YEMEN
المشاركات: 252
نشاط [ almoflehy ]
قوة السمعة:0
قديم 16-03-2011, 10:11 PM المشاركة 3   
افتراضي


السلام عليكم

ممكن مساعده بسيطه
انا عندي كود بدي اياه ينفذه لما يصير على portb
5فولت او 3.3 فولت
يعني بس بدي المساعده بجملة if
هاد الي كتبته بس بعطيني انه في خطء
طبعا الكود عباره عن برنامج اتصال عن طريق at command


void main() {
trisb=255;
start:
if (portb.0==1) then {
UART1_Init(9600);
Delay_ms(100);
UART1_Write_Text("AT");
UART1_Write(13);
UART1_Write(10);
Delay_ms(100);
UART1_Write_Text("ATD111111111111;");
UART1_Write(13);
UART1_Write(10);
Delay_ms(100);
};
else goto start;
end if;
goto start;
end;
}
وعليكم السلام
البرنامج الذي وضعته لن يعمل على mikroC وانما على mikroC Pro
وكمان هناك بعض الاخطاء ومن الاخطاء استنتنج انك تتعامل بلغة الـ Basic وليس الـ C
عموما هذا هو البرنامج بعد التصحيح:

كود:
void main() 
{
trisb=255;
start:
if (portb.f0==1)
{
UART1_Init(9600);
Delay_ms(100);
UART1_Write_Text("AT");
UART1_Write(13);
UART1_Write(10);
Delay_ms(100);
UART1_Write_Text("ATD111111111111;");
UART1_Write(13);
UART1_Write(10);
Delay_ms(100);
}
goto start;
}
وكمان هناك مشكلة في البرنامج وهو اذا كان Portb.f0 = 1 سينفذ امر الاتصال عدة مرات الى ان يكون Portb.f0 = 0 لانه لايوجد تأخير زمني كافي لذلك الافضل كتابة البرنامج كالتالي:

كود:
void main() 
{
trisb=255;
start:
if (portb.f0==1)
{
UART1_Init(9600);
Delay_ms(100);
UART1_Write_Text("AT");
UART1_Write(13);
UART1_Write(10);
Delay_ms(100);
UART1_Write_Text("ATD111111111111;");
UART1_Write(13);
UART1_Write(10);
Delay_ms(100);
}
while(portb.f0==1) { }
goto start;
}


التعديل الأخير تم بواسطة : almoflehy بتاريخ 16-03-2011 الساعة 10:31 PM

ahmeedodeh
:: مهندس ::
تاريخ التسجيل: Mar 2011
المشاركات: 28
نشاط [ ahmeedodeh ]
قوة السمعة:0
قديم 17-03-2011, 07:41 AM المشاركة 4   
افتراضي


شكرا الك اخ حمودي 1010
وكمان ما نسى اخونا almoflehy شكرا كثير الك

وشكرا ل المنتدى الرائع


الصورة الرمزية iiirrr
iiirrr
:: عضو فضي ::
تاريخ التسجيل: Jul 2010
الدولة: العراق
المشاركات: 611
نشاط [ iiirrr ]
قوة السمعة:83
قديم 17-03-2011, 02:53 PM المشاركة 5   
افتراضي


اريد ان اسأل سؤال

ايهما افضل استخدام لغة منخفضة المستوى"الاسيمبلي"
ام استخدام لغة عالية"المايكرو سي"

إضافة رد

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

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

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


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

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