1 | /* |
1 | /* |
2 | * This file is part of Crossfire TRT, the Roguelike Realtime MORPG. |
2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
3 | * |
3 | * |
4 | * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team |
4 | * Copyright (©) 2005,2006,2007,2008 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
5 | * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team |
5 | * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team |
6 | * Copyright (©) 1992,2007 Frank Tore Johansen |
6 | * Copyright (©) 1992,2007 Frank Tore Johansen |
7 | * |
7 | * |
8 | * Crossfire TRT is free software: you can redistribute it and/or modify |
8 | * Deliantra is free software: you can redistribute it and/or modify |
9 | * it under the terms of the GNU General Public License as published by |
9 | * it under the terms of the GNU General Public License as published by |
10 | * the Free Software Foundation, either version 3 of the License, or |
10 | * the Free Software Foundation, either version 3 of the License, or |
11 | * (at your option) any later version. |
11 | * (at your option) any later version. |
12 | * |
12 | * |
13 | * This program is distributed in the hope that it will be useful, |
13 | * This program is distributed in the hope that it will be useful, |
… | |
… | |
16 | * GNU General Public License for more details. |
16 | * GNU General Public License for more details. |
17 | * |
17 | * |
18 | * You should have received a copy of the GNU General Public License |
18 | * You should have received a copy of the GNU General Public License |
19 | * along with this program. If not, see <http://www.gnu.org/licenses/>. |
19 | * along with this program. If not, see <http://www.gnu.org/licenses/>. |
20 | * |
20 | * |
21 | * The authors can be reached via e-mail to <crossfire@schmorp.de> |
21 | * The authors can be reached via e-mail to <support@deliantra.net> |
22 | */ |
22 | */ |
23 | |
23 | |
24 | #include <global.h> |
24 | #include <global.h> |
25 | #include <funcpoint.h> |
|
|
26 | #include <living.h> |
25 | #include <living.h> |
27 | #include <spells.h> |
26 | #include <spells.h> |
|
|
27 | |
|
|
28 | const char *const coins[NUM_COINS + 1] = { "royalty", "platinacoin", "goldcoin", "silvercoin", 0 }; |
28 | |
29 | |
29 | /* the ordering of this is actually doesn't make a difference |
30 | /* the ordering of this is actually doesn't make a difference |
30 | * However, for ease of use, new entries should go at the end |
31 | * However, for ease of use, new entries should go at the end |
31 | * so those people that debug the code that get used to something |
32 | * so those people that debug the code that get used to something |
32 | * being in the location 4 don't get confused. |
33 | * being in the location 4 don't get confused. |
… | |
… | |
417 | */ |
418 | */ |
418 | const char * |
419 | const char * |
419 | query_weight (const object *op) |
420 | query_weight (const object *op) |
420 | { |
421 | { |
421 | static char buf[10]; |
422 | static char buf[10]; |
422 | sint32 i = (op->nrof ? op->nrof : 1) * op->weight + op->carrying; |
423 | sint32 i = op->total_weight (); |
423 | |
424 | |
424 | if (op->weight < 0) |
425 | if (op->weight < 0) |
425 | return " "; |
426 | return " "; |
426 | |
427 | |
427 | if (i % 1000) |
428 | if (i % 1000) |
… | |
… | |
491 | * from stats.sp - b.t. |
492 | * from stats.sp - b.t. |
492 | */ |
493 | */ |
493 | const char * |
494 | const char * |
494 | ring_desc (const object *op) |
495 | ring_desc (const object *op) |
495 | { |
496 | { |
496 | static char buf[VERY_BIG_BUF]; |
497 | static dynbuf_text buf; buf.clear (); |
497 | int attr, val, len; |
498 | int attr, val, len; |
498 | |
499 | |
499 | buf[0] = 0; |
|
|
500 | |
|
|
501 | if (!QUERY_FLAG (op, FLAG_IDENTIFIED)) |
500 | if (QUERY_FLAG (op, FLAG_IDENTIFIED)) |
502 | return buf; |
501 | { |
503 | |
|
|
504 | for (attr = 0; attr < NUM_STATS; attr++) |
502 | for (attr = 0; attr < NUM_STATS; attr++) |
505 | { |
|
|
506 | if ((val = op->stats.stat (attr))) |
503 | if ((val = op->stats.stat (attr))) |
507 | sprintf (buf + strlen (buf), "(%s%+d)", short_stat_name[attr], val); |
504 | buf.printf ("(%s%+d)", short_stat_name[attr], val); |
508 | } |
|
|
509 | |
505 | |
510 | if (op->stats.exp) |
506 | if (op->stats.exp) buf.printf ("(speed %+lld)", (long long)op->stats.exp); |
511 | sprintf (buf + strlen (buf), "(speed %+lld)", (long long) op->stats.exp); |
507 | if (op->stats.wc) buf.printf ("(wc%+d)", op->stats.wc); |
512 | if (op->stats.wc) |
508 | if (op->stats.dam) buf.printf ("(dam%+d)", op->stats.dam); |
513 | sprintf (buf + strlen (buf), "(wc%+d)", op->stats.wc); |
509 | if (op->stats.ac) buf.printf ("(ac%+d)", op->stats.ac); |
514 | if (op->stats.dam) |
|
|
515 | sprintf (buf + strlen (buf), "(dam%+d)", op->stats.dam); |
|
|
516 | if (op->stats.ac) |
|
|
517 | sprintf (buf + strlen (buf), "(ac%+d)", op->stats.ac); |
|
|
518 | |
510 | |
519 | strcat (buf, describe_resistance (op, 0)); |
511 | buf << describe_resistance (op, 0); |
520 | |
512 | |
521 | if (op->stats.food != 0) |
513 | if (op->stats.food) buf.printf ("(sustenance%+d)", op->stats.food); |
522 | sprintf (buf + strlen (buf), "(sustenance%+d)", op->stats.food); |
514 | if (op->stats.grace) buf.printf ("(grace%+d)", op->stats.grace); |
523 | /* else if (op->stats.food < 0) |
515 | if (op->stats.sp && op->type != SKILL) buf.printf ("(magic%+d)", op->stats.sp); |
524 | sprintf(buf+strlen(buf), "(hunger%+d)", op->stats.food); */ |
516 | if (op->stats.hp) buf.printf ("(regeneration%+d)", op->stats.hp); |
525 | if (op->stats.grace) |
517 | if (op->stats.luck) buf.printf ("(luck%+d)", op->stats.luck); |
526 | sprintf (buf + strlen (buf), "(grace%+d)", op->stats.grace); |
|
|
527 | if (op->stats.sp && op->type != SKILL) |
|
|
528 | sprintf (buf + strlen (buf), "(magic%+d)", op->stats.sp); |
|
|
529 | if (op->stats.hp) |
|
|
530 | sprintf (buf + strlen (buf), "(regeneration%+d)", op->stats.hp); |
|
|
531 | if (op->stats.luck) |
|
|
532 | sprintf (buf + strlen (buf), "(luck%+d)", op->stats.luck); |
|
|
533 | if (QUERY_FLAG (op, FLAG_LIFESAVE)) |
|
|
534 | strcat (buf, "(lifesaving)"); |
|
|
535 | if (QUERY_FLAG (op, FLAG_REFL_SPELL)) |
|
|
536 | strcat (buf, "(reflect spells)"); |
|
|
537 | if (QUERY_FLAG (op, FLAG_REFL_MISSILE)) |
|
|
538 | strcat (buf, "(reflect missiles)"); |
|
|
539 | if (QUERY_FLAG (op, FLAG_STEALTH)) |
|
|
540 | strcat (buf, "(stealth)"); |
|
|
541 | |
518 | |
542 | /* Shorten some of the names, so they appear better in the windows */ |
519 | if (QUERY_FLAG (op, FLAG_LIFESAVE)) buf << "(lifesaving)"; |
543 | len = strlen (buf); |
520 | if (QUERY_FLAG (op, FLAG_REFL_SPELL)) buf << "(reflect spells)"; |
544 | DESCRIBE_PATH_SAFE (buf, op->path_attuned, "Attuned", &len, VERY_BIG_BUF); |
521 | if (QUERY_FLAG (op, FLAG_REFL_MISSILE)) buf << "(reflect missiles)"; |
545 | DESCRIBE_PATH_SAFE (buf, op->path_repelled, "Repelled", &len, VERY_BIG_BUF); |
522 | if (QUERY_FLAG (op, FLAG_STEALTH)) buf << "(stealth)"; |
546 | DESCRIBE_PATH_SAFE (buf, op->path_denied, "Denied", &len, VERY_BIG_BUF); |
|
|
547 | |
523 | |
548 | /* if(op->item_power) |
524 | buf.add_paths ("Attuned" , op->path_attuned); |
549 | sprintf(buf+strlen(buf), "(item_power %+d)",op->item_power); |
525 | buf.add_paths ("Repelled", op->path_repelled); |
550 | */ |
526 | buf.add_paths ("Denied" , op->path_denied); |
551 | if (buf[0] == 0 && op->type != SKILL) |
|
|
552 | strcpy (buf, "of adornment"); |
|
|
553 | |
527 | |
|
|
528 | if (buf.empty ()) |
|
|
529 | buf << "of adornment"; |
|
|
530 | } |
554 | |
531 | |
555 | return buf; |
532 | return buf; |
556 | } |
533 | } |
557 | |
534 | |
558 | /* |
535 | /* |
… | |
… | |
560 | * contain any information about object status (worn/cursed/etc.) |
537 | * contain any information about object status (worn/cursed/etc.) |
561 | */ |
538 | */ |
562 | const char * |
539 | const char * |
563 | query_short_name (const object *op) |
540 | query_short_name (const object *op) |
564 | { |
541 | { |
565 | static char buf[HUGE_BUF]; |
|
|
566 | char buf2[HUGE_BUF]; |
|
|
567 | int len = 0; |
|
|
568 | |
|
|
569 | if (op->name == NULL) |
542 | if (op->name == 0) |
570 | return "(null)"; |
543 | return "(null)"; |
571 | |
544 | |
572 | if (!op->nrof && !op->weight && !op->title && !is_magical (op)) |
545 | if (!op->nrof |
|
|
546 | && !op->weight |
|
|
547 | && !op->title |
|
|
548 | && !is_magical (op) |
|
|
549 | && op->slaying != shstr_money) |
573 | return op->name; /* To speed things up (or make things slower?) */ |
550 | return op->name; /* To speed things up (or make things slower?) */ |
574 | |
551 | |
575 | if (op->nrof <= 1) |
552 | static dynbuf_text buf; buf.clear (); |
576 | safe_strcat (buf, op->name, &len, HUGE_BUF); |
553 | |
577 | else |
554 | buf << (op->nrof <= 1 ? op->name : op->name_pl); |
578 | safe_strcat (buf, op->name_pl, &len, HUGE_BUF); |
|
|
579 | |
555 | |
580 | if (op->title && QUERY_FLAG (op, FLAG_IDENTIFIED)) |
556 | if (op->title && QUERY_FLAG (op, FLAG_IDENTIFIED)) |
581 | { |
557 | buf << ' ' << op->title; |
582 | safe_strcat (buf, " ", &len, HUGE_BUF); |
|
|
583 | safe_strcat (buf, op->title, &len, HUGE_BUF); |
|
|
584 | } |
|
|
585 | |
558 | |
586 | switch (op->type) |
559 | switch (op->type) |
587 | { |
560 | { |
588 | case SPELLBOOK: |
561 | case SPELLBOOK: |
589 | case SCROLL: |
562 | case SCROLL: |
590 | case WAND: |
563 | case WAND: |
591 | case ROD: |
564 | case ROD: |
592 | if (QUERY_FLAG (op, FLAG_IDENTIFIED) || QUERY_FLAG (op, FLAG_BEEN_APPLIED)) |
565 | if (QUERY_FLAG (op, FLAG_IDENTIFIED) || QUERY_FLAG (op, FLAG_BEEN_APPLIED)) |
|
|
566 | { |
|
|
567 | if (!op->title) |
|
|
568 | buf << " of " << (op->inv ? &op->inv->name : "bug, please report"); |
|
|
569 | |
|
|
570 | if (op->type != SPELLBOOK) |
|
|
571 | buf.printf (" (lvl %d)", op->level); |
|
|
572 | } |
|
|
573 | break; |
|
|
574 | |
|
|
575 | case ALTAR: |
|
|
576 | case TRIGGER_ALTAR: |
|
|
577 | case IDENTIFY_ALTAR: |
|
|
578 | case CONVERTER: |
|
|
579 | if (op->slaying == shstr_money) |
593 | { |
580 | { |
594 | if (!op->title) |
581 | bool wrap = !!buf.size (); |
595 | { |
582 | |
596 | safe_strcat (buf, " of ", &len, HUGE_BUF); |
583 | if (wrap) buf << " ["; |
597 | if (op->inv) |
584 | |
598 | safe_strcat (buf, op->inv->name, &len, HUGE_BUF); |
585 | archetype *coin = 0; |
|
|
586 | |
|
|
587 | for (char const *const *c = coins; *coins; ++c) |
|
|
588 | if ((coin = archetype::find (*c))) |
|
|
589 | if (op->stats.food % coin->value == 0) |
599 | else |
590 | break; |
600 | LOG (llevError, "Spellbook %s lacks inventory\n", &op->name); |
591 | |
601 | } |
592 | sint32 coins = op->stats.food / coin->value; |
602 | if (op->type != SPELLBOOK) |
593 | |
603 | { |
594 | buf.printf ("drop %d %s (or equivalent)", coins, coins == 1 ? &coin->name : &coin->name_pl); |
604 | sprintf (buf2, " (lvl %d)", op->level); |
595 | |
605 | safe_strcat (buf, buf2, &len, HUGE_BUF); |
596 | if (wrap) buf << ']'; |
606 | } |
|
|
607 | } |
597 | } |
608 | break; |
598 | break; |
609 | |
599 | |
610 | case SKILL: |
600 | case SKILL: |
611 | case AMULET: |
601 | case AMULET: |
612 | case RING: |
602 | case RING: |
613 | if (!op->title) |
603 | if (!op->title) |
614 | { |
604 | { |
615 | /* If ring has a title, full description isn't so useful */ |
605 | /* If ring has a title, full description isn't so useful */ |
616 | const char *s = ring_desc (op); |
606 | const char *s = ring_desc (op); |
617 | |
607 | |
618 | if (s[0]) |
608 | if (s && *s) |
619 | { |
609 | buf << " " << s; |
620 | safe_strcat (buf, " ", &len, HUGE_BUF); |
|
|
621 | safe_strcat (buf, s, &len, HUGE_BUF); |
|
|
622 | } |
|
|
623 | } |
610 | } |
624 | break; |
611 | break; |
|
|
612 | |
625 | default: |
613 | default: |
626 | if (op->magic && ((QUERY_FLAG (op, FLAG_BEEN_APPLIED) && need_identify (op)) || QUERY_FLAG (op, FLAG_IDENTIFIED))) |
614 | if (op->magic && ((QUERY_FLAG (op, FLAG_BEEN_APPLIED) && need_identify (op)) || QUERY_FLAG (op, FLAG_IDENTIFIED))) |
627 | { |
|
|
628 | sprintf (buf2, " %+d", op->magic); |
615 | buf.printf (" %+d", op->magic); |
629 | safe_strcat (buf, buf2, &len, HUGE_BUF); |
|
|
630 | } |
|
|
631 | } |
616 | } |
|
|
617 | |
632 | return buf; |
618 | return buf; |
633 | } |
619 | } |
634 | |
620 | |
635 | /* |
621 | /* |
636 | * query_name(object) returns a character pointer pointing to a static |
622 | * query_name(object) returns a character pointer pointing to a static |
… | |
… | |
644 | * |
630 | * |
645 | */ |
631 | */ |
646 | const char * |
632 | const char * |
647 | query_name (const object *op) |
633 | query_name (const object *op) |
648 | { |
634 | { |
649 | static char buf[5][HUGE_BUF]; // OMFG |
635 | int len = 0; |
|
|
636 | static dynbuf_text bufs[5]; |
650 | static int use_buf = 0; |
637 | static int use_buf = 0; |
651 | int len = 0; |
|
|
652 | |
|
|
653 | #ifdef NEW_MATERIAL_CODE |
|
|
654 | materialtype_t *mt; |
|
|
655 | #endif |
|
|
656 | |
638 | |
657 | use_buf++; |
639 | use_buf++; |
658 | use_buf %= 5; |
640 | use_buf %= 5; |
659 | |
641 | |
660 | #ifdef NEW_MATERIAL_CODE |
642 | dynbuf_text &buf = bufs [use_buf]; |
|
|
643 | buf.clear (); |
|
|
644 | |
661 | if ((op->is_armor () || op->is_weapon ()) && op->materialname) |
645 | if ((op->is_armor () || op->is_weapon ()) && op->materialname) |
662 | { |
|
|
663 | mt = name_to_material (op->materialname); |
646 | if (materialtype_t *mt = name_to_material (op->materialname)) |
664 | if (mt) |
647 | buf << mt->description << ' '; |
665 | { |
|
|
666 | safe_strcat (buf[use_buf], mt->description, &len, HUGE_BUF); |
|
|
667 | safe_strcat (buf[use_buf], " ", &len, HUGE_BUF); |
|
|
668 | } |
|
|
669 | } |
|
|
670 | #endif |
|
|
671 | |
648 | |
672 | safe_strcat (buf[use_buf], query_short_name (op), &len, HUGE_BUF); |
649 | buf << query_short_name (op); |
673 | |
650 | |
674 | if (QUERY_FLAG (op, FLAG_INV_LOCKED)) |
651 | if (QUERY_FLAG (op, FLAG_INV_LOCKED)) |
675 | safe_strcat (buf[use_buf], " *", &len, HUGE_BUF); |
652 | buf << " *"; |
676 | if (op->type == CONTAINER && ((op->env && op->env->container == op) || (!op->env && QUERY_FLAG (op, FLAG_APPLIED)))) |
653 | if (op->type == CONTAINER && ((op->env && op->env->container == op) || (!op->env && QUERY_FLAG (op, FLAG_APPLIED)))) |
677 | safe_strcat (buf[use_buf], " (open)", &len, HUGE_BUF); |
654 | buf << " (open)"; |
678 | |
655 | |
679 | if (QUERY_FLAG (op, FLAG_KNOWN_CURSED)) |
656 | if (QUERY_FLAG (op, FLAG_KNOWN_CURSED)) |
680 | { |
657 | { |
681 | if (QUERY_FLAG (op, FLAG_DAMNED)) |
658 | if (QUERY_FLAG (op, FLAG_DAMNED)) |
682 | safe_strcat (buf[use_buf], " (damned)", &len, HUGE_BUF); |
659 | buf << " (damned)"; |
683 | else if (QUERY_FLAG (op, FLAG_CURSED)) |
660 | else if (QUERY_FLAG (op, FLAG_CURSED)) |
684 | safe_strcat (buf[use_buf], " (cursed)", &len, HUGE_BUF); |
661 | buf << " (cursed)"; |
685 | } |
662 | } |
686 | |
663 | |
687 | /* Basically, if the object is known magical (detect magic spell on it), |
664 | /* Basically, if the object is known magical (detect magic spell on it), |
688 | * and it isn't identified, print out the fact that |
665 | * and it isn't identified, print out the fact that |
689 | * it is magical. Assume that the detect magical spell will only set |
666 | * it is magical. Assume that the detect magical spell will only set |
… | |
… | |
692 | * Changed in V 0.91.4 - still print that the object is magical even |
669 | * Changed in V 0.91.4 - still print that the object is magical even |
693 | * if it has been applied. Equipping an item does not tell full |
670 | * if it has been applied. Equipping an item does not tell full |
694 | * abilities, especially for artifact items. |
671 | * abilities, especially for artifact items. |
695 | */ |
672 | */ |
696 | if (QUERY_FLAG (op, FLAG_KNOWN_MAGICAL) && !QUERY_FLAG (op, FLAG_IDENTIFIED)) |
673 | if (QUERY_FLAG (op, FLAG_KNOWN_MAGICAL) && !QUERY_FLAG (op, FLAG_IDENTIFIED)) |
697 | safe_strcat (buf[use_buf], " (magic)", &len, HUGE_BUF); |
674 | buf << " (magic)"; |
698 | |
675 | |
699 | #if 0 |
676 | #if 0 |
700 | /* item_power will be returned in desribe_item - it shouldn't really |
677 | /* item_power will be returned in desribe_item - it shouldn't really |
701 | * be returned in the name. |
678 | * be returned in the name. |
702 | */ |
679 | */ |
… | |
… | |
711 | { |
688 | { |
712 | case BOW: |
689 | case BOW: |
713 | case WAND: |
690 | case WAND: |
714 | case ROD: |
691 | case ROD: |
715 | case HORN: |
692 | case HORN: |
716 | safe_strcat (buf[use_buf], op->env && op->env->current_weapon == op ? " (readied)" : " (applied)", &len, HUGE_BUF); |
693 | buf << (op->env && op->env->current_weapon == op ? " (readied)" : " (applied)"); |
717 | break; |
694 | break; |
718 | case WEAPON: |
695 | case WEAPON: |
719 | safe_strcat (buf[use_buf], op->env && op->env->current_weapon == op ? " (wielded)" : " (applied)", &len, HUGE_BUF); |
696 | buf << (op->env && op->env->current_weapon == op ? " (wielded)" : " (applied)"); |
720 | break; |
697 | break; |
721 | case ARMOUR: |
698 | case ARMOUR: |
722 | case HELMET: |
699 | case HELMET: |
723 | case SHIELD: |
700 | case SHIELD: |
724 | case RING: |
701 | case RING: |
… | |
… | |
726 | case GLOVES: |
703 | case GLOVES: |
727 | case AMULET: |
704 | case AMULET: |
728 | case GIRDLE: |
705 | case GIRDLE: |
729 | case BRACERS: |
706 | case BRACERS: |
730 | case CLOAK: |
707 | case CLOAK: |
731 | safe_strcat (buf[use_buf], " (worn)", &len, HUGE_BUF); |
708 | buf << " (worn)"; |
732 | break; |
709 | break; |
733 | case CONTAINER: |
710 | case CONTAINER: |
734 | safe_strcat (buf[use_buf], " (active)", &len, HUGE_BUF); |
711 | buf << " (active)"; |
735 | break; |
712 | break; |
736 | case SKILL: |
713 | case SKILL: |
737 | default: |
714 | default: |
738 | safe_strcat (buf[use_buf], " (applied)", &len, HUGE_BUF); |
715 | buf << " (applied)"; |
739 | } |
716 | } |
740 | } |
717 | } |
741 | |
718 | |
742 | if (QUERY_FLAG (op, FLAG_UNPAID)) |
719 | if (QUERY_FLAG (op, FLAG_UNPAID)) |
743 | safe_strcat (buf[use_buf], " (unpaid)", &len, HUGE_BUF); |
720 | buf << " (unpaid)"; |
744 | |
721 | |
745 | return buf [use_buf]; |
722 | return buf; |
746 | } |
723 | } |
747 | |
724 | |
748 | /* |
725 | /* |
749 | * query_base_name(object) returns a character pointer pointing to a static |
726 | * query_base_name(object) returns a character pointer pointing to a static |
750 | * buffer which contains a verbose textual representation of the name |
727 | * buffer which contains a verbose textual representation of the name |
… | |
… | |
755 | * If plural is set, we generate the plural name of this. |
732 | * If plural is set, we generate the plural name of this. |
756 | */ |
733 | */ |
757 | const char * |
734 | const char * |
758 | query_base_name (const object *op, int plural) |
735 | query_base_name (const object *op, int plural) |
759 | { |
736 | { |
760 | static char buf[MAX_BUF], buf2[MAX_BUF]; |
|
|
761 | int len; |
|
|
762 | materialtype_t *mt; |
|
|
763 | |
|
|
764 | if ((!plural && !op->name) || (plural && !op->name_pl)) |
737 | if ((!plural && !op->name) || (plural && !op->name_pl)) |
765 | return "(null)"; |
738 | return "(null)"; |
766 | |
739 | |
767 | if (!op->nrof && !op->weight && !op->title && !is_magical (op)) |
740 | if (!op->nrof && !op->weight && !op->title && !is_magical (op)) |
768 | return op->name; /* To speed things up (or make things slower?) */ |
741 | return op->name; /* To speed things up (or make things slower?) */ |
769 | |
742 | |
|
|
743 | static dynbuf_text buf; buf.clear (); |
|
|
744 | |
770 | if ((op->is_armor () || op->is_weapon ()) && op->materialname) |
745 | if ((op->is_armor () || op->is_weapon ()) && op->materialname) |
771 | mt = name_to_material (op->materialname); |
746 | if (materialtype_t *mt = name_to_material (op->materialname)) |
|
|
747 | if (op->arch->materialname != mt->name) |
|
|
748 | buf << mt->description << ' '; |
772 | |
749 | |
773 | #ifdef NEW_MATERIAL_CODE |
750 | buf << (plural ? op->name_pl : op->name); |
774 | if ((op->is_armor () || op->is_weapon ()) && op->materialname && mt && |
|
|
775 | op->arch->materialname != mt->name && !(op->material & M_SPECIAL)) |
|
|
776 | { |
|
|
777 | strcpy (buf, mt->description); |
|
|
778 | len = strlen (buf); |
|
|
779 | safe_strcat (buf, " ", &len, MAX_BUF); |
|
|
780 | if (!plural) |
|
|
781 | safe_strcat (buf, op->name, &len, MAX_BUF); |
|
|
782 | else |
|
|
783 | safe_strcat (buf, op->name_pl, &len, MAX_BUF); |
|
|
784 | } |
|
|
785 | else |
|
|
786 | { |
|
|
787 | #endif |
|
|
788 | if (!plural) |
|
|
789 | assign (buf, op->name); |
|
|
790 | else |
|
|
791 | assign (buf, op->name_pl); |
|
|
792 | |
|
|
793 | len = strlen (buf); |
|
|
794 | #ifdef NEW_MATERIAL_CODE |
|
|
795 | } |
|
|
796 | #endif |
|
|
797 | |
751 | |
798 | if (op->title && QUERY_FLAG (op, FLAG_IDENTIFIED)) |
752 | if (op->title && QUERY_FLAG (op, FLAG_IDENTIFIED)) |
799 | { |
753 | buf << ' ' << op->title; |
800 | safe_strcat (buf, " ", &len, MAX_BUF); |
|
|
801 | safe_strcat (buf, op->title, &len, MAX_BUF); |
|
|
802 | } |
|
|
803 | |
754 | |
804 | switch (op->type) |
755 | switch (op->type) |
805 | { |
756 | { |
806 | case SPELLBOOK: |
757 | case SPELLBOOK: |
807 | case SCROLL: |
758 | case SCROLL: |
808 | case WAND: |
759 | case WAND: |
809 | case ROD: |
760 | case ROD: |
810 | if (QUERY_FLAG (op, FLAG_IDENTIFIED) || QUERY_FLAG (op, FLAG_BEEN_APPLIED)) |
761 | if (QUERY_FLAG (op, FLAG_IDENTIFIED) || QUERY_FLAG (op, FLAG_BEEN_APPLIED)) |
811 | { |
762 | { |
812 | if (!op->title) |
763 | if (!op->title) |
813 | { |
764 | buf << " of " << (op->inv ? &op->inv->name : "bug, please report"); |
814 | safe_strcat (buf, " of ", &len, MAX_BUF); |
765 | |
815 | if (op->inv) |
|
|
816 | safe_strcat (buf, op->inv->name, &len, MAX_BUF); |
|
|
817 | else |
|
|
818 | LOG (llevError, "Spellbook %s lacks inventory\n", &op->name); |
|
|
819 | } |
|
|
820 | if (op->type != SPELLBOOK) |
766 | if (op->type != SPELLBOOK) |
821 | { |
|
|
822 | sprintf (buf2, " (lvl %d)", op->level); |
767 | buf.printf (" (lvl %d)", op->level); |
823 | safe_strcat (buf, buf2, &len, MAX_BUF); |
|
|
824 | } |
|
|
825 | } |
768 | } |
826 | break; |
769 | break; |
827 | |
770 | |
828 | |
771 | |
829 | case SKILL: |
772 | case SKILL: |
… | |
… | |
832 | if (!op->title) |
775 | if (!op->title) |
833 | { |
776 | { |
834 | /* If ring has a title, full description isn't so useful */ |
777 | /* If ring has a title, full description isn't so useful */ |
835 | const char *s = ring_desc (op); |
778 | const char *s = ring_desc (op); |
836 | |
779 | |
837 | if (s[0]) |
780 | if (s && *s) |
838 | { |
781 | buf << ' ' << s; |
839 | safe_strcat (buf, " ", &len, MAX_BUF); |
|
|
840 | safe_strcat (buf, s, &len, MAX_BUF); |
|
|
841 | } |
|
|
842 | } |
782 | } |
843 | break; |
783 | break; |
844 | |
784 | |
845 | default: |
785 | default: |
846 | if (op->magic && ((QUERY_FLAG (op, FLAG_BEEN_APPLIED) && need_identify (op)) || QUERY_FLAG (op, FLAG_IDENTIFIED))) |
786 | if (op->magic && ((QUERY_FLAG (op, FLAG_BEEN_APPLIED) && need_identify (op)) || QUERY_FLAG (op, FLAG_IDENTIFIED))) |
847 | sprintf (buf + strlen (buf), " %+d", op->magic); |
787 | buf.printf (" %+d", op->magic); |
848 | } |
788 | } |
849 | |
789 | |
850 | return buf; |
790 | return buf; |
851 | } |
791 | } |
852 | |
792 | |
… | |
… | |
854 | * too long, making it difficult to read. This function deals |
794 | * too long, making it difficult to read. This function deals |
855 | * with describing the monsters & players abilities. It should only |
795 | * with describing the monsters & players abilities. It should only |
856 | * be called with monster & player objects. Returns a description |
796 | * be called with monster & player objects. Returns a description |
857 | * in a static buffer. |
797 | * in a static buffer. |
858 | */ |
798 | */ |
859 | static char * |
799 | static const char * |
860 | describe_monster (const object *op) |
800 | describe_monster (const object *op) |
861 | { |
801 | { |
862 | char buf[MAX_BUF]; |
802 | static dynbuf_text buf; buf.clear (); |
863 | static char retbuf[VERY_BIG_BUF]; |
|
|
864 | int i; |
|
|
865 | |
|
|
866 | retbuf[0] = '\0'; |
|
|
867 | |
803 | |
868 | /* Note that the resolution this provides for players really isn't |
804 | /* Note that the resolution this provides for players really isn't |
869 | * very good. Any player with a speed greater than .67 will |
805 | * very good. Any player with a speed greater than .67 will |
870 | * fall into the 'lightning fast movement' category. |
806 | * fall into the 'lightning fast movement' category. |
871 | */ |
807 | */ |
872 | if (op->has_active_speed ()) |
808 | if (op->has_active_speed ()) |
873 | { |
|
|
874 | switch ((int) ((FABS (op->speed)) * 15)) |
809 | switch ((int) ((FABS (op->speed)) * 15)) |
875 | { |
810 | { |
876 | case 0: |
811 | case 0: |
877 | strcat (retbuf, "(very slow movement)"); |
812 | buf << "(very slow movement"; |
878 | break; |
813 | break; |
879 | case 1: |
814 | case 1: |
880 | strcat (retbuf, "(slow movement)"); |
815 | buf << "(slow movement)"; |
881 | break; |
816 | break; |
882 | case 2: |
817 | case 2: |
883 | strcat (retbuf, "(normal movement)"); |
818 | buf << "(normal movement)"; |
884 | break; |
819 | break; |
885 | case 3: |
820 | case 3: |
886 | case 4: |
821 | case 4: |
887 | strcat (retbuf, "(fast movement)"); |
822 | buf << "(fast movement)"; |
888 | break; |
823 | break; |
889 | case 5: |
824 | case 5: |
890 | case 6: |
825 | case 6: |
891 | strcat (retbuf, "(very fast movement)"); |
826 | buf << "(very fast movement)"; |
892 | break; |
827 | break; |
893 | case 7: |
828 | case 7: |
894 | case 8: |
829 | case 8: |
895 | case 9: |
830 | case 9: |
896 | case 10: |
831 | case 10: |
897 | strcat (retbuf, "(extremely fast movement)"); |
832 | buf << "(extremely fast movement)"; |
898 | break; |
833 | break; |
899 | default: |
834 | default: |
900 | strcat (retbuf, "(lightning fast movement)"); |
835 | buf << "(lightning fast movement)"; |
901 | break; |
836 | break; |
902 | } |
837 | } |
903 | } |
838 | |
904 | if (QUERY_FLAG (op, FLAG_UNDEAD)) |
839 | if (QUERY_FLAG (op, FLAG_UNDEAD)) buf << "(undead)"; |
905 | strcat (retbuf, "(undead)"); |
|
|
906 | if (QUERY_FLAG (op, FLAG_SEE_INVISIBLE)) |
840 | if (QUERY_FLAG (op, FLAG_SEE_INVISIBLE)) buf << "(see invisible)"; |
907 | strcat (retbuf, "(see invisible)"); |
841 | if (QUERY_FLAG (op, FLAG_USE_WEAPON)) buf << "(wield weapon)"; |
908 | if (QUERY_FLAG (op, FLAG_USE_WEAPON)) |
842 | if (QUERY_FLAG (op, FLAG_USE_BOW)) buf << "(archer)"; |
909 | strcat (retbuf, "(wield weapon)"); |
843 | if (QUERY_FLAG (op, FLAG_USE_ARMOUR)) buf << "(wear armour)"; |
910 | if (QUERY_FLAG (op, FLAG_USE_BOW)) |
844 | if (QUERY_FLAG (op, FLAG_USE_RING)) buf << "(wear ring)"; |
911 | strcat (retbuf, "(archer)"); |
845 | if (QUERY_FLAG (op, FLAG_USE_SCROLL)) buf << "(read scroll)"; |
912 | if (QUERY_FLAG (op, FLAG_USE_ARMOUR)) |
846 | if (QUERY_FLAG (op, FLAG_USE_RANGE)) buf << "(fires wand/rod/horn)"; |
913 | strcat (retbuf, "(wear armour)"); |
|
|
914 | if (QUERY_FLAG (op, FLAG_USE_RING)) |
|
|
915 | strcat (retbuf, "(wear ring)"); |
|
|
916 | if (QUERY_FLAG (op, FLAG_USE_SCROLL)) |
|
|
917 | strcat (retbuf, "(read scroll)"); |
|
|
918 | if (QUERY_FLAG (op, FLAG_USE_RANGE)) |
|
|
919 | strcat (retbuf, "(fires wand/rod/horn)"); |
|
|
920 | if (QUERY_FLAG (op, FLAG_CAN_USE_SKILL)) |
847 | if (QUERY_FLAG (op, FLAG_CAN_USE_SKILL)) buf << "(skill user)"; |
921 | strcat (retbuf, "(skill user)"); |
848 | if (QUERY_FLAG (op, FLAG_CAST_SPELL)) buf << "(spellcaster)"; |
922 | if (QUERY_FLAG (op, FLAG_CAST_SPELL)) |
849 | if (QUERY_FLAG (op, FLAG_FRIENDLY)) buf << "(friendly)"; |
923 | strcat (retbuf, "(spellcaster)"); |
|
|
924 | if (QUERY_FLAG (op, FLAG_FRIENDLY)) |
|
|
925 | strcat (retbuf, "(friendly)"); |
|
|
926 | if (QUERY_FLAG (op, FLAG_UNAGGRESSIVE)) |
850 | if (QUERY_FLAG (op, FLAG_UNAGGRESSIVE)) buf << "(unaggressive)"; |
927 | strcat (retbuf, "(unaggressive)"); |
851 | if (QUERY_FLAG (op, FLAG_HITBACK)) buf << "(hitback)"; |
928 | if (QUERY_FLAG (op, FLAG_HITBACK)) |
852 | if (QUERY_FLAG (op, FLAG_STEALTH)) buf << "(stealthy)"; |
929 | strcat (retbuf, "(hitback)"); |
853 | |
930 | if (QUERY_FLAG (op, FLAG_STEALTH)) |
|
|
931 | strcat (retbuf, "(stealthy)"); |
|
|
932 | if (op->randomitems != NULL) |
854 | if (op->randomitems) |
933 | { |
855 | { |
934 | treasure *t; |
|
|
935 | int first = 1; |
856 | bool first = 1; |
936 | |
857 | |
937 | for (t = op->randomitems->items; t != NULL; t = t->next) |
858 | for (treasure *t = op->randomitems->items; t; t = t->next) |
938 | if (t->item && t->item->type == SPELL) |
859 | if (t->item && t->item->type == SPELL) |
939 | { |
860 | { |
940 | if (first) |
861 | if (first) |
941 | { |
862 | buf << "(Spell abilities:)"; |
|
|
863 | |
942 | first = 0; |
864 | first = 0; |
943 | strcat (retbuf, "(Spell abilities:)"); |
865 | |
944 | } |
866 | buf << '(' << t->item->object::name << ')'; |
945 | strcat (retbuf, "("); |
|
|
946 | strcat (retbuf, t->item->object::name); |
|
|
947 | strcat (retbuf, ")"); |
|
|
948 | } |
867 | } |
949 | } |
868 | } |
|
|
869 | |
950 | if (op->type == PLAYER) |
870 | if (op->type == PLAYER) |
951 | { |
871 | { |
952 | if (op->contr->digestion) |
872 | if (op->contr->digestion) |
953 | { |
|
|
954 | if (op->contr->digestion != 0) |
|
|
955 | sprintf (buf, "(sustenance%+d)", op->contr->digestion); |
873 | buf.printf ("(sustenance%+d)", op->contr->digestion); |
956 | strcat (retbuf, buf); |
874 | |
957 | } |
|
|
958 | if (op->contr->gen_grace) |
875 | if (op->contr->gen_grace) |
959 | { |
|
|
960 | sprintf (buf, "(grace%+d)", op->contr->gen_grace); |
876 | buf.printf ("(grace%+d)", op->contr->gen_grace); |
961 | strcat (retbuf, buf); |
877 | |
962 | } |
|
|
963 | if (op->contr->gen_sp) |
878 | if (op->contr->gen_sp) |
964 | { |
|
|
965 | sprintf (buf, "(magic%+d)", op->contr->gen_sp); |
879 | buf.printf ("(magic%+d)", op->contr->gen_sp); |
966 | strcat (retbuf, buf); |
880 | |
967 | } |
|
|
968 | if (op->contr->gen_hp) |
881 | if (op->contr->gen_hp) |
969 | { |
|
|
970 | sprintf (buf, "(regeneration%+d)", op->contr->gen_hp); |
882 | buf.printf ("(regeneration%+d)", op->contr->gen_hp); |
971 | strcat (retbuf, buf); |
883 | |
972 | } |
|
|
973 | if (op->stats.luck) |
884 | if (op->stats.luck) |
974 | { |
|
|
975 | sprintf (buf, "(luck%+d)", op->stats.luck); |
885 | buf.printf ("(luck%+d)", op->stats.luck); |
976 | strcat (retbuf, buf); |
|
|
977 | } |
|
|
978 | } |
886 | } |
979 | |
887 | |
980 | /* describe attacktypes */ |
888 | /* describe attacktypes */ |
981 | if (is_dragon_pl (op)) |
889 | if (is_dragon_pl (op)) |
982 | { |
890 | { |
… | |
… | |
984 | * Break apart the for loop - move the comparison checking down - |
892 | * Break apart the for loop - move the comparison checking down - |
985 | * this makes it more readable. |
893 | * this makes it more readable. |
986 | */ |
894 | */ |
987 | object *tmp; |
895 | object *tmp; |
988 | |
896 | |
989 | for (tmp = op->inv; tmp != NULL; tmp = tmp->below) |
897 | for (tmp = op->inv; tmp; tmp = tmp->below) |
990 | if (tmp->type == SKILL && !strcmp (tmp->name, "clawing")) |
898 | if (tmp->type == SKILL && tmp->name == shstr_clawing) |
991 | break; |
899 | break; |
992 | |
900 | |
993 | if (tmp && tmp->attacktype != 0) |
901 | if (tmp && tmp->attacktype) |
994 | { DESCRIBE_ABILITY (retbuf, tmp->attacktype, "Claws") } |
902 | buf.add_abilities ("Claws", tmp->attacktype); |
995 | else |
903 | else |
996 | { DESCRIBE_ABILITY (retbuf, op->attacktype, "Attacks") } |
904 | buf.add_abilities ("Attacks", op->attacktype); |
997 | } |
905 | } |
998 | else |
906 | else |
999 | { DESCRIBE_ABILITY (retbuf, op->attacktype, "Attacks") } |
907 | buf.add_abilities ("Attacks", op->attacktype); |
1000 | |
908 | |
1001 | DESCRIBE_PATH (retbuf, op->path_attuned, "Attuned"); |
909 | buf.add_paths ("Attuned" , op->path_attuned); |
1002 | DESCRIBE_PATH (retbuf, op->path_repelled, "Repelled"); |
910 | buf.add_paths ("Repelled", op->path_repelled); |
1003 | DESCRIBE_PATH (retbuf, op->path_denied, "Denied"); |
911 | buf.add_paths ("Denied" , op->path_denied); |
1004 | |
912 | |
1005 | for (i = 0; i < NROFATTACKS; i++) |
913 | for (int i = 0; i < NROFATTACKS; i++) |
1006 | if (op->resist[i]) |
914 | if (op->resist[i]) |
1007 | { |
|
|
1008 | sprintf (buf, "(%s %+d)", resist_plus[i], op->resist[i]); |
915 | buf.printf ("(%s %+d)", resist_plus[i], op->resist[i]); |
1009 | strcat (retbuf, buf); |
|
|
1010 | } |
|
|
1011 | |
916 | |
1012 | return retbuf; |
917 | return buf; |
1013 | } |
918 | } |
1014 | |
|
|
1015 | |
919 | |
1016 | /* |
920 | /* |
1017 | * Returns a pointer to a static buffer which contains a |
921 | * Returns a pointer to a static buffer which contains a |
1018 | * description of the given object. |
922 | * description of the given object. |
1019 | * If it is a monster, lots of information about its abilities |
923 | * If it is a monster, lots of information about its abilities |
… | |
… | |
1040 | * item (eg, debug dump or the like) |
944 | * item (eg, debug dump or the like) |
1041 | */ |
945 | */ |
1042 | const char * |
946 | const char * |
1043 | describe_item (const object *op, object *owner) |
947 | describe_item (const object *op, object *owner) |
1044 | { |
948 | { |
1045 | char buf[MAX_BUF]; |
949 | if (QUERY_FLAG (op, FLAG_MONSTER) || op->type == PLAYER) |
1046 | static char retbuf[VERY_BIG_BUF]; |
950 | return describe_monster (op); |
|
|
951 | |
|
|
952 | static dynbuf_text buf; buf.clear (); |
1047 | int identified, i; |
953 | int identified, i; |
1048 | |
954 | |
1049 | retbuf[0] = '\0'; |
|
|
1050 | if (QUERY_FLAG (op, FLAG_MONSTER) || op->type == PLAYER) |
|
|
1051 | { |
|
|
1052 | return describe_monster (op); |
|
|
1053 | } |
|
|
1054 | /* figure this out once, instead of making multiple calls to need_identify. |
955 | /* figure this out once, instead of making multiple calls to need_identify. |
1055 | * also makes the code easier to read. |
956 | * also makes the code easier to read. |
1056 | */ |
957 | */ |
1057 | if (!need_identify (op) || QUERY_FLAG (op, FLAG_IDENTIFIED)) |
958 | identified = !need_identify (op) || QUERY_FLAG (op, FLAG_IDENTIFIED); |
1058 | identified = 1; |
959 | if (!identified) |
1059 | else |
960 | buf << "(unidentified)"; |
1060 | { |
961 | |
1061 | strcpy (retbuf, "(unidentified)"); |
|
|
1062 | identified = 0; |
|
|
1063 | } |
|
|
1064 | switch (op->type) |
962 | switch (op->type) |
1065 | { |
963 | { |
1066 | case BOW: |
964 | case BOW: |
1067 | case ARROW: |
965 | case ARROW: |
1068 | case WAND: |
966 | case WAND: |
1069 | case ROD: |
967 | case ROD: |
1070 | case HORN: |
968 | case HORN: |
1071 | case WEAPON: |
969 | case WEAPON: |
1072 | case ARMOUR: |
970 | case ARMOUR: |
1073 | case HELMET: |
971 | case HELMET: |
1074 | case SHIELD: |
972 | case SHIELD: |
1075 | case BOOTS: |
973 | case BOOTS: |
1076 | case GLOVES: |
974 | case GLOVES: |
1077 | case GIRDLE: |
975 | case GIRDLE: |
1078 | case BRACERS: |
976 | case BRACERS: |
1079 | case CLOAK: |
977 | case CLOAK: |
1080 | case SKILL_TOOL: |
978 | case SKILL_TOOL: |
1081 | break; /* We have more information to do below this switch */ |
979 | break; /* We have more information to do below this switch */ |
1082 | |
980 | |
1083 | case POWER_CRYSTAL: |
981 | case POWER_CRYSTAL: |
1084 | if (op->stats.maxsp > 1000) |
982 | if (op->stats.maxsp > 1000) |
1085 | { /*higher capacity crystals */ |
983 | { /*higher capacity crystals */ |
1086 | i = (op->stats.maxsp % 1000) / 100; |
984 | i = (op->stats.maxsp % 1000) / 100; |
1087 | |
985 | |
1088 | if (i) |
986 | if (i) |
1089 | snprintf (buf, MAX_BUF, "(capacity %d.%dk). It is ", op->stats.maxsp / 1000, i); |
987 | buf.printf ("(capacity %d.%dk). It is ", op->stats.maxsp / 1000, i); |
1090 | else |
988 | else |
1091 | snprintf (buf, MAX_BUF, "(capacity %dk). It is ", op->stats.maxsp / 1000); |
989 | buf.printf ("(capacity %dk). It is ", op->stats.maxsp / 1000); |
1092 | } |
990 | } |
1093 | else |
991 | else |
1094 | snprintf (buf, MAX_BUF, "(capacity %d). It is ", op->stats.maxsp); |
992 | buf.printf ("(capacity %d). It is ", op->stats.maxsp); |
1095 | |
993 | |
1096 | strcat (retbuf, buf); |
|
|
1097 | i = (op->stats.sp * 10) / op->stats.maxsp; |
994 | i = (op->stats.sp * 10) / op->stats.maxsp; |
1098 | if (op->stats.sp == 0) |
995 | if (op->stats.sp == 0) |
1099 | strcat (retbuf, "empty."); |
996 | buf << "empty."; |
1100 | else if (i == 0) |
997 | else if (i == 0) |
1101 | strcat (retbuf, "almost empty."); |
998 | buf << "almost empty."; |
1102 | else if (i < 3) |
999 | else if (i < 3) |
1103 | strcat (retbuf, "partially filled."); |
1000 | buf << "partially filled."; |
1104 | else if (i < 6) |
1001 | else if (i < 6) |
1105 | strcat (retbuf, "half full."); |
1002 | buf << "half full."; |
1106 | else if (i < 9) |
1003 | else if (i < 9) |
1107 | strcat (retbuf, "well charged."); |
1004 | buf << "well charged."; |
1108 | else if (op->stats.sp == op->stats.maxsp) |
1005 | else if (op->stats.sp == op->stats.maxsp) |
1109 | strcat (retbuf, "fully charged."); |
1006 | buf << "fully charged."; |
1110 | else |
1007 | else |
1111 | strcat (retbuf, "almost full."); |
1008 | buf << "almost full."; |
1112 | break; |
1009 | break; |
|
|
1010 | |
1113 | case FOOD: |
1011 | case FOOD: |
1114 | case FLESH: |
1012 | case FLESH: |
1115 | case DRINK: |
1013 | case DRINK: |
1116 | if (identified || QUERY_FLAG (op, FLAG_BEEN_APPLIED)) |
1014 | if (identified || QUERY_FLAG (op, FLAG_BEEN_APPLIED)) |
1117 | { |
1015 | { |
1118 | sprintf (buf, "(food+%d)", op->stats.food); |
1016 | buf.printf ("(food+%d)", op->stats.food); |
1119 | strcat (retbuf, buf); |
|
|
1120 | |
1017 | |
1121 | if (op->type == FLESH && op->last_eat > 0 && atnr_is_dragon_enabled (op->last_eat)) |
1018 | if (op->type == FLESH && op->last_eat > 0 && atnr_is_dragon_enabled (op->last_eat)) |
1122 | { |
|
|
1123 | sprintf (buf, "(%s metabolism)", change_resist_msg[op->last_eat]); |
1019 | buf.printf ("(%s metabolism)", change_resist_msg[op->last_eat]); |
1124 | strcat (retbuf, buf); |
|
|
1125 | } |
|
|
1126 | |
1020 | |
1127 | if (!QUERY_FLAG (op, FLAG_CURSED)) |
1021 | if (!QUERY_FLAG (op, FLAG_CURSED)) |
1128 | { |
1022 | { |
1129 | if (op->stats.hp) |
1023 | if (op->stats.hp) buf << "(heals)"; |
1130 | strcat (retbuf, "(heals)"); |
|
|
1131 | if (op->stats.sp) |
|
|
1132 | strcat (retbuf, "(spellpoint regen)"); |
1024 | if (op->stats.sp) buf << "(spellpoint regen)"; |
1133 | } |
1025 | } |
1134 | else |
1026 | else |
1135 | { |
1027 | { |
1136 | if (op->stats.hp) |
1028 | if (op->stats.hp) buf << "(damages)"; |
1137 | strcat (retbuf, "(damages)"); |
|
|
1138 | if (op->stats.sp) |
|
|
1139 | strcat (retbuf, "(spellpoint depletion)"); |
1029 | if (op->stats.sp) buf << "(spellpoint depletion)"; |
1140 | } |
1030 | } |
1141 | } |
1031 | } |
1142 | break; |
1032 | break; |
1143 | |
1033 | |
1144 | |
|
|
1145 | case SKILL: |
1034 | case SKILL: |
1146 | case RING: |
1035 | case RING: |
1147 | case AMULET: |
1036 | case AMULET: |
1148 | if (op->item_power) |
1037 | if (op->item_power) |
1149 | { |
|
|
1150 | sprintf (buf, "(item_power %+d)", op->item_power); |
1038 | buf.printf ("(item_power %+d)", op->item_power); |
1151 | strcat (retbuf, buf); |
1039 | |
1152 | } |
|
|
1153 | if (op->title) |
1040 | if (op->title) |
1154 | strcat (retbuf, ring_desc (op)); |
1041 | buf << ring_desc (op); |
|
|
1042 | |
1155 | return retbuf; |
1043 | return buf; |
1156 | |
1044 | |
1157 | default: |
1045 | default: |
1158 | return retbuf; |
1046 | return buf; |
1159 | } |
1047 | } |
1160 | |
1048 | |
1161 | /* Down here, we more further describe equipment type items. |
1049 | /* Down here, we more further describe equipment type items. |
1162 | * only describe them if they have been identified or the like. |
1050 | * only describe them if they have been identified or the like. |
1163 | */ |
1051 | */ |
1164 | if (identified || QUERY_FLAG (op, FLAG_BEEN_APPLIED)) |
1052 | if (identified || QUERY_FLAG (op, FLAG_BEEN_APPLIED)) |
1165 | { |
1053 | { |
1166 | int attr, val; |
1054 | int attr, val; |
1167 | |
1055 | |
1168 | for (attr = 0; attr < NUM_STATS; attr++) |
1056 | for (attr = 0; attr < NUM_STATS; attr++) |
1169 | { |
|
|
1170 | if ((val = op->stats.stat (attr))) |
1057 | if ((val = op->stats.stat (attr))) |
1171 | { |
|
|
1172 | sprintf (buf, "(%s%+d)", short_stat_name[attr], val); |
1058 | buf.printf ("(%s%+d)", short_stat_name[attr], val); |
1173 | strcat (retbuf, buf); |
|
|
1174 | } |
|
|
1175 | } |
|
|
1176 | |
1059 | |
1177 | if (op->stats.exp) |
1060 | if (op->stats.exp) |
1178 | { |
|
|
1179 | sprintf (buf, "(speed %+lld)", (long long) op->stats.exp); |
1061 | buf.printf ("(speed %+lld)", (long long) op->stats.exp); |
1180 | strcat (retbuf, buf); |
|
|
1181 | } |
|
|
1182 | |
|
|
1183 | |
1062 | |
1184 | switch (op->type) |
1063 | switch (op->type) |
1185 | { |
1064 | { |
1186 | case BOW: |
1065 | case BOW: |
1187 | case ARROW: |
1066 | case ARROW: |
1188 | case GIRDLE: |
1067 | case GIRDLE: |
1189 | case HELMET: |
1068 | case HELMET: |
1190 | case SHIELD: |
1069 | case SHIELD: |
1191 | case BOOTS: |
1070 | case BOOTS: |
1192 | case GLOVES: |
1071 | case GLOVES: |
1193 | case WEAPON: |
1072 | case WEAPON: |
1194 | case SKILL: |
1073 | case SKILL: |
1195 | case RING: |
1074 | case RING: |
1196 | case AMULET: |
1075 | case AMULET: |
1197 | case ARMOUR: |
1076 | case ARMOUR: |
1198 | case BRACERS: |
1077 | case BRACERS: |
1199 | case FORCE: |
1078 | case FORCE: |
1200 | case CLOAK: |
1079 | case CLOAK: |
1201 | if (op->stats.wc) |
1080 | if (op->stats.wc) buf.printf ("(wc%+d)", op->stats.wc); |
1202 | { |
1081 | if (op->stats.dam) buf.printf ("(dam%+d)", op->stats.dam); |
1203 | sprintf (buf, "(wc%+d)", op->stats.wc); |
1082 | if (op->stats.ac) buf.printf ("(ac%+d)", op->stats.ac); |
1204 | strcat (retbuf, buf); |
1083 | |
1205 | } |
|
|
1206 | if (op->stats.dam) |
|
|
1207 | { |
|
|
1208 | sprintf (buf, "(dam%+d)", op->stats.dam); |
|
|
1209 | strcat (retbuf, buf); |
|
|
1210 | } |
|
|
1211 | if (op->stats.ac) |
|
|
1212 | { |
|
|
1213 | sprintf (buf, "(ac%+d)", op->stats.ac); |
|
|
1214 | strcat (retbuf, buf); |
|
|
1215 | } |
|
|
1216 | if ((op->type == WEAPON || op->type == BOW) && op->level > 0) |
1084 | if ((op->type == WEAPON || op->type == BOW) && op->level > 0) |
1217 | { |
|
|
1218 | sprintf (buf, "(improved %d/%d)", op->last_eat, op->level); |
1085 | buf.printf ("(improved %d/%d)", op->last_eat, op->level); |
1219 | strcat (retbuf, buf); |
1086 | |
1220 | } |
|
|
1221 | break; |
1087 | break; |
1222 | |
1088 | |
1223 | default: |
1089 | default: |
1224 | break; |
1090 | break; |
1225 | } |
1091 | } |
1226 | if (QUERY_FLAG (op, FLAG_XRAYS)) |
1092 | |
1227 | strcat (retbuf, "(xray-vision)"); |
1093 | if (QUERY_FLAG (op, FLAG_XRAYS)) buf << "(xray-vision)"; |
1228 | if (QUERY_FLAG (op, FLAG_SEE_IN_DARK)) |
1094 | if (QUERY_FLAG (op, FLAG_SEE_IN_DARK)) buf << "(infravision)"; |
1229 | strcat (retbuf, "(infravision)"); |
|
|
1230 | |
1095 | |
1231 | /* levitate was what is was before, so we'll keep it */ |
1096 | /* levitate was what is was before, so we'll keep it */ |
1232 | if (op->move_type & MOVE_FLY_LOW) |
1097 | if (op->move_type & MOVE_FLY_LOW) buf << "(levitate)"; |
1233 | strcat (retbuf, "(levitate)"); |
|
|
1234 | |
|
|
1235 | if (op->move_type & MOVE_FLY_HIGH) |
1098 | if (op->move_type & MOVE_FLY_HIGH) buf << "(fly)"; |
1236 | strcat (retbuf, "(fly)"); |
|
|
1237 | |
|
|
1238 | if (op->move_type & MOVE_SWIM) |
1099 | if (op->move_type & MOVE_SWIM) buf << "(swim)"; |
1239 | strcat (retbuf, "(swim)"); |
|
|
1240 | |
1100 | |
1241 | /* walking is presumed as 'normal', so doesn't need mentioning */ |
1101 | /* walking is presumed as 'normal', so doesn't need mentioning */ |
1242 | |
1102 | |
1243 | if (op->item_power) |
1103 | if (op->item_power) |
1244 | { |
|
|
1245 | sprintf (buf, "(item_power %+d)", op->item_power); |
1104 | buf.printf ("(item_power %+d)", op->item_power); |
1246 | strcat (retbuf, buf); |
|
|
1247 | } |
|
|
1248 | } /* End if identified or applied */ |
1105 | } /* End if identified or applied */ |
1249 | |
1106 | |
1250 | /* This blocks only deals with fully identified object. |
1107 | /* This blocks only deals with fully identified object. |
1251 | * it is intentional that this is not an 'else' from a above - |
1108 | * it is intentional that this is not an 'else' from a above - |
1252 | * in this way, information is added. |
1109 | * in this way, information is added. |
… | |
… | |
1255 | { |
1112 | { |
1256 | int more_info = 0; |
1113 | int more_info = 0; |
1257 | |
1114 | |
1258 | switch (op->type) |
1115 | switch (op->type) |
1259 | { |
1116 | { |
1260 | case ROD: /* These use stats.sp for spell selection and stats.food */ |
1117 | case ROD: /* These use stats.sp for spell selection and stats.food */ |
1261 | case HORN: /* and stats.hp for spell-point regeneration... */ |
1118 | case HORN: /* and stats.hp for spell-point regeneration... */ |
1262 | case BOW: |
1119 | case BOW: |
1263 | case ARROW: |
1120 | case ARROW: |
1264 | case WAND: |
1121 | case WAND: |
1265 | case FOOD: |
1122 | case FOOD: |
1266 | case FLESH: |
1123 | case FLESH: |
1267 | case DRINK: |
1124 | case DRINK: |
1268 | more_info = 0; |
1125 | more_info = 0; |
1269 | break; |
1126 | break; |
1270 | |
1127 | |
1271 | /* Armor type objects */ |
1128 | /* Armor type objects */ |
1272 | case ARMOUR: |
1129 | case ARMOUR: |
1273 | case HELMET: |
1130 | case HELMET: |
1274 | case SHIELD: |
1131 | case SHIELD: |
1275 | case BOOTS: |
1132 | case BOOTS: |
1276 | case GLOVES: |
1133 | case GLOVES: |
1277 | case GIRDLE: |
1134 | case GIRDLE: |
1278 | case BRACERS: |
1135 | case BRACERS: |
1279 | case CLOAK: |
1136 | case CLOAK: |
1280 | if (ARMOUR_SPEED (op)) |
1137 | if (ARMOUR_SPEED (op)) buf.printf ("(Max speed %1.2f)", ARMOUR_SPEED (op) / 10.0); |
1281 | { |
1138 | if (ARMOUR_SPELLS (op)) buf.printf ("(Spell regen penalty %d)", ARMOUR_SPELLS (op)); |
1282 | sprintf (buf, "(Max speed %1.2f)", ARMOUR_SPEED (op) / 10.0); |
|
|
1283 | strcat (retbuf, buf); |
|
|
1284 | } |
|
|
1285 | if (ARMOUR_SPELLS (op)) |
|
|
1286 | { |
|
|
1287 | sprintf (buf, "(Spell regen penalty %d)", ARMOUR_SPELLS (op)); |
|
|
1288 | strcat (retbuf, buf); |
|
|
1289 | } |
|
|
1290 | more_info = 1; |
1139 | more_info = 1; |
1291 | break; |
1140 | break; |
1292 | |
1141 | |
1293 | case WEAPON: |
1142 | case WEAPON: |
1294 | /* Calculate it the same way fix_player does so the results |
1143 | /* Calculate it the same way fix_player does so the results |
1295 | * make sense. |
1144 | * make sense. |
1296 | */ |
1145 | */ |
1297 | i = (WEAPON_SPEED (op) * 2 - op->magic) / 2; |
1146 | i = (WEAPON_SPEED (op) * 2 - op->magic) / 2; |
1298 | if (i < 0) |
1147 | if (i < 0) |
1299 | i = 0; |
1148 | i = 0; |
1300 | |
1149 | |
1301 | sprintf (buf, "(weapon speed %d)", i); |
1150 | buf.printf ("(weapon speed %d)", i); |
1302 | strcat (retbuf, buf); |
|
|
1303 | more_info = 1; |
1151 | more_info = 1; |
1304 | break; |
1152 | break; |
1305 | |
|
|
1306 | } |
1153 | } |
|
|
1154 | |
1307 | if (more_info) |
1155 | if (more_info) |
1308 | { |
1156 | { |
1309 | if (op->stats.food) |
|
|
1310 | { |
|
|
1311 | if (op->stats.food != 0) |
|
|
1312 | sprintf (buf, "(sustenance%+d)", op->stats.food); |
1157 | if (op->stats.food) buf.printf ("(sustenance%+d)", op->stats.food); |
1313 | strcat (retbuf, buf); |
|
|
1314 | } |
|
|
1315 | if (op->stats.grace) |
|
|
1316 | { |
|
|
1317 | sprintf (buf, "(grace%+d)", op->stats.grace); |
1158 | if (op->stats.grace) buf.printf ("(grace%+d)", op->stats.grace); |
1318 | strcat (retbuf, buf); |
1159 | if (op->stats.sp) buf.printf ("(magic%+d)", op->stats.sp); |
1319 | } |
|
|
1320 | if (op->stats.sp) |
|
|
1321 | { |
|
|
1322 | sprintf (buf, "(magic%+d)", op->stats.sp); |
|
|
1323 | strcat (retbuf, buf); |
|
|
1324 | } |
|
|
1325 | if (op->stats.hp) |
|
|
1326 | { |
|
|
1327 | sprintf (buf, "(regeneration%+d)", op->stats.hp); |
1160 | if (op->stats.hp) buf.printf ("(regeneration%+d)", op->stats.hp); |
1328 | strcat (retbuf, buf); |
|
|
1329 | } |
|
|
1330 | } |
1161 | } |
1331 | |
1162 | |
1332 | if (op->stats.luck) |
1163 | if (op->stats.luck) |
1333 | { |
|
|
1334 | sprintf (buf, "(luck%+d)", op->stats.luck); |
1164 | buf.printf ("(luck%+d)", op->stats.luck); |
1335 | strcat (retbuf, buf); |
1165 | |
1336 | } |
|
|
1337 | if (QUERY_FLAG (op, FLAG_LIFESAVE)) |
1166 | if (QUERY_FLAG (op, FLAG_LIFESAVE)) buf << "(lifesaving)"; |
1338 | strcat (retbuf, "(lifesaving)"); |
1167 | if (QUERY_FLAG (op, FLAG_REFL_SPELL)) buf << "(reflect spells)"; |
1339 | if (QUERY_FLAG (op, FLAG_REFL_SPELL)) |
|
|
1340 | strcat (retbuf, "(reflect spells)"); |
|
|
1341 | if (QUERY_FLAG (op, FLAG_REFL_MISSILE)) |
1168 | if (QUERY_FLAG (op, FLAG_REFL_MISSILE)) buf << "(reflect missiles)"; |
1342 | strcat (retbuf, "(reflect missiles)"); |
|
|
1343 | if (QUERY_FLAG (op, FLAG_STEALTH)) |
1169 | if (QUERY_FLAG (op, FLAG_STEALTH)) buf << "(stealth)"; |
1344 | strcat (retbuf, "(stealth)"); |
1170 | |
1345 | if (op->slaying != NULL && op->type != FOOD) |
1171 | if (op->slaying && op->type != FOOD) |
1346 | { |
|
|
1347 | sprintf (buf, "(slay %s)", &op->slaying); |
1172 | buf.printf ("(slay %s)", &op->slaying); |
1348 | strcat (retbuf, buf); |
1173 | |
1349 | } |
1174 | buf.add_abilities ("Attacks", op->attacktype); |
1350 | DESCRIBE_ABILITY (retbuf, op->attacktype, "Attacks"); |
|
|
1351 | /* resistance on flesh is only visible for quetzals. If |
1175 | /* resistance on flesh is only visible for quetzals. If |
1352 | * non flesh, everyone can see its resistances |
1176 | * non flesh, everyone can see its resistances |
1353 | */ |
1177 | */ |
1354 | if (op->type != FLESH || (owner && is_dragon_pl (owner))) |
1178 | if (op->type != FLESH || (owner && is_dragon_pl (owner))) |
1355 | strcat (retbuf, describe_resistance (op, 0)); |
1179 | buf << describe_resistance (op, 0); |
1356 | DESCRIBE_PATH (retbuf, op->path_attuned, "Attuned"); |
|
|
1357 | DESCRIBE_PATH (retbuf, op->path_repelled, "Repelled"); |
|
|
1358 | DESCRIBE_PATH (retbuf, op->path_denied, "Denied"); |
|
|
1359 | } |
|
|
1360 | |
1180 | |
|
|
1181 | buf.add_paths ("Attuned", op->path_attuned); |
|
|
1182 | buf.add_paths ("Repelled", op->path_repelled); |
|
|
1183 | buf.add_paths ("Denied", op->path_denied); |
|
|
1184 | } |
|
|
1185 | |
1361 | return retbuf; |
1186 | return buf; |
1362 | } |
1187 | } |
1363 | |
1188 | |
1364 | std::string |
1189 | std::string |
1365 | object::describe_item (object *who) |
1190 | object::describe_item (object *who) |
1366 | { |
1191 | { |
1367 | return std::string (::describe_item (this, who)); |
1192 | return std::string (::describe_item (this, who)); |
|
|
1193 | } |
|
|
1194 | |
|
|
1195 | void |
|
|
1196 | examine (object *op, object *tmp) |
|
|
1197 | { |
|
|
1198 | std::string info = tmp->describe (op); |
|
|
1199 | op->contr->infobox (MSG_CHANNEL ("examine"), info.c_str ()); |
|
|
1200 | } |
|
|
1201 | |
|
|
1202 | /* |
|
|
1203 | * inventory prints object's inventory. If inv==NULL then print player's |
|
|
1204 | * inventory. |
|
|
1205 | * [ Only items which are applied are showed. Tero.Haatanen@lut.fi ] |
|
|
1206 | */ |
|
|
1207 | const char * |
|
|
1208 | object::query_inventory (object *who, const char *indent) |
|
|
1209 | { |
|
|
1210 | static dynbuf_text buf; buf.clear (); |
|
|
1211 | |
|
|
1212 | for (object *tmp = inv; tmp; tmp = tmp->below) |
|
|
1213 | if (who && QUERY_FLAG (who, FLAG_WIZ)) |
|
|
1214 | buf.printf ("%s- %-28.28s (%5d) %-8s\n", indent, query_name (tmp), tmp->count, query_weight (tmp)); |
|
|
1215 | else if (!tmp->invisible && (type == CONTAINER || QUERY_FLAG (tmp, FLAG_APPLIED))) |
|
|
1216 | buf.printf ("%s- %-36.36s %-8s\n", indent, query_name (tmp), query_weight (tmp)); |
|
|
1217 | |
|
|
1218 | if (buf.size ()) |
|
|
1219 | buf.printf ("%s(total weight: %s)\n", indent, query_weight (this)); |
|
|
1220 | else |
|
|
1221 | buf.printf ("%s(empty)\n", indent); |
|
|
1222 | |
|
|
1223 | return buf; |
1368 | } |
1224 | } |
1369 | |
1225 | |
1370 | /* Return true if the item is magical. A magical item is one that |
1226 | /* Return true if the item is magical. A magical item is one that |
1371 | * increases/decreases any abilities, provides a resistance, |
1227 | * increases/decreases any abilities, provides a resistance, |
1372 | * has a generic magical bonus, or is an artifact. |
1228 | * has a generic magical bonus, or is an artifact. |
1373 | * This function is used by detect_magic to determine if an item |
1229 | * This function is used by detect_magic to determine if an item |
1374 | * should be marked as magical. |
1230 | * should be marked as magical. |
1375 | */ |
1231 | */ |
1376 | |
|
|
1377 | int |
1232 | int |
1378 | is_magical (const object *op) |
1233 | is_magical (const object *op) |
1379 | { |
1234 | { |
1380 | int i; |
1235 | int i; |
1381 | |
1236 | |