Key Spammer for Mac

tell application "System Events"


    set texttosay to "Sample Text"
    display dialog "Text to type:" default answer "text "
    set texttosay to the text returned of the result

    display dialog "Delay in seconds:" default answer "Number"
    set delaynum to the text returned of the result as integer

    display dialog "Repeat number of times:" default answer "Number"
    set rptnum to the text returned of the result as integer

    set returnkeystroke to {"Yes", "No"}
    set returnkeystrokechosen to choose from list returnkeystroke with prompt "Seperate each message with enter?:" default items {"Yes"}
    returnkeystroke


    repeat
        delay 2

        repeat rptnum times
            keystroke texttosay
            delay delaynum

            if returnkeystrokechosen is equal to "Yes" then
                keystroke return
            end if



        end repeat

        display dialog the "Do you want to stop?" buttons {"Continue Script", "Stop"} default button 1
        if the button returned of the result is "Stop" then
            exit repeat
        end if
    end repeat
end tell