It's not actually hard, but still took me a while to do.

This...

... draws that:

A side-effect is also that it can draw transparent lines (e.g. pass 'edgealpha', 0.5).

Here is the code, save into tcline.m.