سوالات ، مشکلات و درخواست های در رابطه با میکروکنترلر ها

omidvarshoei

عضو جدید
سلام.خسته نباشيد. سال نو هم مبارك.
مهندساي محترم، يه سوال داشتم، ميشه كمكم كنين؟؟؟؟
مشكل من اينه كه مي خوام هر دفعه كه كليدي رو فشار مي دم برام رو صفحه چاپ كنه؟؟
به نظر خييييييلي سادس ، اما نمي دونم مشكلم چيه ؟!!!
اينم برنامه :
كليد رو يه پايه شو به زمين وصل كردم يه پايه شو به Portd.1
لطفا راهنماييم كنيد، خيلي كمك لازمم!
ممنون.

$regfile = "m8def.dat" ' specify the used micro
$crystal = 8000000 ' used crystal frequency
Config Lcdpin = Pin , Db4 = Portb.2 , Db5 = Portb.3 , Db6 = Portb.4 , Db7 = Portb.5 , Rs = Portd.7 , E = Portd.6
Config Lcd = 16 * 2
Config Portd.1 = Input
Ddrd.1 = 0 : Portd.1 = 1
Dim h As Integer
Do
If Portd.1 = 1 Then
Locate 2 , 1
h = h + 1
Lcd h
Lcd "Helloo"
End If
Loop
End

برنامه‌اي كه شما ميخواين تو اموزش بسكام گذاشته شده
 
  • Like
واکنش ها: sh85

omidvarshoei

عضو جدید
:cry::cry:خدايا يعني ميشه يكي جوابمو زود زود بده:que:

دوست عزيز اولين مشكلي كه تو برنامه شما ميبينم cls دوم كه نيازي بهش نيست
چنتل برنامه به عنوان نمونه ميزارم

regfile = "m16def.dat"
$crystal = 1000000
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = PORTD.0 , Db5 = PORTD.1 , Db6 = PORTD.2 , _
Db7 = PORTD.3 , E = PORTD.4 , Rs = PORTD.5
Dim A As Byte
Dim B As Byte
Dim C As Integer
For A = 1 To 10 Step 2
Locate 1 , 1
Lcd A
Next A
For C = 9 To -5 Step -1
Locate 1 , 6
Lcd C
Next
For B = 1 To 10
Locate 2 , 1
Lcd B
Next
End
-----------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------
-------------------------------------------------------------------------------
برنامه
Wend
دستورالعمل While - Wend تشکيل يک حلقه تکرار مي دهد که تکرار اين حلقه تا زماني ادامه مي يابد که عبارت بکاربرده شده نتيجه را FALSE کند و يا مقدار صفر بگيرد . دستورالعمل While بصورت ورود به حلقه به شرط مي باشد , بنابراين While ممکن است در حالتهايي اصلا اجرا نشود .
برنامه تا وقتي که حاصل Condition صفر يا False نشده است تکرار خواهد شد .
مثال :
$regfile = "m16def.dat"
$crystal = 1000000
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = PORTD.0 , Db5 = PORTD.1 , Db6 = PORTD.2 , _
Db7 = PORTD.3 , E = PORTD.4 , Rs = PORTD.5
Dim A As Byte
A = 1
While A < 10
Locate 1 , 1
Lcd A
Incr A
Waitms 600
Wend
End
if :
--------------------------------------------------------------------
--------------------------------------------------------------
--------------------------------------------------------------
$regfile = "m16def.dat"
$crystal = 1000000
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = PORTD.2 , Db5 = PORTD.3 , Db6 = PORTD.4 _
, Db7 = PORTD.5 , E = PORTD.1 , Rs = PORTD.0
Dim A As Byte
Do
Incr A
Wait 1
If A = 1 Then :
Locate 1 , 1
Lcd "CLAUSE1 true"
Locate 2 , 1
Lcd "a=1"
Elseif A = 2 Then :
Locate 1 , 1
Lcd "CLAUSE2 true"
Locate 2 , 1
Lcd "a=2"
Elseif A = 3 Then :
Locate 1 , 1
Lcd "CLAUSE3 true"
Locate 2 , 1
Lcd "a=3"
Elseif A = 4 Then :
Locate 1 , 1
Lcd "CLAUSE4 true"
Locate 2 , 1
Lcd "a=4"
Elseif A = 5 Then :
Locate 1 , 1
Lcd "CLAUSE5 true"
Locate 2 , 1
Lcd "a=5"
Elseif A = 6 Then :
Locate 1 , 1
Lcd "CLAUSE6 true"
Locate 2 , 1
Lcd "a=6"
Else :
Locate 1 , 1
Lcd "CLAUSE4 false"
Locate 2 , 1
Lcd "a>6"
End If
Loop
End
 

ramos_kk77

عضو جدید
سلام اين عكس برنامه اي كه با بسكام نوشتم و با پروتئوس شبيه سازي كردم برنامه هم اينه:

