… | |
… | |
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 | |
34 | #define NUM_BODY_LOCATIONS 12 |
35 | #define NUM_BODY_LOCATIONS 12 |
35 | #define BODY_ARMS 1 |
36 | #define BODY_ARMS 1 |
36 | |
37 | |
37 | /* See common/item.c */ |
38 | /* See common/item.c */ |
38 | |
39 | |
… | |
… | |
121 | object_ptr ACC (RW, spell); /* Spell that was being cast */ |
122 | object_ptr ACC (RW, spell); /* Spell that was being cast */ |
122 | object_ptr ACC (RW, current_weapon); /* Pointer to the weapon currently used */ |
123 | object_ptr ACC (RW, current_weapon); /* Pointer to the weapon currently used */ |
123 | arch_ptr ACC (RW, arch); /* Pointer to archetype */ |
124 | arch_ptr ACC (RW, arch); /* Pointer to archetype */ |
124 | arch_ptr ACC (RW, other_arch);/* Pointer used for various things - mostly used for what */ |
125 | arch_ptr ACC (RW, other_arch);/* Pointer used for various things - mostly used for what */ |
125 | |
126 | |
126 | facetile *ACC (RW, face); /* Face with colors */ |
|
|
127 | float ACC (RW, speed); /* The overall speed of this object */ |
127 | 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 */ |
128 | float ACC (RW, speed_left); /* How much speed is left to spend this round */ |
129 | uint32 ACC (RW, nrof); /* How many of the objects */ |
129 | uint32 ACC (RW, nrof); /* How many of the objects */ |
130 | |
130 | |
131 | /* This next big block are basically used for monsters and equipment */ |
131 | /* This next big block are basically used for monsters and equipment */ |
… | |
… | |
160 | sint64 ACC (RW, perm_exp); /* Permanent exp */ |
160 | sint64 ACC (RW, perm_exp); /* Permanent exp */ |
161 | uint32 ACC (RW, weapontype); /* type of weapon */ |
161 | uint32 ACC (RW, weapontype); /* type of weapon */ |
162 | uint32 ACC (RW, tooltype); /* type of tool or build facility */ |
162 | 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 */ |
163 | sint8 ACC (RW, body_info[NUM_BODY_LOCATIONS]); /* body info as loaded from the file */ |
164 | sint8 ACC (RW, body_used[NUM_BODY_LOCATIONS]); /* Calculated value based on items equipped */ |
164 | sint8 ACC (RW, body_used[NUM_BODY_LOCATIONS]); /* Calculated value based on items equipped */ |
|
|
165 | faceidx ACC (RW, face); /* Face with colors */ |
165 | living ACC (RO, stats); /* Str, Con, Dex, etc */ |
166 | living ACC (RO, stats); /* Str, Con, Dex, etc */ |
166 | /* See the pod/objects.pod for more info about body locations */ |
167 | /* See the pod/objects.pod for more info about body locations */ |
167 | |
168 | |
168 | /* Following mostly refers to fields only used for monsters */ |
169 | /* Following mostly refers to fields only used for monsters */ |
169 | uint32 ACC (RW, hide); /* The object is hidden, not invisible */ |
170 | uint32 ACC (RW, hide); /* The object is hidden, not invisible */ |
… | |
… | |
198 | char *ACC (RW, spellarg); |
199 | char *ACC (RW, spellarg); |
199 | |
200 | |
200 | /* Following are values used by any object */ |
201 | /* Following are values used by any object */ |
201 | /* this objects turns into or what this object creates */ |
202 | /* this objects turns into or what this object creates */ |
202 | treasurelist *ACC (RW, randomitems); /* Items to be generated */ |
203 | 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 */ |
204 | flags_t flag; /* various flags */ |
205 | #if FOR_PERL |
205 | #if FOR_PERL |
206 | bool ACC (RW, flag[NUM_FLAGS]); |
206 | bool ACC (RW, flag[NUM_FLAGS]); |
207 | #endif |
207 | #endif |
208 | uint16 ACC (RW, animation_id);/* An index into the animation array */ |
208 | uint16 ACC (RW, animation_id);/* An index into the animation array */ |
… | |
… | |
229 | object *ACC (RW, above); /* Pointer to the object stacked above this one */ |
229 | object *ACC (RW, above); /* Pointer to the object stacked above this one */ |
230 | /* Note: stacked in the *same* environment */ |
230 | /* Note: stacked in the *same* environment */ |
231 | object *inv; /* Pointer to the first object in the inventory */ |
231 | object *inv; /* Pointer to the first object in the inventory */ |
232 | |
232 | |
233 | //TODO: container must move into client |
233 | //TODO: container must move into client |
234 | object *ACC (RW, container); /* Current container being used. I think this |
234 | object_ptr ACC (RW, container); /* Current container being used. I think this |
235 | * is only used by the player right now. |
235 | * is only used by the player right now. |
236 | */ |
236 | */ |
237 | object *ACC (RW, env); /* Pointer to the object which is the environment. |
237 | object *ACC (RW, env); /* Pointer to the object which is the environment. |
238 | * This is typically the container that the object is in. |
238 | * This is typically the container that the object is in. |
239 | */ |
239 | */ |
240 | object *ACC (RW, more); /* Pointer to the rest of a large body of objects */ |
240 | 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 |
241 | 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? |
242 | client_container *seen_by; // seen by which player/container currently? |
|
|
243 | key_value *key_values; /* Fields not explictly known by the loader. */ |
|
|
244 | |
|
|
245 | bool parse_kv (object_thawer &f); // parse kv pairs, (ab-)used by archetypes, which should not exist at all |
|
|
246 | static object *read (object_thawer &f, maptile *map = 0); // map argument due to toal design bogosity, must go. |
|
|
247 | bool write (object_freezer &f); |
243 | |
248 | |
244 | MTH static object *create (); |
249 | MTH static object *create (); |
|
|
250 | object &operator =(const object &src); |
245 | MTH void copy_to (object *dst); |
251 | MTH void copy_to (object *dst); |
246 | MTH object *clone (); // create + copy_to |
252 | MTH object *clone (); // create + copy_to |
247 | void do_destroy (); |
253 | void do_destroy (); |
248 | void gather_callbacks (AV *&callbacks, event_type event) const; |
254 | void gather_callbacks (AV *&callbacks, event_type event) const; |
249 | MTH void destroy (bool destroy_inventory = false); |
255 | MTH void destroy (bool destroy_inventory = false); |
… | |
… | |
269 | } |
275 | } |
270 | |
276 | |
271 | MTH void set_owner (object *owner); |
277 | MTH void set_owner (object *owner); |
272 | MTH void set_speed (float speed); |
278 | MTH void set_speed (float speed); |
273 | |
279 | |
|
|
280 | MTH void open_container (object *new_container); |
|
|
281 | MTH void close_container () |
|
|
282 | { |
|
|
283 | open_container (0); |
|
|
284 | } |
|
|
285 | |
274 | MTH void instantiate () |
286 | MTH void instantiate (); |
275 | { |
|
|
276 | if (!uuid.seq) // HACK |
|
|
277 | uuid = gen_uuid (); |
|
|
278 | |
|
|
279 | attachable::instantiate (); |
|
|
280 | } |
|
|
281 | |
287 | |
282 | // recalculate all stats |
288 | // recalculate all stats |
283 | MTH void update_stats (); |
289 | MTH void update_stats (); |
284 | MTH void roll_stats (); |
290 | MTH void roll_stats (); |
285 | MTH void swap_stats (int a, int b); |
291 | MTH void swap_stats (int a, int b); |
… | |
… | |
289 | MTH void drain_specific_stat (int deplete_stats); |
295 | MTH void drain_specific_stat (int deplete_stats); |
290 | MTH void change_luck (int value); |
296 | MTH void change_luck (int value); |
291 | |
297 | |
292 | // info must hold 256 * 3 bytes currently |
298 | // info must hold 256 * 3 bytes currently |
293 | const char *debug_desc (char *info) const; |
299 | const char *debug_desc (char *info) const; |
294 | MTH const char *debug_desc () const; |
300 | MTH const char *debug_desc () const; // uses at least 3 round-robin buffers |
295 | const char *debug_desc2 () const; // another debug_desc, pure convinience function |
|
|
296 | const char *flag_desc (char *desc, int len) const; |
301 | const char *flag_desc (char *desc, int len) const; |
297 | |
302 | |
298 | int number_of () const |
303 | int number_of () const |
299 | { |
304 | { |
300 | return nrof ? nrof : 1; |
305 | return nrof ? nrof : 1; |
… | |
… | |
304 | { |
309 | { |
305 | return weight * number_of (); |
310 | return weight * number_of (); |
306 | } |
311 | } |
307 | |
312 | |
308 | // return the dominant material of this item, always return something |
313 | // return the dominant material of this item, always return something |
309 | materialtype_t *dominant_material () const; |
314 | const materialtype_t *dominant_material () const; |
310 | |
315 | |
|
|
316 | // return the volume of this object in cm³ |
311 | uint64 volume () const |
317 | uint64 volume () const |
312 | { |
318 | { |
313 | return total_weight () / dominant_material ()->density; |
319 | return total_weight () |
|
|
320 | * 1000 |
|
|
321 | * (type == CONTAINER ? 1000 : 1) |
|
|
322 | / dominant_material ()->density; |
314 | } |
323 | } |
315 | |
324 | |
316 | MTH bool is_weapon () const { return type == ARROW || type == BOW || type == WEAPON; } |
325 | MTH bool is_weapon () const { return type == ARROW || type == BOW || type == WEAPON; } |
317 | MTH bool is_armor () const { return type == ARMOUR || type == SHIELD || type == HELMET |
326 | MTH bool is_armor () const { return type == ARMOUR || type == SHIELD || type == HELMET |
318 | || type == CLOAK || type == BOOTS || type == GLOVES |
327 | || type == CLOAK || type == BOOTS || type == GLOVES |
… | |
… | |
352 | MTH object *head_ () |
361 | MTH object *head_ () |
353 | { |
362 | { |
354 | return head ? head : this; |
363 | return head ? head : this; |
355 | } |
364 | } |
356 | |
365 | |
|
|
366 | MTH std::string long_desc (object *who = 0); |
|
|
367 | MTH std::string describe_monster (object *who = 0); |
|
|
368 | MTH std::string describe_item (object *who = 0); |
|
|
369 | MTH std::string describe (object *who = 0); |
|
|
370 | |
|
|
371 | // If this object has no extra parts but should have them, |
|
|
372 | // add them, effectively expanding heads into multipart |
|
|
373 | // objects. This method only works on objects not inserted |
|
|
374 | // anywhere. |
|
|
375 | MTH void expand_tail (); |
|
|
376 | |
|
|
377 | MTH void create_treasure (treasurelist *tl, int flags = 0); |
|
|
378 | |
357 | // insert object at same map position as 'where' |
379 | // insert object at same map position as 'where' |
358 | // handles both inventory and map "positions" |
380 | // handles both inventory and map "positions" |
359 | MTH object *insert_at (object *where, object *originator = 0, int flags = 0); |
381 | MTH object *insert_at (object *where, object *originator = 0, int flags = 0); |
360 | |
382 | |
361 | MTH void activate (); |
383 | MTH void activate (); |
… | |
… | |
364 | MTH void deactivate_recursive (); |
386 | MTH void deactivate_recursive (); |
365 | |
387 | |
366 | // set the givne flag on all objects in the inventory recursively |
388 | // set the givne flag on all objects in the inventory recursively |
367 | MTH void set_flag_inv (int flag, int value = 1); |
389 | MTH void set_flag_inv (int flag, int value = 1); |
368 | |
390 | |
369 | void enter_exit (object *exit);//PERL |
391 | void enter_exit (object *exit);//Perl |
370 | MTH void enter_map (maptile *newmap, int x, int y); |
392 | MTH void enter_map (maptile *newmap, int x, int y); |
371 | |
393 | |
372 | // returns the mapspace this object is in |
394 | // returns the mapspace this object is in |
373 | mapspace &ms () const; |
395 | mapspace &ms () const; |
374 | |
396 | |
… | |
… | |
437 | |
459 | |
438 | extern objectvec objects; |
460 | extern objectvec objects; |
439 | extern activevec actives; |
461 | extern activevec actives; |
440 | |
462 | |
441 | #define for_all_objects(var) \ |
463 | #define for_all_objects(var) \ |
442 | for (int _i = 0; _i < objects.size (); ++_i) \ |
464 | for (unsigned _i = 0; _i < objects.size (); ++_i) \ |
443 | declvar (object *, var, objects [_i]) |
465 | declvar (object *, var, objects [_i]) |
444 | |
466 | |
445 | #define for_all_actives(var) \ |
467 | #define for_all_actives(var) \ |
446 | for (int _i = 0; _i < actives.size (); ++_i) \ |
468 | for (unsigned _i = 0; _i < actives.size (); ++_i) \ |
447 | declvar (object *, var, actives [_i]) |
469 | declvar (object *, var, actives [_i]) |
448 | |
470 | |
449 | typedef struct oblnk |
471 | typedef struct oblnk |
450 | { /* Used to link together several objects */ |
472 | { /* Used to link together several objects */ |
451 | object_ptr ob; |
473 | object_ptr ob; |
… | |
… | |
473 | { |
495 | { |
474 | archetype (); |
496 | archetype (); |
475 | ~archetype (); |
497 | ~archetype (); |
476 | void gather_callbacks (AV *&callbacks, event_type event) const; |
498 | void gather_callbacks (AV *&callbacks, event_type event) const; |
477 | |
499 | |
|
|
500 | static archetype *read (object_thawer &f); |
|
|
501 | static archetype *get (const char *name); // find or create |
478 | static archetype *find (const char *name); |
502 | static archetype *find (const char *name); |
479 | |
503 | |
480 | void hash_add (); // add to hashtable |
504 | void hash_add (); // add to hashtable |
481 | void hash_del (); // remove from hashtable |
505 | void hash_del (); // remove from hashtable |
482 | |
506 | |
… | |
… | |
484 | struct archetype *ACC (RW, next); /* Next archetype in a linked list */ |
508 | struct archetype *ACC (RW, next); /* Next archetype in a linked list */ |
485 | struct archetype *ACC (RW, head); /* The main part of a linked object */ |
509 | struct archetype *ACC (RW, head); /* The main part of a linked object */ |
486 | struct archetype *ACC (RW, more); /* Next part of a linked object */ |
510 | struct archetype *ACC (RW, more); /* Next part of a linked object */ |
487 | object ACC (RO, clone); /* An object from which to do ->copy_to () */ |
511 | object ACC (RO, clone); /* An object from which to do ->copy_to () */ |
488 | uint32 ACC (RW, editable); /* editable flags (mainly for editor) */ |
512 | uint32 ACC (RW, editable); /* editable flags (mainly for editor) */ |
|
|
513 | bool ACC (RW, linked); // linked into list of heads |
489 | sint8 ACC (RW, tail_x), ACC (RW, tail_y); /* Where the lower right most portion of the object is |
514 | sint8 ACC (RW, tail_x), ACC (RW, tail_y); /* Where the lower right most portion of the object is |
490 | * in comparison to the head. |
515 | * in comparison to the head. |
491 | */ |
516 | */ |
492 | }; |
517 | }; |
493 | |
518 | |
… | |
… | |
532 | #define INS_ON_TOP 0x0008 |
557 | #define INS_ON_TOP 0x0008 |
533 | #define INS_BELOW_ORIGINATOR 0x0010 |
558 | #define INS_BELOW_ORIGINATOR 0x0010 |
534 | #define INS_MAP_LOAD 0x0020 |
559 | #define INS_MAP_LOAD 0x0020 |
535 | |
560 | |
536 | #define ARCH_SINGULARITY "singularity" |
561 | #define ARCH_SINGULARITY "singularity" |
537 | #define ARCH_SINGULARITY_LEN 11 |
|
|
538 | #define ARCH_DETECT_MAGIC "detect_magic" |
562 | #define ARCH_DETECT_MAGIC "detect_magic" |
539 | #define ARCH_DEPLETION "depletion" |
563 | #define ARCH_DEPLETION "depletion" |
540 | #define ARCH_SYMPTOM "symptom" |
564 | #define ARCH_SYMPTOM "symptom" |
541 | |
565 | |
542 | #endif |
566 | #endif |