Basic AppleScript Dialog: display dialog "Your text here" with icon stop buttons {"OK"} default button {"OK"} giving up after 5
'giving up after 5' will automatically close the script after the indicated interval of time has elapsed.
|
Choosing a Color from the Color Picker
The final ‘choose’ command, ‘choose color’ will be covered here. The choose color dialog is somewhat obscure and you aren’t as likely to use it as the others, but it is worth mention. It is not complicated at all. The script below results in the color picker window, with the rainbow effect as in the image below:
set colorPref to choose color default color {31270,38327,65535}
If the user clicks on the “OK” button without choosing a color, the RGB value {31270,38327,65535} is assigned to the variable colorPref, otherwise its value is set to whatever RGB value results from where the user clicked in the color wheel.
We can then use that value in a script such as this which changes the background color of the frontmost finder window:
set colorPref to choose color default color {31270,38327,65535}
tell application "Finder"
activate
tell the icon view options of the front Finder window
set the background color to colorPref
end tell
set the current view of the front Finder window to icon view
end tell
This changes the background color for the icon view only. All of the other views remain unchanged.
Contact me with your questions or suggestions at: hyperscripter@gmail.com or http://twitter.com
Choose Folder | Choose File | Choose File Name | Enhanced Choose from List | Choose Application

Digg This!!
|
 
HTML Guide from Peachpit Press
 iPhoto 6
Create Multiple Folders with Terminal
If you are more of a techy kind of person and are comfortable with using Terminal, here is a script you can use to easily create multiple folders:
First, for a single folder, type in: mkdir "Folder 1"
--or whatever you want to name your folder, this creates a new directory, which, in effect is a new folder.
To place multiple items in the 'Documents' folder:
cd/Users/
Administrator/
Documents
mkdir "Folder 1" "Folder 2"
"Folder 3"
To quickly create multiple folders, create a text file with the desired folder names (as many as you want) and name it something like 'folderList.txt'. Next type this in Terminal:
cat folderList.txt |xargs mkdir
Or you could create folders with the same prefix by entering:
mkdir "Invoices " {"Corporate", "Individual", "Pro-Bono"}
Digg This!!
An AppleScript to Verify a Date Run this in the Script Editor:
set dateRecord to (current date)
set defaultDate to (date string of dateRecord)
try
set apptDate to text returned of (display dialog "Enter appointment date:" default answer defaultDate buttons {"Set"} default button {"Set"})
set datetext to apptDate as text
date apptDate --if an invalid date is entered, the next dialog is aborted and it triggers the error alert below.
display dialog datetext & " is a valid date." with icon note buttons {"OK"} default button {"OK"}
on error
set alertText to "An error has occurred!"
set messageText to quote & datetext & quote & " is an invalid date."
display alert alertText message messageText as warning buttons {"OK"} default button "OK" giving up after 15
return
end try
|
 Concept Drawing for iMac prior to Production
