Yu-Gi-Oh! Deck Building and Card Inventory Management web interface written in Common Lisp, utilizing HTMX.
Du kan inte välja fler än 25 ämnen Ämnen måste starta med en bokstav eller siffra, kan innehålla bindestreck ('-') och vara max 35 tecken långa.

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