Yu-Gi-Oh! Deck Building and Card Inventory Management web interface written in Common Lisp, utilizing HTMX.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

39 lines
1.6KB

  1. #|
  2. src/models/ygoprodeck.lisp
  3. Yu-Gi-Oh! Pro Deck JSON Importer v1
  4. Looks like this is old/outdated code and due to be deleted soon!
  5. |#
  6. (in-package #:cl-deck-builder2.models.ygoprodeck)
  7. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  8. ;; These models correspond to the YGOProDeck JSON dump. API Guide:
  9. ;; https://ygoprodeck.com/api-guide/
  10. (defclass ygo-info ()
  11. ((desc :accessor ygo-description-of :col-type :text)
  12. (frame-type :accessor ygo-frame-type-of :col-type :text)
  13. (type :accessor ygo-type-of :col-type :text)
  14. (passcode :accessor ygo-passcode-of :col-type :integer)
  15. (name :accessor name-of :col-type :text)
  16. (race :accessor ygo-race-of :col-type :text)
  17. (archetype :accessor ygo-archetype-of :col-type (or :text :null))
  18. (attribute :accessor ygo-attribute-of :col-type (or :text :null))
  19. (linkmarkers :accessor ygo-linkmarkers-of :col-type (or :text :null))
  20. (atk :accessor ygo-atk-of :col-type (or :integer :null))
  21. (def :accessor ygo-def-of :col-type (or :integer :null))
  22. (level :accessor ygo-level-of :col-type (or :integer :null))
  23. (linkval :accessor ygo-linkval-of :col-type (or :integer :null))
  24. (scale :accessor ygo-scale-of :col-type (or :integer :null)))
  25. (:metaclass registered-table-class))
  26. ;; banlist_info
  27. ;; card_images
  28. ;; card_prices
  29. ;; card_sets
  30. ;; jq '.[][]|{card_sets}|select( .card_sets != null )|.[][]' cardinfo.php