some dnd stuff

This commit is contained in:
Chris Cochrun 2024-08-26 09:37:05 -05:00
parent 48ec2024a6
commit 0060ede50a
2 changed files with 14 additions and 0 deletions

View file

@ -5450,6 +5450,13 @@ Using emacs to run rpg things
#+begin_src emacs-lisp #+begin_src emacs-lisp
(add-to-list 'load-path "/home/chris/dev/emacs-rpgdm/") (add-to-list 'load-path "/home/chris/dev/emacs-rpgdm/")
(use-package rpgdm (use-package rpgdm
:config
(defun chris/dnd-skill-check (&optional skill)
"Roll for a skill check using skill or prompting for one."
(interactive)
(let* ((skills (org-table-get-remote-range "20240826T061454.312500:skills" "$I..II"))
(skill (if skill skill (completing-read "Which skill: " ))))))
:general :general
(chris/leader-keys (chris/leader-keys
:states 'normal :states 'normal

View file

@ -4015,6 +4015,13 @@ interfere with the default `bongo-playlist-buffer'."
(add-to-list 'load-path "/home/chris/dev/emacs-rpgdm/") (add-to-list 'load-path "/home/chris/dev/emacs-rpgdm/")
(use-package rpgdm (use-package rpgdm
:config
(defun chris/dnd-skill-check (&optional skill)
"Roll for a skill check using skill or prompting for one."
(interactive)
(let* ((skills (org-table-get-remote-range "20240826T061454.312500:skills" "$I..II"))
(skill (if skill skill (completing-read "Which skill: " ))))))
:general :general
(chris/leader-keys (chris/leader-keys
:states 'normal :states 'normal