mirror of
https://github.com/ComfyFactory/ComfyFactorio.git
synced 2025-01-06 00:23:49 +02:00
505 lines
22 KiB
Lua
505 lines
22 KiB
Lua
-- forest maze from mewmew
|
|
|
|
require "modules.satellite_score"
|
|
require "modules.biter_pets"
|
|
require "modules.no_deconstruction_of_neutral_entities"
|
|
require "modules.spawners_contain_biters"
|
|
|
|
local event = require 'utils.event'
|
|
local map_functions = require "tools.map_functions"
|
|
local simplex_noise = require 'utils.simplex_noise'.d2
|
|
local math_random = math.random
|
|
|
|
local labyrinth_cell_size = 16 --valid values are 2, 4, 8, 16, 32
|
|
local lake_noise_value = -0.55
|
|
|
|
local modifiers = {
|
|
{x = 0, y = -1},{x = -1, y = 0},{x = 1, y = 0},{x = 0, y = 1}
|
|
}
|
|
|
|
local modifiers_diagonal = {
|
|
{diagonal = {x = -1, y = 1}, connection_1 = {x = -1, y = 0}, connection_2 = {x = 0, y = 1}},
|
|
{diagonal = {x = 1, y = -1}, connection_1 = {x = 1, y = 0}, connection_2 = {x = 0, y = -1}},
|
|
{diagonal = {x = 1, y = 1}, connection_1 = {x = 1, y = 0}, connection_2 = {x = 0, y = 1}},
|
|
{diagonal = {x = -1, y = -1}, connection_1 = {x = -1, y = 0}, connection_2 = {x = 0, y = -1}}
|
|
}
|
|
|
|
local rock_raffle = {"sand-rock-big","sand-rock-big","rock-big","rock-big","rock-big","rock-big","rock-big","rock-big","rock-huge"}
|
|
|
|
local function shuffle(tbl)
|
|
local size = #tbl
|
|
for i = size, 1, -1 do
|
|
local rand = math_random(size)
|
|
tbl[i], tbl[rand] = tbl[rand], tbl[i]
|
|
end
|
|
return tbl
|
|
end
|
|
|
|
local wrecks = {"big-ship-wreck-1", "big-ship-wreck-2", "big-ship-wreck-3"}
|
|
local function create_shipwreck(surface, position)
|
|
local raffle = {}
|
|
local loot = {
|
|
{{name = "iron-gear-wheel", count = math_random(80,100)}, weight = 3, evolution_min = 0.0, evolution_max = 0.3},
|
|
{{name = "copper-cable", count = math_random(100,200)}, weight = 3, evolution_min = 0.0, evolution_max = 0.3},
|
|
{{name = "engine-unit", count = math_random(16,32)}, weight = 2, evolution_min = 0.1, evolution_max = 0.5},
|
|
{{name = "electric-engine-unit", count = math_random(16,32)}, weight = 2, evolution_min = 0.4, evolution_max = 0.8},
|
|
{{name = "battery", count = math_random(40,80)}, weight = 2, evolution_min = 0.3, evolution_max = 0.8},
|
|
{{name = "advanced-circuit", count = math_random(40,80)}, weight = 3, evolution_min = 0.4, evolution_max = 1},
|
|
{{name = "electronic-circuit", count = math_random(100,200)}, weight = 3, evolution_min = 0.0, evolution_max = 0.4},
|
|
{{name = "processing-unit", count = math_random(30,60)}, weight = 3, evolution_min = 0.7, evolution_max = 1},
|
|
{{name = "explosives", count = math_random(25,50)}, weight = 1, evolution_min = 0.2, evolution_max = 0.6},
|
|
{{name = "lubricant-barrel", count = math_random(4,10)}, weight = 1, evolution_min = 0.3, evolution_max = 0.5},
|
|
{{name = "rocket-fuel", count = math_random(4,10)}, weight = 2, evolution_min = 0.3, evolution_max = 0.7},
|
|
{{name = "steel-plate", count = math_random(50,100)}, weight = 2, evolution_min = 0.1, evolution_max = 0.3},
|
|
{{name = "nuclear-fuel", count = 1}, weight = 2, evolution_min = 0.7, evolution_max = 1},
|
|
{{name = "burner-inserter", count = math_random(4,8)}, weight = 3, evolution_min = 0.0, evolution_max = 0.1},
|
|
{{name = "inserter", count = math_random(4,8)}, weight = 3, evolution_min = 0.0, evolution_max = 0.4},
|
|
{{name = "long-handed-inserter", count = math_random(4,8)}, weight = 3, evolution_min = 0.0, evolution_max = 0.4},
|
|
{{name = "fast-inserter", count = math_random(4,8)}, weight = 3, evolution_min = 0.1, evolution_max = 1},
|
|
{{name = "filter-inserter", count = math_random(4,8)}, weight = 1, evolution_min = 0.2, evolution_max = 1},
|
|
{{name = "stack-filter-inserter", count = math_random(2,4)}, weight = 1, evolution_min = 0.4, evolution_max = 1},
|
|
{{name = "stack-inserter", count = math_random(2,4)}, weight = 3, evolution_min = 0.3, evolution_max = 1},
|
|
{{name = "small-electric-pole", count = math_random(8,16)}, weight = 3, evolution_min = 0.0, evolution_max = 0.3},
|
|
{{name = "medium-electric-pole", count = math_random(4,8)}, weight = 3, evolution_min = 0.2, evolution_max = 1},
|
|
{{name = "wooden-chest", count = math_random(16,24)}, weight = 3, evolution_min = 0.0, evolution_max = 0.2},
|
|
{{name = "iron-chest", count = math_random(4,8)}, weight = 3, evolution_min = 0.1, evolution_max = 0.4},
|
|
{{name = "steel-chest", count = math_random(4,8)}, weight = 3, evolution_min = 0.3, evolution_max = 1},
|
|
{{name = "small-lamp", count = math_random(8,16)}, weight = 3, evolution_min = 0.1, evolution_max = 0.3},
|
|
{{name = "rail", count = math_random(50,75)}, weight = 3, evolution_min = 0.1, evolution_max = 0.6},
|
|
{{name = "assembling-machine-1", count = math_random(1,2)}, weight = 3, evolution_min = 0.0, evolution_max = 0.3},
|
|
{{name = "assembling-machine-2", count = math_random(1,2)}, weight = 3, evolution_min = 0.2, evolution_max = 0.8},
|
|
{{name = "offshore-pump", count = 1}, weight = 2, evolution_min = 0.0, evolution_max = 0.1},
|
|
{{name = "heat-pipe", count = math_random(8,12)}, weight = 2, evolution_min = 0.5, evolution_max = 1},
|
|
{{name = "arithmetic-combinator", count = math_random(8,16)}, weight = 1, evolution_min = 0.1, evolution_max = 1},
|
|
{{name = "constant-combinator", count = math_random(8,16)}, weight = 1, evolution_min = 0.1, evolution_max = 1},
|
|
{{name = "decider-combinator", count = math_random(8,16)}, weight = 1, evolution_min = 0.1, evolution_max = 1},
|
|
{{name = "power-switch", count = math_random(2,4)}, weight = 1, evolution_min = 0.1, evolution_max = 1},
|
|
{{name = "programmable-speaker", count = math_random(2,4)}, weight = 1, evolution_min = 0.1, evolution_max = 1},
|
|
{{name = "green-wire", count = math_random(50,100)}, weight = 1, evolution_min = 0.1, evolution_max = 1},
|
|
{{name = "red-wire", count = math_random(50,100)}, weight = 1, evolution_min = 0.1, evolution_max = 1},
|
|
{{name = "burner-mining-drill", count = math_random(2,4)}, weight = 3, evolution_min = 0.0, evolution_max = 0.2},
|
|
{{name = "electric-mining-drill", count = math_random(2,4)}, weight = 3, evolution_min = 0.2, evolution_max = 0.6},
|
|
{{name = "express-transport-belt", count = math_random(25,75)}, weight = 3, evolution_min = 0.5, evolution_max = 1},
|
|
{{name = "express-underground-belt", count = math_random(4,8)}, weight = 3, evolution_min = 0.5, evolution_max = 1},
|
|
{{name = "express-splitter", count = math_random(2,4)}, weight = 3, evolution_min = 0.5, evolution_max = 1},
|
|
{{name = "fast-transport-belt", count = math_random(25,75)}, weight = 3, evolution_min = 0.2, evolution_max = 0.7},
|
|
{{name = "fast-underground-belt", count = math_random(4,8)}, weight = 3, evolution_min = 0.2, evolution_max = 0.7},
|
|
{{name = "fast-splitter", count = math_random(2,4)}, weight = 3, evolution_min = 0.2, evolution_max = 0.3},
|
|
{{name = "transport-belt", count = math_random(25,75)}, weight = 3, evolution_min = 0, evolution_max = 0.3},
|
|
{{name = "underground-belt", count = math_random(4,8)}, weight = 3, evolution_min = 0, evolution_max = 0.3},
|
|
{{name = "splitter", count = math_random(2,4)}, weight = 3, evolution_min = 0, evolution_max = 0.3},
|
|
{{name = "pipe", count = math_random(40,50)}, weight = 3, evolution_min = 0.0, evolution_max = 0.3},
|
|
{{name = "pipe-to-ground", count = math_random(8,16)}, weight = 1, evolution_min = 0.2, evolution_max = 0.5},
|
|
{{name = "pump", count = math_random(1,4)}, weight = 1, evolution_min = 0.3, evolution_max = 0.8},
|
|
{{name = "rail-signal", count = math_random(8,16)}, weight = 2, evolution_min = 0.2, evolution_max = 0.8},
|
|
{{name = "rail-chain-signal", count = math_random(8,16)}, weight = 2, evolution_min = 0.2, evolution_max = 0.8},
|
|
{{name = "stone-wall", count = math_random(25,75)}, weight = 1, evolution_min = 0.1, evolution_max = 0.5},
|
|
{{name = "gate", count = math_random(4,8)}, weight = 1, evolution_min = 0.1, evolution_max = 0.5},
|
|
{{name = "train-stop", count = math_random(1,2)}, weight = 1, evolution_min = 0.2, evolution_max = 0.7},
|
|
{{name = "express-loader", count = math_random(1,2)}, weight = 1, evolution_min = 0.5, evolution_max = 1},
|
|
{{name = "fast-loader", count = math_random(1,2)}, weight = 1, evolution_min = 0.2, evolution_max = 0.7},
|
|
{{name = "loader", count = math_random(1,2)}, weight = 1, evolution_min = 0.0, evolution_max = 0.5}
|
|
}
|
|
|
|
local distance_to_center = math.sqrt(position.x^2 + position.y^2)
|
|
if distance_to_center < 1 then
|
|
distance_to_center = 0.1
|
|
else
|
|
distance_to_center = distance_to_center / 4000
|
|
end
|
|
if distance_to_center > 1 then distance_to_center = 1 end
|
|
|
|
for _, t in pairs (loot) do
|
|
for x = 1, t.weight, 1 do
|
|
if t.evolution_min <= distance_to_center and t.evolution_max >= distance_to_center then
|
|
table.insert(raffle, t[1])
|
|
end
|
|
end
|
|
end
|
|
local e = surface.create_entity{name = wrecks[math_random(1,#wrecks)], position = position, force = "player"}
|
|
for x = 1, math_random(2,3), 1 do
|
|
local loot = raffle[math_random(1,#raffle)]
|
|
e.insert(loot)
|
|
end
|
|
end
|
|
|
|
local function get_noise(name, pos)
|
|
local seed = game.surfaces[1].map_gen_settings.seed
|
|
local noise_seed_add = 25000
|
|
seed = seed + noise_seed_add
|
|
if name == 1 then
|
|
local noise = {}
|
|
noise[1] = simplex_noise(pos.x * 0.002, pos.y * 0.002, seed)
|
|
local noise = noise[1]
|
|
return noise
|
|
end
|
|
end
|
|
|
|
local function set_cell_tiles(surface, cell_left_top, tile_name)
|
|
for x = 0.5, labyrinth_cell_size, 1 do
|
|
for y = 0.5, labyrinth_cell_size, 1 do
|
|
local pos = {x = cell_left_top.x + x, y = cell_left_top.y + y}
|
|
surface.set_tiles({{name = tile_name, position = pos}}, true)
|
|
end
|
|
end
|
|
end
|
|
|
|
local function labyrinth_wall(surface, cell_left_top)
|
|
local noise = get_noise(1, cell_left_top)
|
|
if noise < lake_noise_value then return end
|
|
local tile_name = "grass-2"
|
|
if noise > 0.6 then
|
|
tile_name = "dirt-6"
|
|
set_cell_tiles(surface, cell_left_top, tile_name)
|
|
for x = 0.5, labyrinth_cell_size, 1 do
|
|
for y = 0.5, labyrinth_cell_size, 1 do
|
|
local pos = {x = cell_left_top.x + x, y = cell_left_top.y + y}
|
|
if math_random(1,3) ~= 1 then
|
|
surface.create_entity({name = "dead-tree-desert", position = pos})
|
|
else
|
|
surface.create_entity({name = rock_raffle[math_random(1, #rock_raffle)], position = pos})
|
|
end
|
|
end
|
|
end
|
|
return
|
|
end
|
|
|
|
set_cell_tiles(surface, cell_left_top, tile_name)
|
|
for x = 0.5, labyrinth_cell_size, 1 do
|
|
for y = 0.5, labyrinth_cell_size, 1 do
|
|
local pos = {x = cell_left_top.x + x, y = cell_left_top.y + y}
|
|
if math_random(1,3) ~= 1 then
|
|
surface.create_entity({name = "tree-04", position = pos})
|
|
else
|
|
if math_random(1,3) == 1 then surface.create_entity({name = rock_raffle[math_random(1, #rock_raffle)], position = pos}) end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
local function labyrinth_path(surface, cell_left_top)
|
|
local noise = get_noise(1, cell_left_top)
|
|
if noise < lake_noise_value then return end
|
|
local tile_name = "grass-1"
|
|
if noise > 0.6 then tile_name = "dirt-7" end
|
|
set_cell_tiles(surface, cell_left_top, tile_name)
|
|
end
|
|
|
|
local function draw_oceans(surface, cell_left_top)
|
|
if get_noise(1, cell_left_top) >= lake_noise_value then return end
|
|
set_cell_tiles(surface, cell_left_top, "deepwater")
|
|
for x = 0.5, labyrinth_cell_size, 1 do
|
|
for y = 0.5, labyrinth_cell_size, 1 do
|
|
local pos = {x = cell_left_top.x + x, y = cell_left_top.y + y}
|
|
if math_random(1, 256) == 1 then surface.create_entity({name = "fish", position = pos}) end
|
|
end
|
|
end
|
|
end
|
|
|
|
local function get_path_connections_count(cell_pos)
|
|
local connections = 0
|
|
for _, m in pairs(modifiers) do
|
|
if global.labyrinth_cells[tostring(cell_pos.x + m.x) .. "_" .. tostring(cell_pos.y + m.y)] then
|
|
connections = connections + 1
|
|
end
|
|
end
|
|
return connections
|
|
end
|
|
|
|
local function process_labyrinth_cell(pos)
|
|
local cell_position = {x = pos.x / labyrinth_cell_size, y = pos.y / labyrinth_cell_size}
|
|
|
|
global.labyrinth_cells[tostring(cell_position.x) .. "_" .. tostring(cell_position.y)] = false
|
|
|
|
for _, modifier in pairs(modifiers_diagonal) do
|
|
if global.labyrinth_cells[tostring(cell_position.x + modifier.diagonal.x) .. "_" .. tostring(cell_position.y + modifier.diagonal.y)] then
|
|
local connection_1 = global.labyrinth_cells[tostring(cell_position.x + modifier.connection_1.x) .. "_" .. tostring(cell_position.y + modifier.connection_1.y)]
|
|
local connection_2 = global.labyrinth_cells[tostring(cell_position.x + modifier.connection_2.x) .. "_" .. tostring(cell_position.y + modifier.connection_2.y)]
|
|
if not connection_1 and not connection_2 then
|
|
return false
|
|
end
|
|
end
|
|
end
|
|
|
|
for _, m in pairs(modifiers) do
|
|
if get_path_connections_count({x = cell_position.x + m.x, y = cell_position.y + m.y}) >= math_random(2, 3) then return false end
|
|
end
|
|
|
|
if get_path_connections_count(cell_position) >= math_random(2, 3) then return false end
|
|
|
|
global.labyrinth_cells[tostring(cell_position.x) .. "_" .. tostring(cell_position.y)] = true
|
|
return true
|
|
end
|
|
|
|
local function labyrinth(event)
|
|
local positions = {}
|
|
for x = 0, 32 - labyrinth_cell_size, labyrinth_cell_size do
|
|
for y = 0, 32 - labyrinth_cell_size, labyrinth_cell_size do
|
|
positions[#positions + 1] = {x = event.area.left_top.x + x, y = event.area.left_top.y + y}
|
|
end
|
|
end
|
|
positions = shuffle(positions)
|
|
|
|
for _, pos in pairs(positions) do
|
|
draw_oceans(event.surface, pos)
|
|
if process_labyrinth_cell(pos) then
|
|
labyrinth_path(event.surface, pos)
|
|
else
|
|
labyrinth_wall(event.surface, pos)
|
|
end
|
|
end
|
|
end
|
|
|
|
local function on_chunk_generated(event)
|
|
local surface = game.surfaces["forest_maze"]
|
|
if event.surface.name ~= surface.name then return end
|
|
local left_top = event.area.left_top
|
|
local area = {
|
|
left_top = {x = left_top.x, y = left_top.y},
|
|
right_bottom = {x = left_top.x + 31, y = left_top.y + 31}
|
|
}
|
|
surface.destroy_decoratives({area = area})
|
|
|
|
local entities = surface.find_entities(area)
|
|
for _, e in pairs(entities) do
|
|
if e.valid then
|
|
if e.name ~= "character" then
|
|
e.destroy()
|
|
end
|
|
end
|
|
end
|
|
|
|
labyrinth(event)
|
|
|
|
local decorative_names = {}
|
|
for k,v in pairs(game.decorative_prototypes) do
|
|
if v.autoplace_specification then
|
|
decorative_names[#decorative_names+1] = k
|
|
end
|
|
end
|
|
surface.regenerate_decorative(decorative_names, {{x = left_top.x / 32, y = left_top.y / 32}})
|
|
end
|
|
|
|
local function draw_secret_area(surface, position)
|
|
local positions = {}
|
|
for x = 0, labyrinth_cell_size - 1, 1 do
|
|
for y = 0, labyrinth_cell_size - 1, 1 do
|
|
positions[#positions + 1] = {x = position.x + x, y = position.y + y}
|
|
end
|
|
end
|
|
positions = shuffle(positions)
|
|
|
|
local wrecks_to_place = math_random(1, math.ceil(labyrinth_cell_size * 0.33))
|
|
for i = 1, #positions, 1 do
|
|
if surface.can_place_entity({name = "big-ship-wreck-1", position = positions[i]}) then
|
|
create_shipwreck(surface, positions[i])
|
|
wrecks_to_place = wrecks_to_place - 1
|
|
if wrecks_to_place <= 0 then break end
|
|
end
|
|
end
|
|
end
|
|
|
|
local ore_chance_weights = {
|
|
{"iron-ore", 25},
|
|
{"copper-ore",18},
|
|
{"coal",14},
|
|
{"stone",10},
|
|
{"crude-oil",5},
|
|
{"uranium-ore",3}
|
|
}
|
|
local ore_raffle = {}
|
|
for _, t in pairs (ore_chance_weights) do
|
|
for x = 1, t[2], 1 do
|
|
table.insert(ore_raffle, t[1])
|
|
end
|
|
end
|
|
|
|
local function draw_ores(surface, position)
|
|
local ore = ore_raffle[math_random(1, #ore_raffle)]
|
|
for x = 0, labyrinth_cell_size - 1, 1 do
|
|
for y = 0, labyrinth_cell_size - 1, 1 do
|
|
local pos = {x = position.x + x, y = position.y + y}
|
|
local amount = 250 + math.sqrt(pos.x^2 + pos.y^2) * 0.5
|
|
if ore == "crude-oil" then
|
|
if math_random(1, 32) == 1 and surface.can_place_entity({name = ore, position = pos, amount = amount * 200}) then surface.create_entity({name = ore, position = pos, amount = amount * 200}) end
|
|
else
|
|
surface.create_entity({name = ore, position = pos, amount = amount})
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
local function draw_water(surface, position)
|
|
map_functions.draw_noise_tile_circle({x = position.x + labyrinth_cell_size * 0.5, y = position.y + labyrinth_cell_size * 0.5}, "water", surface, math.floor(labyrinth_cell_size * 0.3))
|
|
for _, tile in pairs(surface.find_tiles_filtered({name = "water", area = {{position.x, position.y},{position.x + labyrinth_cell_size, position.y + labyrinth_cell_size}}})) do
|
|
if math_random(1, 12) == 1 then surface.create_entity({name = "fish", position = tile.position}) end
|
|
end
|
|
end
|
|
|
|
local enemy_chances = {
|
|
{"biter-spawner", 20},
|
|
{"spitter-spawner",8},
|
|
{"small-worm-turret",5},
|
|
{"medium-worm-turret",4},
|
|
{"big-worm-turret",3},
|
|
{"behemoth-worm-turret",1},
|
|
}
|
|
local enemy_raffle = {}
|
|
for _, t in pairs (enemy_chances) do
|
|
for x = 1, t[2], 1 do
|
|
table.insert(enemy_raffle, t[1])
|
|
end
|
|
end
|
|
|
|
local function draw_enemies(surface, position)
|
|
local positions = {}
|
|
for x = 0, labyrinth_cell_size - 1, 1 do
|
|
for y = 0, labyrinth_cell_size - 1, 1 do
|
|
positions[#positions + 1] = {x = position.x + x, y = position.y + y}
|
|
end
|
|
end
|
|
positions = shuffle(positions)
|
|
|
|
for i = 1, labyrinth_cell_size, 1 do
|
|
local enemy = enemy_raffle[math_random(1, #enemy_raffle)]
|
|
if surface.can_place_entity({name = enemy, position = positions[i]}) then
|
|
surface.create_entity({name = enemy, position = positions[i], force = "enemy"})
|
|
end
|
|
end
|
|
end
|
|
|
|
local function draw_rocks(surface, position)
|
|
local r = math_random(0,100)
|
|
if r < 50 then
|
|
surface.create_entity({name = rock_raffle[math_random(1, #rock_raffle)], position = {x = position.x + labyrinth_cell_size * 0.5, y = position.y + labyrinth_cell_size * 0.5}})
|
|
return
|
|
end
|
|
if r <= 100 then
|
|
surface.create_entity({name = rock_raffle[math_random(1, #rock_raffle)], position = {x = position.x + labyrinth_cell_size * 0.5, y = position.y + labyrinth_cell_size * 0.25}})
|
|
surface.create_entity({name = rock_raffle[math_random(1, #rock_raffle)], position = {x = position.x + labyrinth_cell_size * 0.75, y = position.y + labyrinth_cell_size * 0.75}})
|
|
surface.create_entity({name = rock_raffle[math_random(1, #rock_raffle)], position = {x = position.x + labyrinth_cell_size * 0.25, y = position.y + labyrinth_cell_size * 0.75}})
|
|
return
|
|
end
|
|
end
|
|
|
|
local function process_chunk_charted_cell(surface, pos)
|
|
local cell_position = {x = pos.x / labyrinth_cell_size, y = pos.y / labyrinth_cell_size}
|
|
if not global.labyrinth_cells[tostring(cell_position.x) .. "_" .. tostring(cell_position.y)] then return end
|
|
|
|
local noise = get_noise(1, pos)
|
|
if noise < lake_noise_value then return end --RETURN IF IT IS WATER LAKE
|
|
|
|
local connection_count = get_path_connections_count(cell_position)
|
|
|
|
if connection_count == 0 then
|
|
draw_secret_area(surface, pos)
|
|
end
|
|
|
|
if connection_count == 1 then
|
|
if math_random(1, 2) == 1 then
|
|
draw_ores(surface, pos)
|
|
else
|
|
local distance_to_center = math.sqrt(pos.x^2 + pos.y^2)
|
|
if distance_to_center > 196 then
|
|
if math_random(1, 3) == 1 then
|
|
draw_water(surface, pos)
|
|
else
|
|
draw_enemies(surface, pos)
|
|
end
|
|
else
|
|
if math_random(1, 3) == 1 then draw_water(surface, pos) end
|
|
end
|
|
end
|
|
end
|
|
|
|
if connection_count == 3 then
|
|
if math_random(1, 2) == 1 then draw_rocks(surface, pos) end
|
|
end
|
|
end
|
|
|
|
local function on_chunk_charted(event)
|
|
local surface = game.surfaces[event.surface_index]
|
|
|
|
if game.tick < 300 then return end
|
|
|
|
if not global.chunks_charted then
|
|
game.forces.player.clear_chart(surface)
|
|
global.chunks_charted = {}
|
|
end
|
|
|
|
local left_top = {x = event.position.x * 32, y = event.position.y * 32}
|
|
|
|
if global.chunks_charted[tostring(left_top.x) .. "_" .. tostring(left_top.y)] then return end
|
|
global.chunks_charted[tostring(left_top.x) .. "_" .. tostring(left_top.y)] = true
|
|
|
|
for x = 0, 32 - labyrinth_cell_size, labyrinth_cell_size do
|
|
for y = 0, 32 - labyrinth_cell_size, labyrinth_cell_size do
|
|
local pos = {x = left_top.x + x, y = left_top.y + y}
|
|
process_chunk_charted_cell(surface, pos)
|
|
end
|
|
end
|
|
end
|
|
|
|
local function on_player_joined_game(event)
|
|
local player = game.players[event.player_index]
|
|
if not global.map_init_done then
|
|
local map_gen_settings = {}
|
|
map_gen_settings.water = "none"
|
|
map_gen_settings.cliff_settings = {cliff_elevation_interval = 20, cliff_elevation_0 = 20}
|
|
map_gen_settings.autoplace_controls = {
|
|
["coal"] = {frequency = "none", size = "none", richness = "none"},
|
|
["stone"] = {frequency = "none", size = "none", richness = "none"},
|
|
["copper-ore"] = {frequency = "none", size = "none", richness = "none"},
|
|
["uranium-ore"] = {frequency = "none", size = "none", richness = "none"},
|
|
["iron-ore"] = {frequency = "none", size = "none", richness = "none"},
|
|
["crude-oil"] = {frequency = "none", size = "none", richness = "none"},
|
|
["trees"] = {frequency = "none", size = "none", richness = "none"},
|
|
["enemy-base"] = {frequency = "none", size = "none", richness = "none"}
|
|
}
|
|
|
|
game.map_settings.pollution.ageing = 0
|
|
game.map_settings.pollution.pollution_restored_per_tree_damage = 0
|
|
game.create_surface("forest_maze", map_gen_settings)
|
|
game.forces["player"].set_spawn_position({0,0},game.surfaces["forest_maze"])
|
|
local surface = game.surfaces["forest_maze"]
|
|
|
|
surface.daytime = 1
|
|
surface.freeze_daytime = 1
|
|
--local radius = 512
|
|
--game.forces.player.chart(surface, {{x = -1 * radius, y = -1 * radius}, {x = radius, y = radius}})
|
|
global.map_init_done = true
|
|
end
|
|
local surface = game.surfaces["forest_maze"]
|
|
if player.online_time < 5 and surface.is_chunk_generated({0,0}) then
|
|
player.teleport(surface.find_non_colliding_position("character", {0,0}, 2, 1), "forest_maze")
|
|
else
|
|
if player.online_time < 5 then
|
|
player.teleport({0,0}, "forest_maze")
|
|
end
|
|
end
|
|
if player.online_time < 10 then
|
|
player.insert {name = 'iron-gear-wheel', count = 8}
|
|
player.insert {name = 'iron-plate', count = 16}
|
|
--player.insert {name = 'grenade', count = 160}
|
|
end
|
|
end
|
|
|
|
--TREE BURNING NERF
|
|
local function on_entity_died(event)
|
|
if not event.entity.valid then return end
|
|
if event.entity.type == "tree" then
|
|
for _, entity in pairs (event.entity.surface.find_entities_filtered({area = {{event.entity.position.x - 4, event.entity.position.y - 4},{event.entity.position.x + 4, event.entity.position.y + 4}}, name = "fire-flame-on-tree"})) do
|
|
if entity.valid then entity.destroy() end
|
|
end
|
|
end
|
|
end
|
|
|
|
local function on_init()
|
|
global.labyrinth_cells = {}
|
|
end
|
|
|
|
event.on_init(on_init)
|
|
event.add(defines.events.on_entity_died, on_entity_died)
|
|
event.add(defines.events.on_chunk_generated, on_chunk_generated)
|
|
event.add(defines.events.on_chunk_charted, on_chunk_charted)
|
|
event.add(defines.events.on_player_joined_game, on_player_joined_game) |