Add selected Text as new Reminder in Reminders.app

Add as new Reminder.scpt

on run {input, parameters}
	-- This code comes from http://raduner.ch/blog/
	-- To be used with an Automator Service
	-- ------------------------------------------------
	set inputText to input as string
	
	tell application "Reminders"
		set newremin to make new reminder
		set name of newremin to inputText
	end tell
	return input
end run

AppleScript massively simplified by using the Reminders.app built-in AppleScript API instead of System Events