|
|
|
|
@ -47,6 +47,17 @@
|
|
|
|
|
(insert "* games\n** beaten"))
|
|
|
|
|
(insert "\n** beaten"))))
|
|
|
|
|
|
|
|
|
|
(defun findhundred ()
|
|
|
|
|
"Find or create heading for completed games"
|
|
|
|
|
(filedate)
|
|
|
|
|
(goto-char (point-min))
|
|
|
|
|
(if (not (search-forward "** completed" nil t))
|
|
|
|
|
(if (not (search-forward "* games" nil t))
|
|
|
|
|
(progn
|
|
|
|
|
(goto-char (point-max))
|
|
|
|
|
(insert "* games\n** completed"))
|
|
|
|
|
(insert "\n** completed"))))
|
|
|
|
|
|
|
|
|
|
(defun findobtained ()
|
|
|
|
|
"Find or create heading for acquired games"
|
|
|
|
|
(filedate)
|
|
|
|
|
@ -142,10 +153,17 @@
|
|
|
|
|
theensemble)
|
|
|
|
|
|
|
|
|
|
(defun setvenue ()
|
|
|
|
|
"Get the venue where a performance happened"
|
|
|
|
|
(setq venues (s-split "\n" (f-read "~/Documents/drive/admin/emacs/venues.txt") t))
|
|
|
|
|
(setq thevenue (completing-read "Venue: " venues))
|
|
|
|
|
thevenue)
|
|
|
|
|
|
|
|
|
|
(defun setconsole ()
|
|
|
|
|
"Get the console a game is played on"
|
|
|
|
|
(setq consoles (s-split "\n" (f-read "~/Documents/drive/admin/emacs/consoles.txt") t))
|
|
|
|
|
(setq theconsole (completing-read "Console: " consoles))
|
|
|
|
|
theconsole)
|
|
|
|
|
|
|
|
|
|
(defun bookcalc ()
|
|
|
|
|
"Read in or calculate position in book"
|
|
|
|
|
(setq ispageno (y-or-n-p "Calculate percentage from page number?"))
|
|
|
|
|
@ -178,8 +196,8 @@
|
|
|
|
|
"* %^{Title} (%^{Year})%(therating)"
|
|
|
|
|
:jump-to-captured t)
|
|
|
|
|
("g" "Beat game" entry
|
|
|
|
|
(file+function "" findgame)
|
|
|
|
|
"* %^{Title}%(therating)"
|
|
|
|
|
(file+function "" findbeaten)
|
|
|
|
|
"* %^{Title} (%setconsole)"
|
|
|
|
|
:jump-to-captured t)
|
|
|
|
|
("m" "Musical performance" entry
|
|
|
|
|
(file+function "" findperf)
|
|
|
|
|
@ -187,11 +205,11 @@
|
|
|
|
|
:jump-to-captured t)
|
|
|
|
|
("n" "Gameplay progress" entry
|
|
|
|
|
(file+function "" findgaming)
|
|
|
|
|
"* %^{Title}\n%?"
|
|
|
|
|
"* %^{Title} (%(setconsole))\n%?"
|
|
|
|
|
:jump-to-captured t)
|
|
|
|
|
("o" "Obtained game" entry
|
|
|
|
|
(file+function "" findobtained)
|
|
|
|
|
"* %^{Title}"
|
|
|
|
|
"* %^{Title} (%(setconsole))"
|
|
|
|
|
:jump-to-captured t)
|
|
|
|
|
("p" "Visited place" entry
|
|
|
|
|
(file+function "" findvisited)
|
|
|
|
|
@ -200,6 +218,10 @@
|
|
|
|
|
("r" "Reading progress" entry
|
|
|
|
|
(file+function "" findreading)
|
|
|
|
|
"* %^{Author} /%^{Title}/\n%(bookcalc)%?"
|
|
|
|
|
:jump-to-captured t)
|
|
|
|
|
("1" "Completed game" entry
|
|
|
|
|
(file+function "" findhundred)
|
|
|
|
|
"* %^{Title} (%setconsole)"
|
|
|
|
|
:jump-to-captured t)))
|
|
|
|
|
|
|
|
|
|
(global-set-key (kbd "C-c c") #'org-capture)))
|
|
|
|
|
|
