1 | /* |
1 | /* |
2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
3 | * |
3 | * |
4 | * Copyright (©) 2005,2006,2007,2008,2009 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
4 | * Copyright (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
5 | * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team |
5 | * Copyright (©) 2002 Mark Wedel & Crossfire Development Team |
6 | * Copyright (©) 1992,2007 Frank Tore Johansen |
6 | * Copyright (©) 1992 Frank Tore Johansen |
7 | * |
7 | * |
8 | * Deliantra is free software: you can redistribute it and/or modify it under |
8 | * Deliantra is free software: you can redistribute it and/or modify it under |
9 | * the terms of the Affero GNU General Public License as published by the |
9 | * the terms of the Affero GNU General Public License as published by the |
10 | * Free Software Foundation, either version 3 of the License, or (at your |
10 | * Free Software Foundation, either version 3 of the License, or (at your |
11 | * option) any later version. |
11 | * option) any later version. |
… | |
… | |
47 | * Note that using the term 'human' may not be very accurate, humanoid |
47 | * Note that using the term 'human' may not be very accurate, humanoid |
48 | * may be better. |
48 | * may be better. |
49 | * Basically, for the use/nonuse, the code does something like: |
49 | * Basically, for the use/nonuse, the code does something like: |
50 | * "This item goes %s\n", with the use/nonuse values filling in the %s |
50 | * "This item goes %s\n", with the use/nonuse values filling in the %s |
51 | */ |
51 | */ |
|
|
52 | // see include/object.h |
52 | Body_Locations body_locations[NUM_BODY_LOCATIONS] = { |
53 | Body_Locations body_locations[NUM_BODY_LOCATIONS] = { |
53 | {KW_body_skill , "You can use it as your skill" , "It is used as a skill"}, |
54 | {KW_body_skill , "You can use it as your skill" , "It is used as a skill"}, |
54 | {KW_body_combat , "You can wield it as your weapon" , "It is used as a combat weapon"}, |
55 | {KW_body_combat , "You can wield it as your weapon" , "It is used as a combat weapon"}, |
55 | {KW_body_range , "You can use it as your range weapon" , "It is used as a range weapon"}, |
56 | {KW_body_range , "You can use it as your range weapon" , "It is used as a range weapon"}, |
56 | {KW_body_shield , "You can wield it as a shield" , "It is used as a shield"}, |
57 | {KW_body_shield , "You can wield it as a shield" , "It is used as a shield"}, |
… | |
… | |
561 | * returned is good forever.) However, it makes printing statements that |
562 | * returned is good forever.) However, it makes printing statements that |
562 | * use several names much easier (don't need to store them to temp variables.) |
563 | * use several names much easier (don't need to store them to temp variables.) |
563 | * |
564 | * |
564 | * It is used extensively within messages, so should return only a prose |
565 | * It is used extensively within messages, so should return only a prose |
565 | * and short description of the item. |
566 | * and short description of the item. |
|
|
567 | * It is also used by examine/ex and similar functions. |
566 | */ |
568 | */ |
567 | const char * |
569 | const char * |
568 | query_name (const object *op) |
570 | query_name (const object *op) |
569 | { |
571 | { |
570 | int len = 0; |
572 | int len = 0; |
… | |
… | |
624 | { |
626 | { |
625 | case BOW: |
627 | case BOW: |
626 | case WAND: |
628 | case WAND: |
627 | case ROD: |
629 | case ROD: |
628 | case HORN: |
630 | case HORN: |
629 | buf << (op->env && op->env->current_weapon == op ? " (readied)" : " (applied)"); |
631 | buf << " (applied)"; |
630 | break; |
632 | break; |
631 | case WEAPON: |
633 | case WEAPON: |
632 | buf << (op->env && op->env->current_weapon == op ? " (wielded)" : " (applied)"); |
634 | buf << " (applied)"; |
633 | break; |
635 | break; |
634 | case ARMOUR: |
636 | case ARMOUR: |
635 | case HELMET: |
637 | case HELMET: |
636 | case SHIELD: |
638 | case SHIELD: |
637 | case RING: |
639 | case RING: |
… | |
… | |
686 | * and sending to client. |
688 | * and sending to client. |
687 | * If plural is set, we generate the plural name of this. |
689 | * If plural is set, we generate the plural name of this. |
688 | * |
690 | * |
689 | * It is sometimes used to display messages, and usually only used to match stuff, |
691 | * It is sometimes used to display messages, and usually only used to match stuff, |
690 | * so maybe this function should be removed. |
692 | * so maybe this function should be removed. |
|
|
693 | * It is also used for client-side inventory/item descriptions. |
691 | */ |
694 | */ |
692 | const char * |
695 | const char * |
693 | query_base_name (const object *op, int plural) |
696 | query_base_name (const object *op, int plural) |
694 | { |
697 | { |
695 | if ((!plural && !op->name) || (plural && !op->name_pl)) |
698 | if ((!plural && !op->name) || (plural && !op->name_pl)) |
696 | return "(null)"; |
699 | return "(null)"; |
697 | |
700 | |
698 | if (!op->nrof && !op->weight && !op->title && !is_magical (op)) |
701 | if (!op->nrof && !op->weight && !op->title && !is_magical (op) |
|
|
702 | && op->type != EXIT) |
699 | return op->name; /* To speed things up (or make things slower?) */ |
703 | return op->name; /* To speed things up (or make things slower?) */ |
700 | |
704 | |
701 | static dynbuf_text buf; buf.clear (); |
705 | static dynbuf_text buf; buf.clear (); |
702 | |
706 | |
703 | #if 0 |
707 | #if 0 |
… | |
… | |
739 | if (s && *s) |
743 | if (s && *s) |
740 | buf << ' ' << s; |
744 | buf << ' ' << s; |
741 | } |
745 | } |
742 | break; |
746 | break; |
743 | |
747 | |
|
|
748 | case EXIT: |
|
|
749 | // random map exits "unfortunately" get patched, so this only works before entering |
|
|
750 | if (EXIT_PATH (op) == shstr_random_map_exit) |
|
|
751 | buf << " (random map)"; |
|
|
752 | else if (!EXIT_PATH (op)) |
|
|
753 | buf << " (closed)"; |
|
|
754 | break; |
|
|
755 | |
744 | default: |
756 | default: |
745 | if (op->magic && ((QUERY_FLAG (op, FLAG_BEEN_APPLIED) && need_identify (op)) || QUERY_FLAG (op, FLAG_IDENTIFIED))) |
757 | if (op->magic && ((QUERY_FLAG (op, FLAG_BEEN_APPLIED) && need_identify (op)) || QUERY_FLAG (op, FLAG_IDENTIFIED))) |
746 | buf.printf (" %+d", op->magic); |
758 | buf.printf (" %+d", op->magic); |
747 | } |
759 | } |
748 | |
760 | |
… | |
… | |
763 | /* Note that the resolution this provides for players really isn't |
775 | /* Note that the resolution this provides for players really isn't |
764 | * very good. Any player with a speed greater than .67 will |
776 | * very good. Any player with a speed greater than .67 will |
765 | * fall into the 'lightning fast movement' category. |
777 | * fall into the 'lightning fast movement' category. |
766 | */ |
778 | */ |
767 | if (op->has_active_speed ()) |
779 | if (op->has_active_speed ()) |
768 | switch ((int)((fabs (op->speed)) * 15.)) |
780 | switch ((int)(op->speed * 15.)) |
769 | { |
781 | { |
770 | case 0: |
782 | case 0: |
771 | buf << "(very slow movement)"; |
783 | buf << "(very slow movement)"; |
772 | break; |
784 | break; |
773 | case 1: |
785 | case 1: |
… | |
… | |
843 | if (op->stats.luck) |
855 | if (op->stats.luck) |
844 | buf.printf ("(luck%+d)", op->stats.luck); |
856 | buf.printf ("(luck%+d)", op->stats.luck); |
845 | } |
857 | } |
846 | |
858 | |
847 | /* describe attacktypes */ |
859 | /* describe attacktypes */ |
848 | if (is_dragon_pl (op)) |
860 | if (op->is_dragon ()) |
849 | { |
861 | { |
850 | /* for dragon players display the attacktypes from clawing skill |
862 | /* for dragon players display the attacktypes from clawing skill |
851 | * Break apart the for loop - move the comparison checking down - |
863 | * Break apart the for loop - move the comparison checking down - |
852 | * this makes it more readable. |
864 | * this makes it more readable. |
853 | */ |
865 | */ |
… | |
… | |
936 | if (op->stats.maxsp > 1000) |
948 | if (op->stats.maxsp > 1000) |
937 | { /*higher capacity crystals */ |
949 | { /*higher capacity crystals */ |
938 | i = (op->stats.maxsp % 1000) / 100; |
950 | i = (op->stats.maxsp % 1000) / 100; |
939 | |
951 | |
940 | if (i) |
952 | if (i) |
941 | buf.printf ("(capacity %d.%dk). It is ", op->stats.maxsp / 1000, i); |
953 | buf.printf ("(capacity %d.%dk; it is ", op->stats.maxsp / 1000, i); |
942 | else |
954 | else |
943 | buf.printf ("(capacity %dk). It is ", op->stats.maxsp / 1000); |
955 | buf.printf ("(capacity %dk; it is ", op->stats.maxsp / 1000); |
944 | } |
956 | } |
945 | else |
957 | else |
946 | buf.printf ("(capacity %d). It is ", op->stats.maxsp); |
958 | buf.printf ("(capacity %d; it is ", op->stats.maxsp); |
947 | |
959 | |
948 | i = (op->stats.sp * 10) / op->stats.maxsp; |
960 | i = (op->stats.sp * 10) / op->stats.maxsp; |
949 | if (op->stats.sp == 0) |
961 | if (op->stats.sp == 0) |
950 | buf << "empty."; |
962 | buf << "empty"; |
951 | else if (i == 0) |
963 | else if (i == 0) |
952 | buf << "almost empty."; |
964 | buf << "almost empty"; |
953 | else if (i < 3) |
965 | else if (i < 3) |
954 | buf << "partially filled."; |
966 | buf << "partially filled"; |
955 | else if (i < 6) |
967 | else if (i < 6) |
956 | buf << "half full."; |
968 | buf << "half full"; |
957 | else if (i < 9) |
969 | else if (i < 9) |
958 | buf << "well charged."; |
970 | buf << "well charged"; |
959 | else if (op->stats.sp == op->stats.maxsp) |
971 | else if (op->stats.sp == op->stats.maxsp) |
960 | buf << "fully charged."; |
972 | buf << "fully charged"; |
961 | else |
973 | else |
962 | buf << "almost full."; |
974 | buf << "almost full"; |
|
|
975 | |
|
|
976 | buf << ')'; |
963 | break; |
977 | break; |
964 | |
978 | |
965 | case LAMP: |
979 | case LAMP: |
966 | { |
980 | { |
967 | int percent = ((double) 100 / op->arch->stats.food) * op->stats.food; |
981 | int percent = ((double) 100 / op->arch->stats.food) * op->stats.food; |
… | |
… | |
1152 | |
1166 | |
1153 | buf.add_abilities ("Attacks", op->attacktype); |
1167 | buf.add_abilities ("Attacks", op->attacktype); |
1154 | /* resistance on flesh is only visible for quetzals. If |
1168 | /* resistance on flesh is only visible for quetzals. If |
1155 | * non flesh, everyone can see its resistances |
1169 | * non flesh, everyone can see its resistances |
1156 | */ |
1170 | */ |
1157 | if (op->type != FLESH || (owner && is_dragon_pl (owner))) |
1171 | if (op->type != FLESH || (owner && owner->is_dragon ())) |
1158 | buf << describe_resistance (op, 0); |
1172 | buf << describe_resistance (op, 0); |
1159 | |
1173 | |
1160 | buf.add_paths ("Attuned", op->path_attuned); |
1174 | buf.add_paths ("Attuned", op->path_attuned); |
1161 | buf.add_paths ("Repelled", op->path_repelled); |
1175 | buf.add_paths ("Repelled", op->path_repelled); |
1162 | buf.add_paths ("Denied", op->path_denied); |
1176 | buf.add_paths ("Denied", op->path_denied); |
… | |
… | |
1167 | |
1181 | |
1168 | std::string |
1182 | std::string |
1169 | object::describe_item (object *who) |
1183 | object::describe_item (object *who) |
1170 | { |
1184 | { |
1171 | return std::string (::describe_item (this, who)); |
1185 | return std::string (::describe_item (this, who)); |
|
|
1186 | } |
|
|
1187 | |
|
|
1188 | static void |
|
|
1189 | describe_dump_object (dynbuf &buf, object *ob) |
|
|
1190 | { |
|
|
1191 | char *txt = dump_object (ob); |
|
|
1192 | for (char *p = txt; *p; ++p) if (*p == '\n') *p = '\r'; |
|
|
1193 | buf << "\n" << txt << "\n"; |
|
|
1194 | |
|
|
1195 | if (!ob->is_arch ()) |
|
|
1196 | describe_dump_object (buf, ob->arch); |
|
|
1197 | } |
|
|
1198 | |
|
|
1199 | std::string |
|
|
1200 | object::describe (object *who) |
|
|
1201 | { |
|
|
1202 | dynbuf_text buf (1024, 1024); |
|
|
1203 | |
|
|
1204 | buf.printf ("That is: %s.\r", long_desc (who).c_str ()); |
|
|
1205 | |
|
|
1206 | if (custom_name) |
|
|
1207 | buf.printf ("You call it %s.\r", &custom_name); |
|
|
1208 | |
|
|
1209 | switch (type) |
|
|
1210 | { |
|
|
1211 | case SPELLBOOK: |
|
|
1212 | if (flag [FLAG_IDENTIFIED] && inv) |
|
|
1213 | buf.printf ("%s is a level %s %s spell.\r", &inv->name, get_levelnumber (inv->level), &inv->skill); |
|
|
1214 | break; |
|
|
1215 | |
|
|
1216 | case BOOK: |
|
|
1217 | if (msg) |
|
|
1218 | buf << "Something is written in it.\r"; |
|
|
1219 | break; |
|
|
1220 | |
|
|
1221 | case CONTAINER: |
|
|
1222 | if (race) |
|
|
1223 | { |
|
|
1224 | if (weight_limit && stats.Str < 100) |
|
|
1225 | buf.printf ("It can hold only %s and its weight limit is %.1f kg.\r", |
|
|
1226 | &race, weight_limit / (10.0 * (100 - stats.Str))); |
|
|
1227 | else |
|
|
1228 | buf.printf ("It can hold only %s.\r", &race); |
|
|
1229 | } |
|
|
1230 | else if (weight_limit && stats.Str < 100) |
|
|
1231 | buf.printf ("Its weight limit is %.1f kg.\r", weight_limit / (10.0 * (100 - stats.Str))); |
|
|
1232 | break; |
|
|
1233 | |
|
|
1234 | case WAND: |
|
|
1235 | if (flag [FLAG_IDENTIFIED]) |
|
|
1236 | buf.printf ("It has %d %s left.\r", stats.food, stats.food == 1 ? "charge" : "charges"); |
|
|
1237 | break; |
|
|
1238 | } |
|
|
1239 | |
|
|
1240 | if (material != MATERIAL_NULL && !msg) |
|
|
1241 | buf << (nrof > 1 ? "They are made of " : "It is made of ") |
|
|
1242 | << material->description |
|
|
1243 | << ".\r"; |
|
|
1244 | |
|
|
1245 | if (who) |
|
|
1246 | /* Where to wear this item */ |
|
|
1247 | for (int i = 0; i < NUM_BODY_LOCATIONS; i++) |
|
|
1248 | if (slot[i].info) |
|
|
1249 | { |
|
|
1250 | buf << (who->slot[i].info ? body_locations[i].use_name : body_locations[i].nonuse_name); |
|
|
1251 | |
|
|
1252 | if (slot[i].info < -1 && who->slot[i].info) |
|
|
1253 | buf.printf ("(%d)", -slot[i].info); |
|
|
1254 | |
|
|
1255 | buf << ".\r"; |
|
|
1256 | } |
|
|
1257 | |
|
|
1258 | if (weight) |
|
|
1259 | buf.printf ("%s %3.3f kg.\r", nrof > 1 ? "They weigh" : "It weighs", weight * (nrof ? nrof : 1) / 1000.0); |
|
|
1260 | |
|
|
1261 | if (flag [FLAG_STARTEQUIP]) |
|
|
1262 | buf << (nrof > 1 ? "They were" : "It was") |
|
|
1263 | << " given by a god and will vanish when dropped.\r"; |
|
|
1264 | |
|
|
1265 | if (value && !flag [FLAG_STARTEQUIP] && !flag [FLAG_NO_PICK] && who) |
|
|
1266 | { |
|
|
1267 | buf.printf ("You reckon %s worth %s.\r", nrof > 1 ? "they are" : "it is", query_cost_string (this, who, F_TRUE | F_APPROX)); |
|
|
1268 | |
|
|
1269 | if (who->is_in_shop ()) |
|
|
1270 | { |
|
|
1271 | if (flag [FLAG_UNPAID]) |
|
|
1272 | buf.printf ("%s would cost you %s.\r", nrof > 1 ? "They" : "It", query_cost_string (this, who, F_BUY | F_SHOP)); |
|
|
1273 | else |
|
|
1274 | buf.printf ("You are offered %s for %s.\r", query_cost_string (this, who, F_SELL + F_SHOP), nrof > 1 ? "them" : "it"); |
|
|
1275 | } |
|
|
1276 | } |
|
|
1277 | |
|
|
1278 | if (flag [FLAG_MONSTER]) |
|
|
1279 | buf << describe_monster (who); |
|
|
1280 | |
|
|
1281 | /* Is this item buildable? */ |
|
|
1282 | if (flag [FLAG_IS_BUILDABLE]) |
|
|
1283 | buf << "This is a buildable item.\r"; |
|
|
1284 | |
|
|
1285 | /* Does the object have a message? Don't show message for all object |
|
|
1286 | * types - especially if the first entry is a match |
|
|
1287 | */ |
|
|
1288 | if (msg) |
|
|
1289 | { |
|
|
1290 | if (type != EXIT && type != BOOK && type != CORPSE && !move_on && !has_dialogue ()) |
|
|
1291 | { |
|
|
1292 | buf << '\r'; |
|
|
1293 | |
|
|
1294 | /* This is just a hack so when identifying the items, we print |
|
|
1295 | * out the extra message |
|
|
1296 | */ |
|
|
1297 | if (need_identify (this) && flag [FLAG_IDENTIFIED]) |
|
|
1298 | buf << "The object has a story:\r"; |
|
|
1299 | |
|
|
1300 | buf << msg << '\n'; |
|
|
1301 | } |
|
|
1302 | } |
|
|
1303 | else if (inv && inv->type == SPELL && flag [FLAG_IDENTIFIED] |
|
|
1304 | && (type == SPELLBOOK || type == ROD || type == WAND |
|
|
1305 | || type == ROD || type == POTION || type == SCROLL)) |
|
|
1306 | // for spellbooks and other stuff that contains spells, print the spell message, |
|
|
1307 | // unless the object has a custom message handled above. |
|
|
1308 | buf << '\r' << inv->msg << '\n'; |
|
|
1309 | |
|
|
1310 | // try to display the duration for some potions and scrolls |
|
|
1311 | // this includes change ability potions and group spells, |
|
|
1312 | // but does not handle protection potions |
|
|
1313 | if (inv && inv->type == SPELL && flag [FLAG_IDENTIFIED] |
|
|
1314 | && (type == POTION || type == SCROLL)) |
|
|
1315 | { |
|
|
1316 | object *spell = inv; |
|
|
1317 | |
|
|
1318 | if (spell->subtype == SP_PARTY_SPELL) |
|
|
1319 | spell = spell->other_arch; |
|
|
1320 | |
|
|
1321 | if (spell->subtype == SP_CHANGE_ABILITY) |
|
|
1322 | buf.printf ("\nH<The effect will last about %.10g seconds.>", |
|
|
1323 | TICK2TIME (change_ability_duration (spell, this))); |
|
|
1324 | } |
|
|
1325 | |
|
|
1326 | // Display a hint about inscribable items [empty books] |
|
|
1327 | // This includes the amount of text they can hold. |
|
|
1328 | if (type == INSCRIBABLE) |
|
|
1329 | { |
|
|
1330 | if (other_arch && other_arch->type == SCROLL) |
|
|
1331 | buf.printf ("\nH<You can use the inscription skill to inscribe a spell into it.>"); |
|
|
1332 | else |
|
|
1333 | buf.printf ("\nH<You can use the inscription skill to inscribe text into it. It has room for up to %d characters.>", |
|
|
1334 | weight_limit); |
|
|
1335 | } |
|
|
1336 | |
|
|
1337 | buf << '\n'; |
|
|
1338 | |
|
|
1339 | // the dungeon master additionally gets a complete dump |
|
|
1340 | if (who && who->flag [FLAG_WIZLOOK]) |
|
|
1341 | { |
|
|
1342 | buf << "\nT<Object>\n"; |
|
|
1343 | describe_dump_object (buf, this); |
|
|
1344 | |
|
|
1345 | if (inv) |
|
|
1346 | { |
|
|
1347 | buf << "\nT<Top Inventory>\n"; |
|
|
1348 | describe_dump_object (buf, inv); |
|
|
1349 | } |
|
|
1350 | } |
|
|
1351 | |
|
|
1352 | return std::string (buf.linearise (), buf.size ()); |
1172 | } |
1353 | } |
1173 | |
1354 | |
1174 | void |
1355 | void |
1175 | examine (object *op, object *tmp) |
1356 | examine (object *op, object *tmp) |
1176 | { |
1357 | { |
… | |
… | |
1189 | { |
1370 | { |
1190 | static dynbuf_text buf; buf.clear (); |
1371 | static dynbuf_text buf; buf.clear (); |
1191 | |
1372 | |
1192 | for (object *tmp = inv; tmp; tmp = tmp->below) |
1373 | for (object *tmp = inv; tmp; tmp = tmp->below) |
1193 | if (who && QUERY_FLAG (who, FLAG_WIZ)) |
1374 | if (who && QUERY_FLAG (who, FLAG_WIZ)) |
1194 | buf.printf ("%s- %-28.28s (%5d) %-8s\n", indent, tmp->query_name (), tmp->count, tmp->query_weight ()); |
1375 | buf.printf ("%s- %-28.28s %-8s (%9d) %s\n", indent, tmp->query_name (), tmp->query_weight (), tmp->count, tmp->uuid.c_str ()); |
1195 | else if (!tmp->invisible && (type == CONTAINER || QUERY_FLAG (tmp, FLAG_APPLIED))) |
1376 | else if (!tmp->invisible && (type == CONTAINER || QUERY_FLAG (tmp, FLAG_APPLIED))) |
1196 | buf.printf ("%s- %-36.36s %-8s\n", indent, tmp->query_name (), tmp->query_weight ()); |
1377 | buf.printf ("%s- %-36.36s %-8s\n", indent, tmp->query_name (), tmp->query_weight ()); |
1197 | |
1378 | |
1198 | if (buf.size ()) |
1379 | if (buf.size ()) |
1199 | buf.printf ("%s(total weight: %s)\n", indent, query_weight ()); |
1380 | buf.printf ("%s(total weight: %s)\n", indent, query_weight ()); |