Added first cut of script. It works.