AtMega8 Analogen Eingang auslesen

^^ Declare Sub Test

Do
Call Test
Loop

Sub Test()
A=X
End Sub

kann jetzt leider nicht weitermachen... die demo ist voll :(
jetzt brauch ich ne bessere idee oder vollversion
oder beides ;)