a lot of progress on the screenshot approach.
This commit is contained in:
@@ -15,4 +15,29 @@
|
||||
:chapter-4 "Tick the Ex-con"
|
||||
:chapter-5 "Slingshot Stew"})
|
||||
|
||||
(defn default-screenshot [state]
|
||||
(let [answers {:inside-house "screenshots/inside-house.png"
|
||||
:inside-stash "screenshots/inside-stash.png"
|
||||
:outside-house {:day "screenshots/outside-house-day.png"
|
||||
:night "screenshots/outside-house-night.png"}
|
||||
:behind-house {:day "screenshots/behind-house-day.png"
|
||||
:night "screenshots/behind-house-night.png"}
|
||||
:cat-tree {:day "screenshots/cat-tree-day.png"
|
||||
:night "screenshots/cat-tree-night.png"}
|
||||
:inside-castle {:day "screenshots/inside-castle-day.png"
|
||||
:night "screenshots/inside-castle-night.png"}
|
||||
:space "screenshots/duel.png"
|
||||
:held "screenshots/held.png"
|
||||
:inside-cafeteria "screenshots/cafeteria.png"
|
||||
:inside-antique "screenshots/inside-antique.png"
|
||||
:inside-jail "screenshots/inside-jail.png"
|
||||
:dream "screenshots/dream.png"
|
||||
:castle-gate "screenshots/castle-gate.png"
|
||||
:outside-jail {:day "screenshots/fountain-day.png"
|
||||
:night "screenshots/fountain-night.png"}
|
||||
:outside-castle {:day "screenshots/outside-castle-day.png"
|
||||
:night "screenshots/outside-castle-night.png"}}]
|
||||
(get-in answers [(:last-room state) (:time state)]
|
||||
(get-in answers [(:last-room state)]))))
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user