(in-package :lispostory)

(defparameter *chronostory-map-url-format* "https://chronostory.onrender.com/api/map-info?mapId=~a")
(defparameter *chronostory-gacha-search-format* "https://chronostory.onrender.com/api/gacha-search?itemId=~a")
(defparameter *chronostory-gacha-url-format "https://chronostory.onrender.com/api/gacha-items?gachaId=~a")

(serapeum:comment
 (reload-mob-data)

 (defvar foo nil)
 (setf foo (serapeum/bundle:random-elt *chronostory-mobs*))
 *chronostory-drops*

 (serapeum:filter-map
   (lambda (m)
     (when (= (parse-integer (gethash "DROPPERID" m))
              (parse-integer (serapeum:href foo "mob" "mob_id")))
       (gethash "ITEMNAME" m)))
   (coerce *chronostory-drops* 'list)))


; (sb-ext:save-lisp-and-die "my-prog" :toplevel #'show-mobs :executable t)