Update to serial 200329
[homeland.git] / src / objects / intro / sidewalk.inf
1 ! Copyright (C) 2019 Jason Self <j@jxself.org>
2 !
3 ! This file is free software: you may copy, redistribute and/or
4 ! modify it under the terms of the GNU Affero General Public License
5 ! as published by the Free Software Foundation, either version 3 of
6 ! the License, or (at your option) any later version.
7 !
8 ! This file is distributed in the hope that it will be useful, but
9 ! WITHOUT ANY WARRANTY; without even the implied warranty of
10 ! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
11 ! Affero General Public License for more details.
12 !
13 ! You should have received a copy of the GNU Affero General Public
14 ! License along with this file. If not, see https://gnu.org/licenses/
15
16 Object  Sidewalk "Sidewalk"
17   with  description 
18             "You are standing on the sidewalk of a very busy street 
19             in front of your house. It is barely cloudy and already 
20             hot this morning. Smaller branches of trees are in motion 
21             from the light wind, which helps to provide some relief 
22             from the heat. Your home is to the west. Your neighbor's 
23             home is to the northwest.",
24         n_to 
25             "Some inconsiderate person parked their car on the 
26             sidewalk which blocks your path. It might be nice to call 
27             Parking Enforcement so they can get a ticket for creating 
28             an obstruction but you don't have a phone.",
29         s_to 
30             "You arrive at an intersection. Lots of traffic drives 
31             past at high speed creating a small breeze that makes your 
32             shirt ripple. You decide it is better to not risk being 
33             run over and go back.",
34         e_to 
35             "As you start to step out into the street a car quickly 
36             zooms by at high speed. You jump back to avoid becoming 
37             part of the pavement.",
38         se_to 
39             "As you start to step out into the street a car honks 
40             impatiently for you to get out of the way. You go back to 
41             your old spot.",
42         ne_to 
43             "The street is very busy. Surely you'd be hit by a moving 
44             vehicle if you went there.",
45         nw_to frontporch,
46         sw_to "A rock wall blocks your path.",
47         w_to frontdoor,
48   has   light;
49
50 Object  sun "sun" sidewalk
51   with  name 'sun',
52         found_in sidewalk backyard,
53   has   scenery;
54
55 Object  clouds "clouds" sidewalk
56   with  name 'cloud' 'clouds',
57         found_in sidewalk backyard,
58   has   scenery;
59
60 Object  tree "tree" sidewalk
61   with  name 'tree' 'trees' 'evergreen' 'evergreen' 'leaves' 'leaf',
62         found_in sidewalk backyard campsite,
63         description 
64             "Standing strong, majestic and tall, as if reaching for 
65             the sky. There are countless numbers of sun-drenched 
66             leaves, each a deep green.",
67         before [;
68           Climb:
69             print_ret 
70                 "Despite your best efforts you're not able to. 
71                 There's no branch low enough to grab.";
72           Taste:
73             print_ret "It tastes like wood.";
74           Touch:
75             print_ret "The trunk of the free feels rough to the touch.";
76           Take, Pull, Push, PushDir, Turn:
77             print_ret 
78                 "The tree is firmly anchored into the ground by a 
79                 healthy root system. It's not going anywhere.";
80           Drink:
81             print_ret "The tree is not a liquid.";
82           Blow:
83             print_ret "You huff and you puff but nothing happens.";
84           Burn:
85             print_ret "Only you can prevent forest fires.";
86           Buy:
87             print_ret "The tree is not for sale.";
88           JumpOver:
89             print_ret 
90                 "Since when did you gain the ability to jump over 
91                 trees in a single bound?";
92         ],
93   has   scenery;
94
95 Object  street "street" sidewalk
96   with  name 'street' 'road',
97         description "It's your typical street.",
98   has   scenery;
99
100 Object  rockwall "rock wall" sidewalk
101   with  name 'rock' 'wall' 'stone' 'rock' 'boulder' 'stonework' 
102         'cobblestone' 'mortar' 'stones' 'rocks' 'walls',
103          description 
104             "Made up of assorted stones of various sizes and shapes, 
105             with a healthy dose of mortar between them to fill and 
106             seal the irregular gaps between them, it serves as a wall 
107             separating your property from someone else's.",
108   has   scenery;
109
110 Object  car "car" sidewalk
111   with  name 'car' 'vehicle' 'automobile',
112         description 
113             "It's a white two-door car. The license plate holder says 
114             FrobozzCo International.",
115         before [;
116           Unlock:
117             print_ret "The car is locked, and there is apparently no key.";
118           Open:
119             print_ret "The car is locked, and there is apparently no key.";
120           Climb:
121             print_ret 
122                 "I'm not sure that FrobozzCo International would 
123                 appreciate people climbing on one of their cars.";
124           Take:
125             print_ret 
126                 "I doubt that FrobozzCo International would 
127                 appreciate someone taking one of their cars.";
128           Pull, Push, PushDir, Turn:
129             print_ret (The) self, " is too heavy for that.";
130         ],
131   has   scenery;
132
133 Object  licenseplateframe "license plate holder" sidewalk
134   with  name 'license' 'plate' 'frame' 'holder',
135         description "It says FrobozzCo International in white letters 
136                     on a black frame.",
137         Before [;
138           Take, Pull, Push, PushDir, Turn:
139             print_ret (The) self, " is firmly attached to the car.";
140         ],
141   has   scenery;