Also vorab der Programmcode. mir wurde gesagt, man könnte das ganz einfach mit einer Lookup Tabelle machen oder so. aber ich bekomms einfach net hin
Code:$regfile = "8535def.dat" $crystal = 4000000 Ddrb = 3 : Portb = 3 Const An = 0 Const Aus = 1 Led0 Alias Portb.0 Led1 Alias Portb.1 Led2 Alias Portb.2 Led3 Alias Portb.3 Led4 Alias Portb.4 Led5 Alias Portb.5 Led6 Alias Portb.6 Led7 Alias Portb.7 Dim W As Word Dim Volt As Single Const Ref = 5 / 1023 Config Adc = Single , Prescaler = Auto Start Adc Do W = Getadc(0) Volt = W * Ref If Volt = 1 Then Led0 = An If Volt = 2 Then Led1 = An If Volt = 3 Then Led2 = An If Volt = 4 Then Led3 = An Loop







Zitieren

Lesezeichen