Initial commit

Adding all of the current content for Anphillia Unlimited.
This commit is contained in:
Jaysyn904
2024-01-04 07:49:38 -05:00
parent df18cd54c8
commit 28cdb617b3
12943 changed files with 9727121 additions and 0 deletions

View File

@@ -0,0 +1,32 @@
#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);
}