Script Hilfe beim HST KI

/*-- AI --*/

#strict 2

#include AHST
 
/* Initialisierung */

protected func Initialize()
{
//Grafik wächseln zum HST
SetGraphics(0, this(), AHST);
//Effect machen
AddEffect("AI",this(),1,1,this());
//Waffe machen | Ist Richtig
CreateObject(ALW1,0,0,GetOwner());
//Das rest dem HST überlassen
return _inherited();
}

/*          Effekte       */

protected func FxAITimer(object pObj, int iEffect)
{
pObj->Ai();
return true;
}

/* Calls */

func Ai()
{
//Feind?
var Feind;
if(Feind=FindFeind()) AI_Shoot(Feind);
}

func FindFeind()
{
var Objects;
if( Objects=FindObjects(Find_OCF(OCF_CrewMember),Find_Distance(100) ) );
for(var pObj in Objects)
{
//Weg frei?
if(!PathFree(GetX(),GetY(),GetX(pObj),GetY(pObj))) continue;
//Richtige Masse?
var A=Angle(GetX(),GetY(),GetX(pObj),GetY(pObj));
if(!A<300||!A>90) continue;
//Lebt er überhaupt?
if(!GetAlive(pObj)) continue;
//k dann haben wirs
return pObj;
}
return false;
}

func AI_Shoot(object pObj)
{
var Dir;
//Richtung machen
var A=Angle(GetX(),GetY(),GetX(pObj),GetY(pObj));
if(!A<300) Dir=0;
else Dir=1;
SetDir(Dir);
//Feuern| Is richtig
ControlThrow();
return true;
}


/* Itemlimit */
public func MaxContentsCount() { return(1); }