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
|
/*-- Prevent Curse Scrolls from vanishing --*/
#strict 2
#appendto CAHE
local pCasterClonk;
public func Activate(pCaster,pRealcaster)
{
var pClonk;
if(pRealcaster) pClonk=pRealcaster;
else pClonk=pCaster;
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)) 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
var iResult;
if (iResult = CheckEffect("*Curse*", 0, 125)) return(iResult!=-1 && RemoveObject());
return(0);
}
|
