A small Haskell server for generating visual stories based on some ascertainable data about the requester.