; TODO: Generate from data? (local {: vm : say : deflevel} (require :game.defs)) (deflevel "game/map1.json" :map1) (vm:word :cat (say :cat "I'M A CAT")) (vm:word :fish (say :angryfish "I'M AN ANGRY FISH" "GRRRR")) (vm:word :pot (say :player "IT'S A POT.") (say :player "NOTHING UNUSUAL ABOUT IT.") (say :player "JUST AN ORDINARY POT.")) (vm:word :suspiciouspot (say :player "IT'S A POT.") (say :player "NOTHING UNUSUAL ABOUT IT.") (say :player "JUST AN ORDINARY POT.") (say :player "YEP, NOTHING SPECIAL HERE."))