Digitalport als Eingang

Moin!
Ich hab mich eben mal mit den freien Digitalports des Robby befasst, einen Digitalport als Ausgang benutzen funktioniert auch schon wunderbar. (ok ist auch nicht mehr als FreiPort16=on)
Nun wollte ich es zu testzwecken andersrum machen, hab über einen Schalter und einen 100 Kohm Pulldown Vcc und den freien Port 16 verbunden.
Nun steht in meinem Program:

'Initialisierung:
Freipo16=off

#loop
if FreiPo16=on then goto blubb
goto loop

#blubb
gosub led1an
goto loop

Doch wenn ich den Schalter umlege geht die Led nicht an, was mach ich falsch?