$regfile "m32def.dat"
$crystal = 12000000
Config Lcdpin = Pin , Rs = Portd.4 , E = Portd.5 , Db4 = Portd.0 , Db5 = Portd.1 , Db6 = Portd.2 , Db7 = Portd.3
Config Lcd = 16 * 2
Config Portc = Input
Cls
Cursor Off
Do
Debounce Pinc.0 , 1 , A
If Portc.0 = 0 Then
Locate 1 , 4
Lcd "azmayeshga"
Waitms 3000
Cls
End If
Loop
End
A:
Lcd "-----"
Return
بعضي وقتها درست عمل ميكنه بعضي وقتهام نه مي تونبد بگيد مشكلش كجاست ؟​
سلام.
برنامه اي كه نوشتين دوتا نكته توش داشت
يكي اينكه portc رو تعريف نكردين اول كه بايد قبل دستور debounce تعريف شده باشه.دوم اينكه cls دوم رو جاي اشتباهي گذاشته بودين
برنامه رو به اين شكل بنويسين جواب مد تظرتونو ميگيرين
$regfile "m32def.dat"
$crystal = 12000000
Config Lcdpin = Pin , Rs = Portd.4 , E = Portd.5 , Db4 = Portd.0 , Db5 = Portd.1 , Db6 = Portd.2 , Db7 = Portd.3
Config Lcd = 16 * 2
Config Portc = Input
Config Portd = Output
Portc = 0
Cls
Cursor Off
Do
Debounce Pinc.0 , 1 , A
If Portc.0 = 0 Then
Locate 1 , 4
Lcd "azmayeshga"

End If
Loop
End
A:
Cls
Lcd "-----"
Return
البته ميتونين بجاي اينكه مثه اين برنامه portc=0 تعريف كنين از portc=255 هم استفاده كنين كه يكم برنامه رو بايد تغيير بدين كه كار سختي نيس.اما فك ميكنم منظورتون از برنامه اي كه نوشته بودين همين باشه كه براتون نوشتم.
اگه سوالي توش داشتين در خدمتم.
 

ICE-G

عضو جدید
کاربر ممتاز
خیلی خیلی مر30 اما اگه بخوایم با سلکتور عوض بشه باید چیکار کنیم؟!!!
 

هادی83

عضو جدید
باسلام اگر کسی کتاب میکروکنترلر پیک رو داره رو سایت بذاره خیلی لازم دارم....
باتشکر
 

هادی83

عضو جدید
پروژه میکرکنترلر pic

پروژه میکرکنترلر pic

باسلام وعرض خسته نباشید خدمت مهندسان وبرنامه نویسای عزیز...من چند تا پروژه برنامه نویسی بامیکروکنترلرpic (به صورت فوری)لازم دارم از همه ی دوستان عزیز خواهشمندم اگه کسی پروژه ای داره لطف کنه یا روی سایت بذاره یا به ایمیلم بفرسته.ایمیل:h.nematyar@yahoo.comبا تشکر
 

ngr_eghbali

عضو جدید
اتصال GSM modem به micro

اتصال GSM modem به micro

سلام
کسی با GSM modem کار کرده که وصلش کرده باشه به میکرو برای دریافت اس ام اس؟؟
تو نوشتن برنامه ش به مشکل خوردم، ممنون میشم اگه کمک کنین چون پایان نامه م هستش :cry:
 

شهاب یو

عضو جدید
سلام چطوری یه داده رو از ورودی میکرو بگیرم بعد روی ال سی دی گرافیکی نمایش بدم
مثلا رویات مسیر رو سنس کنه بعداز اتمام مسیر اونو رو ال سی دی نمایش بده
برنامه اش چطوریه
 

گزیزه

عضو جدید
سلام به همه ی دوستان ...
میشه در نوشتن برنامه ی پورت سریال با avrکمکم کنین ...
 

hengameye_baran

عضو جدید
برنامه نویسی avr

برنامه نویسی avr

سلام به همه ی دوستان عزیز،من 2 تا برنامه دارم که باید با avr بنویسم اما بلد نیستم و 17 اردیبهشت باید تحویل استاد بدم ممکنه کمکم کنید.
 

ali_511

عضو جدید
کاربر ممتاز
سلام به همه ی دوستان عزیز،من 2 تا برنامه دارم که باید با avr بنویسم اما بلد نیستم و 17 اردیبهشت باید تحویل استاد بدم ممکنه کمکم کنید.
سلام به باشگاه مهندسان ایران خوش آمدید.
شما اول شروع کنید بنویسید اگه به مشکلی برخوردید یا راهنمایی لازم داشتین ما صمیمانه در خدمتتون هستیم.
صورت سوال برنامه ها تون رو بزارید.
موفق باشید
 

گزیزه

عضو جدید
سلام
برنامه را بنویسید
بزارید اینجا هرجاش مشکل داشتید روش بحث می کنیم
موفق باشید

