I upgraded and returned the script back, after 12 years. A very useful code example.
shapeGen.zip (11.0 KB)