Move Subject Line

SCRIPT {
    MsgBoxConfirm "Cut top line of message and move it to the subject line?",4, "Eudora confirmation"
    HeardWord "Jump", "to","Message"
    Wait 200
    HeardWord "Top","of","Document"
    SendKeys "{Shift+End}{Ctrl+x}"
    Wait 100
    SendKeys "{Alt+u}"
    SendKeys "{Ctrl+v}{Backspace}"
}