روشن کردن ال ای دی در بسکام ؟

[elemaniran]

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

من یه مگا 16 خریدم و میخوام برای اموزش پایه شماره 20 یا همون portd.6 رو که به یه ال ای دی هست همیشه روشن نگه دارم و پایه شماره 21 یا همون portd.7 رو هم ورودی بگیرم و تا زمانی که 5 ولن بهش وصل بود پایه شماره 22 یا همون portc.0 رو روشن نگه داره و وقتی 5 ولت قطع شد ال ای دی هم که به portc.0 وصل هست خاموش بشه ولی ال ای دی اولی همیشه روشن باشه و خاموش نشه
میشه منو راهنمایی کنید .
از یکی از مهندسان خواهش میکنم این برنامه رو برای من بنویسه . خیلی سعی کردم ولی همش خراب در میاد :angry: :cry2:

[alirezalahij]

پاسخ : روشن کردن ال ای دی در بسکام ؟

سلام

یادت باشه اول پورت ها تو config کنی

[elemaniran]

پاسخ : روشن کردن ال ای دی در بسکام ؟

کردم ولی نشد
یه موقع ال ای دی روشنه یه موقع روشن نمیشه
وقتی 5 ولت میدی روشن میشه و قطع میکنی دیگه خاموش نمیشه
کیست مرا یاری کند :angry:

[majid_teh2005]

پاسخ : روشن کردن ال ای دی در بسکام ؟

$regfile = "m16def.dat"

$crystal = 1000000

Config Portc.0 = Output
Config Portd.6 = Output
Config Portd.7 = Input


Set Portd.6

Do
If Pind.7 = 1 Then
Portc.0 = 1
Else
Portc.0 = 0
End If
Loop

موفق باشید

[alirezalahij]

پاسخ : روشن کردن ال ای دی در بسکام ؟

برنامه ای که نوشتی بزار با هم مشکلش و پیدا کنیم

[elemaniran]

پاسخ : روشن کردن ال ای دی در بسکام ؟

برنامه ای که نوشتی بزار با هم مشکلش و پیدا کنیم

برنامه ای که نوشتم همینی هست که مجید خان دادن
فقط مشکل اینجاست
بجز پایه portd.6 که 5 ولت داره کامل بقیه پایه ها همه 2 ولت خروجی شون رو گرفتم دارن ولتاژ میدن
و این باعث میشه و قتی ال ای دی وصل میکنم روشنه و وقتی کلید رو میزنم فقط پر نور تر میشه

یعنی مشکل از کجاست ؟
چرا همه پایه ها 2 ولت دارن ؟
مدار که بجز یک مثبت 5 ولت و منفی مه چیز دیگه ای هم میخواد ؟
با یک میکرو که الان از دوستم گرفتم هم تست کردم همین مشکل رو دارم

[khast khodaiebehnam]

پاسخ : روشن کردن ال ای دی در بسکام ؟

$regfile = "m16def.dat"

$crystal = 1000000

Config Portc.0 = Output
Config Portd.6 = Output
Config Portd.7 = Input

reset portd
Set Portd.6
reset portc
Do
If Pind.7 = 1 Then
Portc.0 = 1
Else
Portc.0 = 0
End If
Loop

[majid_teh2005]

پاسخ : روشن کردن ال ای دی در بسکام ؟

تو این مثال pull up پین D.7 هم روشنه . یعنی اگه زمینش کنی 0 حساب می شه و اگه رهاش کنی 1 حساب می شه .

$regfile = "m16def.dat"

$crystal = 1000000

Config Portc.0 = Output
Config Portd.6 = Output
Config Portd.7 = Input


Set Portd.6
Set Portd.7

Do
If Pind.7 = 1 Then
Portc.0 = 1
Else
Portc.0 = 0
End If
Loop