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

Limit the number of times Cloud->Place retries. 

Initialization did not terminate in planet/System.ocg/Template.ocg/DefaultWorld.ocs/.
install-platforms
Julius Michaelis 2018-01-08 23:12:49 +01:00
parent 6e52963828
commit 2931886438
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
planet/Objects.ocd/Environment.ocd/Cloud.ocd/Script.c
View File

@ -99,20 +99,22 @@ protected func Destruction()
/*-- Definition call interface --*/
// Id call: Creates the indicated number of clouds.
// May fail and will indicate the number of placed clouds.
public func Place(int count)
{
if (this != Cloud)
return;
while (count > 0)
var max_tries = count * 500;
for (var i = 0; i < count && max_tries > 0; max_tries--)
{
var pos;
if ((pos = FindPosInMat("Sky", 0, 0, LandscapeWidth(), LandscapeHeight())) && MaterialDepthCheck(pos[0], pos[1], "Sky", 200))
{
CreateObjectAbove(Cloud, pos[0], pos[1], NO_OWNER);
count--;
i++;
}
}
return;
return i;
}
// Changes the precipitation type of this cloud.