gist embed

I just noticed that you can embed gists by pasting the url to the gist into the post editor on a line of its own. This uses the shortcode module of the Jetpack plugin so you need to Active the plugin and then the shortcode module.

this example is an applescript that creates auto-complete gifs for google searches. Not something many folk would need.

–needs gifsicle
— updated for retina screen
set thetext to text returned of (display dialog "What do you want to autocomplete?" default answer "I hate")
set theFileName to change_case_of(thetext, "lower") & ".gif"
set tempdir to POSIX path of (path to temporary items from user domain) & "autogifs/"
do shell script "mkdir " & tempdir
end try
set alphabet to {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z"}
set vowels to "aeiou"
tell application "Safari"
tell application "System Events"
tell process "Safari"
click menu item "New Private Window" of menu "File" of menu bar 1
end tell
end tell
set bounds of window 1 to {0, 0, 800, 600}
set the URL of the front document to ""
delay 5
tell application "System Events"
keystroke thetext
end tell
repeat with letter in alphabet
set typing to " " & letter
set tfile to tempdir & letter & ".gif"
tell application "System Events"
keystroke typing
delay 1
do shell script "screencapture -t GIF " & tfile
keystroke (ASCII character 8)
keystroke (ASCII character 8)
end tell
end repeat
end tell
if isRetina() then
do shell script "/usr/local/bin/gifsicle –delay 90 –colors 128 –loopcount –crop 0,200+1600×320 –resize 800×160 " & tempdir & "* > ~/Desktop/" & theFileName
do shell script "/usr/local/bin/gifsicle –delay 90 –colors 128 –loopcount —crop 0,100+800×160 " & tempdir & "* > ~/Desktop/" & theFileName
end if
–clean up
do shell script "rm -rf " & tempdir
–do shell script "open " & tempdir
on isRetina()
set ret to (do shell script "system_profiler SPDisplaysDataType | awk '/Retina:/{print $2}'")
if ret is "Yes" then
return true
return false
end if
end isRetina
on change_case_of(this_text, this_case)
if this_case is "lower" then
set the comparison_string to "ABCDEFGHIJKLMNOPQRSTUVWXYZ "
set the source_string to "abcdefghijklmnopqrstuvwxyz_"
set the comparison_string to "abcdefghijklmnopqrstuvwxyz"
set the source_string to "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
end if
set the new_text to ""
repeat with thisChar in this_text
set x to the offset of thisChar in the comparison_string
if x is not 0 then
set the new_text to (the new_text & character x of the source_string) as string
set the new_text to (the new_text & thisChar) as string
end if
end repeat
return the new_text
end change_case_of

view raw
hosted with ❤ by GitHub

Author: John Johnston

I am a teacher, currently working in Banton Primary for North Lanarkshire Council. I also act as Product Owner/provide support for Glow Blogs.

Leave a Reply

Your email address will not be published. Required fields are marked *