1
0
mirror of https://github.com/ComfyFactory/ComfyFactorio.git synced 2025-01-04 00:15:45 +02:00
ComfyFactorio/maps/quarters.lua
MewMew d56f14ee03 terrain update
3 more levels
2019-10-30 20:00:32 +01:00

252 lines
8.2 KiB
Lua

require "modules.mineable_wreckage_yields_scrap"
require "modules.wave_defense.main"
local Map = require "modules.map_info"
local WD = require "modules.wave_defense.table"
local simplex_noise = require 'utils.simplex_noise'.d2
local spawn_size = 96
local wall_thickness = 3
local function clone_chunk(event, source_surface_name)
local source_surface = game.surfaces[source_surface_name]
source_surface.request_to_generate_chunks(event.area.left_top, 1)
source_surface.force_generate_chunk_requests()
source_surface.clone_area({
source_area=event.area,
destination_area=event.area,
destination_surface=game.surfaces[1],
--destination_force="neutral",
clone_tiles=true,
clone_entities=true,
clone_decoratives=true,
clear_destination=true,
expand_map=false
})
end
local function is_spawn_wall(p)
--if p.y < -32 and p.x < -32 then return false end
--if p.y > 32 and p.x > 32 then return false end
if p.x >= spawn_size - wall_thickness then return true end
if p.x < spawn_size * -1 + wall_thickness then return true end
if p.y >= spawn_size - wall_thickness then return true end
if p.y < spawn_size * -1 + wall_thickness then return true end
return false
end
local function spawn_area(event)
local left_top = event.area.left_top
for _, entity in pairs(event.surface.find_entities_filtered({area = event.area, force = "neutral"})) do
entity.destroy()
end
local ore = false
if left_top.x == -64 and left_top.y == -64 then ore = "coal" end
if left_top.x == 32 and left_top.y == 32 then ore = "stone" end
if left_top.x == 32 and left_top.y == -64 then ore = "iron-ore" end
if left_top.x == -64 and left_top.y == 32 then ore = "copper-ore" end
for x = 0, 31, 1 do
for y = 0, 31, 1 do
local p = {x = left_top.x + x, y = left_top.y + y}
event.surface.set_tiles({{name = "stone-path", position = p}})
if is_spawn_wall(p) then
event.surface.create_entity({name = "stone-wall", position = p, force = "player"})
else
if not ore then
if math.sqrt(p.x ^ 2 + p.y ^ 2) > 4 then
if math.random(1, 3) ~= 1 then
local noise = simplex_noise(p.x * 0.015, p.y * 0.015, game.surfaces[1].map_gen_settings.seed) + simplex_noise(p.x * 0.055, p.y * 0.055, game.surfaces[1].map_gen_settings.seed) * 0.5
if noise > 0.6 then
event.surface.create_entity({name = "mineable-wreckage", position = p, force = "neutral"})
end
if noise < -0.75 then
if math.random(1, 16) == 1 then
event.surface.create_entity({name = "rock-big", position = p, force = "neutral"})
end
end
end
end
end
end
end
end
if left_top.x == -64 and left_top.y == -64 then
local wreck = event.surface.create_entity({name = "big-ship-wreck-1", position = {0, -4}, force = "player"})
wreck.insert({name = "submachine-gun", count = 3})
wreck.insert({name = "firearm-magazine", count = 32})
wreck.insert({name = "grenade", count = 8})
end
if not ore then return end
for x = 0, 31, 1 do
for y = 0, 31, 1 do
local p = {x = left_top.x + x, y = left_top.y + y}
event.surface.create_entity({name = ore, position = p, amount = 1000})
end
end
end
local function get_quarter_name(position)
if position.x < 0 then
if position.y < 0 then
return "NW"
else
return "SW"
end
else
if position.y < 0 then
return "NE"
else
return "SE"
end
end
end
local function draw_borders(surface, left_top, area)
if left_top.x == 0 or left_top.x == -32 then
for x = 0, 31, 1 do
for y = 0, 31, 1 do
local p = {left_top.x + x, left_top.y + y}
surface.set_tiles({{name = "deepwater", position = p}})
end
end
surface.destroy_decoratives({area = area})
end
if left_top.y == 0 or left_top.y == -32 then
for x = 0, 31, 1 do
for y = 0, 31, 1 do
local p = {left_top.x + x, left_top.y + y}
surface.set_tiles({{name = "deepwater", position = p}})
end
end
surface.destroy_decoratives({area = area})
end
end
local function on_chunk_generated(event)
if event.surface.index ~= 1 then return end
local surface = event.surface
local left_top = event.area.left_top
if left_top.x < spawn_size and left_top.y < spawn_size and left_top.x >= spawn_size * -1 and left_top.y >= spawn_size * -1 then
spawn_area(event)
return
end
if left_top.x < 0 then
if left_top.y < 0 then
clone_chunk(event, "coal")
else
clone_chunk(event, "copper-ore")
end
else
if left_top.y < 0 then
clone_chunk(event, "iron-ore")
else
clone_chunk(event, "stone")
end
end
draw_borders(surface, left_top, event.area)
if left_top.x > 512 then return end
if left_top.x < -512 then return end
if left_top.y > 512 then return end
if left_top.y < -512 then return end
game.forces.player.chart(surface, {{left_top.x, left_top.y},{left_top.x + 31, left_top.y + 31}})
end
local function set_difficulty()
local wave_defense_table = WD.get_table()
wave_defense_table.threat_gain_multiplier = 2 + #game.connected_players * 0.1
--20 Players for fastest wave_interval
wave_defense_table.wave_interval = 3600 - #game.connected_players * 90
if wave_defense_table.wave_interval < 1800 then wave_defense_table.wave_interval = 1800 end
end
local function on_player_joined_game(event)
set_difficulty()
end
local function on_player_left_game(event)
set_difficulty()
end
local function on_init()
local T = Map.Pop_info()
T.main_caption = "4 Quarters"
T.sub_caption = "coal ++ iron ++ copper ++ stone"
T.text = table.concat({
"Green energy ore may be found in the stone area.\n",
"Oil may be found in the coal area.\n",
"\n",
"Hold the door as long as possible.\n",
"Don't let them in!\n",
})
T.main_caption_color = {r = 0, g = 120, b = 0}
T.sub_caption_color = {r = 255, g = 0, b = 255}
for i, quarter in pairs({"coal", "iron-ore", "stone", "copper-ore"}) do
local map_gen_settings = {}
map_gen_settings.seed = math.random(1, 999999999)
map_gen_settings.water = math.random(25, 50) * 0.01
map_gen_settings.starting_area = 1.5
map_gen_settings.terrain_segmentation = math.random(25, 50) * 0.1
map_gen_settings.cliff_settings = {cliff_elevation_interval = 0, cliff_elevation_0 = 0}
map_gen_settings.autoplace_controls = {
["coal"] = {frequency = 0, size = 0.5, richness = 0.5},
["stone"] = {frequency = 0, size = 0.5, richness = 0.5},
["copper-ore"] = {frequency = 0, size = 0.5, richness = 0.5},
["iron-ore"] = {frequency = 0, size = 0.5, richness = 0.5},
["uranium-ore"] = {frequency = 0, size = 1, richness = 1},
["crude-oil"] = {frequency = 0, size = 1, richness = 1},
["trees"] = {frequency = math.random(10, 50) * 0.1, size = math.random(5, 15) * 0.1, richness = math.random(1, 10) * 0.1},
["enemy-base"] = {frequency = 2, size = 2, richness = 1}
}
map_gen_settings.autoplace_controls[quarter].frequency = 16
if quarter == "coal" then
map_gen_settings.autoplace_controls["crude-oil"].frequency = 8
end
if quarter == "stone" then
map_gen_settings.autoplace_controls["uranium-ore"].frequency = 8
end
game.create_surface(quarter, map_gen_settings)
end
--[[
game.map_settings.enemy_expansion.enabled = true
game.map_settings.enemy_expansion.settler_group_min_size = 8
game.map_settings.enemy_expansion.settler_group_max_size = 16
game.map_settings.enemy_expansion.min_expansion_cooldown = 2700
game.map_settings.enemy_expansion.max_expansion_cooldown = 2700
game.map_settings.pollution.enabled = true
game.map_settings.enemy_evolution.enabled = true
local modifier_factor = 2
--default game setting values
global.enemy_evolution_destroy_factor = game.map_settings.enemy_evolution.destroy_factor * modifier_factor
global.enemy_evolution_time_factor = game.map_settings.enemy_evolution.time_factor * modifier_factor
global.enemy_evolution_pollution_factor = game.map_settings.enemy_evolution.pollution_factor * modifier_factor
]]
end
local event = require 'utils.event'
--event.on_nth_tick(60, tick)
event.on_init(on_init)
event.add(defines.events.on_chunk_generated, on_chunk_generated)
--event.add(defines.events.on_entity_died, on_entity_died)
--event.add(defines.events.on_research_finished, on_research_finished)
event.add(defines.events.on_player_joined_game, on_player_joined_game)
event.add(defines.events.on_player_left_game, on_player_left_game)
--require "modules.difficulty_vote"