Hmmm... in der Bascom-Hilfe steht, dass waitus nicht mit variablen geht. Kann ich aus eigener Erfahrung auch bestätigen.

Außerdem würde ich zu bedenken geben, dass wenn Ad1 z.B. 50 sei, alle Bedingungen (< 64, < 96, < 128 etc.) erfüllt sind.

Vielleicht geht´s ja so:


Code:
Ad1 = Getadc(1)
Portb.1=1

Select case Ad1
Case is < 32: Waitus 600
Case 32 to 63: Waitus 656
Case 64 to 95: Waitus 712

...

Case is > 992: Waitus 2392
End select

Portb.1=0

Waitms 20
(auch wenn ich noch ein ziemlich kleines Bascom-Licht bin... )

Gruß,

Daniel