hedgewars/uLand.pas
changeset 7594 5f03595335e6
parent 7591 d9ff60e0a390
child 7613 ce6ead3327b2
child 7640 e9e6b4d740f6
equal deleted inserted replaced
7593:b966e2d833f2 7594:5f03595335e6
   284         3: SelectTemplate:= LargeTemplates[getrandom(Succ(High(LargeTemplates)))];
   284         3: SelectTemplate:= LargeTemplates[getrandom(Succ(High(LargeTemplates)))];
   285         4: SelectTemplate:= CavernTemplates[getrandom(Succ(High(CavernTemplates)))];
   285         4: SelectTemplate:= CavernTemplates[getrandom(Succ(High(CavernTemplates)))];
   286         5: SelectTemplate:= WackyTemplates[getrandom(Succ(High(WackyTemplates)))];
   286         5: SelectTemplate:= WackyTemplates[getrandom(Succ(High(WackyTemplates)))];
   287 // For lua only!
   287 // For lua only!
   288         6: begin
   288         6: begin
   289            SelectTemplate:= min(max(LuaTemplateNumber,0),High(EdgeTemplates));
   289            SelectTemplate:= min(LuaTemplateNumber,High(EdgeTemplates));
   290            GetRandom(2) // burn 1
   290            GetRandom(2) // burn 1
   291            end;
   291            end;
   292     end;
   292     end;
   293 
   293 
   294     WriteLnToConsole('Selected template #'+inttostr(SelectTemplate)+' using filter #'+inttostr(cTemplateFilter));
   294     WriteLnToConsole('Selected template #'+inttostr(SelectTemplate)+' using filter #'+inttostr(cTemplateFilter));