TECH.RegisteredObject 1 1 Global:%String,Index:%Integer 1 MaxJaar { Set MaxJaar = HuidigJaar } If 1800 < HuidigJaar && HuidigJaar < MinJaar { Set MinJaar = HuidigJaar } } Catch { Write "Error: HuidigJaar = ", HuidigJaar, ! } } Write "MaxJaar = ", MaxJaar, " en MinJaar = ", MinJaar, ! ]]>