Applescript for Omnifocus that outputs a string with a random due soon task, the number of due soon tasks, and number of flagged tasks

of.scpt

tell application "OmniFocus"
	tell front document
		-- Get the list of tasks
		set theDueTasks to every flattened task where its completed = false and due date is greater than (current date) and due date is less than (current date) + (7 * days)
		set theFlaggedTasks to every flattened task where its flagged = true and completed = false
		set dueCount to count of theDueTasks
		set flagCount to count of theFlaggedTasks
		if theDueTasks is not equal to {} then
			-- get a random number
			set randomNumber to (random number from 1 to dueCount)
			set currentTask to item randomNumber of theDueTasks
			set dueDate to due date of currentTask
			set reportText to " ☯ Due Soon: " & dueCount & " | ⚐ Flagged: " & flagCount & " | " & name of currentTask & " "
			return reportText
		end if
	end tell -- end tell front document
end tell -- end tell application "OmniFocus"