کنترل شدت ولتاژ led

[rahpak]

سلام خسته نباشید همه ی مهندسااااااای گل
آقا من با بلوتوث تونستم ولتاژ رو قطع و وصل کنم
بعد به ذهنم رسید که با بلوتوث نور ال ای دی رو هم کم و زیاد کنم
اومدم یکم آموزشارو خوندم و اینا ولی درست نشد که نشد
میخوام با بلوتوث یه عدد بفرستم مثلا 127 بعد تو مدار نور ای ای دی نصف روشن بشه
یا مثلا بفرستم 255 کامل روشن بشه و هر عدد صحیح دیگه ای که وجود داره.
من این رو نوشتم ولی درست کار نکرد میشه شما برنامه درستش رو بهم بگید؟

$regfile = "M8DEF.DAT"
$crystal = 8000000
Config Portb.3 = Output
 Config Timer2 = Pwm , Pwm = On , Compare Pwm = Clear Up , Prescale = 64
 Dim A As Byte
 Do
Ocr2 = Inkey()
Loop

 End

[rahpak]

پاسخ : کنترل شدت ولتاژ led

کسی نیست یه کمک کنه به من؟؟

[abbasalifix]

پاسخ : کنترل شدت ولتاژ led

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

$regfile = "m8def.dat"
$crystal = 8000000
Config Adc = Single , Prescaler = Auto , Reference = Avcc
Start Adc
Config Timer1 = Pwm , Pwm = 10 , Compare A Pwm = Clear Up , Compare B Pwm = Clear Up , Prescale = 1
Dim A As Word
Do
A = Getadc(5)
Pwm1a = A
Pwm1b = A
Loop
End