Update npc.lisp

Added constants, structure, and a predicate to help the structure.