ja genau ! jetzt sama beisamen!
Nur mein problem is dass ich es irgendwie nicht schaffe diese pwm steuerung zu schreiben. ich hab mir gedacht dass es evtl. so gehen könnte:
Code:
' Poti über ADW einlesen und über PWM ausgeben
' der Ausgang ist OC1A
' Poti an Channel5 (PortC5), LED an PortB1 (OC1A)
' laut Oszi ca. 3.333kHz

$crystal = 8000000
$regfile = "m8def.dat"

Config Portb = Output
Config Adc = Single , Prescaler = Auto , Reference = Off
Config Timer1 = Pwm , Pwm = 10 , Compare A Pwm = Clear Up , Compare B Pwm = Clear Down , Prescale = 1
Portb = 255
Start Adc

Dim W As Word , Channel As Byte
Compare1a = 100
Channel = 5

Do
for  i=0 to 255 scale 10
   
W = i
   Pwm1a = W
Loop
End
nur des funzt irgendwie nicht so recht...........

MFG

NRg