Sorry for some of the inconsistancies. I pasted my functions in Word and
translated from Dutch to english, but I missed some words. Einde: is
actually End: in all the relevant places.

Peter