DEFINITION MODULE CPCShowAll; PROCEDURE ShowAll; PROCEDURE CharPos(VAR cx,cy: INTEGER); END CPCShowAll.