Pascal- Problem z writeln po użyciu graph

Witam, mam dziwny problem z modułem graph. Używam go do narysowania grafu i połączeń ale gry po narysowaniu okno grafu zostanie zamknięte w oknie programu wszędzie gdzie powinien być tekst wyświetlony przez writeln pojawią się ostatni użyty napis przed uruchomieniem graph.

Fragmenty kodu odpowiedzialne za graph udostępniam tu http://www.kwlodarczyk.pl/pub/p.txt

Screeny wrzucam

  1. Wszystko dobrze po uruchomieniu http://i.imgur.com/v1nGCbn.png

  2. Graph http://i.imgur.com/KgsRVJq.png

  3. Menu które powinno wyglądać jak na 1 screenie, takie jest po zakończeniu grapha http://i.imgur.com/UmZOksZ.png