26 lines
644 B
Plaintext
26 lines
644 B
Plaintext
#include "nw_i0_plot"
|
|
|
|
void main()
|
|
{
|
|
object oPC = GetPCSpeaker();
|
|
object oItem = GetFirstItemInInventory(oPC);
|
|
while (oItem != OBJECT_INVALID)
|
|
{
|
|
if(!GetIdentified(oItem))
|
|
{
|
|
if (GetGold(oPC) >= 100)
|
|
{
|
|
SetIdentified(oItem,TRUE);
|
|
TakeGold(100, oPC, TRUE);
|
|
SendMessageToPC(oPC, GetName(OBJECT_SELF) + " " + GetStringByStrRef(75930) + " " + GetName(oItem));
|
|
}
|
|
else
|
|
{
|
|
SendMessageToPC(oPC, "You do not have enough gold to identify items.");
|
|
return;
|
|
}
|
|
}
|
|
oItem = GetNextItemInInventory(oPC);
|
|
}
|
|
}
|