Как установить привязку клавиш, чтобы сделать Emacs таким прозрачным / непрозрачным, как я хочу?

Я хочу, чтобы в Emacs была команда, чтобы сделать ее настолько непрозрачной / прозрачной, насколько я хочу (обратитесь к сказочномувопрос что в Emacs возможна прозрачность, аEmacsWiki ссылка на страницу с кодом, который я использую ниже).

Код EmacsWiki устанавливает «C-c t» для включения и выключения ранее установленной прозрачности:

;;(set-frame-parameter (selected-frame) 'alpha '(<active> [<inactive>]))  
(set-frame-parameter (selected-frame) 'alpha '(85 50))  
(add-to-list 'default-frame-alist '(alpha 85 50))

enter code here(eval-when-compile (require 'cl))  
(defun toggle-transparency ()  
(interactive)  
(if (/= 
    (cadr (find 'alpha (frame-parameters nil) :key #'car)) 
    100)  
   (set-frame-parameter nil 'alpha '(100 100))
 (set-frame-parameter nil 'alpha '(85 60))))  
 (global-set-key (kbd "C-c t") 'toggle-transparency)

То, что я хотел бы сделать, это иметь возможность выбрать% прозрачности, когда я нахожусь в Emacs.

Если это возможно, мне нужна команда, в которой я набираю, например, «C-c t N» (где N -% непрозрачности) для активного кадра, а затем «M-c t N» для неактивного окна.

Если это не может быть сделано таким образом, то, возможно, команда, где, если я наберу «Cc t», он запрашивает у меня номер, который дает непрозрачность активного окна (и то же самое для неактивного окна, использующего «Mc t») ,

Спасибо заранее за ваше время :)

Ниже приведены лишь некоторые комментарии, которые не важны для ответа на вопрос, если вы не заинтересованы:

Я действительно хочу этого, потому что когда я сказал своему руководителю, что изучаю Emacs, он сказал, что TexShop намного лучше и что я использую программное обеспечение 80-х годов. Я рассказал ему о чудесах Emacs, и он сказал, что в TexShop есть все и даже больше. Я сопоставил все, что он мне показал, за исключением прозрачности (хотя он не мог сопоставить предварительный просмотр внутри Emacs из preview-latex). Я нашел вещь прозрачности случайно, и теперь я хочу показать ему правила Emacs!

Я полагаю, что для некоторых из вас это будет просто пирогом, и хотя я смог бы сделать это, если бы потратил достаточно времени, пытаясь выучить шутки или читать, я не программист и использую только Emacs и Mac на неделю. Я уже потерян как есть! Так что заранее спасибо за ваше время и помощь - я выучу шучу в конце концов!

Редактировать: Мой руководитель использует TextMate, а не TeXShop. Теперь это имеет больше смысла?

Ответы на вопрос(1)

Ваш ответ на вопрос