lsfalimis

#!/usr/bin/bash
for file in $1/*
do
	width=$(sips -g pixelWidth "$file" | cut -s -d ':' -f 2 | cut -c 2-)
	if (($width>720)); then
		sips --resampleWidth 720 "$file"
	fi
done

lsfalimis

(*
I changed some parts of http://foolsworkshop.com/applescript/2008/05/an-applescript-replace-text-method/
*)


on removeText(unwanted, theText)
	set prevTIDs to text item delimiters of AppleScript
	set text item delimiters of AppleScript to unwanted
	set theText to text items of theText
	

lsfalimis

(*
KM macro "Create TB Child Node" http://i.imgur.com/XMnf1bQ.png
KM macro "Create TB Node" http://i.imgur.com/zkDVSb9.png
They need to be put in a global macro group.

An item/node in Tinderbox 6 must be selected to get this AppleScript work.

The 'and' list that the AppleScript will work with looks like 'a, b, c, and d'.
So a list that looks like 'a, b, c and d' will not work.
*)

lsfalimis

import pprint, re, urllib, urllib2
from bs4 import BeautifulSoup


html = urllib2.urlopen('http://SOMEWEBSITE').read()
soup = BeautifulSoup(html)
stuff = soup(class_="WHATEVER")

# not quite understand the following line, it will insert '\n'
stuff.insert(0, stuff)

lsfalimis

import pprint, re, urllib
from bs4 import BeautifulSoup
from subprocess import check_output    

html = check_output(["pbpaste"])
soup = BeautifulSoup(html)
stuff = soup(class_="WHATEVER")

# not quite understand the following line, it will insert '\n'
stuff.insert(0, stuff)

lsfalimis

tell application "Finder"
	
	set theName to name of (theFile as alias)
	set AppleScript's text item delimiters to "."
	if number of text items of theName > 1 then
		set theName to text items 1 thru -2 of theName
	end if
	
	set theItems to ""
	repeat with i from 1 to count of theName

lsfalimis

defaults write com.apple.dock persistent-apps -array-add '{tile-data={}; tile-type="spacer-tile";}' && killall Dock

lsfalimis

tell application "Google Chrome"
	set theDate to current date
	set y to text -4 thru -1 of (year of theDate as string)
	set m to text -2 thru -1 of ("0" & ((month of theDate) as integer))
	set d to text -2 thru -1 of ("0" & (day of theDate))
	set timeStamp to y & "-" & m & "-" & d & " " & time string of (current date)
	
	set theTitle to title of active tab of first window
	set theURL to URL of active tab of first window
	

lsfalimis

tell application "Evernote"
	set _selectedNote to false
	set _notes to get every note of every notebook where its title contains "TARGETNOTE"
	repeat with _note in _notes
		if length of _note is not 0 then
			set _selectedNote to _note
		end if
	end repeat
	tell item 1 of _selectedNote to append text return & return & date string of (current date) & time string of (current date) & return
	tell item 1 of _selectedNote to append attachment theFile

lsfalimis

<?xml version="1.0"?>
<root>
    <!-- Next part belongs to lucifr https://gist.github.com/lucifr/4971978                                                        -->

	<item>
		<name>F19 to F19</name>
		<appendix>(F19 to Hyper (ctrl+shift+cmd+opt) + F19 Only, F19)</appendix>
		<identifier>private.f192f19</identifier>
		<autogen>
			--KeyOverlaidModifier--