openclonk/planet/Arena.ocf/ThunderousSkies.ocs/Scrolls.ocd/FireballScroll.ocd/Script.c

90 lines
2.2 KiB
C

/*--
Scroll: Fireball
Author: Mimmo
Hurl a fiery ball into your enemies.
--*/
public func ControlUse(object pClonk, num ix, num iy)
{
AddEffect("Fireball", nil, 100, 1, nil, GetID(), pClonk->GetOwner(), Angle(0,0,ix,iy),pClonk->GetX(), pClonk->GetY());
Sound("Fireball");
Sound("Fireball");
RemoveObject();
return 1;
}
public func FxFireballStart(pTarget, effect, iTemp, owner, angle, x, y)
{
if(iTemp) return;
x+=Sin(angle, 10)+RandomX(-1, 1);
y+=-Cos(angle, 10)+RandomX(-1, 1);
effect.owner=owner;
effect.angle=angle;
effect.x=x;
effect.y=y;
}
public func FxFireballTimer(pTarget, effect, iEffectTime)
{
var angle=effect.angle;
var x=effect.x;
var y=effect.y;
if ( iEffectTime>67 ||
GBackSolid(x,y) ||
FindObject(
Find_Distance(16,x,y),
Find_ID(TargetBalloon)) ||
FindObject(
Find_Hostile(effect.owner),
Find_OCF(OCF_Alive),
Find_NoContainer(),
Find_Distance(16,x,y)
)
)
{
CreateObject(Dynamite,x,y,effect.owner)->Explode(14);
for(var i=0; i<=3;i++) CreateObject(Dynamite,x+Sin(i*120 +x,13),y-Cos(i*120 +x,13),effect.owner)->Explode(6+Random(4));
var obj=FindObject(Find_Distance(22,x,y),Find_ID(TargetBalloon));
if(obj)
{
var arw=CreateObject(Arrow,0,0,effect.owner);
obj->OnProjectileHit(arw);
arw->RemoveObject();
}
return -1;
}
else if(iEffectTime < 70)
{
CreateParticle("FireballSmoke",x,y,Sin(Random(360),2),Cos(Random(360),2),RandomX(120,180),RGBa(100,100,100,70));
CreateParticle("MagicSpark",x,y,Sin(Random(360),RandomX(5,13)),Cos(Random(360),RandomX(5,13)),RandomX(30,70),RGB(255,255,255));
//if(!Random(10)) if(Random(2))angle++; else angle--;
angle+=Sin(iEffectTime*30,18);
x+=Sin(angle, 6);
y+=-Cos(angle, 6);
effect.x=x;
effect.y=y;
for(var i=0;i<6;++i)
{
var c=HSL(Random(50), 200+Random(25), Random(100));
var rx=RandomX(-2, 2);
var ry=RandomX(-2, 2);
CreateParticle("MagicFire", x+rx, y+ry, Sin(angle+180,6)+ry, -Cos(angle+180,6)+rx, 80+Random(20), c);
CreateParticle("MagicFire", x+rx, y+ry, Sin(angle+180,6)+ry, -Cos(angle+180,6)+rx, 20+Random(10), RGB(255,255,0));
}
}
return 1;
}
local Name = "$Name$";
local Description = "$Description$";
local Collectible = 1;