Reactor = peripheral.wrap("bottom")

Turbine1 = peripheral.wrap("BigReactors-Turbine_0")
Turbine2 = peripheral.wrap("BigReactors-Turbine_1")
Turbine3 = peripheral.wrap("BigReactors-Turbine_2")
Turbine4 = peripheral.wrap("BigReactors-Turbine_3")


function GetReactor()
ReactorActive = Reactor.getActive()
ReactorRods = Reactor.getNumberOfControlRods()
ReactorAmount = Reactor.getHotFluidAmount()
ReactorFTemp = Reactor.getFuelTemperature()
ReactorCTemp = Reactor.getCasingTemperature()
ReactorConnected = Reactor.getConnected()
ReactorType = Reactor.getHotFluidType()
ReactorReactivity = Reactor.getFuelReactivity()
end

function post(RActive1)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "RActive1="..textutils.urlEncode(tostring(RActive1))
 )
end

function post1(RRods1)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "RRods1="..textutils.urlEncode(tostring(RRods1))
 )
end

function post2(RAmount1)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "RAmount1="..textutils.urlEncode(tostring(RAmount1))
 )
end

function post3(RFTemp1)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "RFTemp1="..textutils.urlEncode(tostring(RFTemp1))
 )
end

function post4(RCTemp1)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "RCTemp1="..textutils.urlEncode(tostring(RCTemp1))
 )
end

function post5(RConnected1)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "RConnected1="..textutils.urlEncode(tostring(RConnected1))
 )
end

function post6(RType1)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "RType1="..textutils.urlEncode(tostring(RType1))
 )
end

function post7(RReactivite1)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "RReactivite1="..textutils.urlEncode(tostring(RReactivite1))
 )
end

function GetTurbine1()
TurbineActive1 = Turbine1.getActive()
TurbineSpeed1 = Turbine1.getRotorSpeed()
TurbineType1 = Turbine1.getOutputType()
TurbineStored1 = Turbine1.getEnergyStored()
TurbineProduced1 = Turbine1.getEnergyProducedLastTick()
TurbineConnected1 = Turbine1.getConnected()
end

function post8(TActive1)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TActive1="..textutils.urlEncode(tostring(TActive1))
 )
end

function post9(TSpeed1)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TSpeed1="..textutils.urlEncode(tostring(TSpeed1))
 )
end

function post10(TType1)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TType1="..textutils.urlEncode(tostring(TType1))
 )
end

function post11(TStored1)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TStored1="..textutils.urlEncode(tostring(TStored1))
 )
end

function post12(TProduced1)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TProduced1="..textutils.urlEncode(tostring(TProduced1))
 )
end

function post13(TConnected1)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TConnected1="..textutils.urlEncode(tostring(TConnected1))
 )
end

function GetTurbine2()
TurbineActive2 = Turbine2.getActive()
TurbineSpeed2 = Turbine2.getRotorSpeed()
TurbineType2 = Turbine2.getOutputType()
TurbineStored2 = Turbine2.getEnergyStored()
TurbineProduced2 = Turbine2.getEnergyProducedLastTick()
TurbineConnected2 = Turbine2.getConnected()
end

function post14(TActive2)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TActive2="..textutils.urlEncode(tostring(TActive2))
 )
end

function post15(TSpeed2)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TSpeed2="..textutils.urlEncode(tostring(TSpeed2))
 )
end

function post16(TType2)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TType2="..textutils.urlEncode(tostring(TType2))
 )
end

function post17(TStored2)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TStored2="..textutils.urlEncode(tostring(TStored2))
 )
end

function post18(TProduced2)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TProduced2="..textutils.urlEncode(tostring(TProduced2))
 )
end

function post19(TConnected2)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TConnected2="..textutils.urlEncode(tostring(TConnected2))
 )
end

function GetTurbine3()
TurbineActive3 = Turbine3.getActive()
TurbineSpeed3 = Turbine3.getRotorSpeed()
TurbineType3 = Turbine3.getOutputType()
TurbineStored3 = Turbine3.getEnergyStored()
TurbineProduced3 = Turbine3.getEnergyProducedLastTick()
TurbineConnected3 = Turbine3.getConnected()
end

function post20(TActive3)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TActive3="..textutils.urlEncode(tostring(TActive3))
 )
end

function post21(TSpeed3)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TSpeed3="..textutils.urlEncode(tostring(TSpeed3))
 )
end

function post22(TType3)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TType3="..textutils.urlEncode(tostring(TType3))
 )
end

function post23(TStored3)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TStored3="..textutils.urlEncode(tostring(TStored3))
 )
end

function post24(TProduced3)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TProduced3="..textutils.urlEncode(tostring(TProduced3))
 )
end

function post25(TConnected3)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TConnected3="..textutils.urlEncode(tostring(TConnected3))
 )
end

function GetTurbine4()
TurbineActive4 = Turbine4.getActive()
TurbineSpeed4 = Turbine4.getRotorSpeed()
TurbineType4 = Turbine4.getOutputType()
TurbineStored4 = Turbine4.getEnergyStored()
TurbineProduced4 = Turbine4.getEnergyProducedLastTick()
TurbineConnected4 = Turbine4.getConnected()
end

function post26(TActive4)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TActive4="..textutils.urlEncode(tostring(TActive4))
 )
end

function post27(TSpeed4)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TSpeed4="..textutils.urlEncode(tostring(TSpeed4))
 )
end

function post28(TType4)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TType4="..textutils.urlEncode(tostring(TType4))
 )
end

function post29(TStored4)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TStored4="..textutils.urlEncode(tostring(TStored4))
 )
end

function post30(TProduced4)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TProduced4="..textutils.urlEncode(tostring(TProduced4))
 )
end

function post31(TConnected4)
http.post("http://zaidal86.96.lt/ComputerCraft/ReactorTurbine.php",
 "TConnected4="..textutils.urlEncode(tostring(TConnected4))
 )
end

while true do

    GetReactor()
    post(ReactorActive)
    post1(ReactorRods)
    post2(ReactorAmount)
    post3(ReactorFTemp)
    post4(ReactorCTemp)
    post5(ReactorConnected)
    post6(ReactorType)
    post7(ReactorReactivity)

    --Turbine--

    GetTurbine1()
    post8(TurbineActive1)
    post9(TurbineSpeed1)
    post10(TurbineType1)
    post11(TurbineStored1)
    post12(TurbineProduced1)
    post13(TurbineConnected1)

    GetTurbine2()
    post14(TurbineActive2)
    post15(TurbineSpeed2)
    post16(TurbineType2)
    post17(TurbineStored2)
    post18(TurbineProduced2)
    post19(TurbineConnected2)

    GetTurbine3()
    post20(TurbineActive3)
    post21(TurbineSpeed3)
    post22(TurbineType3)
    post23(TurbineStored3)
    post24(TurbineProduced3)
    post25(TurbineConnected3)

    GetTurbine4()
    post26(TurbineActive4)
    post27(TurbineSpeed4)
    post28(TurbineType4)
    post29(TurbineStored4)
    post30(TurbineProduced4)
    post31(TurbineConnected4)

    sleep(0.1)
end