diff --git a/desktop/src-common/advent/screens/rooms/common.clj b/desktop/src-common/advent/screens/rooms/common.clj
index 0ee7b8e1..4b8fa059 100644
--- a/desktop/src-common/advent/screens/rooms/common.clj
+++ b/desktop/src-common/advent/screens/rooms/common.clj
@@ -588,7 +588,9 @@
                        :ego "Hey!"
                        :ego "I won!")
 
-  (achievements/set-achievement "BLOODCLOT")
+  (if won?
+    (achievements/set-achievement "TONGUESBANE")
+    (achievements/set-achievement "MOUTH_DIVER"))
   (actions/glad entities)
   (actions/walk-straight-to entities :ego [340 95])
   (actions/run-action entities
diff --git a/desktop/src-common/advent/steam.clj b/desktop/src-common/advent/steam.clj
index a8111261..05790fd8 100644
--- a/desktop/src-common/advent/steam.clj
+++ b/desktop/src-common/advent/steam.clj
@@ -9,7 +9,7 @@
 (println "loading steam")
 
 (def is-app-store? false)
-(def all-achievements ["PARDON" "EX_CON" "PRO_WRESTLER" "SHEEP_HORDER" "SAFE_AND_SOUND" "DESTINY" "WISE_UP" "BLOODCLOT" "KITTY_KISS"])
+(def all-achievements ["PARDON" "EX_CON" "PRO_WRESTLER" "SHEEP_HORDER" "SAFE_AND_SOUND" "DESTINY" "WISE_UP" "TONGUESBANE" "KITTY_KISS" "BEHOLDER" "MOUTH_DIVER"])
 
 (defn clear-achievement [])