هدایت آرمیچر

[aleas]

سلام خسته نباشید یکی پیدا میشه مشکل منو حل کنه !!
1-ماژول USB به سریال شیش تا پایه داره من پایه TX رو به RX وصل کردم بعد توسط کامپیوتر یه چیزی عددی متغییری ... فرستادم به ماژوال بعد همونی که ارسال کردم از طریق کامپیوتر دریافتش کردیم خب اینجا معلوم شد ماژول سالمه
2- برای میکرو این برنامه رو نوشتم

کد php:

$regfile = "m8def.dat" : $crystal = 11059200 : $baud = 9600

Ddrb = &B00000010 : Ddrd = &B11000000

Config Timer1 = Pwm , Pwm = 8 , Compare A Pwm = Clear Down , Compare B Pwm = Clear Down , Prescale = 64
Enable Interrupts : Start Timer1 : Pwm1a = 0

Dim D As Byte
Open "comB.1:9600,8,n,1" For Output As #1
Do

D = Waitkey()
Printbin D
Loop 


خب بعد پایه TX ماژول رو به پایه PD0 وصل کردم که پیش فرض RX هسته و پایه RX ماژول رو به پایه PB1 میکرو که من تو کدنویسی این پایه رو به عنوان خروجی میکرو انتخاب کردم وضمنن ولتاژ میکرو هم همون VCCوGND میکرو هم وصل کردم یعنی برقشو تامین کردم خب بعد هرچی از طریق کامپیوتر به ماژول ارسال میککنم دوباره همونو دریافت نمیکنه به نظرتون مشکل چی؟درصورتی با این کدنویسی که من کردم هر چی ارسال میکننم دوباره همونو باید دریافت کنم؟
3- میکرو هم سالمه تست کردم توسط همون کدنویسی که بدون دریافت چیزی موتور روشن میشه؟

---

ضمنن ماژول هم این هسته
http://iran-micro.com/product_info.php?products_id=882

[aleas]

خب علی جان ارسال دریافتش درست شده ولی الان من ای کدو برای میکرو نوشتم کار نمیکنه؟

کد php:

$regfile = "m8def.dat" : $crystal = 11059200 : $baud = 9600

Ddrb = &B00000010 : Ddrd = &B11000000

Config Timer1 = Pwm , Pwm = 8 , Compare A Pwm = Clear Down , Compare B Pwm = Clear Down , Prescale = 64
Enable Interrupts : Start Timer1 : Pwm1a = 0

Dim D As Byte
Mp Alias Portd.6                                            ' + MOTOR
Mn Alias Portd.7                                            ' - MOTOR


Do

D = Waitkey()
If D = 1 Then : Set Mp : Reset Mn
End If
Loop
END 'end program 


[t3r!p3000]

مشکلت چی بود که حل شد !


مهندس کد اسکی رو در نظر بگیر !
چون اسکی ارسال میشه !

مثلا واسه صفر 48 و واسه یک 49 !

کد php:

$regfile = "m8def.dat" : $crystal = 11059200 : $baud = 9600

Ddrb = &B00000010 : Ddrd = &B11000000

Config Timer1 = Pwm , Pwm = 8 , Compare A Pwm = Clear Down , Compare B Pwm = Clear Down , Prescale = 64
Enable Interrupts : Start Timer1 : Pwm1a = 0

Dim D As Byte
Mp Alias Portd.6                                            ' + MOTOR
Mn Alias Portd.7                                            ' - MOTOR


Do

D = Waitkey()

If D = 49 Then : Set Mp : Reset Mn
Elseif D = 50 Then : Set Mn : Reset Mp
Elseif D = 48 Then : Reset Mn : Reset Mp
End If

Loop 


این برنامه رو تست کن و دکمه های 1 و 2 و 3 رو بزن و نتیجه رو بگو !

[aleas]

مال اداپتور بود !!!
نه کار نکرد؟

[t3r!p3000]

باید کار کنه !
مگر اینکه خروجی هات مشکل داشته باشه !


یه چیزی :
اون پایه های خروجیت رو که خروجی تعریف نکردی !
ایراد از اونه !!

[aleas]

نه مال اونا نیسته چون اگر موقعه ی که دستور IF رو تعریف نمیکردم می بایست موتور کار نکنه درصورتی که کار میکنه

[aleas]

کسی تا حالا از طریق مبدل USB به سریال و ارتباط با میکرو کار کرده؟

[t3r!p3000]

مهندس وقتی دریافت می کنه و درست هم ارسال می کنه پس مشکل از اون نیست !

پیشنهاد می کنم با باوود 1200 کار کنی و مستقیم به کامیپوتر وصل کنی ! ( ماژول فرستنده گیرنده نباشه )

مثلا کد اینتر 13 هستش !

ببین می تونی اینتر رو دریافت کنی !

عدد شرط رو 13 بذار !!

یا مثلا 65 بذار تا بشه A ( با حروف بزرگه )

[WhiteNoise]

نباید زمین ماژول رو با زمین تغذیه و میکرو یکی کنه؟

---

البته فکر کنم خودش یکی کرده درسته؟

[aleas]

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

[t3r!p3000]

http://www.iranled.com/forum/Thread-%D8%...#pid140261

http://www.iranled.com/forum/showthread.php?tid=18155

سرچ کنی بازم بحث شده !

من سرعت افتضاح هستش و نمی تونم بگردم !!