equal
deleted
inserted
replaced
742 for x:= 0 to LAND_WIDTH - 1 do |
742 for x:= 0 to LAND_WIDTH - 1 do |
743 if (y < topY) or (x < leftX) or (x > rightX) then |
743 if (y < topY) or (x < leftX) or (x > rightX) then |
744 Land[y, x]:= COLOR_INDESTRUCTIBLE; |
744 Land[y, x]:= COLOR_INDESTRUCTIBLE; |
745 // experiment hardcoding cave |
745 // experiment hardcoding cave |
746 // also try basing cave dimensions on map/template dimensions, if they exist |
746 // also try basing cave dimensions on map/template dimensions, if they exist |
747 for w:= 0 to 5 do // width of 3 allowed worms to be knocked through with grenade |
747 for w:= 0 to 5 do // width of 3 allowed hogs to be knocked through with grenade |
748 begin |
748 begin |
749 for y:= topY to LAND_HEIGHT - 1 do |
749 for y:= topY to LAND_HEIGHT - 1 do |
750 begin |
750 begin |
751 Land[y, leftX + w]:= COLOR_INDESTRUCTIBLE; |
751 Land[y, leftX + w]:= COLOR_INDESTRUCTIBLE; |
752 Land[y, rightX - w]:= COLOR_INDESTRUCTIBLE; |
752 Land[y, rightX - w]:= COLOR_INDESTRUCTIBLE; |