Skip to content

Instantly share code, notes, and snippets.

@takoeight0821

takoeight0821/lhtrpg.lisp

Last active June 25, 2016 09:18
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save takoeight0821/c70e66a4deda0bc85bb5 to your computer and use it in GitHub Desktop.
Save takoeight0821/c70e66a4deda0bc85bb5 to your computer and use it in GitHub Desktop.
Download ZIP
lhtrpgをCommon Lispでいじる
Raw
lhtrpg.lisp
(mapc #'ql:quickload
(list :drakma :jonathan))
(setq drakma:*drakma-default-external-format* :utf-8)
(pushnew '("application" . "json") drakma:*text-content-types* :test #'equal)
(defun dl-lhz (label)
(jonathan:parse (drakma:http-request (format nil "http://lhrpg.com/lhz/api/~a.json" label)) :as :hash-table))
(defparameter *skills* (dl-lhz "skills"))
(defparameter *items* (dl-lhz "items"))
(defparameter *prefixed-effects* (dl-lhz "prefixed_effects"))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment