-- Spammer v1.1 (17/8/2011)
-- Fixed Error Bug When Cancelling
-- Added Additional Buttons
-- Added Welcome Menu
-- Added Key Stoking
-- Fixed Some Messy Script
--
-- Spammer v1.0 (3/2/2011)
-- First Release
--
try
set welcome to display dialog "Welcome To iSpammer [Version v1.1]" & return & return & "How To Use iSpammer:" & return & return & "Follow The Instructions On Each Window (Its Easy A Dummy Could Do This!)" & return & return & "WARNING!!:" & return & "DO NOT USE THIS FOR INLEGAL USES AS THIS PROGRAM IS TO BE USED AT YOUR OWN RISK!." & return & return & "ENJOY!..." buttons {"I Don't Agree OR Understand!.", "Start iSpammer..."} with title "Welcome To iSpammer [Version v1.1]" default button 2 with icon note
if button returned of welcome = "I Don't Agree OR Understand!." then
set dam to display dialog "IF YOU DO NOT WISH TO USE THIS APP ANYMORE PLEASE MOVE IT TO THE TRASH!." buttons {"Thanks"} giving up after 5
if button returned of dam = "Thanks" then
quit
end if
end if
if button returned of welcome = "Start iSpammer..." then
set var1 to (display dialog "Type Spam?:" default answer "" with title "iSpammer v1.1 By AudialRedux (STEP 1)" buttons {"Cancel", "Continue To Step 2"})
set var2 to text returned of var1
end if
if button returned of var1 = "Cancel" then
quit
end if
if button returned of var1 = "Continue To Step 2" then
--delay 0.5
set numoftimes to (display dialog "How Many Times Do You Wish To Automatically Write It?:" default answer "" with title "iSpammer v1.1 By AudialRedux (STEP 2)" buttons {"Cancel", "Continue To (Step 3)"})
set numoftimes2 to text returned of numoftimes
end if
if button returned of numoftimes = "Cancel" then
quit
end if
if button returned of numoftimes = "Continue To (Step 3)" then
set infotimer to display dialog "How Step 3 Works!:" & return & return & "Ok, Once The Count Down Has Started! Click On Where You Would Of Put The Spam Yourself." & return & return & "DON'T CLICK ANYWHERE ELSE OR DO ANYTHING UNTIL THE APPLICATION PROMPTS YOU SAYING THE COMMAND IS COMPLETE!" buttons {"What?, Cancel", "Start Count Down To (iSpamming.)"} with title "iSpammer v1.1 By AudialRedux (STEP 3)" default button 2 with icon note
end if
if button returned of infotimer = "Start Count Down To (iSpamming.)" then
set timer to display dialog "Spamming Will Begin In: [10 seconds.]" buttons "Cancel" with title "iSpammer v1.1 By AudialRedux (COUNT DOWN.)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [9 seconds.]" buttons "Cancel" with title "iSpammer v1.1 By AudialRedux (COUNT DOWN.)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [8 seconds..]" buttons "Cancel" with title "iSpammer v1.1 By AudialRedux (COUNT DOWN..)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [7 seconds...]" buttons "Cancel" with title "iSpammer v1.1 By AudialRedux (COUNT DOWN...)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [6 seconds.]" buttons "Cancel" with title "iSpammer v1.1 By AudialRedux (COUNT DOWN.)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [5 seconds..]" buttons "Cancel" with title "iSpammer v1.1 By AudialRedux (COUNT DOWN..)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [4 seconds...]" buttons "Cancel" with title "iSpammer v1.1 By AudialRedux (COUNT DOWN...)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [3 seconds.]" buttons "Cancel" with title "iSpammer v1.1 By AudialRedux (COUNT DOWN.)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [2 seconds..]" buttons "Cancel" with title "iSpammer v1.1 By AudialRedux (COUNT DOWN..)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [1 seconds...]" buttons "Cancel" with title "iSpammer v1.1 By AudialRedux (COUNT DOWN.)" giving up after 1
say "Starting" using "Vicki"
repeat numoftimes2 times
tell application "System Events"
tell process "finder"
keystroke var2 & (key code 36)
end tell
end tell
tell application "System Events"
tell process "finder"
keystroke return
end tell
end tell
delay 0.4
--end if
set endofroad to display dialog "iSpamming Completed!." buttons {"WOW!, Thanks!."} with title "This Is The End Of The Road!."
say "i spamming completed"
if button returned of endofroad = "WOW!, Thanks!." then
quit
end if
end repeat
-- end if
--end if
--end if
end if
--end if
end try
end
(WARNING!!! THIS NEW VERSION 1.2 IS UNTESTED AS IT WAS EDITED ON A WINDOWS COMPUTER “WILL BE TESTED TONIGHT AND UPLOADED AGAIN IF ANY BUGS ARE FOUND!”)
COMING SOON!: Version 1.3
Which Will Include (BELOW)
*Custom Enter Key Time Delay
*Custom Timing Of Spamming
*Inpproarite Language Filtering (If You Dont Want This Then Remove The Code That Stops inpproarite Language)
*And More…
(ENJOY AND ONLY USE IN A NON HARMFUL WAY!)
-- Spammer v1.2 (19/8/2011)
-- Improved Enter Key Fuction
-- Key Fuction Delays To Number Of Times Wanting To Use
--
-- Spammer v1.1 (17/8/2011)
-- Fixed Error Bug When Cancelling
-- Added Additional Buttons
-- Added Welcome Menu
-- Added Key Stoking
-- Fixed Some Messy Script
--
-- Spammer v1.0 (3/2/2011)
-- First Release
--
try
set welcome to display dialog "Welcome To iSpammer [Version v1.2]" & return & return & "How To Use iSpammer:" & return & return & "Follow The Instructions On Each Window (Its Easy A Dummy Could Do This!)" & return & return & "WARNING!!:" & return & "DO NOT USE THIS FOR INLEGAL USES AS THIS PROGRAM IS TO BE USED AT YOUR OWN RISK!." & return & return & "ENJOY!..." buttons {"I Don't Agree OR Understand!.", "Start iSpammer..."} with title "Welcome To iSpammer [Version v1.2]" default button 2 with icon note
if button returned of welcome = "I Don't Agree OR Understand!." then
set dam to display dialog "IF YOU DO NOT WISH TO USE THIS APP ANYMORE PLEASE MOVE IT TO THE TRASH!." buttons {"Thanks"} giving up after 5
if button returned of dam = "Thanks" then
quit
end if
end if
if button returned of welcome = "Start iSpammer..." then
set var1 to (display dialog "Type Spam?:" default answer "" with title "iSpammer v1.2 By AudialRedux (STEP 1)" buttons {"Cancel", "Continue To Step 2"})
set var2 to text returned of var1
end if
if button returned of var1 = "Cancel" then
quit
end if
if button returned of var1 = "Continue To Step 2" then
--delay 0.5
set numoftimes to (display dialog "How Many Times Do You Wish To Automatically Write It?:" default answer "" with title "iSpammer v1.2 By AudialRedux (STEP 2)" buttons {"Cancel", "Continue To (Step 3)"})
set numoftimes2 to text returned of numoftimes
end if
if button returned of numoftimes = "Cancel" then
quit
end if
if button returned of numoftimes = "Continue To (Step 3)" then
set infotimer to display dialog "How Step 3 Works!:" & return & return & "Ok, Once The Count Down Has Started! Click On Where You Would Of Put The Spam Yourself." & return & return & "DON'T CLICK ANYWHERE ELSE OR DO ANYTHING UNTIL THE APPLICATION PROMPTS YOU SAYING THE COMMAND IS COMPLETE!" buttons {"What?, Cancel", "Start Count Down To (iSpamming.)"} with title "iSpammer v1.2 By AudialRedux (STEP 3)" default button 2 with icon note
end if
if button returned of infotimer = "Start Count Down To (iSpamming.)" then
set timer to display dialog "Spamming Will Begin In: [10 seconds.]" buttons "Cancel" with title "iSpammer v1.2 By AudialRedux (COUNT DOWN.)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [9 seconds.]" buttons "Cancel" with title "iSpammer v1.2 By AudialRedux (COUNT DOWN.)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [8 seconds..]" buttons "Cancel" with title "iSpammer v1.2 By AudialRedux (COUNT DOWN..)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [7 seconds...]" buttons "Cancel" with title "iSpammer v1.2 By AudialRedux (COUNT DOWN...)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [6 seconds.]" buttons "Cancel" with title "iSpammer v1.2 By AudialRedux (COUNT DOWN.)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [5 seconds..]" buttons "Cancel" with title "iSpammer v1.2 By AudialRedux (COUNT DOWN..)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [4 seconds...]" buttons "Cancel" with title "iSpammer v1.2 By AudialRedux (COUNT DOWN...)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [3 seconds.]" buttons "Cancel" with title "iSpammer v1.2 By AudialRedux (COUNT DOWN.)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [2 seconds..]" buttons "Cancel" with title "iSpammer v1.2 By AudialRedux (COUNT DOWN..)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [1 seconds...]" buttons "Cancel" with title "iSpammer v1.2 By AudialRedux (COUNT DOWN.)" giving up after 1
say "Starting" using "Vicki"
repeat numoftimes2 times
tell application "System Events"
tell process "finder"
keystroke var2
end tell
end tell
try
delay numoftimes2
end try
tell application "System Events"
tell process "finder"
try
set key to key code 36
end try
key
end tell
else
key code 36
end tell
delay 0.4
--end if
set endofroad to display dialog "iSpamming Completed!." buttons {"WOW!, Thanks!."} with title "This Is The End Of The Road!."
say "i spamming completed"
if button returned of endofroad = "WOW!, Thanks!." then
quit
end if
end repeat
-- end if
--end if
--end if
end if
--end if
end try
end
There Was Issues In 1.2 Which Are Now Fixed And Added So Much More!!.
-- iSpammer v1.3 (20/8/201)
-- Added Inpproarite Langauge DataBase (Basic Addition)
-- Added
-- iSpammer v1.2 (19/8/2011)
-- Improved Enter Key Fuction
-- Key Fuction Delays To Number Of Times Wanting To Use
--
-- iSpammer v1.1 (17/8/2011)
-- Fixed Error Bug When Cancelling
-- Added Additional Buttons
-- Added Welcome Menu
-- Added Key Stoking
-- Fixed Some Messy Script
--
-- iSpammer v1.0 (3/2/2011)
-- First Release
--
set test_3 to do shell script "ping -c 1 [url=http://www.google.com]www.google.com[/url]"
tell application "Finder"
set p to number of paragraphs in test_3
if p < 5 then
set sorry to display dialog "[Error!:] Sorry But No Internet Connection Was Detected!." with title "iSpammer v1.3 By AudialRedux" buttons {"Close iSpammer v1.3"}
if button returned of sorry = "Close iSpammer v1.3" then
quit
end if
else
set yourwelcome to display dialog "Internet Connection Enabled!, You May Use iSpammer Now!." with title "iSpammer v1.3 By AudialRedux" buttons {"Start!."}
end if
end tell
if button returned of yourwelcome = "Start!." then
try
set welcome to display dialog "Welcome To iSpammer [Version v1.3]" & return & return & "How To Use iSpammer:" & return & return & "Follow The Instructions On Each Window (Its Easy A Dummy Could Do This!)" & return & return & "WARNING!!:" & return & "DO NOT USE THIS FOR INLEGAL USES AS THIS PROGRAM IS TO BE USED AT YOUR OWN RISK!." & return & return & "ENJOY!..." buttons {"I Don't Agree OR Understand!.", "Start iSpammer.", "Settings"} with title "Welcome To iSpammer [Version v1.3]" default button 2 with icon note
if button returned of welcome = "I Don't Agree OR Understand!." then
set dam to display dialog "IF YOU DO NOT WISH TO USE THIS APP ANYMORE PLEASE MOVE IT TO THE TRASH!." buttons {"Thanks"} giving up after 5
if button returned of dam = "Thanks" then
quit
end if
end if
if button returned of welcome = "Settings" then
display dialog "Meh, Couldnt Be Bothered! Be Released In Next Release 1.4!." buttons {"Omg AudialRedux Is Lazy!."}
end if
if button returned of welcome = "Start iSpammer..." then
set var1 to (display dialog "Type Spam?:" default answer "" with title "iSpammer v1.3 By AudialRedux (STEP 1)" buttons {"Cancel", "Continue To Step 2"})
set var2 to text returned of var1
end if
if button returned of var1 = "Cancel" then
quit
end if
if button returned of var1 = "Continue To Step 2" then
if text returned of var1 contains {"penis"} then
set naughty to display dialog "Sorry But The Database Detected Naughty Words!." buttons {"Re-write what I Said!."}
if button returned of naughty = "Re-write What I Said!." then
quit
end if
end if
if text returned of var1 contains {"fuck"} then
set naughty to display dialog "Sorry But The Database Detected Naughty Words!." buttons {"Re-write what I Said!."}
if button returned of naughty = "Re-write What I Said!." then
quit
end if
end if
if text returned of var1 contains {"cunt"} then
set naughty to display dialog "Sorry But The Database Detected Naughty Words!." buttons {"Re-write what I Said!."}
if button returned of naughty = "Re-write What I Said!." then
quit
end if
end if
if text returned of var1 contains {"shit"} then
set naughty to display dialog "Sorry But The Database Detected Naughty Words!." buttons {"Re-write what I Said!."}
if button returned of naughty = "Re-write What I Said!." then
quit
end if
end if
--delay 0.5
set numoftimes to (display dialog "How Many Times Do You Wish To Automatically Write It?:" default answer "" with title "iSpammer v1.3 By AudialRedux (STEP 2)" buttons {"Cancel", "Continue To (Step 3)"})
set numoftimes2 to text returned of numoftimes
end if
if button returned of numoftimes = "Cancel" then
quit
end if
if button returned of numoftimes = "Continue To (Step 3)" then
set infotimer to display dialog "How Step 3 Works!:" & return & return & "Ok, Once The Count Down Has Started! Click On Where You Would Of Put The Spam Yourself." & return & return & "DON'T CLICK ANYWHERE ELSE OR DO ANYTHING UNTIL THE APPLICATION PROMPTS YOU SAYING THE COMMAND IS COMPLETE!" buttons {"What?, Cancel", "Start Count Down To (iSpamming.)"} with title "iSpammer v1.3 By AudialRedux (STEP 3)" default button 2 with icon note
end if
if button returned of infotimer = "Start Count Down To (iSpamming.)" then
set timer to display dialog "Spamming Will Begin In: [10 seconds.]" buttons "Cancel" with title "iSpammer v1.3 By AudialRedux (COUNT DOWN.)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [9 seconds.]" buttons "Cancel" with title "iSpammer v1.3 By AudialRedux (COUNT DOWN.)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [8 seconds..]" buttons "Cancel" with title "iSpammer v1.3 By AudialRedux (COUNT DOWN..)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [7 seconds...]" buttons "Cancel" with title "iSpammer v1.3 By AudialRedux (COUNT DOWN...)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [6 seconds.]" buttons "Cancel" with title "iSpammer v1.3 By AudialRedux (COUNT DOWN.)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [5 seconds..]" buttons "Cancel" with title "iSpammer v1.3 By AudialRedux (COUNT DOWN..)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [4 seconds...]" buttons "Cancel" with title "iSpammer v1.3 By AudialRedux (COUNT DOWN...)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [3 seconds.]" buttons "Cancel" with title "iSpammer v1.3 By AudialRedux (COUNT DOWN.)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [2 seconds..]" buttons "Cancel" with title "iSpammer v1.3 By AudialRedux (COUNT DOWN..)" giving up after 1
set timer to display dialog "Spamming Will Begin In: [1 seconds...]" buttons "Cancel" with title "iSpammer v1.3 By AudialRedux (COUNT DOWN.)" giving up after 1
say "Starting" using "Vicki"
repeat numoftimes2 times
tell application "System Events"
tell process "finder"
keystroke var2
end tell
end tell
try
delay 2.4
end try
tell application "System Events"
tell process "finder"
try
set key to key code 36
end try
key
key code 36
end tell
end tell
delay 0.4
--end if
set endofroad to display dialog "iSpamming Completed!." buttons {"WOW!, Thanks!."} with title "This Is The End Of The Road!."
say "i spamming completed"
if button returned of endofroad = "WOW!, Thanks!." then
quit
end if
end repeat
-- end if
--end if
--end if
end if
end try
end if
These Applescripts No Longer Work!, As Of Facebook Feature Changes!. (But Code Is Still Usefull If Wish To Mess Around With It On Different Web Sites. [I’m No Longer Supporting These Scripts Anymore Ethier Sorry! So No Updates Anymore.]