rIronName = "IC2:item.itemIngotAdvIron"
cCableName = "IC2:item.ic2cable"
glassName = "minecraft:glass"
coalDustName = "IC2:item.itemDustCoal"
redstoneName = "minecraft:redstone"
tinName = "IC2:item.itemIngotTin"
cobbleName = "minecraft:cobblestone"
circuitName = "IC2:item.itemPartCircuit"
generatorName = "IC2:blockGenerator"
furnaceName = "minecraft:furnace"
casingName = "IC2:blockMachine"
batteryName = "IC2:item.itemBatRE"

function requestItem(itemName, count)
    print("Asking for " .. count .. " - " .. itemName)
    rednet.send(10,{itemName,count},"solar")
    sID, msg, prot = rednet.receive()
    if msg ~= "Sent" then
        print("Didn't get any " .. itemName)
        print("Waiting 5 seconds then asking again.")
        sleep(5)
        requestItem(itemName,count)
    end
end

function craftFurnace(numPanels)
    turtle.select(1)
    requestItem(cobbleName,numPanels*8)
    print("Crafting furnace...")
    turtle.transferTo(16,numPanels)
    turtle.transferTo(15,numPanels)
    turtle.transferTo(14,numPanels)
    turtle.transferTo(12,numPanels)
    turtle.transferTo(10,numPanels)
    turtle.transferTo(8,numPanels)
    turtle.transferTo(7,numPanels)
    turtle.transferTo(6,numPanels)
    turtle.craft(numPanels)
    turtle.dropDown()
end

function craftBattery(numPanels)
    turtle.select(1)
    requestItem(tinName,numPanels*4)
    sleep(3)
    requestItem(redstoneName,numPanels*2)
    sleep(3)
    requestItem(cCableName,numPanels)
    print("Crafting battery...")
    turtle.transferTo(10,numPanels)
    turtle.transferTo(12,numPanels)
    turtle.transferTo(14,numPanels)
    turtle.transferTo(16,numPanels)
    turtle.select(2)
    turtle.transferTo(11,numPanels)
    turtle.transferTo(15,numPanels)
    turtle.select(3)
    turtle.transferTo(7,numPanels)
    turtle.craft(numPanels)
    turtle.dropDown()
end

function craftCircuit(numPanels)
    turtle.select(1)
    requestItem(cCableName,numPanels*6)
    sleep(3)
    requestItem(redstoneName,numPanels*2)
    sleep(3)
    requestItem(rIronName,numPanels)
    print("Crafting circuit...")
    turtle.transferTo(6,numPanels)
    turtle.transferTo(7,numPanels)
    turtle.transferTo(8,numPanels)
    turtle.transferTo(14,numPanels)
    turtle.transferTo(15,numPanels)
    turtle.transferTo(16,numPanels)
    turtle.select(2)
    turtle.transferTo(10,numPanels)
    turtle.transferTo(12,numPanels)
    turtle.select(3)
    turtle.transferTo(11,numPanels)
    turtle.craft(numPanels*2)
    turtle.dropDown()
end

function craftCasing(numPanels)
    turtle.select(1)
    requestItem(rIronName,numPanels*8)
    print("Crafting casing...")
    turtle.transferTo(16,numPanels)
    turtle.transferTo(15,numPanels)
    turtle.transferTo(14,numPanels)
    turtle.transferTo(12,numPanels)
    turtle.transferTo(10,numPanels)
    turtle.transferTo(8,numPanels)
    turtle.transferTo(7,numPanels)
    turtle.transferTo(6,numPanels)
    turtle.craft(numPanels)
    turtle.dropDown()
end

function craftGen(numPanels)
    turtle.select(1)
    turtle.suckDown()
    turtle.suckDown()
    turtle.suckDown()
    print("Crafting generator...")
    turtle.transferTo(7,numPanels)
    turtle.select(2)
    turtle.transferTo(11,numPanels)
    turtle.select(3)
    turtle.transferTo(15,numPanels)
    turtle.craft(numPanels)
    turtle.dropDown()
end

function craftSP(numPanels)
    turtle.select(1)
    requestItem(coalDustName,numPanels*3)
    sleep(3)
    requestItem(glassName,numPanels*3)
    turtle.suckDown()
    turtle.suckDown()
    print("Crafting Solar Panel...")
    turtle.transferTo(6,numPanels)
    turtle.transferTo(11,numPanels)
    turtle.transferTo(8,numPanels)
    turtle.select(2)
    turtle.transferTo(7,numPanels)
    turtle.transferTo(10,numPanels)
    turtle.transferTo(12,numPanels)
    turtle.select(3)
    turtle.transferTo(15,numPanels)
    turtle.transferTo(14,numPanels)
    turtle.select(4)
    turtle.transferTo(16,numPanels)
    turtle.transferTo(14,numPanels)
    turtle.craft(numPanels)
    turtle.drop()
    print("Crafted " .. numPanels .. " solar panel(s)!!!")
end

rednet.open("right")

running = true
while running do
    craftBattery(1)
    craftCasing(1)
    craftFurnace(1)
    craftGen(1)
    craftCircuit(2)
    craftSP(1)
do