Serial Character Writer pgm
modified