gistfile1.applescript

tell application "Evernote"
	
	set foundNotes to (get selection)
	
	--選択したノート数が２より小さい場合は弾く
	if (length of foundNotes) < 2 then
		display alert "二つ以上のノートを選択してください。"
		return
	end if

	repeat with i from 1 to (length of foundNotes)
		if i = 1 then
			set leftlink to "<a href=\"" & (note link of item (length of foundNotes) of foundNotes) & "\">≪" & (title of item (length of foundNotes) of foundNotes) & "</a>"
			set rightlink to "<a href=\"" & (note link of item (i + 1) of foundNotes) & "\">" & (title of item (i + 1) of foundNotes) & "≫</a>"
			
		else if i = (length of foundNotes) then
			set leftlink to "<a href=\"" & (note link of item (i - 1) of foundNotes) & "\">≪" & (title of item (i - 1) of foundNotes) & "</a>"
			set rightlink to "<a href=\"" & (note link of item 1 of foundNotes) & "\">" & (title of item 1 of foundNotes) & "≫</a>"
			
		else
			set leftlink to "<a href=\"" & (note link of item (i - 1) of foundNotes) & "\">≪" & (title of item (i - 1) of foundNotes) & "</a>"
			set rightlink to "<a href=\"" & (note link of item (i + 1) of foundNotes) & "\">" & (title of item (i + 1) of foundNotes) & "≫</a>"
		end if
		
		tell item i of foundNotes to append html "<BR>" & leftlink & "　　　　　" & rightlink
	end repeat
end tell