1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
/*-- Prevent curse scrolls from vanishing --*/
#strict 2
#appendto CAHE
public func Activate(pCaster,pRealcaster)
{
var pClonk=pRealcaster;
if(!pClonk) pClonk=pCaster;
if (!pClonk) return(1);
pCasterClonk = pClonk; // Caster speichern, damit es sich unter keinen Umständen selber wählen kann
// Auswählen wenn möglich
if (pClonk->~DoSpellSelect(this(), 300, pCaster)) return(1);
var pTarget;
// Clonk kann nicht auswählen: nächsten Gegner verfluchen
while(pTarget=FindObject(0,-300,-300,150,150,OCF_CrewMember,0,0,NoContainer(),pTarget))
if(SelectorTarget(pTarget))
return(ActivateTarget(pTarget));
// ansonsten geht nich
RemoveObject();
return(0);
}
public func ActivateTarget(object pCaller, object pTarget)
{
if (!pTarget)
{
if (pCaller) pCaller->OnSelectorAbort();
return RemoveObject();
}
return _inherited(pCaller, pTarget);
}
|
