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.

41 line
1.2KB

  1. #|
  2. When I started this file I was going to generalize EVERY method then I
  3. realized that's too time consuming. So I am going to generalize
  4. methods as they conflict. Hybrid Power!
  5. There were some issues with merging symbols, I was using
  6. :SHADOWING-IMPORT-FROM which is probably not correct. So instead, what
  7. we do, is, every package that gets :USE-REEXPORTed, we :USE
  8. #:CL-DECK-BUILDER2.MODELS.GENERICS.
  9. |#
  10. (in-package #:cl-deck-builder2.models.generics)
  11. ;; Get the NAME slot of an object
  12. (defgeneric name-of (obj))
  13. ;; Get the PASSCODE slot of an object
  14. (defgeneric ygo-passcode-of (obj))
  15. ;; Get the Containing Deck ID of the DECK-ITEM, CONSTRUCTED-DECK-ITEM
  16. (defgeneric deck-id-of (obj))
  17. ;; Get the PRICE slot of an object
  18. (defgeneric ygo-price-of (obj))
  19. (defgeneric ygo-archetype-of (obj))
  20. (defgeneric ygo-atk-of (obj))
  21. (defgeneric ygo-attribute-of (obj))
  22. (defgeneric ygo-def-of (obj))
  23. (defgeneric ygo-description-of (obj))
  24. (defgeneric ygo-frame-type-of (obj))
  25. (defgeneric ygo-level-of (obj))
  26. (defgeneric ygo-linkmarkers-of (obj))
  27. (defgeneric ygo-linkval-of (obj))
  28. (defgeneric ygo-passcode-of (obj))
  29. (defgeneric ygo-race-of (obj))
  30. (defgeneric ygo-scale-of (obj))
  31. (defgeneric ygo-type-of (obj))