[easy] morse code - tcl