equal
deleted
inserted
replaced
1541 inc(Count) |
1541 inc(Count) |
1542 end; |
1542 end; |
1543 end; |
1543 end; |
1544 // unC0Rr, while it is true user can watch value on map screen, IMO this (and check above) should be enforced in UI |
1544 // unC0Rr, while it is true user can watch value on map screen, IMO this (and check above) should be enforced in UI |
1545 // - is there a good place to put values for the different widgets to check? Right now they are kind of disconnected. |
1545 // - is there a good place to put values for the different widgets to check? Right now they are kind of disconnected. |
1546 //it'd be nice if divide teams, forts mode and hh per map could all be checked by the team widget, or maybe disable start button |
1546 //it would be nice if divide teams, forts mode and hh per map could all be checked by the team widget, or maybe disable start button |
1547 TryDo(Count <= MaxHedgehogs, 'Too many hedgehogs for this map! (max # is ' + inttostr(MaxHedgehogs) + ')', true); |
1547 TryDo(Count <= MaxHedgehogs, 'Too many hedgehogs for this map! (max # is ' + inttostr(MaxHedgehogs) + ')', true); |
1548 while (Count > 0) do |
1548 while (Count > 0) do |
1549 begin |
1549 begin |
1550 i:= GetRandom(Count); |
1550 i:= GetRandom(Count); |
1551 FindPlace(ar[i]^.Gear, false, 0, LAND_WIDTH); |
1551 FindPlace(ar[i]^.Gear, false, 0, LAND_WIDTH); |