آخه کلا تو نوشتن برنامه ی اولیه شم مشکل دارم در مورد RS232....ممنون میشم اگه هرکس اطلاع داره در این مورد ,توضیحی بده...
 

گزیزه

عضو جدید
سلام
برنامه را بنویسید
بزارید اینجا هرجاش مشکل داشتید روش بحث می کنیم
موفق باشید
آخه تو نوشتن برنامه ی اولیه شم مشکل داشتم ...در مورد پورت سریال RS232هرکی اطلاع داره اگه توضیح بده ممنون میشم ....
 

ali_511

عضو جدید
کاربر ممتاز
آخه تو نوشتن برنامه ی اولیه شم مشکل داشتم ...در مورد پورت سریال RS232هرکی اطلاع داره اگه توضیح بده ممنون میشم ....
سلام
دقیقا بگین چه اطلاعاتی لازم دارین؟
درمورد rs232میشه دو روز حرف زد.شما بگین دقیقا چی لازم دارین؟
مثلا می خواین با یک کابل RS232بین دو میکرو یا میکرو کامپیوتر ارتباط ایجاد کنید!
 

hengameye_baran

عضو جدید
سلام،من اصلا avr بلد نیستم که بخوام شروع کنم به نوشتن،اگه کسی لطف کنه و برام بنویسه ممنون میشم این آدرس ایمیل paeizbaran27@gmail.comمنه اگه خواستین بهم ایمیل بزنین تا برنامه ها رو واستون توضیح بدم،در مورد هزینه اشم هر چی باشه پرداخت میکنم،شماره حساب بدین تا بریزم به حسابتون،ممنون:cry:
 

ngr_eghbali

عضو جدید
سلام
من می خوام یه عدد که به صورت کارکتری هست رو به int تبدیل کنم تا بتونم کار مقایسه منطقی باهاش انجام بدم، میشه بگین چطور میشه این تبدیل رو انجام داد؟؟؟
 

o.behnam.o

عضو جدید
سلام
من می خوام یه عدد که به صورت کارکتری هست رو به int تبدیل کنم تا بتونم کار مقایسه منطقی باهاش انجام بدم، میشه بگین چطور میشه این تبدیل رو انجام داد؟؟؟

اگه بگید با کدوم زبون برنامه نویسی و اینکه این عدد کاراکتری از کجا میاد (توسط کیپد و شستی و...) شاید من بتونم کمکتون کنم.
 

ناآشنا

عضو جدید
کاربر ممتاز
سلام،من اصلا avr بلد نیستم که بخوام شروع کنم به نوشتن،اگه کسی لطف کنه و برام بنویسه ممنون میشم این آدرس ایمیل paeizbaran27@gmail.comمنه اگه خواستین بهم ایمیل بزنین تا برنامه ها رو واستون توضیح بدم،در مورد هزینه اشم هر چی باشه پرداخت میکنم،شماره حساب بدین تا بریزم به حسابتون،ممنون:cry:
سلام با چه زباني و چه پروژه هايي داري توضيح بده ببينم مي تونم كمكت كنم يا نه؟
 

saman_sf2000

عضو جدید
سلام
میخوام 4تا ATmega 16 رو با TWI)I2C) شبکه کنم. چطور استراکچر struct رو بفرستم.
مرسی.
 

robotali

عضو جدید
پخش موزیک با AVR

پخش موزیک با AVR

درود...
از دوستان اگر کسی مطلبی، فایل آموزشی،... راجع به اجرای موزیک(فایل صوتی) توسط AVR داشته باشه ممنون میشم که تو تاپیک قرار بدین...
:gol:
 

مهرا

عضو جدید
سلام دوستان کسی اطلاعاتی راجع به ارتباط بیسیم با فرکانس متغییرداره
حتی اگر چند تا متن و پی دی اف باشه ممنون میشم

میخوام این مدار رو بسازم لطفا کمک کنید
 

andis_0915

عضو جدید
کمک!!!!!!!!!!!

کمک!!!!!!!!!!!

سلام دوستان عزیز:چه طوری می تونم با avr برنامه ارتباط سریال دو طرفه بین دو میرو رو با پروتکل rc5 بنویسم ، لطفآ راهنمایی کنید.............!
 

andis_0915

عضو جدید
سلام دوستان چه طوری برنامه ارتباط سریال دو طرفه بین دو میکرو رو با پروتکل rc5 بنویسم (با avr)لطفا راهنمایی کنید.......
 

MaRaL.arch

کاربر فعال تالار مهندسی معماری ,
کاربر ممتاز

MaRaL.arch

کاربر فعال تالار مهندسی معماری ,
کاربر ممتاز
من همچنان منتظز پاسخ و راهنماییتون هستم:)
 
Similar threads
Thread starter عنوان تالار پاسخ ها تاریخ
omidvarshoei سوالات و مشکلات رباتیک طراحی دیجیتال و برنامه نویسی 29

Similar threads

بالا