hedgewars/uLand.pas
changeset 7575 f415b3e0f3b9
parent 7571 22a7bfa3e6bb
child 7591 d9ff60e0a390
equal deleted inserted replaced
7573:364cd923db43 7575:f415b3e0f3b9
   283         2: SelectTemplate:= MediumTemplates[getrandom(Succ(High(MediumTemplates)))];
   283         2: SelectTemplate:= MediumTemplates[getrandom(Succ(High(MediumTemplates)))];
   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: SelectTemplate:= min(max(LuaTemplateNumber,0),High(EdgeTemplates));
   288         6: begin
       
   289            SelectTemplate:= min(max(LuaTemplateNumber,0),High(EdgeTemplates));
       
   290            GetRandom(2) // burn 1
       
   291            end;
   289     end;
   292     end;
   290 
   293 
   291     WriteLnToConsole('Selected template #'+inttostr(SelectTemplate)+' using filter #'+inttostr(cTemplateFilter));
   294     WriteLnToConsole('Selected template #'+inttostr(SelectTemplate)+' using filter #'+inttostr(cTemplateFilter));
   292 end;
   295 end;
   293 
   296