diff --git a/includes/Items.inf b/includes/Items.inf
index 8ce179a..f0376d0 100644
--- a/includes/Items.inf
+++ b/includes/Items.inf
@@ -5,3 +5,8 @@ Decoration poster "Starfleet recruitment poster" bunk
         with before [;
              Take: print_ret (The) self, " is stuck on the ceiling.";
         ];
+
+Decoration red_alert "Red alert"
+    with daemon [;
+        "A red alert sounds";
+    ];
\ No newline at end of file
diff --git a/includes/Rooms.inf b/includes/Rooms.inf
index 54baa67..9c83f7d 100644
--- a/includes/Rooms.inf
+++ b/includes/Rooms.inf
@@ -8,4 +8,7 @@ Room bunk "your bunk" lower_decks
     with name 'bunk' 'bunks',
       description "Your bunk is like every other bunk on the lower decks.^
            It's barely big enough to fit you. But it's home.",
+      after [;
+          Exit: StopDaemon(red_alert);
+      ],
     has proper enterable container static ~open ~light;
diff --git a/remontel.inf b/remontel.inf
index 06c9781..8cf8023 100644
--- a/remontel.inf
+++ b/remontel.inf
@@ -32,6 +32,7 @@ Include "Items.inf";
     player.description = "You are wearing an operations uniform,
             with a single pip.";
     move computer to bunk;
+    StartDaemon(red_alert);
 ];
 
 Include "Grammar";