CC Particle Generator obj Viewer

br=0.5
delay=0.15

args={...}

function loadFile(filename)
    fp=fs.open(filename,"r")
    lines={}
    i=1
    lines[i]=fp.readLine()
    while lines[i]~=nil do
        i=i+1
        lines[i]=fp.readLine()
    end
    return lines
end

function split (inputstr, sep)
        if sep == nil then
                sep = "%s"
        end
        local t={}
        for str in string.gmatch(inputstr, "([^"..sep.."]+)") do
                table.insert(t, str)
        end
        return t
end

function compileObj(lines)
    v = {}
    vt = {}
    vn = {}
    f = {}
    l = {}
    print(#lines)
    for i=5, #lines do
        if string.sub(lines[i],1,2)=="v " then
            table.insert(v,split(lines[i]))
        end
        if string.sub(lines[i],1,2)=="vt" then
            table.insert(vt,split(lines[i]))
        end
        if string.sub(lines[i],1,2)=="vn" then
            table.insert(vn,split(lines[i]))
        end
        if string.sub(lines[i],1,2)=="f " then
            table.insert(f,split(lines[i]))
        end
        if string.sub(lines[i],1,2)=="l " then
            table.insert(l,split(lines[i]))
        end
    end
end

compileObj(loadFile(args[1]))

function wrapPs(peripheralName)
    periTab = {}
    sideTab = {}
    if peripheralName == nil then
        print("Fehler")
    end
    local peripherals = peripheral.getNames()
    local i2 = 1
    for i = 1, #peripherals do
        if peripheral.getType(peripherals[i]) == peripheralName then
            periTab[i2] = peripheral.wrap(peripherals[i])
            sideTab[i2] = peripherals[i]
            i2 = i2 + 1
        end
    end
    if periTab ~= {} then
        return periTab, sideTab
    else
        return nil
    end

    function getPSide(peripheralName)
        if peripheralName == nil then
            print("Fehler")
        end
        local peripherals = peripheral.getNames()
        local i = 1
        while i < #peripherals and peripheral.getType(peripherals[i]) ~= peripheralName do
            i = i + 1
        end
        if peripheral.getType(peripherals[i]) == peripheralName then
            return peripherals[i]
        else
            return nil
        end
    end
end

pgs=wrapPs("particle_generator")

for i=1,#pgs do
    pgs[i].setGeneratorProperty("spawn_y",30)
    pgs[i].setGeneratorProperty("scale",2.6)
    pgs[i].setGeneratorProperty("motion_y",0)
    pgs[i].setGeneratorProperty("life",1000)
    pgs[i].setGeneratorProperty("collide",true)
    pgs[i].setGeneratorProperty("selected_particle",2)
end

y=1
line=1
pgn=1
        for i=1,#v do
            if pgn>#pgs then
            pgn=1
            end
            pgs[pgn].setGeneratorProperty("spawn_x",tonumber(v[i][2])*br)
            pgs[pgn].setGeneratorProperty("spawn_y",tonumber(v[i][3])*br)
            pgs[pgn].setGeneratorProperty("spawn_z",tonumber(v[i][4])*br)
            pgn=pgn+1
        end
        sleep(delay)

for i=1,#pgs do
    pgs[i].setGeneratorProperty("motion_y",0)
    pgs[i].setGeneratorProperty("life",0)
end