Fun HTML Use this to add interest to your pages, but be careful, if you overdo it, it can make your page look gaudy, if not ridiculous!
Read All About It
Here's is the code as it appears above:
<p align="center" style="padding: 5px; background-color: #FFCE9C; border: dotted 5px #FFCE9C;"><marquee width=20% behavior=scroll direction=left loop=infinite> Latest Headlines... </marquee><blink>Read All About It</blink>/p>
Check out this color HTML!!!
AppleScript for Setting System Volume Copy and paste this into the Script Editor and try it out:
set defaultVolume to "3"
set volumeLevel to text returned of ¬
(display dialog ¬
"Set the system volume to (7 is the highest):"¬
default answer defaultVolume with icon note¬
buttons {"OK"} default button "OK") as integer
set volumeValues to {0, 1, 2, 3, 4, 5, 6, 7} ¬
as list
if volumeLevel is not in volumeValues then ¬
set volumeLevel to defaultVolume
tell application "Finder"
try
set volume volumeLevel
beep 2
on error errDlog
display dialog errDlog with icon stop ¬
buttons {"Abort"} default button ¬
"Abort" giving up after 15
end try
end tell
Earn Wealth on Internet
Learn Tips and Tricks to Making Money on the Internet
www.internetwealth.com
Learn How To Make Money Blogging - Blog Mastermind
Six-figure Yaro Starak Teaches You How To Set Up And Profit From A Successful Blog. Start Making Money From Blogs By Following This Step-by-step, Weekly Coaching Program
http://www.blogmastermind.com/coaching/
Seo Elite: New Seo Software!
The Grand Daddy Of All Seo Software!
Get A Top 5 Google Ranking In Under 30 Days!
http://www.seoelite.com/
Turn Your Photos Into Cash
All You Need Is A Digital Camera, A Computer And An Internet Connection To Get Started Making Extra Income Every Month!
http://turnyourphotosintocash.com/
Infinite Income Plan - Instant Wealth Guide & CDs.
Easy Money For Affiliates, Huge 8.3% Conversions On Generic Traffic. Massive 70% Commissions Plus
HyperCard AppleScript Users:
Heres an AppleScript for backing up a selected group of HyperCard files. this was used in one of my HyperCard stacks, but could be adapted for use in OSX programs with little or no modification:
send "suiteBkp(true)" to bg btn "BackupSuite"
--Use this line to call the handler below (true displays a notification dialog when the process is complete, you must have a button named bg btn "BackupSuite"):
on suiteBkp(theBoolean)
copy line 1 of field "selectedFolder" to theHFFolderPath --You'll need a hidden field named "selectedFolder" that a script (prior to the call) will place the path to the desired folder in.
tell application "Finder"
activate
set todaysDate to (current date)
set bkpYear to (year of todaysDate)
set monthlyBkp to ("Monthly Reports_" & bkpYear) as string
if exists (folder "HyperCard Backup") then
select folder "HyperCard Backup"
delete selection
end if
if exists (folder "HyperCard Backup" of folder theHFFolderPath) then
select folder "HyperCard Backup" of folder theHFFolderPath
delete selection
end if
make new folder at folder theHFFolderPath with properties {name:"HyperCard Backup"}
select {file "Appointments" of folder theHFFolderPath, ¬ file "HyperFile" of folder theHFFolderPath, ¬ file "Outstanding Invoices" of folder theHFFolderPath, ¬ file "Year" of folder theHFFolderPath, ¬ file monthlyBkp of folder theHFFolderPath, ¬
copy selection to folder "HyperCard Backup" of folder theHFFolderPath
select folder "HyperCard Backup" of folder theHFFolderPath
select file "Appointments" of folder ¬ "HyperFile Suite Backup" of folder theHFFolderPath
set name of selection to "Appointments.bkp"
select file "HyperFile" of folder "HyperCard Backup" of ¬ folder theHFFolderPath
set name of selection to "HyperFile.bkp"
select file "Outstanding Invoices" of ¬ folder "HyperFile Suite Backup" of folder theHFFolderPath
set name of selection to "Outstanding Invoices.bkp"
select file "Year" of folder "HyperFile Suite Backup" of ¬ folder theHFFolderPath
set name of selection to "Year.bkp"
set prefMonthlyBkp to (monthlyBkp & ".bkp") as string
select file monthlyBkp of folder "HyperFile Suite Backup" of ¬ folder theHFFolderPath
set name of selection to prefMonthlyBkp
select folder "HyperFile Suite Backup" of folder "The HyperFile Folder"
move selection to desktop
end tell
if theBoolean = "true" then
tell application "HyperCard"
activate
display dialog ¬ "Your backup has been saved to desktop." buttons {"Done"} default button {"Done"} with icon 129 giving up after 10
end tell
end if
end suiteBkp
more HyperTalk
 Macintosh Plus (late 1984), followed close behind the Mac 512k
 The classic Apple IIc (1981), part of a series of Apple computers that preceded the debut of the Macintosh
HyperCard Users Corner:
Here's a simple, but very useful little HyperTalk script for verifying the validity of a date entered by a user, assuming that you have a menu item "flag date..." (or whatever you choose to name it) or it could be altered slightly and placed within a mouseUp statement:
if menuItem = "Flag Date..." then
global tryDate
ask "Enter a date for your new appointment:" with the long date
if it ≠ "" and the result ≠ "Cancel" then
put it into tryDate
else
put "" into tryDate
exit doMenu
end if
if invalidDate() then
answer "The date entered is not valid!"
put "" into tryDate
exit doMenu
end if
--Here you would put the statements to execute if the entered date proves to be valid
put "" into tryDate
end if
function invalidDate
global tryDate
convert tryDate to short date
if the result = "invalid date" then
return true
else
return false
end if
end invalidDate
more HyperTalk

 Mac SE (circa 1987), was a more advanced version of the Mac Plus and had an internal hard drive.
YouTube Video Search Script:
tell application "Finder"
try
set webSearch to text returned of (display dialog "Enter YouTube Video
Search" default answer "" buttons {"Search", "Cancel"} default button 1)
open location "http://www.youtube.com/results?search_query=" & webSearch
on error theError
display dialog theError
end try
end tell
|
I and my friends watch the football game clips at YouTube forever, as they have in nice quality.
An individual always lend a hand to design brutally content I’d assert. It is the really most importantly moment in time I frequented your web place page thus far? I amazed by using the research you generated to generate all of this certain post astounding. Splendid technique!
G9J G9J G9J 3716 G9J
Thank you a whole lot for giving everyone shockingly marvellous risk to learn critical critiques from here. It’s always therefore splendid also full of entertaining for me in a live setting and my place of work partners to go looking your particular web site on a lowest thrice inside of a 7 days to learn throughout the new stuff you can have. And of course, I’m just always happy for hanging pointers individuals provide. Designated 2 tips inside this put up are really essentially the most amazing I’ve ever endured
I may deliver exhibit my passion for your specific understanding granting support to firmly people that requirement relief regarding that state of concern. Your special dedication to actually having the message all-around came to be incredibly vital and also has in every case activated women just like me to be over at their routines. This new inviting and sociable instruction indicates a good deal to me and pretty much excess to firmly my partners. Best wishes; from lots of people.
I am frequently to blogging and i genuinely appreciate your posts. The article has truly peaks my interest. I am going to bookmark your web page and keep checking deciding on particulars.
Oh my goodness! an amazing post dude. Appreciate it Even so I might be experiencing issue with ur rss . Don’t know why Can not enroll in it. Could there be any individual obtaining identical rss issue? Any one who knows kindly respond. Thnkx
Do you mind if I quote a couple of your posts as long as I provide credit and sources back to your weblog? My website is in the very same niche as yours and my visitors would really benefit from a lot of the information you provide here. Please let me know if this okay with you. Thank you!
“Friendship is Love without his wings!” ~ Lord Byron
Thanks for your share! very impressive!
Canada Goose Coats
Howdy, I will not know tips on how to increase a person’s websites in my rss or atom readership. Are you able to Assist with us, please
That i pay a visit to completely new web site everyday and i determined your site.
This categorically is this kind of a chaste resource that you are providing and also you exude it away in regard to categorically free.
Paintball has become one of the most pleasurable and adventurous games to play that I have ever come across in along time. There’s a really good reason why it has become so popular. If you have not tried it , then you don’t know what you are missing.
Fantastic beat ! I wish to apprentice while you amend your website, how can i subscribe for a blog web site? The account helped me a acceptable deal.I had been a little bit acquainted of this your broadcast provided bright clear concept
I haven’t checked in here for a while because I thought it was getting boring, but the last several posts are good quality so I guess I will add you back to my daily bloglist.You deserve it my friend
Cool post, just subscribed.
My hope is the idea that some parts of our community may possibly be interested in shared their scholarly styling possible presentation for the conference.
Many thanks your particular excellent job posting! I critically appreciated checking out it, you happen to be a terrific person responsible.I shall are certain that I bookmark your blog which enables you to return inside the foreseeable time to come. I want to encourage continue one’s excellent task, have got a pleasant day time!
I am really such as of this blog…will get answered competently as soon as you can. I’m really happy in addition to your writing competencies also with all the present on your web site. Is that this a paid for masquerade or have you customize it your own? Anyway sustain the nice high quality copy, it’s rare to ascertain an amazing blog of this nature one nowadays..