program help

Thanks for advice will take your advice and change the naming of relay's etc
Regards
Grant