ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/server/c_object.C
(Generate patch)

Comparing deliantra/server/server/c_object.C (file contents):
Revision 1.71 by elmex, Thu Apr 24 11:26:41 2008 UTC vs.
Revision 1.80 by elmex, Sun Oct 5 12:40:21 2008 UTC

284 * (sack, luggage, etc), tmp->env->env then points to the player (nested 284 * (sack, luggage, etc), tmp->env->env then points to the player (nested
285 * containers not allowed as of now) 285 * containers not allowed as of now)
286 */ 286 */
287 if ((pl->move_type & MOVE_FLYING) && !QUERY_FLAG (pl, FLAG_WIZ) && tmp->in_player () != pl) 287 if ((pl->move_type & MOVE_FLYING) && !QUERY_FLAG (pl, FLAG_WIZ) && tmp->in_player () != pl)
288 { 288 {
289 new_draw_info (NDI_UNIQUE, 0, pl, "You are levitating, you can't reach the ground!"); 289 pl->failmsg ("You are levitating, you can't reach the ground! "
290 "H<You have to stop levitating first, if you can, either by using your levitation skill, "
291 "or waiting till the levitation effect wears off.>");
290 return; 292 return;
291 } 293 }
292 294
293 if (QUERY_FLAG (tmp, FLAG_NO_DROP)) 295 if (QUERY_FLAG (tmp, FLAG_NO_DROP))
294 return; 296 return;
482 * but that probably will make it more difficult to read, and 484 * but that probably will make it more difficult to read, and
483 * not make it any more efficient 485 * not make it any more efficient
484 */ 486 */
485 if (params && item_matched_string (op, tmp, params)) 487 if (params && item_matched_string (op, tmp, params))
486 { 488 {
489 if (--cnt < 0) break;
487 pick_up (op, tmp); 490 pick_up (op, tmp);
488 if (--cnt <= 0) break;
489 } 491 }
490 else if (can_pick (op, tmp) && !params) 492 else if (can_pick (op, tmp) && !params)
491 { 493 {
494 if (--cnt < 0) break;
492 pick_up (op, tmp); 495 pick_up (op, tmp);
493 break; 496 break;
494 } 497 }
495 498
496 tmp = next; 499 tmp = next;
497 } 500 }
498 501
499 if (cnt <= 0) 502 if (cnt < 0)
500 { 503 {
501 op->failmsg ("Couldn't pick up so many items at once."); 504 op->failmsg ("Couldn't pick up so many items at once.");
502 return 0; 505 return 0;
503 } 506 }
504 507
604 607
605 /* We are only dropping some of the items. We split the current object 608 /* We are only dropping some of the items. We split the current object
606 * off 609 * off
607 */ 610 */
608 if (!can_split (op, tmp, nrof)) 611 if (!can_split (op, tmp, nrof))
612 return;
609 613
610 if (INVOKE_OBJECT (DROP, tmp, ARG_OBJECT (op))) 614 if (INVOKE_OBJECT (DROP, tmp, ARG_OBJECT (op)))
611 return; 615 return;
612 616
613 if (QUERY_FLAG (tmp, FLAG_STARTEQUIP)) 617 if (QUERY_FLAG (tmp, FLAG_STARTEQUIP))
614 { 618 {
615 op->statusmsg (format ("You drop the %s.", query_name (tmp))); 619 op->statusmsg (format ("You drop the %s.", query_name (tmp)));
616 op->statusmsg ("The gods who lent it to you retrieves it."); 620 op->statusmsg ("The god who lent it to you retrieves it.");
617 621
618 tmp->destroy (); 622 tmp->destroy ();
619 op->update_stats (); 623 op->update_stats ();
620 return; 624 return;
621 } 625 }
631 return; 635 return;
632 636
633 if (is_in_shop (op) && !QUERY_FLAG (tmp, FLAG_UNPAID) && tmp->type != MONEY) 637 if (is_in_shop (op) && !QUERY_FLAG (tmp, FLAG_UNPAID) && tmp->type != MONEY)
634 { 638 {
635 if (!sell_item (tmp, op)) 639 if (!sell_item (tmp, op))
636 return; // if we can't sell it we don't drop it 640 {
641 // if we can't sell it we don't drop it, so give it back to the seller
642 op->insert (tmp);
643 return;
644 }
637 } 645 }
638 646
639 tmp->x = op->x; 647 tmp->x = op->x;
640 tmp->y = op->y; 648 tmp->y = op->y;
641 649
656 if (tmp->env && tmp->env->type != PLAYER) 664 if (tmp->env && tmp->env->type != PLAYER)
657 { 665 {
658 /* Just toss the object - probably shouldn't be hanging 666 /* Just toss the object - probably shouldn't be hanging
659 * around anyways 667 * around anyways
660 */ 668 */
661 tmp->remove ();
662 tmp->destroy (); 669 tmp->destroy ();
663 return; 670 return;
664 } 671 }
665 else 672 else
666 { 673 {
967 dynbuf_text buf (512, 512); 974 dynbuf_text buf (512, 512);
968 975
969 object *mon = head ? head : this; 976 object *mon = head ? head : this;
970 977
971 if (QUERY_FLAG (mon, FLAG_UNDEAD)) 978 if (QUERY_FLAG (mon, FLAG_UNDEAD))
972 buf << "It is an undead force.\n"; 979 buf << "It is an undead force.\r";
973 980
974 if (mon->level > who->level) 981 if (mon->level > who->level)
975 buf << "It is likely more powerful than you.\n"; 982 buf << "It is likely more powerful than you.\r";
976 else if (mon->level < who->level) 983 else if (mon->level < who->level)
977 buf << "It is likely less powerful than you.\n"; 984 buf << "It is likely less powerful than you.\r";
978 else 985 else
979 buf << "It is probably as powerful as you.\n"; 986 buf << "It is probably as powerful as you.\r";
980 987
981 if (mon->attacktype & AT_ACID) 988 if (mon->attacktype & AT_ACID)
982 buf << "You seem to smell an acrid odor.\n"; 989 buf << "You seem to smell an acrid odor.\r";
983 990
984 /* Anyone know why this used to use the clone value instead of the 991 /* Anyone know why this used to use the clone value instead of the
985 * maxhp field? This seems that it should give more accurate results. 992 * maxhp field? This seems that it should give more accurate results.
986 */ 993 */
987 switch ((mon->stats.hp + 1) * 4 / (mon->stats.maxhp + 1)) 994 switch ((mon->stats.hp + 1) * 4 / (mon->stats.maxhp + 1))
988 { /* From 1-4 */ 995 { /* From 1-4 */
989 case 1: 996 case 1:
990 buf << "It is in a bad shape.\n"; 997 buf << "It is in a bad shape.\r";
991 break; 998 break;
992 case 2: 999 case 2:
993 buf << "It is hurt.\n"; 1000 buf << "It is hurt.\r";
994 break; 1001 break;
995 case 3: 1002 case 3:
996 buf << "It is somewhat hurt.\n"; 1003 buf << "It is somewhat hurt.\r";
997 break; 1004 break;
998 case 4: 1005 case 4:
999 buf << "It is in excellent shape.\n"; 1006 buf << "It is in excellent shape.\r";
1000 break; 1007 break;
1001 } 1008 }
1002 1009
1003 if (present_in_ob (POISONING, mon)) 1010 if (present_in_ob (POISONING, mon))
1004 buf << "It looks very ill.\n"; 1011 buf << "It looks very ill.\r";
1012
1013 buf << '\n';
1005 1014
1006 return buf; 1015 return buf;
1007} 1016}
1008 1017
1009/* tmp is the object being described, pl is who is examing it. */ 1018/* tmp is the object being described, pl is who is examing it. */
1067std::string 1076std::string
1068object::describe (object *who) 1077object::describe (object *who)
1069{ 1078{
1070 dynbuf_text buf (1024, 1024); 1079 dynbuf_text buf (1024, 1024);
1071 1080
1072 buf.printf ("That is: %s.\n", long_desc (who).c_str ()); 1081 buf.printf ("That is: %s.\r", long_desc (who).c_str ());
1073 1082
1074 if (custom_name) 1083 if (custom_name)
1075 buf.printf ("You call it %s\n", &custom_name); 1084 buf.printf ("You call it %s.\r", &custom_name);
1076 1085
1077 switch (type) 1086 switch (type)
1078 { 1087 {
1079 case SPELLBOOK: 1088 case SPELLBOOK:
1080 if (flag [FLAG_IDENTIFIED] && inv) 1089 if (flag [FLAG_IDENTIFIED] && inv)
1081 buf.printf ("%s is a %s %s spell\n", &inv->name, get_levelnumber (inv->level), &inv->skill); 1090 buf.printf ("%s is a %s %s spell.\r", &inv->name, get_levelnumber (inv->level), &inv->skill);
1082 break; 1091 break;
1083 1092
1084 case BOOK: 1093 case BOOK:
1085 if (msg) 1094 if (msg)
1086 buf << "Something is written in it.\n"; 1095 buf << "Something is written in it.\r";
1087 break; 1096 break;
1088 1097
1089 case CONTAINER: 1098 case CONTAINER:
1090 if (race != NULL) 1099 if (race)
1091 { 1100 {
1092 if (weight_limit && stats.Str < 100) 1101 if (weight_limit && stats.Str < 100)
1093 buf.printf ("It can hold only %s and its weight limit is %.1f kg.\n", 1102 buf.printf ("It can hold only %s and its weight limit is %.1f kg.\r",
1094 &race, weight_limit / (10.0 * (100 - stats.Str))); 1103 &race, weight_limit / (10.0 * (100 - stats.Str)));
1095 else 1104 else
1096 buf.printf ("It can hold only %s.\n", &race); 1105 buf.printf ("It can hold only %s.\r", &race);
1097 } 1106 }
1098 else if (weight_limit && stats.Str < 100) 1107 else if (weight_limit && stats.Str < 100)
1099 buf.printf ("Its weight limit is %.1f kg.\n", weight_limit / (10.0 * (100 - stats.Str))); 1108 buf.printf ("Its weight limit is %.1f kg.\r", weight_limit / (10.0 * (100 - stats.Str)));
1100 break; 1109 break;
1101 1110
1102 case WAND: 1111 case WAND:
1103 if (flag [FLAG_IDENTIFIED]) 1112 if (flag [FLAG_IDENTIFIED])
1104 buf.printf ("It has %d charges left.\n", stats.food); 1113 buf.printf ("It has %d charges left.\r", stats.food);
1105 break; 1114 break;
1106 } 1115 }
1107 1116
1108 if (materialname && !msg) 1117 if (materialname && !msg)
1109 buf.printf ("It is made of: %s.\n", &materialname); 1118 buf.printf ("It is made of: %s.\r", &materialname);
1110 1119
1111 if (who) 1120 if (who)
1112 /* Where to wear this item */ 1121 /* Where to wear this item */
1113 for (int i = 0; i < NUM_BODY_LOCATIONS; i++) 1122 for (int i = 0; i < NUM_BODY_LOCATIONS; i++)
1114 if (slot[i].info) 1123 if (slot[i].info)
1116 buf << (who->slot[i].info ? body_locations[i].use_name : body_locations[i].nonuse_name); 1125 buf << (who->slot[i].info ? body_locations[i].use_name : body_locations[i].nonuse_name);
1117 1126
1118 if (slot[i].info < -1 && who->slot[i].info) 1127 if (slot[i].info < -1 && who->slot[i].info)
1119 buf.printf ("(%d)", -slot[i].info); 1128 buf.printf ("(%d)", -slot[i].info);
1120 1129
1121 buf << ".\n"; 1130 buf << ".\r";
1122 } 1131 }
1123 1132
1124 if (weight) 1133 if (weight)
1125 buf.printf (nrof > 1 ? "They weigh %3.3f kg.\n" : "It weighs %3.3f kg.\n", weight * (nrof ? nrof : 1) / 1000.0); 1134 buf.printf ("%s %3.3f kg.\r", nrof > 1 ? "They weigh" : "It weighs", weight * (nrof ? nrof : 1) / 1000.0);
1126 1135
1127 if (value && !flag [FLAG_STARTEQUIP] && !flag [FLAG_NO_PICK] && who) 1136 if (value && !flag [FLAG_STARTEQUIP] && !flag [FLAG_NO_PICK] && who)
1128 { 1137 {
1129 buf.printf ("You reckon %s worth %s.\n", nrof > 1 ? "they are" : "it is", query_cost_string (this, who, F_TRUE | F_APPROX)); 1138 buf.printf ("You reckon %s worth %s.\r", nrof > 1 ? "they are" : "it is", query_cost_string (this, who, F_TRUE | F_APPROX));
1130 1139
1131 if (is_in_shop (who)) 1140 if (is_in_shop (who))
1132 { 1141 {
1133 if (flag [FLAG_UNPAID]) 1142 if (flag [FLAG_UNPAID])
1134 buf.printf ("%s would cost you %s.\n", nrof > 1 ? "They" : "It", query_cost_string (this, who, F_BUY | F_SHOP)); 1143 buf.printf ("%s would cost you %s.\r", nrof > 1 ? "They" : "It", query_cost_string (this, who, F_BUY | F_SHOP));
1135 else 1144 else
1136 buf.printf ("You are offered %s for %s.\n", query_cost_string (this, who, F_SELL + F_SHOP), nrof > 1 ? "them" : "it"); 1145 buf.printf ("You are offered %s for %s.\r", query_cost_string (this, who, F_SELL + F_SHOP), nrof > 1 ? "them" : "it");
1137 } 1146 }
1138 } 1147 }
1139 1148
1140 if (flag [FLAG_MONSTER]) 1149 if (flag [FLAG_MONSTER])
1141 buf << describe_monster (who); 1150 buf << describe_monster (who);
1142 1151
1143 /* Is this item buildable? */ 1152 /* Is this item buildable? */
1144 if (flag [FLAG_IS_BUILDABLE]) 1153 if (flag [FLAG_IS_BUILDABLE])
1145 buf << "This is a buildable item.\n"; 1154 buf << "This is a buildable item.\r";
1146 1155
1147 /* Does the object have a message? Don't show message for all object 1156 /* Does the object have a message? Don't show message for all object
1148 * types - especially if the first entry is a match 1157 * types - especially if the first entry is a match
1149 */ 1158 */
1150 if (msg && type != EXIT && type != BOOK && type != CORPSE && !move_on && *msg != '@') 1159 if (msg && type != EXIT && type != BOOK && type != CORPSE && !move_on && !has_dialogue ())
1151 { 1160 {
1152 /* This is just a hack so when identifying the items, we print 1161 /* This is just a hack so when identifying the items, we print
1153 * out the extra message 1162 * out the extra message
1154 */ 1163 */
1155 if (need_identify (this) && flag [FLAG_IDENTIFIED]) 1164 if (need_identify (this) && flag [FLAG_IDENTIFIED])
1156 buf << "The object has a story:\n"; 1165 buf << "The object has a story:\r";
1157 1166
1158 buf << msg << '\n'; 1167 buf << msg << '\n';
1159 } 1168 }
1160 1169
1161 buf << '\n'; 1170 buf << '\n';

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines