diff --git a/forest/forest.fasl b/forest/forest.fasl index 91a0b52..36956c5 100644 Binary files a/forest/forest.fasl and b/forest/forest.fasl differ diff --git a/forest/forest.lisp b/forest/forest.lisp index 2903590..27ae641 100644 --- a/forest/forest.lisp +++ b/forest/forest.lisp @@ -94,7 +94,7 @@ ;;; The tree (defcell tree - (tile :initform "tree-1") + (tile :initform (car (one-of '("tree-2" "tree-2" "tree-2" "tree-3")))) (description :initform "These trees are still green. Perhaps the land is coming back?") (categories :initform '(:obstacle :opaque :nosnow :exclusive))) diff --git a/forest/herb.png b/forest/herb.png index a5c0770..ff70bdf 100644 Binary files a/forest/herb.png and b/forest/herb.png differ