Vermutlicxh liegt es nur daran das du nur volle Spannungen in den IF-Abfragen angibst. Bei Bascom Single-Werten können ja auch krumme Werte raus kommen und dann würde sich bei deinem Programm nix tun.

Probier es doch mal mit geänderten IF-Abfragen, also so
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