diff -r 0eb97cf4c78e -r 6d61b44a5652 hedgewars/uLandGenTemplateBased.pas --- a/hedgewars/uLandGenTemplateBased.pas Fri Nov 14 17:00:47 2014 +0300 +++ b/hedgewars/uLandGenTemplateBased.pas Sat Nov 15 01:30:40 2014 +0300 @@ -262,6 +262,8 @@ // don't move new point for more than length of initial segment // adjust/parametrize for more flat surfaces (try values 3/4, 1/2 of dab, or even 1/4) d:= dab; + //d:= dab * (1 + abs(cFeatureSize - 8)) div 6; + //d:= dab * (14 + cFeatureSize) div 20; if distL > d then distL:= d; if distR > d then distR:= d; @@ -342,7 +344,7 @@ for x:= 0 to LAND_WIDTH - 1 do Land[y, x]:= lfBasic; - minDistance:= max(cFeatureSize*5,12); + minDistance:= sqr(cFeatureSize) div 8 + 10; MaxHedgehogs:= Template.MaxHedgehogs; hasGirders:= Template.hasGirders; playHeight:= Template.TemplateHeight;