Hallo Klaus,
schreib mal in deinen Programcode die Anweisung $sim. Dies schaltet für die Simulation die wait Zyclen aus. Dann teste das Ganze im Simulator im Einzelschrittbetrieb. Mit den waits hat der Simulator offensichtlich seine Probleme. Ansonsten funktionieren so einfache Portabfragen im Simulator eigentlich recht gut.
Reinhard