[ViewVC] Diff of: cvs/deliantra/server/common/item.C

Comparing deliantra/server/common/item.C (file contents):
Revision 1.77 by root, Sat Apr 3 02:27:24 2010 UTC vs.
Revision 1.86 by root, Fri Apr 30 20:43:17 2010 UTC

…		…
71	static char numbers_10[10][20] = {	71	static char numbers_10[10][20] = {
72	"zero", "ten", "twenty", "thirty", "fourty", "fifty", "sixty", "seventy",	72	"zero", "ten", "twenty", "thirty", "fourty", "fifty", "sixty", "seventy",
73	"eighty", "ninety"	73	"eighty", "ninety"
74	};	74	};
75		75
76	static char levelnumbers[21][20] = {	76	static char ordnumbers[21][20] = {
77	"zeroth", "first", "second", "third", "fourth", "fifth", "sixth", "seventh",	77	"zeroth", "first", "second", "third", "fourth", "fifth", "sixth", "seventh",
78	"eighth", "ninth", "tenth", "eleventh", "twelfth", "thirteenth",	78	"eighth", "ninth", "tenth", "eleventh", "twelfth", "thirteenth",
79	"fourteenth", "fifteenth", "sixteenth", "seventeenth", "eighteen",	79	"fourteenth", "fifteenth", "sixteenth", "seventeenth", "eighteenth",
80	"nineteen", "twentieth"	80	"nineteenth", "twentieth"
81	};	81	};
82		82
83	static char levelnumbers_10[11][20] = {	83	static char ordnumbers_10[11][20] = {
84	"zeroth", "tenth", "twentieth", "thirtieth", "fortieth", "fiftieth", "sixtieth",	84	"zeroth", "tenth", "twentieth", "thirtieth", "fortieth", "fiftieth", "sixtieth",
85	"seventieth", "eightieth", "ninetieth"	85	"seventieth", "eightieth", "ninetieth"
86	};	86	};
87		87
88	/* The following is a large table of item types, the fields are:	88	/* The following is a large table of item types, the fields are:
…		…
151	{EXIT, "exit", "exits", 0, 0},	151	{EXIT, "exit", "exits", 0, 0},
152	{ENCOUNTER, "encounter", "encounters", 0, 0},	152	{ENCOUNTER, "encounter", "encounters", 0, 0},
153	{SHOP_FLOOR, "shop floor", "shop floors", 0, 0},	153	{SHOP_FLOOR, "shop floor", "shop floors", 0, 0},
154	{SHOP_MAT, "shop mat", "shop mats", 0, 0},	154	{SHOP_MAT, "shop mat", "shop mats", 0, 0},
155	{RING, "ring", "rings", SK_JEWELER, 0},	155	{RING, "ring", "rings", SK_JEWELER, 0},
156	{FLOOR, "floor", "floors", 0, 0},	156	// {FLOOR, "floor", "floors", 0, 0},
157	{FLESH, "flesh", "flesh", SK_WOODSMAN, 0},	157	{FLESH, "flesh", "flesh", SK_WOODSMAN, 0},
158	{INORGANIC, "inorganic", "inorganics", SK_ALCHEMY, 0},	158	{INORGANIC, "inorganic", "inorganics", SK_ALCHEMY, 0},
159	{SKILL_TOOL, "skill tool", "skill tools", 0, 0},	159	{SKILL_TOOL, "skill tool", "skill tools", 0, 0},
160	{LIGHTER, "lighter", "lighters", 0, 0},	160	{LIGHTER, "lighter", "lighters", 0, 0},
161	{BUILDABLE_WALL, "buildable wall", "buildable walls", 0, 0},	161	{BUILDABLE_WALL, "buildable wall", "buildable walls", 0, 0},
…		…
202	{BUILDER, "item builder", "item builders", 0, 0},	202	{BUILDER, "item builder", "item builders", 0, 0},
203	{MATERIAL, "building material", "building materials", 0, 0},	203	{MATERIAL, "building material", "building materials", 0, 0},
204	{ITEM_TRANSFORMER, "item_transformer", "item_transformers", 0, 0},	204	{ITEM_TRANSFORMER, "item_transformer", "item_transformers", 0, 0},
205	};	205	};
206		206
207	static const int item_types_size = sizeof (item_types) / sizeof (*item_types);	207	static const int item_types_size = array_length (item_types);
208		208
209	/* This curve may be too steep. But the point is that there should	209	/* This curve may be too steep. But the point is that there should
210	* be tough choices - there is no real point to this if everyone can	210	* be tough choices - there is no real point to this if everyone can
211	* wear whatever they want with no worries. Perhaps having the steep	211	* wear whatever they want with no worries. Perhaps having the steep
212	* curve is good (maybe even steeper), but allowing players to	212	* curve is good (maybe even steeper), but allowing players to
…		…
214	* able to use 2-3 of the most powerful items.	214	* able to use 2-3 of the most powerful items.
215	* note that this table is only really used for program generated items -	215	* note that this table is only really used for program generated items -
216	* custom objects can use whatever they want.	216	* custom objects can use whatever they want.
217	*/	217	*/
218	static int enc_to_item_power[21] = {	218	static int enc_to_item_power[21] = {
		219	0,
219	0, 0, 1, 2, 3, 4, /* 5 */	220	0, 1, 2, 3, 4, // 5
220	5, 7, 9, 11, 13, /* 10 */	221	5, 7, 9, 11, 13, // 10
221	15, 18, 21, 24, 27, /* 15 */	222	15, 18, 21, 24, 27, // 15
222	30, 35, 40, 45, 50 /* 20 */	223	30, 35, 40, 45, 50 // 20
223	};	224	};
224		225
225	int	226	int
226	get_power_from_ench (int ench)	227	get_power_from_ench (int ench)
227	{	228	{
228	return enc_to_item_power [clamp (ench, 0, 20)];	229	return enc_to_item_power [clamp (ench, 0, 20)];
		230	}
		231
		232	static const struct need_identify_types : typeset
		233	{
		234	need_identify_types ()
		235	{
		236	set (RING);
		237	set (WAND);
		238	set (ROD);
		239	set (HORN);
		240	set (SCROLL);
		241	set (SKILL);
		242	set (SKILLSCROLL);
		243	set (SPELLBOOK);
		244	set (FOOD);
		245	set (POTION);
		246	set (BOW);
		247	set (ARROW);
		248	set (WEAPON);
		249	set (ARMOUR);
		250	set (SHIELD);
		251	set (HELMET);
		252	set (AMULET);
		253	set (BOOTS);
		254	set (GLOVES);
		255	set (BRACERS);
		256	set (GIRDLE);
		257	set (CONTAINER);
		258	set (DRINK);
		259	set (FLESH);
		260	set (INORGANIC);
		261	set (CLOSE_CON);
		262	set (CLOAK);
		263	set (GEM);
		264	set (POWER_CRYSTAL);
		265	set (POISON);
		266	set (BOOK);
		267	set (SKILL_TOOL);
		268	}
		269	} need_identify_types;
		270
		271	bool
		272	object::need_identify () const
		273	{
		274	return need_identify_types [type];
229	}	275	}
230		276
231	/* This takes an object 'op' and figures out what its item_power	277	/* This takes an object 'op' and figures out what its item_power
232	* rating should be. This should only really be used by the treasure	278	* rating should be. This should only really be used by the treasure
233	* generation code, and when loading legacy objects. It returns	279	* generation code, and when loading legacy objects. It returns
…		…
387	/*	433	/*
388	* Returns the pointer to a static buffer containing	434	* Returns the pointer to a static buffer containing
389	* the number requested (of the form first, second, third...)	435	* the number requested (of the form first, second, third...)
390	*/	436	*/
391	const char *	437	const char *
392	get_levelnumber (int i)	438	ordinal (int i)
393	{	439	{
394	static char buf[MAX_BUF];	440	if (i < 0)
395		441	return format ("minus %s", ordinal (-i));
396	if (i > 99)
397	{
398	sprintf (buf, "%d.", i);
399	return buf;
400	}
401		442
402	if (i < 21)	443	if (i < 21)
403	return levelnumbers[i];	444	return ordnumbers[i];
404		445
		446	int digit = i % 10;
		447
405	if (!(i % 10))	448	if (i >= 100)
		449	return format (
		450	digit == 1 ? "%dst"
		451	: digit == 2 ? "%dnd"
		452	: digit == 3 ? "%drd"
		453	: "%dth",
		454	i
		455	);
		456
		457	if (digit == 0)
406	return levelnumbers_10[i / 10];	458	return ordnumbers_10[i / 10];
407		459	else
408	strcpy (buf, numbers_10[i / 10]);	460	return format ("%s%s", numbers_10[i / 10], ordnumbers[i % 10]);
409	strcat (buf, levelnumbers[i % 10]);
410	return buf;
411	}	461	}
412		462
413	/*	463	/*
414	* Returns pointer to static buffer containing ring's or amulet's	464	* Returns pointer to static buffer containing ring's or amulet's
415	* abilities	465	* abilities
…		…
427	ring_desc (const object *op)	477	ring_desc (const object *op)
428	{	478	{
429	static dynbuf_text buf; buf.clear ();	479	static dynbuf_text buf; buf.clear ();
430	int attr, val, len;	480	int attr, val, len;
431		481
432	if (QUERY_FLAG (op, FLAG_IDENTIFIED))	482	if (op->flag [FLAG_IDENTIFIED])
433	{	483	{
434	for (attr = 0; attr < NUM_STATS; attr++)	484	for (attr = 0; attr < NUM_STATS; attr++)
435	if ((val = op->stats.stat (attr)))	485	if ((val = op->stats.stat (attr)))
436	buf.printf ("(%s%+d)", short_stat_name[attr], val);	486	buf.printf ("(%s%+d)", short_stat_name[attr], val);
437		487
…		…
446	if (op->stats.grace) buf.printf ("(grace%+d)", op->stats.grace);	496	if (op->stats.grace) buf.printf ("(grace%+d)", op->stats.grace);
447	if (op->stats.sp && op->type != SKILL) buf.printf ("(magic%+d)", op->stats.sp);	497	if (op->stats.sp && op->type != SKILL) buf.printf ("(magic%+d)", op->stats.sp);
448	if (op->stats.hp) buf.printf ("(regeneration%+d)", op->stats.hp);	498	if (op->stats.hp) buf.printf ("(regeneration%+d)", op->stats.hp);
449	if (op->stats.luck) buf.printf ("(luck%+d)", op->stats.luck);	499	if (op->stats.luck) buf.printf ("(luck%+d)", op->stats.luck);
450		500
451	if (QUERY_FLAG (op, FLAG_LIFESAVE)) buf << "(lifesaving)";	501	if (op->flag [FLAG_LIFESAVE]) buf << "(lifesaving)";
452	if (QUERY_FLAG (op, FLAG_REFL_SPELL)) buf << "(reflect spells)";	502	if (op->flag [FLAG_REFL_SPELL]) buf << "(reflect spells)";
453	if (QUERY_FLAG (op, FLAG_REFL_MISSILE)) buf << "(reflect missiles)";	503	if (op->flag [FLAG_REFL_MISSILE]) buf << "(reflect missiles)";
454	if (QUERY_FLAG (op, FLAG_STEALTH)) buf << "(stealth)";	504	if (op->flag [FLAG_STEALTH]) buf << "(stealth)";
455		505
456	buf.add_paths ("Attuned" , op->path_attuned);	506	buf.add_paths ("Attuned" , op->path_attuned);
457	buf.add_paths ("Repelled", op->path_repelled);	507	buf.add_paths ("Repelled", op->path_repelled);
458	buf.add_paths ("Denied" , op->path_denied);	508	buf.add_paths ("Denied" , op->path_denied);
459		509
…		…
485		535
486	static dynbuf_text buf; buf.clear ();	536	static dynbuf_text buf; buf.clear ();
487		537
488	buf << (op->nrof <= 1 ? op->name : op->name_pl);	538	buf << (op->nrof <= 1 ? op->name : op->name_pl);
489		539
490	if (op->title && QUERY_FLAG (op, FLAG_IDENTIFIED))	540	if (op->title && op->flag [FLAG_IDENTIFIED])
491	buf << ' ' << op->title;	541	buf << ' ' << op->title;
492		542
493	switch (op->type)	543	switch (op->type)
494	{	544	{
495	case SPELLBOOK:	545	case SPELLBOOK:
496	case SCROLL:	546	case SCROLL:
497	case WAND:	547	case WAND:
498	case ROD:	548	case ROD:
499	if (QUERY_FLAG (op, FLAG_IDENTIFIED) \|\| QUERY_FLAG (op, FLAG_BEEN_APPLIED))	549	if (op->flag [FLAG_IDENTIFIED] \|\| op->flag [FLAG_BEEN_APPLIED])
500	{	550	{
501	if (!op->title)	551	if (!op->title)
502	buf << " of " << (op->inv ? &op->inv->name : "bug, please report");	552	buf << " of " << (op->inv ? &op->inv->name : "bug, please report");
503		553
504	if (op->type != SPELLBOOK)	554	if (op->type != SPELLBOOK)
…		…
543	buf << " " << s;	593	buf << " " << s;
544	}	594	}
545	break;	595	break;
546		596
547	default:	597	default:
548	if (op->magic && ((QUERY_FLAG (op, FLAG_BEEN_APPLIED) && need_identify (op)) \|\| QUERY_FLAG (op, FLAG_IDENTIFIED)))	598	if (op->magic
		599	&& ((op->flag [FLAG_BEEN_APPLIED] && op->need_identify ())
		600	\|\| op->flag [FLAG_IDENTIFIED]))
549	buf.printf (" %+d", op->magic);	601	buf.printf (" %+d", op->magic);
550	}	602	}
551		603
552	return buf;	604	return buf;
553	}	605	}
…		…
584	buf << op->material->description << ' ';	636	buf << op->material->description << ' ';
585	#endif	637	#endif
586		638
587	buf << query_short_name (op);	639	buf << query_short_name (op);
588		640
589	if (QUERY_FLAG (op, FLAG_INV_LOCKED))	641	if (op->flag [FLAG_INV_LOCKED])
590	buf << " *";	642	buf << " *";
591	if (op->is_open_container ())	643	if (op->is_open_container ())
592	buf << " (open)";	644	buf << " (open)";
593		645
594	if (QUERY_FLAG (op, FLAG_KNOWN_CURSED))	646	if (op->flag [FLAG_KNOWN_CURSED])
595	{	647	{
596	if (QUERY_FLAG (op, FLAG_DAMNED))	648	if (op->flag [FLAG_DAMNED])
597	buf << " (damned)";	649	buf << " (damned)";
598	else if (QUERY_FLAG (op, FLAG_CURSED))	650	else if (op->flag [FLAG_CURSED])
599	buf << " (cursed)";	651	buf << " (cursed)";
600	}	652	}
601		653
602	/* Basically, if the object is known magical (detect magic spell on it),	654	/* Basically, if the object is known magical (detect magic spell on it),
603	* and it isn't identified, print out the fact that	655	* and it isn't identified, print out the fact that
…		…
606	*	658	*
607	* Changed in V 0.91.4 - still print that the object is magical even	659	* Changed in V 0.91.4 - still print that the object is magical even
608	* if it has been applied. Equipping an item does not tell full	660	* if it has been applied. Equipping an item does not tell full
609	* abilities, especially for artifact items.	661	* abilities, especially for artifact items.
610	*/	662	*/
611	if (QUERY_FLAG (op, FLAG_KNOWN_MAGICAL) && !QUERY_FLAG (op, FLAG_IDENTIFIED))	663	if (op->flag [FLAG_KNOWN_MAGICAL] && !op->flag [FLAG_IDENTIFIED])
612	buf << " (magic)";	664	buf << " (magic)";
613		665
614	#if 0	666	#if 0
615	/* item_power will be returned in describe_item - it shouldn't really	667	/* item_power will be returned in describe_item - it shouldn't really
616	* be returned in the name.	668	* be returned in the name.
…		…
618	if (op->item_power)	670	if (op->item_power)
619	sprintf (buf[use_buf] + strlen (buf[use_buf]), "(item_power %+d)", op->item_power);	671	sprintf (buf[use_buf] + strlen (buf[use_buf]), "(item_power %+d)", op->item_power);
620		672
621	#endif	673	#endif
622		674
623	if (QUERY_FLAG (op, FLAG_APPLIED))	675	if (op->flag [FLAG_APPLIED])
624	{	676	{
625	switch (op->type)	677	switch (op->type)
626	{	678	{
627	case BOW:	679	case BOW:
628	case WAND:	680	case WAND:
…		…
671	else if (op->stats.food <= 0)	723	else if (op->stats.food <= 0)
672	buf << " (burned out)";	724	buf << " (burned out)";
673	break;	725	break;
674	}	726	}
675		727
676	if (QUERY_FLAG (op, FLAG_UNPAID))	728	if (op->flag [FLAG_UNPAID])
677	buf << " (unpaid)";	729	buf << " (unpaid)";
678		730
679	return buf;	731	return buf;
680	}	732	}
681		733
…		…
710	buf << op->material->description << ' ';	762	buf << op->material->description << ' ';
711	#endif	763	#endif
712		764
713	buf << (plural ? op->name_pl : op->name);	765	buf << (plural ? op->name_pl : op->name);
714		766
715	if (op->title && QUERY_FLAG (op, FLAG_IDENTIFIED))	767	if (op->title && op->flag [FLAG_IDENTIFIED])
716	buf << ' ' << op->title;	768	buf << ' ' << op->title;
717		769
718	switch (op->type)	770	switch (op->type)
719	{	771	{
720	case SPELLBOOK:	772	case SPELLBOOK:
721	case SCROLL:	773	case SCROLL:
722	case WAND:	774	case WAND:
723	case ROD:	775	case ROD:
724	if (QUERY_FLAG (op, FLAG_IDENTIFIED) \|\| QUERY_FLAG (op, FLAG_BEEN_APPLIED))	776	if (op->flag [FLAG_IDENTIFIED] \|\| op->flag [FLAG_BEEN_APPLIED])
725	{	777	{
726	if (!op->title)	778	if (!op->title)
727	buf << " of " << (op->inv ? &op->inv->name : "bug, please report");	779	buf << " of " << (op->inv ? &op->inv->name : "bug, please report");
728		780
729	if (op->type != SPELLBOOK)	781	if (op->type != SPELLBOOK)
…		…
752	else if (!EXIT_PATH (op))	804	else if (!EXIT_PATH (op))
753	buf << " (closed)";	805	buf << " (closed)";
754	break;	806	break;
755		807
756	default:	808	default:
757	if (op->magic && ((QUERY_FLAG (op, FLAG_BEEN_APPLIED) && need_identify (op)) \|\| QUERY_FLAG (op, FLAG_IDENTIFIED)))	809	if (op->magic
		810	&& ((op->flag [FLAG_BEEN_APPLIED] && op->need_identify ())
		811	\|\| op->flag [FLAG_IDENTIFIED]))
758	buf.printf (" %+d", op->magic);	812	buf.printf (" %+d", op->magic);
759	}	813	}
760		814
761	return buf;	815	return buf;
762	}	816	}
…		…
805	default:	859	default:
806	buf << "(lightning fast movement)";	860	buf << "(lightning fast movement)";
807	break;	861	break;
808	}	862	}
809		863
810	if (QUERY_FLAG (op, FLAG_UNDEAD)) buf << "(undead)";	864	if (op->flag [FLAG_UNDEAD]) buf << "(undead)";
811	if (QUERY_FLAG (op, FLAG_SEE_INVISIBLE)) buf << "(see invisible)";	865	if (op->flag [FLAG_SEE_INVISIBLE]) buf << "(see invisible)";
812	if (QUERY_FLAG (op, FLAG_USE_WEAPON)) buf << "(wield weapon)";	866	if (op->flag [FLAG_USE_WEAPON]) buf << "(wield weapon)";
813	if (QUERY_FLAG (op, FLAG_USE_BOW)) buf << "(archer)";	867	if (op->flag [FLAG_USE_BOW]) buf << "(archer)";
814	if (QUERY_FLAG (op, FLAG_USE_ARMOUR)) buf << "(wear armour)";	868	if (op->flag [FLAG_USE_ARMOUR]) buf << "(wear armour)";
815	if (QUERY_FLAG (op, FLAG_USE_RING)) buf << "(wear ring)";	869	if (op->flag [FLAG_USE_RING]) buf << "(wear ring)";
816	if (QUERY_FLAG (op, FLAG_USE_SCROLL)) buf << "(read scroll)";	870	if (op->flag [FLAG_USE_SCROLL]) buf << "(read scroll)";
817	if (QUERY_FLAG (op, FLAG_USE_RANGE)) buf << "(fires wand/rod/horn)";	871	if (op->flag [FLAG_USE_RANGE]) buf << "(fires wand/rod/horn)";
818	if (QUERY_FLAG (op, FLAG_CAN_USE_SKILL)) buf << "(skill user)";	872	if (op->flag [FLAG_CAN_USE_SKILL]) buf << "(skill user)";
819	if (QUERY_FLAG (op, FLAG_CAST_SPELL)) buf << "(spellcaster)";	873	if (op->flag [FLAG_CAST_SPELL]) buf << "(spellcaster)";
820	if (QUERY_FLAG (op, FLAG_FRIENDLY)) buf << "(friendly)";	874	if (op->flag [FLAG_FRIENDLY]) buf << "(friendly)";
821	if (QUERY_FLAG (op, FLAG_UNAGGRESSIVE)) buf << "(unaggressive)";	875	if (op->flag [FLAG_UNAGGRESSIVE]) buf << "(unaggressive)";
822	if (QUERY_FLAG (op, FLAG_HITBACK)) buf << "(hitback)";	876	if (op->flag [FLAG_HITBACK]) buf << "(hitback)";
823	if (QUERY_FLAG (op, FLAG_STEALTH)) buf << "(stealthy)";	877	if (op->flag [FLAG_STEALTH]) buf << "(stealthy)";
824		878
825	if (op->randomitems)	879	if (op->randomitems)
826	{	880	{
827	bool first = 1;	881	bool first = 1;
828		882
…		…
910	* item (eg, debug dump or the like)	964	* item (eg, debug dump or the like)
911	*/	965	*/
912	const char *	966	const char *
913	describe_item (const object op, object owner)	967	describe_item (const object op, object owner)
914	{	968	{
915	if (QUERY_FLAG (op, FLAG_MONSTER) \|\| op->type == PLAYER)	969	if (op->flag [FLAG_MONSTER] \|\| op->type == PLAYER)
916	return describe_monster (op);	970	return describe_monster (op);
917		971
918	static dynbuf_text buf; buf.clear ();	972	static dynbuf_text buf; buf.clear ();
919	int identified, i;	973	int identified, i;
920		974
921	/* figure this out once, instead of making multiple calls to need_identify.	975	/* figure this out once, instead of making multiple calls to need_identify.
922	* also makes the code easier to read.	976	* also makes the code easier to read.
923	*/	977	*/
924	identified = !need_identify (op) \|\| QUERY_FLAG (op, FLAG_IDENTIFIED);	978	identified = !op->need_identify () \|\| op->flag [FLAG_IDENTIFIED];
925	if (!identified)	979	if (!identified)
926	buf << "(unidentified)";	980	buf << "(unidentified)";
927		981
928	switch (op->type)	982	switch (op->type)
929	{	983	{
…		…
948	if (op->stats.maxsp > 1000)	1002	if (op->stats.maxsp > 1000)
949	{ /higher capacity crystals /	1003	{ /higher capacity crystals /
950	i = (op->stats.maxsp % 1000) / 100;	1004	i = (op->stats.maxsp % 1000) / 100;
951		1005
952	if (i)	1006	if (i)
953	buf.printf ("(capacity %d.%dk). It is ", op->stats.maxsp / 1000, i);	1007	buf.printf ("(capacity %d.%dk; it is ", op->stats.maxsp / 1000, i);
954	else	1008	else
955	buf.printf ("(capacity %dk). It is ", op->stats.maxsp / 1000);	1009	buf.printf ("(capacity %dk; it is ", op->stats.maxsp / 1000);
956	}	1010	}
957	else	1011	else
958	buf.printf ("(capacity %d). It is ", op->stats.maxsp);	1012	buf.printf ("(capacity %d; it is ", op->stats.maxsp);
959		1013
960	i = (op->stats.sp * 10) / op->stats.maxsp;	1014	i = (op->stats.sp * 10) / op->stats.maxsp;
961	if (op->stats.sp == 0)	1015	if (op->stats.sp == 0)
962	buf << "empty.";	1016	buf << "empty";
963	else if (i == 0)	1017	else if (i == 0)
964	buf << "almost empty.";	1018	buf << "almost empty";
965	else if (i < 3)	1019	else if (i < 3)
966	buf << "partially filled.";	1020	buf << "partially filled";
967	else if (i < 6)	1021	else if (i < 6)
968	buf << "half full.";	1022	buf << "half full";
969	else if (i < 9)	1023	else if (i < 9)
970	buf << "well charged.";	1024	buf << "well charged";
971	else if (op->stats.sp == op->stats.maxsp)	1025	else if (op->stats.sp == op->stats.maxsp)
972	buf << "fully charged.";	1026	buf << "fully charged";
973	else	1027	else
974	buf << "almost full.";	1028	buf << "almost full";
		1029
		1030	buf << ')';
975	break;	1031	break;
976		1032
977	case LAMP:	1033	case LAMP:
978	{	1034	{
979	int percent = ((double) 100 / op->arch->stats.food) * op->stats.food;	1035	int percent = ((double) 100 / op->arch->stats.food) * op->stats.food;
…		…
997	break;	1053	break;
998		1054
999	case FOOD:	1055	case FOOD:
1000	case FLESH:	1056	case FLESH:
1001	case DRINK:	1057	case DRINK:
1002	if (identified \|\| QUERY_FLAG (op, FLAG_BEEN_APPLIED))	1058	if (identified \|\| op->flag [FLAG_BEEN_APPLIED])
1003	{	1059	{
1004	buf.printf ("(food+%d)", op->stats.food);	1060	buf.printf ("(food+%d)", op->stats.food);
1005		1061
1006	if (op->type == FLESH && op->last_eat > 0 && atnr_is_dragon_enabled (op->last_eat))	1062	if (op->type == FLESH && op->last_eat > 0 && atnr_is_dragon_enabled (op->last_eat))
1007	buf.printf ("(%s metabolism)", change_resist_msg[op->last_eat]);	1063	buf.printf ("(%s metabolism)", change_resist_msg[op->last_eat]);
1008		1064
1009	if (!QUERY_FLAG (op, FLAG_CURSED))	1065	if (!op->flag [FLAG_CURSED])
1010	{	1066	{
1011	if (op->stats.hp) buf << "(heals)";	1067	if (op->stats.hp) buf << "(heals)";
1012	if (op->stats.sp) buf << "(spellpoint regen)";	1068	if (op->stats.sp) buf << "(spellpoint regen)";
1013	}	1069	}
1014	else	1070	else
…		…
1035	}	1091	}
1036		1092
1037	/* Down here, we more further describe equipment type items.	1093	/* Down here, we more further describe equipment type items.
1038	* only describe them if they have been identified or the like.	1094	* only describe them if they have been identified or the like.
1039	*/	1095	*/
1040	if (identified \|\| QUERY_FLAG (op, FLAG_BEEN_APPLIED))	1096	if (identified \|\| op->flag [FLAG_BEEN_APPLIED])
1041	{	1097	{
1042	int attr, val;	1098	int attr, val;
1043		1099
1044	for (attr = 0; attr < NUM_STATS; attr++)	1100	for (attr = 0; attr < NUM_STATS; attr++)
1045	if ((val = op->stats.stat (attr)))	1101	if ((val = op->stats.stat (attr)))
…		…
1076		1132
1077	default:	1133	default:
1078	break;	1134	break;
1079	}	1135	}
1080		1136
1081	if (QUERY_FLAG (op, FLAG_XRAYS)) buf << "(xray-vision)";	1137	if (op->flag [FLAG_XRAYS]) buf << "(xray-vision)";
1082	if (QUERY_FLAG (op, FLAG_SEE_IN_DARK)) buf << "(infravision)";	1138	if (op->flag [FLAG_SEE_IN_DARK]) buf << "(infravision)";
1083		1139
1084	/* levitate was what is was before, so we'll keep it */	1140	/* levitate was what is was before, so we'll keep it */
1085	if (op->move_type & MOVE_FLY_LOW) buf << "(levitate)";	1141	if (op->move_type & MOVE_FLY_LOW) buf << "(levitate)";
1086	if (op->move_type & MOVE_FLY_HIGH) buf << "(fly)";	1142	if (op->move_type & MOVE_FLY_HIGH) buf << "(fly)";
1087	if (op->move_type & MOVE_SWIM) buf << "(swim)";	1143	if (op->move_type & MOVE_SWIM) buf << "(swim)";
…		…
1149	}	1205	}
1150		1206
1151	if (op->stats.luck)	1207	if (op->stats.luck)
1152	buf.printf ("(luck%+d)", op->stats.luck);	1208	buf.printf ("(luck%+d)", op->stats.luck);
1153		1209
1154	if (QUERY_FLAG (op, FLAG_LIFESAVE)) buf << "(lifesaving)";	1210	if (op->flag [FLAG_LIFESAVE]) buf << "(lifesaving)";
1155	if (QUERY_FLAG (op, FLAG_REFL_SPELL)) buf << "(reflect spells)";	1211	if (op->flag [FLAG_REFL_SPELL]) buf << "(reflect spells)";
1156	if (QUERY_FLAG (op, FLAG_REFL_MISSILE)) buf << "(reflect missiles)";	1212	if (op->flag [FLAG_REFL_MISSILE]) buf << "(reflect missiles)";
1157	if (QUERY_FLAG (op, FLAG_STEALTH)) buf << "(stealth)";	1213	if (op->flag [FLAG_STEALTH]) buf << "(stealth)";
1158		1214
1159	if (op->slaying && op->type != FOOD)	1215	if (op->slaying && op->type != FOOD)
1160	buf.printf ("(slay %s)", &op->slaying);	1216	buf.printf ("(slay %s)", &op->slaying);
1161		1217
1162	if (op->type == SKILL_TOOL && op->skill)	1218	if (op->type == SKILL_TOOL && op->skill)
…		…
1181	object::describe_item (object *who)	1237	object::describe_item (object *who)
1182	{	1238	{
1183	return std::string (::describe_item (this, who));	1239	return std::string (::describe_item (this, who));
1184	}	1240	}
1185		1241
		1242	static void
		1243	describe_dump_object (dynbuf &buf, object *ob)
		1244	{
		1245	char *txt = dump_object (ob);
		1246	for (char p = txt; p; ++p) if (p == '\n') p = '\r';
		1247	buf << "\n" << txt << "\n";
		1248
		1249	if (!ob->is_arch ())
		1250	describe_dump_object (buf, ob->arch);
		1251	}
		1252
		1253	std::string
		1254	object::describe (object *who)
		1255	{
		1256	dynbuf_text buf (1024, 1024);
		1257
		1258	buf.printf ("That is: %s.\r", long_desc (who).c_str ());
		1259
		1260	if (custom_name)
		1261	buf.printf ("You call it %s.\r", &custom_name);
		1262
		1263	switch (type)
		1264	{
		1265	case SPELLBOOK:
		1266	if (flag [FLAG_IDENTIFIED] && inv)
		1267	buf.printf ("%s is a %s level %s spell.\r", &inv->name, ordinal (inv->level), &inv->skill);
		1268	break;
		1269
		1270	case BOOK:
		1271	if (msg)
		1272	buf << "Something is written in it.\r";
		1273	break;
		1274
		1275	case CONTAINER:
		1276	if (race)
		1277	{
		1278	if (weight_limit && stats.Str < 100)
		1279	buf.printf ("It can hold only %s and its weight limit is %.1f kg.\r",
		1280	&race, weight_limit / (10.0 * (100 - stats.Str)));
		1281	else
		1282	buf.printf ("It can hold only %s.\r", &race);
		1283	}
		1284	else if (weight_limit && stats.Str < 100)
		1285	buf.printf ("Its weight limit is %.1f kg.\r", weight_limit / (10.0 * (100 - stats.Str)));
		1286	break;
		1287
		1288	case WAND:
		1289	if (flag [FLAG_IDENTIFIED])
		1290	buf.printf ("It has %d %s left.\r", stats.food, stats.food == 1 ? "charge" : "charges");
		1291	break;
		1292	}
		1293
		1294	if (material != MATERIAL_NULL && !msg)
		1295	buf << (nrof > 1 ? "They are made of " : "It is made of ")
		1296	<< material->description
		1297	<< ".\r";
		1298
		1299	if (who)
		1300	/* Where to wear this item */
		1301	for (int i = 0; i < NUM_BODY_LOCATIONS; i++)
		1302	if (slot[i].info)
		1303	{
		1304	buf << (who->slot[i].info ? body_locations[i].use_name : body_locations[i].nonuse_name);
		1305
		1306	if (slot[i].info < -1 && who->slot[i].info)
		1307	buf.printf ("(%d)", -slot[i].info);
		1308
		1309	buf << ".\r";
		1310	}
		1311
		1312	if (weight)
		1313	buf.printf ("%s %3.3f kg.\r", nrof > 1 ? "They weigh" : "It weighs", weight * (nrof ? nrof : 1) / 1000.0);
		1314
		1315	if (flag [FLAG_STARTEQUIP])
		1316	buf << (nrof > 1 ? "They were" : "It was")
		1317	<< " given by a god and will vanish when dropped.\r";
		1318
		1319	if (value && !flag [FLAG_STARTEQUIP] && !flag [FLAG_NO_PICK] && who)
		1320	{
		1321	buf.printf ("You reckon %s worth %s.\r", nrof > 1 ? "they are" : "it is", query_cost_string (this, who, F_TRUE \| F_APPROX));
		1322
		1323	if (who->is_in_shop ())
		1324	{
		1325	if (flag [FLAG_UNPAID])
		1326	buf.printf ("%s would cost you %s.\r", nrof > 1 ? "They" : "It", query_cost_string (this, who, F_BUY \| F_SHOP));
		1327	else
		1328	buf.printf ("You are offered %s for %s.\r", query_cost_string (this, who, F_SELL + F_SHOP), nrof > 1 ? "them" : "it");
		1329	}
		1330	}
		1331
		1332	if (flag [FLAG_MONSTER])
		1333	buf << describe_monster (who);
		1334
		1335	/* Is this item buildable? */
		1336	if (flag [FLAG_IS_BUILDABLE])
		1337	buf << "This is a buildable item.\r";
		1338
		1339	/* Does the object have a message? Don't show message for all object
		1340	* types - especially if the first entry is a match
		1341	*/
		1342	if (msg)
		1343	{
		1344	if (type != EXIT && type != BOOK && type != CORPSE && !move_on && !has_dialogue ())
		1345	{
		1346	if (!need_identify ())
		1347	buf << '\r' << msg << '\n';
		1348	else if (flag [FLAG_IDENTIFIED])
		1349	buf << '\r' << "The object has a story:\r" << msg;
		1350	}
		1351	}
		1352	else if (inv
		1353	&& inv->msg
		1354	&& inv->type == SPELL
		1355	&& flag [FLAG_IDENTIFIED]
		1356	&& (type == SPELLBOOK \|\| type == ROD \|\| type == WAND
		1357	\|\| type == ROD \|\| type == POTION \|\| type == SCROLL))
		1358	// for spellbooks and other stuff that contains spells, print the spell message,
		1359	// unless the object has a custom message handled above.
		1360	buf << '\r' << inv->msg << '\n';
		1361
		1362	// try to display the duration for some potions and scrolls
		1363	// this includes change ability potions and group spells,
		1364	// but does not handle protection potions
		1365	if (inv && inv->type == SPELL && flag [FLAG_IDENTIFIED]
		1366	&& (type == POTION \|\| type == SCROLL))
		1367	{
		1368	object *spell = inv;
		1369
		1370	if (spell->subtype == SP_PARTY_SPELL)
		1371	spell = spell->other_arch;
		1372
		1373	if (spell->subtype == SP_CHANGE_ABILITY)
		1374	buf.printf ("\nH<The effect will last about %.10g seconds.>",
		1375	TICK2TIME (change_ability_duration (spell, this)));
		1376	}
		1377
		1378	// some help text for skill tools
		1379	if (type == SKILL_TOOL)
		1380	buf << "\nH<This item is a skill tool: as long as you have this item applied "
		1381	"you can use the " << &skill << " skill as if you had learned it.>";
		1382
		1383	// Display a hint about inscribable items [empty books]
		1384	// This includes the amount of text they can hold.
		1385	if (type == INSCRIBABLE)
		1386	{
		1387	if (other_arch && other_arch->type == SCROLL)
		1388	buf.printf ("\nH<You can use the inscription skill to inscribe a spell into it.>");
		1389	else
		1390	buf.printf ("\nH<You can use the inscription skill to inscribe text into it. It has room for up to %d characters.>",
		1391	weight_limit);
		1392	}
		1393
		1394	buf << '\n';
		1395
		1396	// the dungeon master additionally gets a complete dump
		1397	if (who && who->flag [FLAG_WIZLOOK])
		1398	{
		1399	buf << "\nT<Object>\n";
		1400	describe_dump_object (buf, this);
		1401
		1402	if (inv)
		1403	{
		1404	buf << "\nT<Top Inventory>\n";
		1405	describe_dump_object (buf, inv);
		1406	}
		1407	}
		1408
		1409	return std::string (buf.linearise (), buf.size ());
		1410	}
		1411
1186	void	1412	void
1187	examine (object op, object tmp)	1413	examine (object op, object tmp)
1188	{	1414	{
1189	std::string info = tmp->describe (op);	1415	std::string info = tmp->describe (op);
1190		1416
…		…
1200	object::query_inventory (object who, const char indent)	1426	object::query_inventory (object who, const char indent)
1201	{	1427	{
1202	static dynbuf_text buf; buf.clear ();	1428	static dynbuf_text buf; buf.clear ();
1203		1429
1204	for (object *tmp = inv; tmp; tmp = tmp->below)	1430	for (object *tmp = inv; tmp; tmp = tmp->below)
1205	if (who && QUERY_FLAG (who, FLAG_WIZ))	1431	if (who && who->flag [FLAG_WIZ])
1206	buf.printf ("%s- %-28.28s %-8s (%9d) %s\n", indent, tmp->query_name (), tmp->query_weight (), tmp->count, tmp->uuid.c_str ());	1432	buf.printf ("%s- %-28.28s %-8s (%9d) %s\n", indent, tmp->query_name (), tmp->query_weight (), tmp->count, tmp->uuid.c_str ());
1207	else if (!tmp->invisible && (type == CONTAINER \|\| QUERY_FLAG (tmp, FLAG_APPLIED)))	1433	else if (!tmp->invisible && (type == CONTAINER \|\| tmp->flag [FLAG_APPLIED]))
1208	buf.printf ("%s- %-36.36s %-8s\n", indent, tmp->query_name (), tmp->query_weight ());	1434	buf.printf ("%s- %-36.36s %-8s\n", indent, tmp->query_name (), tmp->query_weight ());
1209		1435
1210	if (buf.size ())	1436	if (buf.size ())
1211	buf.printf ("%s(total weight: %s)\n", indent, query_weight ());	1437	buf.printf ("%s(total weight: %s)\n", indent, query_weight ());
1212	else	1438	else
…		…
1225	is_magical (const object *op)	1451	is_magical (const object *op)
1226	{	1452	{
1227	int i;	1453	int i;
1228		1454
1229	/* living creatures are considered non magical */	1455	/* living creatures are considered non magical */
1230	if (QUERY_FLAG (op, FLAG_ALIVE))	1456	if (op->flag [FLAG_ALIVE])
1231	return 0;	1457	return 0;
1232		1458
1233	/* This is a test for it being an artifact, as artifacts have titles */	1459	/* This is a test for it being an artifact, as artifacts have titles */
1234	if (op->title != NULL)	1460	if (op->title != NULL)
1235	return 1;	1461	return 1;
…		…
1241	(op->stats.ac \|\| op->stats.food \|\| op->stats.exp \|\| op->stats.dam \|\| op->stats.wc \|\| op->stats.sp \|\| op->stats.hp \|\| op->stats.luck))	1467	(op->stats.ac \|\| op->stats.food \|\| op->stats.exp \|\| op->stats.dam \|\| op->stats.wc \|\| op->stats.sp \|\| op->stats.hp \|\| op->stats.luck))
1242	return 1;	1468	return 1;
1243		1469
1244	/* Check for stealty, speed, flying, or just plain magic in the boots */	1470	/* Check for stealty, speed, flying, or just plain magic in the boots */
1245	/* Presume any boots that hvae a move_type are special. */	1471	/* Presume any boots that hvae a move_type are special. */
1246	if (op->type == BOOTS && ((QUERY_FLAG (op, FLAG_STEALTH) \|\| op->move_type \|\| op->stats.exp)))	1472	if (op->type == BOOTS && ((op->flag [FLAG_STEALTH] \|\| op->move_type \|\| op->stats.exp)))
1247	return 1;	1473	return 1;
1248		1474
1249	/* Take care of amulet/shield that reflects spells/missiles */	1475	/* Take care of amulet/shield that reflects spells/missiles */
1250	if ((op->type == AMULET \|\| op->type == SHIELD) && (QUERY_FLAG (op, FLAG_REFL_SPELL) \|\| QUERY_FLAG (op, FLAG_REFL_MISSILE)))	1476	if ((op->type == AMULET \|\| op->type == SHIELD) && (op->flag [FLAG_REFL_SPELL] \|\| op->flag [FLAG_REFL_MISSILE]))
1251	return 1;	1477	return 1;
1252		1478
1253	/* Take care of helmet of xrays */	1479	/* Take care of helmet of xrays */
1254	if (op->type == HELMET && QUERY_FLAG (op, FLAG_XRAYS))	1480	if (op->type == HELMET && op->flag [FLAG_XRAYS])
1255	return 1;	1481	return 1;
1256		1482
1257	/* Potions & rods are always magical. Wands/staves are also magical,	1483	/* Potions & rods are always magical. Wands/staves are also magical,
1258	* assuming they still have any charges left.	1484	* assuming they still have any charges left.
1259	*/	1485	*/
…		…
1288	* be non magical.	1514	* be non magical.
1289	*/	1515	*/
1290	return 0;	1516	return 0;
1291	}	1517	}
1292		1518
1293	/* need_identify returns true if the item should be identified. This
1294	* function really should not exist - by default, any item not identified
1295	* should need it.
1296	*/
1297
1298	int
1299	need_identify (const object *op)
1300	{
1301	switch (op->type)
1302	{
1303	case RING:
1304	case WAND:
1305	case ROD:
1306	case HORN:
1307	case SCROLL:
1308	case SKILL:
1309	case SKILLSCROLL:
1310	case SPELLBOOK:
1311	case FOOD:
1312	case POTION:
1313	case BOW:
1314	case ARROW:
1315	case WEAPON:
1316	case ARMOUR:
1317	case SHIELD:
1318	case HELMET:
1319	case AMULET:
1320	case BOOTS:
1321	case GLOVES:
1322	case BRACERS:
1323	case GIRDLE:
1324	case CONTAINER:
1325	case DRINK:
1326	case FLESH:
1327	case INORGANIC:
1328	case CLOSE_CON:
1329	case CLOAK:
1330	case GEM:
1331	case POWER_CRYSTAL:
1332	case POISON:
1333	case BOOK:
1334	case SKILL_TOOL:
1335	return 1;
1336	}
1337
1338	/* Try to track down some stuff that may show up here. Thus, the
1339	* archetype file can be updated, and this function removed.
1340	*/
1341	#if 0
1342	LOG (llevDebug, "need_identify: %s does not need to be id'd\n", op->name);
1343	#endif
1344	return 0;
1345	}
1346
1347	/*	1519	/*
1348	* Supposed to fix face-values as well here, but later.	1520	* Supposed to fix face-values as well here, but later.
1349	*/	1521	*/
1350	void	1522	void
1351	identify (object *op)	1523	identify (object *op)
1352	{	1524	{
1353	SET_FLAG (op, FLAG_IDENTIFIED);	1525	op->set_flag (FLAG_IDENTIFIED);
1354	CLEAR_FLAG (op, FLAG_KNOWN_MAGICAL);	1526	op->clr_flag (FLAG_KNOWN_MAGICAL);
1355	CLEAR_FLAG (op, FLAG_NO_SKILL_IDENT);	1527	op->clr_flag (FLAG_NO_SKILL_IDENT);
1356		1528
1357	/*	1529	/*
1358	* We want autojoining of equal objects:	1530	* We want autojoining of equal objects:
1359	*/	1531	*/
1360	if (QUERY_FLAG (op, FLAG_CURSED) \|\| QUERY_FLAG (op, FLAG_DAMNED))	1532	if (op->flag [FLAG_CURSED] \|\| op->flag [FLAG_DAMNED])
1361	SET_FLAG (op, FLAG_KNOWN_CURSED);	1533	op->set_flag (FLAG_KNOWN_CURSED);
1362		1534
1363	if (op->type == POTION)	1535	if (op->type == POTION)
1364	{	1536	{
1365	if (op->inv && op->randomitems)	1537	if (op->inv && op->randomitems)
1366	op->title = op->inv->name;	1538	op->title = op->inv->name;

Diff Legend

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines

Comparing deliantra/server/common/item.C (file contents): Revision 1.77 by root, Sat Apr 3 02:27:24 2010 UTC vs. Revision 1.86 by root, Fri Apr 30 20:43:17 2010 UTC

Diff Legend

Comparing deliantra/server/common/item.C (file contents):
Revision 1.77 by root, Sat Apr 3 02:27:24 2010 UTC vs.
Revision 1.86 by root, Fri Apr 30 20:43:17 2010 UTC