HoS_PRC8/_mod/_module/nss/uc_c_findres.nss
Jaysyn904 04165202c0 Initial upload
Initial upload
2024-11-25 19:36:07 -05:00

31 lines
690 B
Plaintext

// uc_c_findres - Check for specified resource in range
int StartingConditional()
{
object oMe=OBJECT_SELF;
int nParm=GetLocalInt(GetPCSpeaker(),"nParm");
object oOb;
string sTag="";
if (nParm==1)
{ // gold
sTag="RESGOLD";
} // gold
else if (nParm==2)
{ // iron
sTag="RESIRON";
} // iron
else if (nParm==3)
{ // mithral
sTag="RESMITH";
} // mithral
else if (nParm==4)
{ // adamantine
sTag="RESADM";
} // adamantine
if (GetStringLength(sTag)>1)
{ // tag issued
oOb=GetNearestObjectByTag(sTag,oMe);
if (oOb!=OBJECT_INVALID&&GetDistanceBetween(oMe,oOb)<8.0) return FALSE;
} // tag issued
return TRUE;
}