JMichaelTX JMichaelTX

## Evernote Mac File Import.AppleScript
property ptyScriptName : "Import Selected Files Selected in Finder into Evernote with Tags"
property ptyScriptVer : "3.1" -- Add support for Tag Input
property ptyScriptDate : "2018-10-12"
property ptyScriptAuthor : "JMichaelTX"
property version : ptyScriptVer
property LF : linefeed
property ptyENicon : path to resource "Evernote.icns" in bundle (path to application "Evernote")

(*
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

## Create Internet Location File from EN Note.applescript
property ptyScriptName : "Create Internet Location File from EN Note"
property ptyScriptVer : "2.0"
property ptyScriptDate : "2018-03-29"
property ptyScriptAuthor : "JMichaelTX"

(*
--~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
REQUIRED:
  1.  macOS 10.11.6+
  2.  Mac Applications

## Get List of Finder Tags.applescript
(*
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Get List of Finder Tags
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
DATE:    2018-03-19
AUTHOR: ShaneStanley with minor mod by JMichaelTX
REF:
  • How Can I get a List of All Finder Tags?
    • Late Night Software Ltd.,
  • http://forum.latenightsw.com/t/how-can-i-get-a-list-of-all-finder-tags/1192/2?u=jmichaeltx

## revealPFItemInFinder.applescript
--~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
on revealPFItemInFinder()
  --–––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––
  (*  VER: 2.1    2018-03-19
    PURPOSE:  Reveal Item in Finder that is Selected in Path Finder

    RETURNS:  alias of item selected in both Finder and Path Finder

    AUTHOR:  JMichaelTX
  --–––––––––––––––––––––––––––––––––––––––––––––––––––––––––––––

## Set Evernote Mac Font and Text Size using AppleScript.AppleScript
property ptyScriptName : "Set EN Mac Font Name and Size"
property ptyScriptVer : "2.0"
property ptyScriptDate : "2017-06-12"
property ptyScriptAuthor : "JMichaelTX"
property LF : linefeed

use AppleScript version "2.4" -- Yosemite (10.10) or later
use scripting additions

my enSetFontAndSize("Courier New", "14")

## Add Prefix Suffix to Note Titles.applescript
(*
===============================================================================
  Add Prefix or Suffix to Selected Note Titles
===============================================================================

VER:   1.0    LAST UPDATE:   2017-04-17
AUTHOR:  JMichaelTX

USE AT YOUR OWN RISK.
This script has had only VERY LIMITED TESTING.

## Create Hyperlink with Custom Protocol from Selected Text.applescript
property gstrScriptName : "Create Hyperlink with Custom Protocol from Selected Text"
property gstrScriptVer : "1.0.1"
property gstrScriptDate : "Mon, Nov 16, 2015"
(*
——————————————————————————————————————————————————
PURPOSE:

    • Based on the User's selection, create and put on Clipboard:
      • RTF formatted Hyperlink
      • This supports custom URL Schemes/Protocols not supported by Evernote

## EN Mac Append Note OR Create New Note (AS).applescript
(*
===============================================================================
  Append to Existing Note OR Create New Note
===============================================================================

VER:   1.2    LAST UPDATE:   2016-07-05

PURPOSE:
  • Search for Existing Note by Title and Notebook
  • IF found, append HTML

## Copy & Get Selection to Clipboard JXA.js
'use strict';

var app = Application.currentApplication()
app.includeStandardAdditions = true

var mySelection = copySelection("Safari", 1)
mySelection

//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
function copySelection(pAppName, pTimeLimitSec) {

## EN Mac Create Note from Text in Delimiters.applescript
(*
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  [EN] Extract Text in Delimiters (AS)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

VER:   1.3  LAST UPDATE:   2016-06-13

PURPOSE:
  • Extract text in delimited from all Notes in Specified Notebook