open computers export applied energistics
--[[

 If the Nuclear Reactor overheats the Robot drops not only depleted Uran Rods into the Trash...
 If your using Applied Energistics (like me) for Supporting the Robot you will have much such Rods after some Days
 which will blow you storages... 
 And here comes this Script in place:
 Extract all used Uran Rods from AE System and split them into a Chest. This Chest can than be linked to another AE or whatever..
 
 Setup:
 - Connect an ME_Interface to an OC Adapter.
 - Put the biggest Database-Upgrade (81 entries) into the Adapter.
open computers export applied energistics How to dowload it? open computers export applied energistics
 - Connect the Adapter with a Cable to a Computer.

 Alternative you can put the Adapter directly to the ME_Controller..but than you have to change the Script...
 - Put an Adapter in front of the ME_Controller. (directly to it)
 - Connect the Adapter with a Cable to the Computer.
 - You need to change the meInterfaceBus to meControllerBus lines as well as 'getAvailableItems()' to 'getItemsInNetwork()' ...
 


http://oc.cil.li/index.php?/topic/616-applied-energistics-2-using-oc-as-an-advanced-importexport-system/?hl=applied
open computers export applied energistics How to use it? open computers export applied energistics
http://oc.cil.li/index.php?/topic/411-extracting-items-from-me-network-applied-energetics/
http://oc.cil.li/index.php?/topic/481-ae-item-management-puzzle-whats-the-best-way-to-do-this/?hl=database

--]]


--[[ Internal values - DONT change! ]]


local component = require('component')
open computers export applied energistics PasteShr open computers export applied energistics
local side = require('sides')
local string = require('string')
local meExportBus = component.getPrimary('me_exportbus')
--local meExportBus = component.proxy(component.list("me_exportbus")())
--local meExportBus = component.me_exportbus
local meInterfaceBus = component.getPrimary('me_interface')
--local meController = component.getPrimary('me_controller')
local db = component.database
--local dbAddress = db.address
--local dbAddress = false
open computers export applied energistics How to dowload it? open computers export applied energistics
--for k,_ in component.list('database') do dbAddress = k break end
--dbInit = false

local version = 0.1


---[[ CONFIG - START ]]



open computers export applied energistics How to get it? open computers export applied energistics

---[[ CONFIG - END ]]


function stringMatch(text, find)
    if string.find(string.lower(text), string.lower(find)) then
        return true
    else
        return false
    end
open computers export applied energistics How to get it for free? open computers export applied energistics
end


--[[
function init_db()
    -- init database with all items?
    if (dbInit == false) then
        draw_text_term(1, linecount+1, 'Initialize Database!')
        for i=1, #RequiredReactorInventory do
            local Added = false
open computers export applied energistics How to get it for free? open computers export applied energistics
            while (Added == false) do
                if (ic.store(side.front, i, dbAddress, i) == true) then
                    Added = true
                end
            end
        end
        dbInit = true
    end
end

open computers export applied energistics How to use it? open computers export applied energistics
for i = 0, 4 do
    print("--------- Run " .. i .. " Start ---------\n")
    print("Set Config: ",exBus.setExportConfiguration(busSide, 1, db.address, i+1))

    config = exBus.getExportConfiguration(busSide, 1)
    print("\n!! Export Bus Config Start !!\n")
    for k,v in pairs(config) do
        print(k,v)
    end
    print("\n!! Export Bus Config End !!\n")
open computers export applied energistics How to get it for free? open computers export applied energistics

    print("Try Export: ",exBus.exportIntoSlot(busSide,i+1), "\n") -- try export an item
end

exBus.setExportConfiguration(0) --clear the config

--]]



open computers export applied energistics How to get it for free? open computers export applied energistics
local exportBusSide
for i = 0, 5 do
    if select(2, meExportBus.getConfiguration(i)) ~= "no export bus" then
        exportBusSide = i
        break
    end
end

local entryNum = {}
for i = 1, 81 do
open computers export applied energistics PasteShr open computers export applied energistics
    local item = db.get(i)
    if item then entryNum[item.name] = i end
end


local itemList = meInterfaceBus.getAvailableItems()

for k, v in pairs(itemList) do
    if (v.fingerprint) then
        for key,value in (v.fingerprint) do
open computers export applied energistics How to get it for free? open computers export applied energistics
            if (stringMatch(key.id, "reactoruranium")) then
                print(key.id, key.value)
            end
        end
    end
end
--meExportBus.setConfiguration(exportBusSide, 1, db.address, entryNum[v.name])
--meExportBus.exportIntoSlot(exportBusSide, 1)


open computers export applied energistics How to dowload it? open computers export applied energistics


--
-- EOF
--
open computers export applied energistics