:) ja natürlich meine ich mcselec.com, sorry
sorry kay, habe nicht viel zeit, die routine würde ich ungefähr so
implementieren
.....alabala....
'jetzt poti auslesen, poti an adc0 angeschlossen'
Poti_Wert = Getadc(0)
.....alabala....
'jetzt index für lookup table berechnen'
'full scale ausschlag 1024, dies gibt werte zwischen 0 und 9'
'aufpassen, \ heisst integer division, ganze zahlen!'
Index = Poti_Wert \ 102
'jetzt led muster aus lookup table anhand index auslesen'
'leds mit 0/low aktiv, kathode zu +5v'
Led_Muster= Lookup(Index, Muster)
.....alabala....
'hier led_muster zu den ports beziehen, z.b. so:'
porta.7=led_muster.9
porta.6=led_muster.8
porta.5=led_muster.7
porta.4=led_muster.6
porta.3=led_muster.5
...usw...
.....alabala....
Loop
'das hier ist die lookup table, steht ganz unten nach dem
progrtammende'
Muster:
Data &B1111111110%
Data &B1111111100%
Data &B1111111000%
Data &B1111110000%
Data &B1111100000%
Data &B1111000000%
Data &B1110000000%
Data &B1100000000%
Data &B1000000000%
Data &B1000000000%
Data &B0000000000%