Skip to content

Instantly share code, notes, and snippets.

@takoeight0821 takoeight0821/lhtrpg.lisp
Last active Jun 25, 2016

Embed
What would you like to do?
lhtrpgをCommon 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
You can’t perform that action at this time.