1. fehler: outputs als Port nicht als pin configuren
2. fehler bei den pullups port= 1 nicht pin
3. warum machst du die end ifs alle am schluss? und nicht nach jedem if satz? weil so wie es jetzt ist macht er im unterren teil nur was wenn wert = 1 ist tipp: um sowas zu lösen ist select case auch ganz schön.

4. ganz am ende fehlt noch ein (formales) "end"