Implement introspection items

This commit is contained in:
2025-01-01 15:20:46 +00:00
parent dae0e0591c
commit 08685909be
11 changed files with 181 additions and 154 deletions
+1
View File
@@ -42,6 +42,7 @@ itemSPic it = case it ^. itType of
BULLETMOD{} -> defSPic
STICKYMOD -> defSPic
ITEMSCANNER -> defSPic
INTROSCAN {} -> defSPic
craftItemSPic :: CraftType -> Shape
craftItemSPic = \case