Skip to content

Latest commit

 

History

History
93 lines (57 loc) · 2 KB

readme.org

File metadata and controls

93 lines (57 loc) · 2 KB

我的快捷指令 English

笔记

文件夹说明

我写的快捷指令保存在 Shortcuts 文件夹内。

我使用的快捷指令保存在 collection 文件夹内。

我修改的快捷指令保存在 modified 文件夹内。

导入导出

带有扩展名/文件格式 shortcut 的文件是由 快捷指令.app 导出的。 同样的,快捷指令也支持以这种文件格式导入。macOS 预览功能也支持这种格式。

导入导出方法:

  1. 打开快捷指令.app
  2. 点击菜单栏“文件”
  3. 点击“导入…”或“导出…”

我写的快捷指令

OCR Selected Area

搭配 Emacs 使用

;; Siri Shortcuts: OCR
;; {{{
(defun my/siri-ocr ()
  (interactive)
  (shell-command "shortcuts run \"OCR Selected Area\"")
  (do-applescript "tell application id \"org.gnu.Emacs\" to activate")
  )
(keymap-global-set "C-c M-o" #'my/siri-ocr)
;; }}}

Translate File

搭配 Emacs 使用

;; Siri Shortcuts: Translate
;; {{{
(add-to-list 'display-buffer-alist
  (cons "\\*Async Shell Command\\*.*" (cons #'display-buffer-no-window nil)))
(defun my/siri-translate ()
  (interactive)
  (let ((tempfile
         (make-temp-file "siri-translate-" nil ".txt") ; temp file
	 ))
    (write-region (format "%s" (thing-at-point 'paragraph)) nil tempfile)
    (shell-command (format "shortcuts run \"Translate File\" -i %s &" tempfile))
    )
  (do-applescript "tell application id \"org.gnu.Emacs\" to activate")
  )
(keymap-global-set "C-c t" #'my/siri-translate)
;; }}}

我修改的快捷指令

我使用的快捷指令

杂项

有用的网站

routinehub

Shortcuts Gallery - 少数派

捷径盒

捷径社区

捷径库

MacStories