Bei Debounce fehlt die Sub-Erklärung und das Display muss nur einmal überhaupt gecleart werden, sonst flackert es. Wird ja doch an die gleiche Stelle geschrieben. Sonst läuft es.

Debounce Pinc.0 , 1 , Flag , Sub