public func Activate(oCaller, oClonk)
{
if(!oClonk) oClonk = oCaller;
// Effekt prüfen
var iChkEff;
if (iChkEff = CheckEffect("ExtinguishPSpell", oExtiObj, 180)) return(iChkEff!=-1 && RemoveObject());
// Lavafässer zu Granit werden lassen
var obj;
if (obj = FindContents(LBRL, oClonk))
if (!CheckEffect("ExtinguishPSpell", obj, 180))
{
var mat = "Granite";
// Granit nicht geladen -> Stein casten
if (!MaterialLoaded(Material(mat))) mat = "Rock";
// Stein nicht geladen -> Kohle casten
if (!MaterialLoaded(Material(mat))) mat = "Coal";
// Material schleudern
var amount = Min(400, obj->GetAmount()*3);
CastPXS(mat, amount, 40, AbsX(GetX(oClonk)), AbsY(GetY(oClonk)));
// Objekt entfernen
RemoveObject(obj);
}
// Nächstes brennendes Objekt finden
var oExtiObj, iExtiCount;
// Den Clonk selbst?
if(OnFire(oClonk))
iExtiCount += DoExtinguish(oClonk, oCaller);
// Nächstliegende Objekte
SetPosition(GetX(oCaller), GetY(oCaller));
// Suchradius ist abhängig von Höhe des Aufrufenden - ein Zauberturm hat einen größeren Radius
var iSearchRadius = GetObjHeight(oCaller) * 3;
while(oExtiObj = FindObject(0, 0, 0, -1, -1, 0, 0, 0, 0, oExtiObj))
if(ObjectDistance(oCaller, oExtiObj) > iSearchRadius)
break;
else if(OnFire(oExtiObj))
iExtiCount += DoExtinguish(oExtiObj, oCaller);
else if (oExtiObj->~MagicExtinguish(oCaller))
iExtiCount += DoExtinguish(oExtiObj, oCaller);
// Irgendwas gelöscht?
if (!iExtiCount) return(0, Message("$NoExtinguish$", oClonk), RemoveObject());
// Einmaliger Effekt pro Zauber
Sound("Splash1");
return(true);
}
protected func Hit () {
CastPXS("Blood", 5, 100);
CreateObject(_KS1);
RemoveObject();
}
protected func Hit()
{
CastPXS("Granite", 150, 30);
RemoveObject();
return(1);
}
protected func Hit()
{
CastPXS("Rock",100,30);
RemoveObject();
return(1);
}
private func Melt() {
DoCon(-2);
CastPXS("Water",8,0);
}
func Hit() {
CastPXS("Ashes",100,20);
RemoveObject();
}
protected func Hit()
{
CastPXS("Earth", 200, 20);
RemoveObject();
return(1);
}
