;Recorded script. Editing may be required.         
proc main
   waitfor "^[[39C"
   transmit "Blackbeard^M"
   waitfor "^[[39C"
   transmit "pecard^M"
   waitfor "lease call back later, after it has ended.^M^J"
   transmit "^M^M^M^M "
endproc