ChristoferK

use application "System Events"


set _P to a reference to (processes whose class of menu bar 2 = menu bar)

name of _P --> A list of apps sitting in the menu bar
menu bar item 1 of menu bar 2 of _P --> Their icons

ChristoferK

# Note: «class isot» cannot be coerced to text
get the ((current date) as «class isot» as string)
	--> "2018-03-28T14:52:26"

ChristoferK

use application "System Events"


on directories of directory without contents
	local contents
	
	
	tell (a reference to the POSIX path of every folder in ¬
		the folder named directory) to if contents then
		

ChristoferK

ObjC.import('stdlib');
ObjC.import('Foundation');

__NSString__ = $.NSString.stringWithString.bind($.NSString);
ObjC.bindFunction('objc_copyClassList', ['void**', ['int']]);
ObjC.bindFunction('class_getName', ['char *', ['void*']]);
ObjC.bindFunction('class_getSuperclass', ['void*', ['void*']]);
ObjC.bindFunction('class_isMetaClass', ['bool *', ['void*']]);

i          = 0; // Counter variable

ChristoferK

property S : a reference to application "Safari"

global W

on run input -- input is a list of URLs
	if (count input) is 0 then ¬
		set the input to {¬
			"alfredapp.com", ¬
			"stackoverflow", ¬
			"google.co.uk"}

ChristoferK

A series of command declarations that surplant the builtin definitions of some common AppleScript commands to increase versatility and functionality:

• do shell script Supply the shell command string optionally as a list of strings that will be concatenated and delimited using a space character

• load script Use scripts stored in text files that can be referenced by posix paths utilising ~/, or any other type of AppleScript file reference (e.g. POSIX file, file, alias)

• offset Return a list of all offsets of a substring. Includes recursive and iterative routines, the latter being the most efficient.

ChristoferK

to clickMenuItem(pObj, mItems as list)
	local pObj, mItems
	
	if mItems = {} then return
	
	script menuItem
		use application "System Events"
		
		property m0 : item 1 of mItems
		property mN : rest of mItems

ChristoferK

to factorise(x)
	script
		property lim : x ^ 0.5
		property P : primes(lim) & getNextPrime(lim)
		property L : {}
	end script
	
	tell the result
		repeat with p0 in its P
			repeat until (x mod p0) ≠ 0

ChristoferK

windows = Application('Safari').windows()
windows.shift() // Remove front window from array

windows.map(w=>w.miniaturized = true)

ChristoferK

Keybase proof

I hereby claim:

• I am ChristoferK on github.
• I am christoferk (https://keybase.io/christoferk) on keybase.
• I have a public key whose fingerprint is B621 0876 4E7A 713C F8F3 EC3A FD7A BF5E 1AB1 49E2

To claim this, I am signing this object: