pyhardmode/control.lua at main · notnotmelon/pyhardmode · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
require "scripts.composite-entity"

local function init()
    storage.composite_entities = storage.composite_entities or {}
    storage.coal_plants = storage.coal_plants or {}
    for _, force in pairs(game.forces) do
        force.manual_crafting_speed_modifier = 2
    end
    --remote.call("undeletable-fluids", "add_deletable_fluid", "water")
    --remote.call("undeletable-fluids", "add_deletable_fluid", "steam")

    -- create wiki pages
    remote.call("pywiki", "add_section", "hardmode")

    remote.call("pywiki", "add_page", {
        name = "heat",
        section = "hardmode",
        text_only = true
    })
end

script.on_init(function()
    if remote.interfaces["freeplay"] and not script.active_mods.PyBlock then
        remote.call("freeplay", "set_created_items", {})
        if script.active_mods["configurable-valves"] then
            remote.call("freeplay", "set_ship_items", {
                ["burner-mining-drill"] = 10,
                ["configurable-valve"] = 6,
                ["offshore-pump"] = 1
            })
        else
            remote.call("freeplay", "set_ship_items", {
                ["burner-mining-drill"] = 10,
                ["py-overflow-valve"] = 3,
                ["py-underflow-valve"] = 3,
                ["offshore-pump"] = 1
            })
        end
    end
    init()
end)
script.on_configuration_changed(init)

script.on_event(defines.events.on_technology_effects_reset, function(event)
    local force = event["force"]
    if(force.name == "player") then
        force.manual_crafting_speed_modifier = force.manual_crafting_speed_modifier + 2
    end
end)

script.on_nth_tick(87, function(event)
    for unit_number, entities in pairs(storage.coal_plants) do
        local coal_plant, picture = entities[1], entities[2]
        if not coal_plant.valid or not picture.valid then
            if coal_plant.valid then
                coal_plant.destroy()
            elseif picture.valid then
                picture.destroy()
            end
            storage.coal_plants[unit_number] = nil
        elseif coal_plant.energy ~= 0 then
            picture.destroy()
            local animation = coal_plant.surface.create_entity {
                name = coal_plant.name .. "-animation",
                position = coal_plant.position,
                force = coal_plant.force_index
            }
            animation.destructible = false
            animation.operable = false
            animation.minable = false
            animation.rotatable = false
            storage.composite_entities[unit_number] = {animation}
            storage.coal_plants[unit_number] = nil
        end
    end
end)

-- when a chest is killed, drop all its contents
script.on_event(defines.events.on_entity_died, function(event)
    local entity = event.entity
    if not entity.valid or not entity.unit_number then return end
    local inventory = entity.get_inventory(defines.inventory.chest)
    if not inventory then return end
    for i = 1, #inventory do
        local stack = inventory[i]
        if stack.valid_for_read then
            entity.surface.spill_item_stack{
                position = entity.position,
                stack = stack,
                enable_looted = true,
                force = entity.force_index,
                allow_belts = false,
                use_start_position_on_failure = true,
            }
        end
    end
    inventory.clear()
end)

-- teleport player to cursor position when they are in map view & wearing a sweater
local armor_inventory = defines.inventory.character_armor
local render_mode = defines.render_mode.game
local controller_type = defines.controllers.character
script.on_event("open-gui", function(event)
    local player = game.get_player(event.player_index)
    if player.render_mode == render_mode then return end -- don't teleport in game view
    if event.selected_prototype then return end -- don't teleport when opening things remotely
    if player.physical_controller_type ~= controller_type then return end -- don't teleport players who don't have bodies

    local character = player.character
    if not character or not character.valid then return end
    local armor = character.get_inventory(armor_inventory)
    if not armor then return end

    local armor_slot = armor[1]
    if armor_slot.valid_for_read and armor_slot.name == "sweater" then
        character.teleport(event.cursor_position)
    end
end)