Extending curves

Hi guys, 

I want to find a better way of extending a curve to another curve (the two are not touching). 

Basically, I have done it by Extruding the first curve along the normal vector and using Surface | Curve (SCX) component to find the intersection point, and so I can create a line.

The problem is that this script will be used for a much bigger file where many elements are in use, and so I don't want to adjust the Extrusion and Extension for every single element and I want to find a simpler way of extending an element right up to the normal vector between the two curves. 

Any help will be much appreciated :)