r0.921

1 files changed, 38 insertions, 0 deletions

diff --git a/TemplePushing.c4s/System.c4g/Icestrike.c b/TemplePushing.c4s/System.c4g/Icestrike.c
new file mode 100644
index 0000000..ccff6a9
--- /dev/null
+++ b/TemplePushing.c4s/System.c4g/Icestrike.c
@@ -0,0 +1,38 @@
+/*-- Icestrike --*/
+
+#strict 2
+
+#appendto MICS
+
+func Activate(pCaller, pRealcaller)
+{
+	var pClonk;
+	if(pRealcaller) pClonk=pRealcaller;
+	else pClonk=pCaller;
+
+	// Effekt prüfen
+	var iResult;
+	if (iResult = CheckEffect("IcestrikeNSpell", 0, 125)) return(iResult!=-1 && RemoveObject());
+
+	// Zauber
+	Sound("Magic*");
+	var iX, iY;
+	iX=AbsX(GetX(pCaller)-25+50*GetDir(pCaller));
+	iY=AbsY(GetY(pCaller));
+	pBall=CreateObject(ICEB, AbsX(GetX(pCaller)-25+50*GetDir(pCaller)), AbsY(GetY(pCaller)), GetOwner(pCaller));
+	pBall->SetCaster(pCaller);
+
+	// Zielen wenn möglich
+	if (pClonk->~DoSpellAim(this(), pCaller)) return(1);
+	return(1);
+}
+
+// Aktivierung nach Zielen (iAngle: -90=links; 0=oben; +90=rechts)
+public func ActivateAngle(object pCaller, int iAngle)
+{
+	// Eisball freigeben (wenn noch existent)
+	if (pBall) pBall->SetAngle(iAngle);
+	
+	// Objekt löschen
+	return(RemoveObject());
+}
\ No newline at end of file