7b9e44ebbb
Initial upload. PRC8 has been added. Module compiles, PRC's default AI & treasure scripts have been integrated. Started work on top hak for SLA / Ability / Scripting modifications.
16 lines
426 B
Plaintext
16 lines
426 B
Plaintext
void main()
|
|
{
|
|
int nNth=1;
|
|
|
|
while(GetNearestObject(OBJECT_TYPE_CREATURE, OBJECT_SELF, nNth)!=OBJECT_INVALID)
|
|
{
|
|
if(GetIsPC(GetNearestObject(OBJECT_TYPE_CREATURE, OBJECT_SELF, nNth))!=TRUE)
|
|
{
|
|
int nGold = GetGold(GetNearestObject(OBJECT_TYPE_CREATURE, OBJECT_SELF, nNth));
|
|
TakeGoldFromCreature(nGold, GetNearestObject(OBJECT_TYPE_CREATURE, OBJECT_SELF, nNth), TRUE);
|
|
}
|
|
nNth++;
|
|
}
|
|
|
|
}
|