Initial additions to tclespeak.cpp to make tclpiespeak.cpp