Pin A0 ist ok, da hängt ja sonst nix dran.

Ich versteh ja nix von Bascom aber ist das ok?

For I = 0 To 5 ' Alle internen Pullup Widerstände ein, bis auf Batteriespannungsmessungsport

wo Du doch am PortA0 misst?