first actual commit

This commit is contained in:
Hane 2024-07-05 02:06:35 +02:00
commit 90ce863297
25 changed files with 1668 additions and 0 deletions

15
.emacs.d/roleplay.el Normal file
View file

@ -0,0 +1,15 @@
(setq rp-color-MIU "#AA60AA")
;(replace-regexp "\\(?:^\\|[-]\\s-*\\)MIU:\\(.*:\\s-)\\(.+?\\)\\($\\|\\s-+[-]\\s-+\\)" (concat "<font style=\"color:" rp-color-miu "\"> \\2 </font>\\3"))
(defun xess ()
(interactive)
(message "%s" (eval(intern-soft "rp-color-MIU")))
)
(defun rp-dialogue ()
(interactive)
(setq last-point (point))
(move-beginning-of-line 1)
(replace-regexp "\\(?:^\\|[-]\\s-*\\)\\(.*\\): \\(.+?\\)\\($\\|\\s-+[-]\\s-+\\)" (concat "<font style=\"color:"(eval(intern-soft "rp-color-\\\\\\1"))"\">\\2 </font>\\3"))
(goto-char last-point)
)