GTNH-Nuclear-OC/nuclearReactor.lua at main · Anderwer/GTNH-Nuclear-OC · 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
local redstone = component.proxy(component.list("redstone")())
local transposer = component.proxy(component.list("transposer")())

local sides = {bottom = 0, top = 1, back = 2, front = 3, right = 4, left = 5}
local reactorCoolantCellIndex = {3, 6, 9, 10, 15, 22, 26, 29, 33, 40, 45, 46, 49, 52}
local reactorFuelRodsIndex = {
    1, 2, 4, 5, 7, 8, 11,
    12, 13, 14, 16, 17, 18,
    19, 20, 21, 23, 24, 25,
    27, 28, 30, 31, 32, 34,
    35, 36, 37, 38, 39, 41,
    42, 43, 44, 47, 48, 50,
    51, 53, 54
}

local reactor = sides.bottom
local me_interface = sides.top
local me_interfaceCoolantCellIndex = 2
local me_interfaceFuelRodsIndex = 1
local me_interfaceEmptyIndex = 9

local function sleep(interval)
    computer.pullSignal(interval)
end

local function shutdown()
    redstone.setOutput(reactor, 0)
    computer.shutdown(true)
end

local function pause()
    redstone.setOutput(reactor, 0)
end

local function checkHasCoolantCell()
    if transposer.getStackInSlot(me_interface, me_interfaceCoolantCellIndex) == nil then
        shutdown()
    end
end

local function checkHasFuelRods()
    if transposer.getStackInSlot(me_interface, me_interfaceFuelRodsIndex) == nil then
        shutdown()
    end
end

local function check()
    local reactorItems = transposer.getAllStacks(reactor).getAll()
    checkHasCoolantCell() --check whether me_interface has coolantcell or not
    checkHasFuelRods() --check whether me_interface has coolantcell or not

    local flag = 0
    for _, i in pairs(reactorCoolantCellIndex) do --check whether has low damage cell or empty slot
        local item = reactorItems[i - 1]
        if next(item) == nil then
            pause()
            if flag == 0 then
                flag = 1
                sleep(1)
            end
            checkHasCoolantCell()
            transposer.transferItem(me_interface, reactor, 1, me_interfaceCoolantCellIndex, i)
        else
            if item['damage'] > 85 then
                pause()
                if flag == 0 then
                    flag = 1
                    sleep(1)
                end
                checkHasCoolantCell()
                transposer.transferItem(reactor, me_interface, 1, i, me_interfaceEmptyIndex)
                transposer.transferItem(me_interface, reactor, 1, me_interfaceCoolantCellIndex, i)
            end
        end
    end

    if redstone.getInput(sides.back) > 0 then --check whether full energy or not
        shutdown()
    end

    for _, i in pairs(reactorFuelRodsIndex) do --check whether has dried fuel or empty slot
        local item = reactorItems[i - 1]
        if next(item) == nil then
            checkHasFuelRods()
            transposer.transferItem(me_interface, reactor, 1, me_interfaceFuelRodsIndex, i)
        else
            if item['maxDamage'] == 0 then
                checkHasFuelRods()
                transposer.transferItem(reactor, me_interface, 1, i, me_interfaceEmptyIndex)
                transposer.transferItem(me_interface, reactor, 1, me_interfaceFuelRodsIndex, i)
            end
        end
    end

    local newItems = transposer.getAllStacks(reactor).getAll() --check whether have 54 items or not
    for _, k in pairs(newItems) do
        if next(k) == nil then
            computer.shutdown(true)
        end
    end

    redstone.setOutput(reactor, 15)
end

local function main()
    check()
    computer.shutdown(true)
end

main()