/* cls.tc - lrb - 11/30/2007 - 12/1,2/2007
/* clear screen - note need to code ESC character and left bracket
/* as 1 more than they really are and then subtract the character
/* 1 - cannot use the left bracket itself because it confuses the 
/* interpreter
cls [
 MC '\'-1-'@',1
 MC '\'-1,1
 MC '2',1
 MC 'J',1
]