Files
Anphillia_PRC8/_module/nss/hc_act_skinning.nss
Jaysyn904 28cdb617b3 Initial commit
Adding all of the current content for Anphillia Unlimited.
2024-01-04 07:49:38 -05:00

33 lines
1.1 KiB
Plaintext

#include "hc_text_activate"
void main()
{
object oUser=OBJECT_SELF;
object oOther=GetLocalObject(oUser,"OTHER");
object oItem=GetLocalObject(oUser,"ITEM");
DeleteLocalObject(oUser,"ITEM");
DeleteLocalObject(oUser,"OTHER");
if(oOther==OBJECT_INVALID) return;
if(GetRacialType(oOther) != RACIAL_TYPE_ANIMAL)
{
SendMessageToPC(oUser,ANIMALONLY);
return;
}
if(GetCurrentHitPoints(oOther) > 0)
{
SendMessageToPC(oUser,NOTDEAD);
return;
}
if(GetDistanceBetween(oUser, oOther) > 3.0)
{
SendMessageToPC(oUser,MOVECLOSER);
return;
}
AssignCommand(oUser,ActionMoveToLocation(GetLocation(oOther)));
DelayCommand(1.0,AssignCommand(oUser,ActionPlayAnimation(
ANIMATION_LOOPING_GET_LOW)));
DelayCommand(1.3,AssignCommand(oOther,SetIsDestroyable(TRUE)));
CreateObject(OBJECT_TYPE_ITEM,"it_mmidmisc006",GetLocation(oOther),TRUE);
CreateObject(OBJECT_TYPE_ITEM,"AnimalHide",GetLocation(oOther),TRUE);
}