kpoppel
2013-06-03 ede3978965790f9683b96d12fc0bf80ba30824cd
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
-- The medium voltage solar array is an assembly of low voltage arrays.
-- The assembly can deliver medium voltage levels and is a 10% less efficient
-- compared to 5 individual low voltage arrays due to losses in the transformer.
-- However medium voltage is supplied.
-- Solar arrays are not able to store large amounts of energy.
-- The MV arrays are used to make high voltage arrays.
minetest.register_node("technic:solar_array_mv", {
    tiles = {"technic_mv_solar_array_top.png", "technic_mv_solar_array_bottom.png", "technic_mv_solar_array_side.png",
         "technic_mv_solar_array_side.png", "technic_mv_solar_array_side.png", "technic_mv_solar_array_side.png"},
    groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
    sounds = default.node_sound_wood_defaults(),
        description="MV Solar Array",
    active = false,
    technic_mv_power_machine=1,
    internal_EU_buffer=0;
    internal_EU_buffer_size=1000;
    drawtype = "nodebox",
    paramtype = "light",
    is_ground_content = true,    
    node_box = {
            type = "fixed",
            fixed = {-0.5, -0.5, -0.5, 0.5, 0, 0.5},
        },
        selection_box = {
            type = "fixed",
            fixed = {-0.5, -0.5, -0.5, 0.5, 0, 0.5},
        },
    on_construct = function(pos)
        local meta = minetest.env:get_meta(pos)
        meta:set_float("technic_mv_power_machine", 1)
        meta:set_float("internal_EU_buffer", 0)
        meta:set_float("internal_EU_buffer_size", 1000)
 
        meta:set_string("infotext", "MV Solar Array")
        meta:set_float("active", false)
    end,
})
 
minetest.register_craft({
    output = 'technic:solar_array_mv 1',
    recipe = {
        {'technic:solar_array_lv', 'technic:solar_array_lv','technic:solar_array_lv'},
        {'technic:solar_array_lv', 'technic:mv_transformer','technic:solar_array_lv'},
        {'', 'technic:mv_cable',''},
 
    }
})
 
minetest.register_abm(
    {nodenames = {"technic:solar_array_mv"},
    interval   = 1,
    chance     = 1,
    action = function(pos, node, active_object_count, active_object_count_wider)
        -- The action here is to make the solar array produce power
        -- Power is dependent on the light level and the height above ground
        -- 130m and above is optimal as it would be above cloud level.
                -- Height gives 1/4 of the effect, light 3/4. Max. effect is 720EU for the array.
                -- There are many ways to cheat by using other light sources like lamps.
                -- As there is no way to determine if light is sunlight that is just a shame.
                -- To take care of some of it solar panels do not work outside daylight hours or if
                -- built below -10m
        local pos1={}
        pos1.y=pos.y+1
        pos1.x=pos.x
        pos1.z=pos.z
 
        local light = minetest.env:get_node_light(pos1, nil)
        local time_of_day = minetest.env:get_timeofday()
        local meta = minetest.env:get_meta(pos)
        if light == nil then light = 0 end
        -- turn on array only during day time and if sufficient light
                -- I know this is counter intuitive when cheating by using other light sources.
        if light >= 12 and time_of_day>=0.24 and time_of_day<=0.76 and pos.y > -10 then
            local internal_EU_buffer      = meta:get_float("internal_EU_buffer")
            local internal_EU_buffer_size = meta:get_float("internal_EU_buffer_size")
            local charge_to_give          = math.floor(light*(light*2.4+pos1.y/130*12))
            if charge_to_give<0   then charge_to_give=0 end
            if charge_to_give>720 then charge_to_give=720 end
            if internal_EU_buffer+charge_to_give>internal_EU_buffer_size then
               charge_to_give=internal_EU_buffer_size-internal_EU_buffer
            end
            meta:set_string("infotext", "Solar Array is active ("..charge_to_give.."EU)")
            meta:set_float("active",1)
            internal_EU_buffer=internal_EU_buffer+charge_to_give
            meta:set_float("internal_EU_buffer",internal_EU_buffer)
            
        else
            meta:set_string("infotext", "Solar Array is inactive");
            meta:set_float("active",0)
        end
    end,
}) 
 
register_MV_machine ("technic:solar_array_mv","PR")