echo "*Text Out Echo running.  Press ESC to exit.*"
setTextOutTrigger tot1 :tot1 ""
pause

:tot1
getOutText $out
getLength $out $length
setVar $keycodes ""
setVar $i 1
while ($i <= $length)
   cutText $out $char $i 1
   getCharCode $char $code
   setVar $keycodes $keycodes & "#" & $code
   add $i 1
end
echo "*Keycodes: " $keycodes "*"
# Now see if ESC was pressed
if ($length = 1) and ($out = #27)
   echo "*ESC detected, script exiting.*"
   halt
end
setTextOutTrigger tot1 :tot1 ""
pause