set hamlet to readtext "~/Documents/Text/hamlet.txt"
tell application "Adium"
set victim to chat id "AIM.victim"
repeat with aparagraph in paragraphs of hamlet
try
send victim message aparagraph
on error
-- ignore
end try
end repeat
end tell
tell application "Adium"
set victim to chat id "AIM.victim"
repeat with aparagraph in paragraphs of hamlet
try
send victim message aparagraph
on error
-- ignore
end try
end repeat
end tell
Yes, I really do have hamlet.txt (and hamlet-1-line.txt) in my documents folder. They're great for testing... Even better for the bug reports they inevitably generate.
Leave a comment