marko10_000
/
openclonk
forked from Mirrors/openclonk
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

make flames consume oil when burning

qteditor
Maikel de Vries 2016-06-03 22:05:53 +02:00
parent 91e2c137d9
commit 548215d448
2 changed files with 11 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
planet/Objects.ocd/Effects.ocd/Flame.ocd/DefCore.txt
View File

@ -10,4 +10,5 @@ VertexX=0,5,-5
VertexY=10,8,8
VertexFriction=60,60,60
NoGet=1
Float=1
StretchGrowth=1

14
planet/Objects.ocd/Effects.ocd/Flame.ocd/Script.c
View File

@ -9,15 +9,21 @@
protected func Initialize()
{
Incinerate(100, GetController());
AddTimer("Burning");
AddTimer("Burning", RandomX(24, 26));
return;
}
public func Burning()
{
// TODO: Consume inflammable material
// Split the flame if it is large enough.
if (GetCon() > 50 && !Random(3))
// Consume inflammable material and make the flame a little bigger.
if (FlameConsumeMaterial() && GetCon() <= 80)
{
DoCon(6);
SetXDir(RandomX(-8, 8));
}
// Split the flame if it is large enough and not too many flames are nearby.
var amount = ObjectCount(Find_ID(GetID()), Find_Distance(10));
if (amount < 5 && GetCon() > 50 && !Random(4))
{
var x = Random(15);
var new_flame = CreateObjectAbove(GetID());