equal
deleted
inserted
replaced
284 1: SelectTemplate:= SmallTemplates[getrandom(Succ(High(SmallTemplates)))]; |
284 1: SelectTemplate:= SmallTemplates[getrandom(Succ(High(SmallTemplates)))]; |
285 2: SelectTemplate:= MediumTemplates[getrandom(Succ(High(MediumTemplates)))]; |
285 2: SelectTemplate:= MediumTemplates[getrandom(Succ(High(MediumTemplates)))]; |
286 3: SelectTemplate:= LargeTemplates[getrandom(Succ(High(LargeTemplates)))]; |
286 3: SelectTemplate:= LargeTemplates[getrandom(Succ(High(LargeTemplates)))]; |
287 4: SelectTemplate:= CavernTemplates[getrandom(Succ(High(CavernTemplates)))]; |
287 4: SelectTemplate:= CavernTemplates[getrandom(Succ(High(CavernTemplates)))]; |
288 5: SelectTemplate:= WackyTemplates[getrandom(Succ(High(WackyTemplates)))]; |
288 5: SelectTemplate:= WackyTemplates[getrandom(Succ(High(WackyTemplates)))]; |
|
289 // For lua only! |
|
290 6: begin |
|
291 SelectTemplate:= min(LuaTemplateNumber,High(EdgeTemplates)); |
|
292 GetRandom(2) // burn 1 |
|
293 end; |
289 end; |
294 end; |
290 |
295 |
291 WriteLnToConsole('Selected template #'+inttostr(SelectTemplate)+' using filter #'+inttostr(cTemplateFilter)); |
296 WriteLnToConsole('Selected template #'+inttostr(SelectTemplate)+' using filter #'+inttostr(cTemplateFilter)); |
292 end; |
297 end; |
293 |
298 |
608 for y:= topY to topY + 5 do |
613 for y:= topY to topY + 5 do |
609 for x:= leftX to rightX do |
614 for x:= leftX to rightX do |
610 if Land[y, x] <> 0 then |
615 if Land[y, x] <> 0 then |
611 begin |
616 begin |
612 inc(c); |
617 inc(c); |
613 if c > 200 then // avoid accidental triggering |
618 if c > 1000 then // avoid accidental triggering |
614 begin |
619 begin |
615 hasBorder:= true; |
620 hasBorder:= true; |
616 break; |
621 break; |
617 end; |
622 end; |
618 end; |
623 end; |