Also im jetzigen Zustand funktioniert da gar nichts.
Hast Du schon einmal versucht das Programm mit Bascom zu compilieren?
Da kommt eine ganze Latte von Fehlermeldungen.

Fangen wir mal mit dem wichtigsten an:
Bemerkungen musst Du mit ' eintragen
Die erste Do-Loop-Schleife wird nie verlassen da eine Bedingung fehlt wann die Schleife verlassen werden soll (DO-LOOP-UNTIL).
Im jetzigen Zustand würde sich der Motor nur bewegen solange Du die Taste gedrückt hältst.

Wäre es nicht vernünftiger Du machst die ganze Sache mit Endlagenschalter statt mit einer Gabellichtschranke? So funktionieren nämlich normalerweise Tor- und Rolladensteuerungen.