Added (and finished) price.lisp to find the cost of tile