TurboPascal Version

A version edited to work under turbo pascal, fixes to main version.