need TS4 swing high

["Chris Cheatham" <chris.cheatham@xxxxxxxxxx>]

Hi,

I wonder if someone could send me the text of the old ts4 (or 2000i) swing
high or swing low function. I would like to make a streamlined one to used
instead of the function-within-function-within-function version  that they
use now, and I no longer have old TS installed anyplace. Would save a bunch
of time to simply copy instead of having to undo all the layers of TS8
wrapper silliness or create it from scratch.

Thanks,
Chris