Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

[bin/crypt] putting water in the car

  • Loading branch information...
commit 59cb5dfade5fe8eaccef6ff8d45e28966312ebe7 1 parent d51648b
@masak authored
Showing with 34 additions and 0 deletions.
  1. +30 −0 bin/crypt
  2. +4 −0 game-data/descriptions
View
30 bin/crypt
@@ -1052,6 +1052,10 @@ class Crypt::Game {
'car',
-> $_ {
when 'leaves' { $!engine.remark: 'car-full-of-leaves' }
+ when 'water' {
+ $!engine.remark('car-is-now-wet'),
+ $!engine.place_thing('water', 'hill');
+ }
};
# Things on hill
@@ -2509,6 +2513,32 @@ multi MAIN('test') {
'picking up water with your bare hands fails';
}
+ {
+ my $game = game_from_hall();
+
+ $game.use('flashlight');
+ $game.take('helmet');
+ $game.walk('north');
+ $game.walk('north');
+ $game.put_thing_in('water', 'helmet');
+ $game.walk('west');
+ is $game.put_thing_in('water', 'car'),
+ [
+ Adventure::PlayerPutIn.new(
+ :thing<water>,
+ :in<car>,
+ ),
+ Adventure::GameRemarked.new(
+ :remark<car-is-now-wet>,
+ ),
+ Adventure::ThingPlaced.new(
+ :thing<water>,
+ :room<hill>,
+ ),
+ ],
+ 'putting water into the car';
+ }
+
done;
}
View
4 game-data/descriptions
@@ -80,3 +80,7 @@ The whole floor tips back, hiding the hole again.
== remark:bare-hands-carry-water
Your bare hands aren't very good at carrying water.
+
+== remark:car-is-now-wet
+What doesn't discolor the seats collects in miserable little puddles on the
+floor mats.
Please sign in to comment.
Something went wrong with that request. Please try again.