ja egal ich schließ ja einfach nen optokopler an dann passt die sache..... is scho ok. mit leds
aber des von ueweg check ich irgendwie net! *gg*
also ich hab hier mal einen code gefunden, mit dem die led heller und dunkler wird wenn man an dem poti dreht........ könnt ich des evtl. umschreiben, dass es ohne poti geht, sondern automatisch???
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
   W = Getadc(channel)
   Pwm1a = W
Loop
End
MFG

Nrg