experiment with mapping drop data to mobs

main.lisp

@@ -4,4 +4,19 @@
 (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)