| … | |
… | |
| 86 | cf::NDI_RED |
86 | cf::NDI_RED |
| 87 | ); |
87 | ); |
| 88 | # kill them. |
88 | # kill them. |
| 89 | # reminds me of the famous badness 10000 syndrome... |
89 | # reminds me of the famous badness 10000 syndrome... |
| 90 | $ob->stats->hp (-10000); #] if they survive this they deserved to live |
90 | $ob->stats->hp (-10000); #] if they survive this they deserved to live |
| 91 | $pl->killer ("cave-in"); |
91 | $pl->killer ("a cave-in"); |
| 92 | } else { |
92 | } else { |
| 93 | $ob->message ( |
93 | $ob->message ( |
| 94 | "You didn't use a bed to reality to leave this realm, leaving your body in great danger. " |
94 | "You didn't use a bed to reality to leave this realm, leaving your body in great danger. " |
| 95 | . "Fortunately, some friendly dwellers found you, checked your passport, and brought you to safety. " |
95 | . "Fortunately, some friendly dwellers found you, checked your passport, and brought you to safety. " |
| 96 | . "Better use a savebed next time, much worse things could have happened... " |
96 | . "Better use a savebed next time, much worse things could have happened... " |
