… | |
… | |
29 | |
29 | |
30 | #include "cfperl.h" |
30 | #include "cfperl.h" |
31 | #include "shstr.h" |
31 | #include "shstr.h" |
32 | |
32 | |
33 | typedef int tag_t; |
33 | typedef int tag_t; |
34 | #define NUM_BODY_LOCATIONS 12 |
34 | |
35 | #define BODY_ARMS 1 |
35 | enum { |
|
|
36 | body_range, |
|
|
37 | body_shield, |
|
|
38 | body_combat, |
|
|
39 | body_arm, |
|
|
40 | body_torso, |
|
|
41 | body_head, |
|
|
42 | body_neck, |
|
|
43 | body_skill, |
|
|
44 | body_finger, |
|
|
45 | body_shoulder, |
|
|
46 | body_foot, |
|
|
47 | body_hand, |
|
|
48 | body_wrist, |
|
|
49 | body_waist, |
|
|
50 | NUM_BODY_LOCATIONS |
|
|
51 | }; |
36 | |
52 | |
37 | /* See common/item.c */ |
53 | /* See common/item.c */ |
38 | |
54 | |
39 | typedef struct Body_Locations |
55 | typedef struct Body_Locations |
40 | { |
56 | { |
… | |
… | |
89 | /* However, if you're keeping a pointer of some sort, you probably |
105 | /* However, if you're keeping a pointer of some sort, you probably |
90 | * don't just want it copied, so you'll need to add to common/object.C, |
106 | * don't just want it copied, so you'll need to add to common/object.C, |
91 | * e.g. ->copy_to () |
107 | * e.g. ->copy_to () |
92 | */ |
108 | */ |
93 | |
109 | |
|
|
110 | struct body_slot |
|
|
111 | { |
|
|
112 | signed char info:4; /* body info as loaded from the file */ |
|
|
113 | signed char used:4; /* Calculated value based on items equipped */ |
|
|
114 | }; |
|
|
115 | |
94 | INTERFACE_CLASS (object) |
116 | INTERFACE_CLASS (object) |
95 | // these are being copied |
117 | // these are being copied |
96 | struct object_copy : attachable |
118 | struct object_copy : attachable |
97 | { |
119 | { |
98 | typedef bitset<NUM_FLAGS> flags_t; |
120 | typedef bitset<NUM_FLAGS> flags_t; |
99 | |
121 | |
100 | sint16 ACC (RW, x), ACC (RW, y); /* Position in the map for this object */ |
122 | sint16 ACC (RW, x), ACC (RW, y); /* Position in the map for this object */ |
|
|
123 | |
|
|
124 | uint8 ACC (RW, type); /* PLAYER, BULLET, etc. See define.h */ |
|
|
125 | uint8 ACC (RW, subtype); /* subtype of object */ |
101 | sint8 ACC (RW, direction); /* Means the object is moving that way. */ |
126 | sint8 ACC (RW, direction); /* Means the object is moving that way. */ |
102 | sint8 ACC (RW, facing); /* Object is oriented/facing that way. */ |
127 | sint8 ACC (RW, facing); /* Object is oriented/facing that way. */ |
|
|
128 | |
103 | shstr ACC (RW, name); /* The name of the object, obviously... */ |
129 | shstr ACC (RW, name); /* The name of the object, obviously... */ |
104 | shstr ACC (RW, name_pl); /* The plural name of the object */ |
130 | shstr ACC (RW, name_pl); /* The plural name of the object */ |
105 | shstr ACC (RW, title); /* Of foo, etc */ |
131 | shstr ACC (RW, title); /* Of foo, etc */ |
106 | shstr ACC (RW, race); /* human, goblin, dragon, etc */ |
132 | shstr ACC (RW, race); /* human, goblin, dragon, etc */ |
107 | shstr ACC (RW, slaying); /* Which race to do double damage to */ |
133 | shstr ACC (RW, slaying); /* Which race to do double damage to */ |
… | |
… | |
121 | object_ptr ACC (RW, spell); /* Spell that was being cast */ |
147 | object_ptr ACC (RW, spell); /* Spell that was being cast */ |
122 | object_ptr ACC (RW, current_weapon); /* Pointer to the weapon currently used */ |
148 | object_ptr ACC (RW, current_weapon); /* Pointer to the weapon currently used */ |
123 | arch_ptr ACC (RW, arch); /* Pointer to archetype */ |
149 | arch_ptr ACC (RW, arch); /* Pointer to archetype */ |
124 | arch_ptr ACC (RW, other_arch);/* Pointer used for various things - mostly used for what */ |
150 | arch_ptr ACC (RW, other_arch);/* Pointer used for various things - mostly used for what */ |
125 | |
151 | |
126 | facetile *ACC (RW, face); /* Face with colors */ |
|
|
127 | float ACC (RW, speed); /* The overall speed of this object */ |
152 | float ACC (RW, speed); /* The overall speed of this object */ |
128 | float ACC (RW, speed_left); /* How much speed is left to spend this round */ |
153 | float ACC (RW, speed_left); /* How much speed is left to spend this round */ |
129 | uint32 ACC (RW, nrof); /* How many of the objects */ |
154 | uint32 ACC (RW, nrof); /* How many of the objects */ |
130 | |
155 | |
131 | /* This next big block are basically used for monsters and equipment */ |
156 | /* This next big block are basically used for monsters and equipment */ |
132 | uint8 ACC (RW, type); /* PLAYER, BULLET, etc. See define.h */ |
|
|
133 | uint8 ACC (RW, subtype); /* subtype of object */ |
|
|
134 | uint16 ACC (RW, client_type); /* Public type information. see doc/Developers/objects */ |
157 | uint16 ACC (RW, client_type); /* Public type information. see doc/Developers/objects */ |
|
|
158 | |
135 | sint16 ACC (RW, resist[NROFATTACKS]); /* Resistance adjustments for attacks */ |
159 | sint16 ACC (RW, resist[NROFATTACKS]); /* Resistance adjustments for attacks */ |
136 | uint32 ACC (RW, attacktype); /* Bitmask of attacks this object does */ |
160 | uint32 ACC (RW, attacktype); /* Bitmask of attacks this object does */ |
137 | uint32 ACC (RW, path_attuned);/* Paths the object is attuned to */ |
161 | uint32 ACC (RW, path_attuned);/* Paths the object is attuned to */ |
138 | uint32 ACC (RW, path_repelled); /* Paths the object is repelled from */ |
162 | uint32 ACC (RW, path_repelled); /* Paths the object is repelled from */ |
139 | uint32 ACC (RW, path_denied); /* Paths the object is denied access to */ |
163 | uint32 ACC (RW, path_denied); /* Paths the object is denied access to */ |
… | |
… | |
158 | sint32 ACC (RW, weight_limit);/* Weight-limit of object */ |
182 | sint32 ACC (RW, weight_limit);/* Weight-limit of object */ |
159 | sint32 ACC (RW, carrying); /* How much weight this object contains */ |
183 | sint32 ACC (RW, carrying); /* How much weight this object contains */ |
160 | sint64 ACC (RW, perm_exp); /* Permanent exp */ |
184 | sint64 ACC (RW, perm_exp); /* Permanent exp */ |
161 | uint32 ACC (RW, weapontype); /* type of weapon */ |
185 | uint32 ACC (RW, weapontype); /* type of weapon */ |
162 | uint32 ACC (RW, tooltype); /* type of tool or build facility */ |
186 | uint32 ACC (RW, tooltype); /* type of tool or build facility */ |
163 | sint8 ACC (RW, body_info[NUM_BODY_LOCATIONS]); /* body info as loaded from the file */ |
187 | body_slot slot [NUM_BODY_LOCATIONS]; |
164 | sint8 ACC (RW, body_used[NUM_BODY_LOCATIONS]); /* Calculated value based on items equipped */ |
188 | faceidx ACC (RW, face); /* Face with colors */ |
165 | living ACC (RO, stats); /* Str, Con, Dex, etc */ |
189 | living ACC (RO, stats); /* Str, Con, Dex, etc */ |
166 | /* See the pod/objects.pod for more info about body locations */ |
190 | /* See the pod/objects.pod for more info about body locations */ |
167 | |
191 | |
168 | /* Following mostly refers to fields only used for monsters */ |
192 | /* Following mostly refers to fields only used for monsters */ |
169 | uint32 ACC (RW, hide); /* The object is hidden, not invisible */ |
193 | uint32 ACC (RW, hide); /* The object is hidden, not invisible */ |
… | |
… | |
179 | * Note that other fields are used - these files are basically |
203 | * Note that other fields are used - these files are basically |
180 | * only used in spells. |
204 | * only used in spells. |
181 | */ |
205 | */ |
182 | sint16 ACC (RW, duration); /* How long the spell lasts */ |
206 | sint16 ACC (RW, duration); /* How long the spell lasts */ |
183 | sint16 ACC (RW, casting_time);/* time left before spell goes off */ |
207 | sint16 ACC (RW, casting_time);/* time left before spell goes off */ |
|
|
208 | |
184 | uint16 ACC (RW, start_holding); |
209 | uint16 ACC (RW, start_holding); |
185 | uint8 ACC (RW, duration_modifier); /* how level modifies duration */ |
210 | uint8 ACC (RW, duration_modifier); /* how level modifies duration */ |
186 | uint8 ACC (RW, dam_modifier); /* How going up in level effects damage */ |
211 | uint8 ACC (RW, dam_modifier); /* How going up in level effects damage */ |
|
|
212 | |
187 | sint8 ACC (RW, range); /* Range of the spell */ |
213 | sint8 ACC (RW, range); /* Range of the spell */ |
188 | uint8 ACC (RW, range_modifier); /* How going up in level effects range */ |
214 | uint8 ACC (RW, range_modifier); /* How going up in level effects range */ |
189 | |
|
|
190 | MoveType ACC (RW, move_type); /* Type of movement this object uses */ |
215 | MoveType ACC (RW, move_type); /* Type of movement this object uses */ |
191 | MoveType ACC (RW, move_block);/* What movement types this blocks */ |
216 | MoveType ACC (RW, move_block);/* What movement types this blocks */ |
|
|
217 | |
192 | MoveType ACC (RW, move_allow);/* What movement types explicitly allowd */ |
218 | MoveType ACC (RW, move_allow);/* What movement types explicitly allowd */ |
193 | MoveType ACC (RW, move_on); /* Move types affected moving on to this space */ |
219 | MoveType ACC (RW, move_on); /* Move types affected moving on to this space */ |
194 | MoveType ACC (RW, move_off); /* Move types affected moving off this space */ |
220 | MoveType ACC (RW, move_off); /* Move types affected moving off this space */ |
195 | MoveType ACC (RW, move_slow); /* Movement types this slows down */ |
221 | MoveType ACC (RW, move_slow); /* Movement types this slows down */ |
|
|
222 | |
196 | float ACC (RW, move_slow_penalty); /* How much this slows down the object */ |
223 | float ACC (RW, move_slow_penalty); /* How much this slows down the object */ |
197 | |
224 | |
198 | char *ACC (RW, spellarg); |
225 | char *ACC (RW, spellarg); |
199 | |
226 | |
200 | /* Following are values used by any object */ |
227 | /* Following are values used by any object */ |
201 | /* this objects turns into or what this object creates */ |
228 | /* this objects turns into or what this object creates */ |
202 | treasurelist *ACC (RW, randomitems); /* Items to be generated */ |
229 | treasurelist *ACC (RW, randomitems); /* Items to be generated */ |
203 | key_value *key_values; /* Fields not explictly known by the loader. */ |
|
|
204 | flags_t flag; /* various flags */ |
230 | flags_t flag; /* various flags */ |
205 | #if FOR_PERL |
231 | #if FOR_PERL |
206 | bool ACC (RW, flag[NUM_FLAGS]); |
232 | bool ACC (RW, flag[NUM_FLAGS]); |
207 | #endif |
233 | #endif |
208 | uint16 ACC (RW, animation_id);/* An index into the animation array */ |
234 | uint16 ACC (RW, animation_id);/* An index into the animation array */ |
… | |
… | |
238 | * This is typically the container that the object is in. |
264 | * This is typically the container that the object is in. |
239 | */ |
265 | */ |
240 | object *ACC (RW, more); /* Pointer to the rest of a large body of objects */ |
266 | object *ACC (RW, more); /* Pointer to the rest of a large body of objects */ |
241 | object *head; /* Points to the main object of a large body */ // NO ACC, perl semantics are different |
267 | object *head; /* Points to the main object of a large body */ // NO ACC, perl semantics are different |
242 | client_container *seen_by; // seen by which player/container currently? |
268 | client_container *seen_by; // seen by which player/container currently? |
|
|
269 | key_value *key_values; /* Fields not explictly known by the loader. */ |
243 | |
270 | |
244 | bool parse_kv (object_thawer &f); // parse kv pairs, (ab-)used by archetypes, which should not exist at all |
271 | bool parse_kv (object_thawer &f); // parse kv pairs, (ab-)used by archetypes, which should not exist at all |
|
|
272 | void post_load_check (); // do some adjustments after parsing |
245 | static object *read (object_thawer &f, maptile *map = 0); // map argument due to toal design bogosity, must go. |
273 | static object *read (object_thawer &f, maptile *map = 0); // map argument due to toal design bogosity, must go. |
246 | bool write (object_freezer &f); |
274 | bool write (object_freezer &f); |
247 | |
275 | |
248 | MTH static object *create (); |
276 | MTH static object *create (); |
|
|
277 | object &operator =(const object &src); |
249 | MTH void copy_to (object *dst); |
278 | MTH void copy_to (object *dst); |
250 | MTH object *clone (); // create + copy_to |
279 | MTH object *clone (); // create + copy_to |
251 | void do_destroy (); |
280 | void do_destroy (); |
252 | void gather_callbacks (AV *&callbacks, event_type event) const; |
281 | void gather_callbacks (AV *&callbacks, event_type event) const; |
253 | MTH void destroy (bool destroy_inventory = false); |
282 | MTH void destroy (bool destroy_inventory = false); |
… | |
… | |
260 | { |
289 | { |
261 | if (!flag [FLAG_REMOVED]) |
290 | if (!flag [FLAG_REMOVED]) |
262 | do_remove (); |
291 | do_remove (); |
263 | } |
292 | } |
264 | |
293 | |
|
|
294 | // move this object to the top of its env's inventory to speed up |
|
|
295 | // searches for it. |
|
|
296 | MTH void inv_splay () |
|
|
297 | { |
|
|
298 | if (env && env->inv != this) |
|
|
299 | { |
|
|
300 | if (above) above->below = below; |
|
|
301 | if (below) below->above = above; |
|
|
302 | |
|
|
303 | above = 0; |
|
|
304 | below = env->inv; |
|
|
305 | below->above = this; |
|
|
306 | env->inv = this; |
|
|
307 | } |
|
|
308 | } |
|
|
309 | |
265 | static bool can_merge_slow (object *op1, object *op2); |
310 | static bool can_merge_slow (object *op1, object *op2); |
266 | |
311 | |
267 | // this is often used in time-critical code, so optimise |
312 | // this is often used in time-critical code, so optimise |
268 | MTH static bool can_merge (object *op1, object *op2) |
313 | MTH static bool can_merge (object *op1, object *op2) |
269 | { |
314 | { |
… | |
… | |
272 | && can_merge_slow (op1, op2); |
317 | && can_merge_slow (op1, op2); |
273 | } |
318 | } |
274 | |
319 | |
275 | MTH void set_owner (object *owner); |
320 | MTH void set_owner (object *owner); |
276 | MTH void set_speed (float speed); |
321 | MTH void set_speed (float speed); |
|
|
322 | MTH void set_weapon (object *ob); |
277 | |
323 | |
278 | MTH void open_container (object *new_container); |
324 | MTH void open_container (object *new_container); |
279 | MTH void close_container () |
325 | MTH void close_container () |
280 | { |
326 | { |
281 | open_container (0); |
327 | open_container (0); |
… | |
… | |
293 | MTH void drain_specific_stat (int deplete_stats); |
339 | MTH void drain_specific_stat (int deplete_stats); |
294 | MTH void change_luck (int value); |
340 | MTH void change_luck (int value); |
295 | |
341 | |
296 | // info must hold 256 * 3 bytes currently |
342 | // info must hold 256 * 3 bytes currently |
297 | const char *debug_desc (char *info) const; |
343 | const char *debug_desc (char *info) const; |
298 | MTH const char *debug_desc () const; |
344 | MTH const char *debug_desc () const; // uses at least 3 round-robin buffers |
299 | const char *debug_desc2 () const; // another debug_desc, pure convinience function |
|
|
300 | const char *flag_desc (char *desc, int len) const; |
345 | const char *flag_desc (char *desc, int len) const; |
301 | |
346 | |
302 | int number_of () const |
347 | int number_of () const |
303 | { |
348 | { |
304 | return nrof ? nrof : 1; |
349 | return nrof ? nrof : 1; |
… | |
… | |
330 | || (flag [FLAG_ALIVE] && !flag [FLAG_GENERATOR] && type != DOOR)) |
375 | || (flag [FLAG_ALIVE] && !flag [FLAG_GENERATOR] && type != DOOR)) |
331 | && !flag [FLAG_IS_A_TEMPLATE]; } |
376 | && !flag [FLAG_IS_A_TEMPLATE]; } |
332 | MTH bool is_arrow () const { return type == ARROW |
377 | MTH bool is_arrow () const { return type == ARROW |
333 | || (type == SPELL_EFFECT |
378 | || (type == SPELL_EFFECT |
334 | && (subtype == SP_BULLET || subtype == SP_MAGIC_MISSILE)); } |
379 | && (subtype == SP_BULLET || subtype == SP_MAGIC_MISSILE)); } |
|
|
380 | MTH bool is_range () const { return type == BOW || type == ROD || type == WAND || type == HORN; } |
335 | |
381 | |
336 | MTH bool has_active_speed () const { return FABS(speed) >= MIN_ACTIVE_SPEED; } |
382 | MTH bool has_active_speed () const { return FABS(speed) >= MIN_ACTIVE_SPEED; } |
337 | |
383 | |
338 | // temporary: wether the object can be saved in a map file |
384 | // temporary: wether the object can be saved in a map file |
339 | // contr => is a player |
385 | // contr => is a player |
… | |
… | |
360 | MTH object *head_ () |
406 | MTH object *head_ () |
361 | { |
407 | { |
362 | return head ? head : this; |
408 | return head ? head : this; |
363 | } |
409 | } |
364 | |
410 | |
|
|
411 | MTH std::string long_desc (object *who = 0); |
|
|
412 | MTH std::string describe_monster (object *who = 0); |
|
|
413 | MTH std::string describe_item (object *who = 0); |
|
|
414 | MTH std::string describe (object *who = 0); |
|
|
415 | |
|
|
416 | // If this object has no extra parts but should have them, |
|
|
417 | // add them, effectively expanding heads into multipart |
|
|
418 | // objects. This method only works on objects not inserted |
|
|
419 | // anywhere. |
|
|
420 | MTH void expand_tail (); |
|
|
421 | |
|
|
422 | MTH void create_treasure (treasurelist *tl, int flags = 0); |
|
|
423 | |
365 | // insert object at same map position as 'where' |
424 | // insert object at same map position as 'where' |
366 | // handles both inventory and map "positions" |
425 | // handles both inventory and map "positions" |
367 | MTH object *insert_at (object *where, object *originator = 0, int flags = 0); |
426 | MTH object *insert_at (object *where, object *originator = 0, int flags = 0); |
368 | |
427 | |
369 | MTH void activate (); |
428 | MTH void activate (); |
… | |
… | |
372 | MTH void deactivate_recursive (); |
431 | MTH void deactivate_recursive (); |
373 | |
432 | |
374 | // set the givne flag on all objects in the inventory recursively |
433 | // set the givne flag on all objects in the inventory recursively |
375 | MTH void set_flag_inv (int flag, int value = 1); |
434 | MTH void set_flag_inv (int flag, int value = 1); |
376 | |
435 | |
377 | void enter_exit (object *exit);//PERL |
436 | void enter_exit (object *exit);//Perl |
378 | MTH void enter_map (maptile *newmap, int x, int y); |
437 | MTH void enter_map (maptile *newmap, int x, int y); |
379 | |
438 | |
380 | // returns the mapspace this object is in |
439 | // returns the mapspace this object is in |
381 | mapspace &ms () const; |
440 | mapspace &ms () const; |
382 | |
441 | |
… | |
… | |
445 | |
504 | |
446 | extern objectvec objects; |
505 | extern objectvec objects; |
447 | extern activevec actives; |
506 | extern activevec actives; |
448 | |
507 | |
449 | #define for_all_objects(var) \ |
508 | #define for_all_objects(var) \ |
450 | for (int _i = 0; _i < objects.size (); ++_i) \ |
509 | for (unsigned _i = 0; _i < objects.size (); ++_i) \ |
451 | declvar (object *, var, objects [_i]) |
510 | declvar (object *, var, objects [_i]) |
452 | |
511 | |
453 | #define for_all_actives(var) \ |
512 | #define for_all_actives(var) \ |
454 | for (int _i = 0; _i < actives.size (); ++_i) \ |
513 | for (unsigned _i = 0; _i < actives.size (); ++_i) \ |
455 | declvar (object *, var, actives [_i]) |
514 | declvar (object *, var, actives [_i]) |
456 | |
515 | |
457 | typedef struct oblnk |
516 | typedef struct oblnk |
458 | { /* Used to link together several objects */ |
517 | { /* Used to link together several objects */ |
459 | object_ptr ob; |
518 | object_ptr ob; |
… | |
… | |
482 | archetype (); |
541 | archetype (); |
483 | ~archetype (); |
542 | ~archetype (); |
484 | void gather_callbacks (AV *&callbacks, event_type event) const; |
543 | void gather_callbacks (AV *&callbacks, event_type event) const; |
485 | |
544 | |
486 | static archetype *read (object_thawer &f); |
545 | static archetype *read (object_thawer &f); |
|
|
546 | static archetype *get (const char *name); // find or create |
487 | static archetype *find (const char *name); |
547 | static archetype *find (const char *name); |
488 | |
548 | |
489 | void hash_add (); // add to hashtable |
549 | void hash_add (); // add to hashtable |
490 | void hash_del (); // remove from hashtable |
550 | void hash_del (); // remove from hashtable |
491 | |
551 | |
… | |
… | |
493 | struct archetype *ACC (RW, next); /* Next archetype in a linked list */ |
553 | struct archetype *ACC (RW, next); /* Next archetype in a linked list */ |
494 | struct archetype *ACC (RW, head); /* The main part of a linked object */ |
554 | struct archetype *ACC (RW, head); /* The main part of a linked object */ |
495 | struct archetype *ACC (RW, more); /* Next part of a linked object */ |
555 | struct archetype *ACC (RW, more); /* Next part of a linked object */ |
496 | object ACC (RO, clone); /* An object from which to do ->copy_to () */ |
556 | object ACC (RO, clone); /* An object from which to do ->copy_to () */ |
497 | uint32 ACC (RW, editable); /* editable flags (mainly for editor) */ |
557 | uint32 ACC (RW, editable); /* editable flags (mainly for editor) */ |
|
|
558 | bool ACC (RW, linked); // linked into list of heads |
498 | sint8 ACC (RW, tail_x), ACC (RW, tail_y); /* Where the lower right most portion of the object is |
559 | sint8 ACC (RW, tail_x), ACC (RW, tail_y); /* Where the lower right most portion of the object is |
499 | * in comparison to the head. |
560 | * in comparison to the head. |
500 | */ |
561 | */ |
501 | }; |
562 | }; |
502 | |
563 | |
… | |
… | |
541 | #define INS_ON_TOP 0x0008 |
602 | #define INS_ON_TOP 0x0008 |
542 | #define INS_BELOW_ORIGINATOR 0x0010 |
603 | #define INS_BELOW_ORIGINATOR 0x0010 |
543 | #define INS_MAP_LOAD 0x0020 |
604 | #define INS_MAP_LOAD 0x0020 |
544 | |
605 | |
545 | #define ARCH_SINGULARITY "singularity" |
606 | #define ARCH_SINGULARITY "singularity" |
546 | #define ARCH_SINGULARITY_LEN 11 |
|
|
547 | #define ARCH_DETECT_MAGIC "detect_magic" |
607 | #define ARCH_DETECT_MAGIC "detect_magic" |
548 | #define ARCH_DEPLETION "depletion" |
608 | #define ARCH_DEPLETION "depletion" |
549 | #define ARCH_SYMPTOM "symptom" |
609 | #define ARCH_SYMPTOM "symptom" |
550 | |
610 | |
551 | #endif |
611 | #endif |