[Release]Neue Questflags

01/28/2015 13:28 QuickFlameZ#1

Liebe Community,
ihr kennt ja die bisher vorhandenen Questflags, mit denen ihr Zahlen speichern k�nnt. Mit der Variante, die mein Kumpel entwickelt hat, k�nnt ihr auch Tabellen und Strings speichern.(Also eigentlich alles)

Ich betone:"Diese art von Questflags stammt nicht von mir, ich wurde lediglich gebeten sie zu Releasen"

Anhang oder Spoiler:

Spoiler

PHP Code:


			
function get_locale_quest_path()

    local file = io.open("usr/tmp","r")

    if file then

        for line in file:lines() do

            if string.find(line,"/share/")then

                return line.."/"

            end

        end

        file:close()

    end

    os.execute("find / -name quest > /usr/tmp")

    local tmp = io.open("usr/tmp","r")

    for line in tmp:lines() do

        if string.find(line,"/share/")then

            tmp:close()

            return line.."/"

        end

    end

end

SpeicherPfad = get_locale_quest_path()..""-- hier kann der ordner rein, wo alles gespeichert werden soll



pc.write_table = function(tab)

    local file= io.open(SpeicherPfad..pc.get_name(),"w")

    file:write("return {")

    for i,x in next, tab do

        local str = "\n\t["..i.."] = {\n\t\t"

        for e,f in next,x do

            str = str.."['"..e.."'] = '"..f.."',\n\t\t"

        end

        local str = str.."\n\t},"

        file:write(str)

    end

    file:write("\n}")

    file:close()

end

pc.delff = function(name)

    local tab = loadstring(io.open(SpeicherPfad..pc.get_name(),"r"):read("*a"))()

    tab[q.getcurrentquestindex()][name]=nil

    pc.write_table(tab)

end

pc.setff = function(name,value)

    if io.open(SpeicherPfad..pc.get_name(),"r")==nil then

        local file= io.open(SpeicherPfad..pc.get_name(),"w")

        file:write("return{}")

        file:close()

    end

    local tab = loadstring(io.open(SpeicherPfad..pc.get_name(),"r"):read("*a"))()

    if type(value)=="function" then

        value = 'loadstring(string.gsub('..string.gsub(string.format('%q',string.dump(value)),"(\\000)","`")..',"`","\\000"))'

    elseif type(value)=="table" then

        inp = ""

        local function dmp(tab)

            inp = inp..'{'

            table.foreach(tab,function(i,l)

            if type(i) == 'string' then

                inp = inp..'['..string.format('%q',i)..']='

            end

            if type(l) == 'string' then

                inp = inp..string.format('%q',l)..','

            elseif type(l) == 'number' then

                inp = inp..l..','

            elseif type(l) == 'table' then

                dmp(l)

            elseif type(l) == 'function' then

                inp = inp..'loadstring(string.gsub('..string.gsub(string.format('%q',string.dump(l)),"(\\000)","`")..',"`","\\000")),'

            end

            end)

            inp = inp..'}'

        end

        dmp(value)

        value = inp

        inp = nil

    end

    if not tab[q.getcurrentquestindex()] then

        tab[q.getcurrentquestindex()]={}

    end

    if tab[q.getcurrentquestindex()][name] then

        tab[q.getcurrentquestindex()][name]=1

    end

    tab[q.getcurrentquestindex()][name]=value

    pc.write_table(tab)

end

pc.getff = function(name)

    local base = loadstring(io.open(SpeicherPfad..pc.get_name(),"r"):read("*a"))()[q.getcurrentquestindex()][name]

    return string.find(base,"\000") and assert(loadstring('return '..base))() or

    type(assert(loadstring('return '..base))())=="table" and assert(loadstring('return '..base))() or

    tonumber(base) or base or 0

end

kind regards

01/28/2015 14:21 'Mahone#2

Gibt's schon.

[Only registered and activated users can see links. Click Here To Register...]

Mit Strings zumindest.
Ist sogar schon in den Daroo Files drin, wenn ich mich richtig erinnere.

01/28/2015 14:35 .Incidur#3

Quote:

Originally Posted by 'Mahone

Gibt's schon.

[Only registered and activated users can see links. Click Here To Register...]

Mit Strings zumindest.
Ist sogar schon in den Daroo Files drin, wenn ich mich richtig erinnere.

Korrekt, m�ssten in den Daroo Files enthalten sein.

01/28/2015 19:42 Noa_#4

Ich finde die Methode recht genial, man kann alles speichern was speichern geht, danke.

bei dieser methode [Only registered and activated users can see links. Click Here To Register...]
wird mir schon �bel weil diese extrem Speicher lastig ist, wie die geschrieben ist. ich erkl�re euch mal wieso[...](f�r quester besser geeignet)

Erkl�rung:

Spoiler

01/28/2015 21:57 gerald500#5

und was bringt mir das dann genau also wo sind da die vorteile ?

01/28/2015 22:22 QuickFlameZ#6

Quote:

Originally Posted by gerald500

und was bringt mir das dann genau also wo sind da die vorteile ?

Also mit einem normalen qf kannst du nur Zahlen speichern aber mit dem kannst du Tabellen und Buchstaben speichern.

Du kannst z.B sowas machen:

PHP Code:


			
local names = {
    ["Test"] = "Esel",
    ["Noa"] = "Eiergesicht",
    ["QuickFlameZ"] = "Geiler Typ",
}
pc.setff("table", names)

so kannst du die ganze Tabelle speichern und sie immer wieder abrufen.
kind regards

01/28/2015 23:34 Lefloyd#7

Keine schlechte Idee die Daten als Source zu speichern... o: bin ich selbst noch nicht drauf gekommen (:
Kann man vorallem gut gebrauchen wenn man nicht den Game-Source benutzt. :)

Kind Regards

01/29/2015 22:16 Noa_#8

Ich hab mal die Idee ein wenig erweitert.

Spoiler

PHP Code:


			
pc.write_table = function(tab)
    local file= io.open(pc.get_name(),"w")
    file:write("return {")
    for i,x in next, tab do
        local str = "\n\t["..i.."] = {\n\t\t"
        for e,f in next,x do
            str = str.."['"..e.."'] = [["..f.."]],\n\t\t"
        end
        local str = str.."\n\t},"
        file:write(str)
    end
    file:write("\n}")
    file:close()
end
pc.delff = function(name)
    local tab = loadstring(io.open(pc.get_name(),"r"):read("*a"))()
    tab[q.getcurrentquestindex()][name]=nil
    pc.write_table(tab)
end
pc.setff = function(name,value)
    if io.open(pc.get_name(),"r")==nil then
        local file= io.open(pc.get_name(),"w")
        file:write("return{}")
        file:close()
    end
    local tab = loadstring(io.open(pc.get_name(),"r"):read("*a"))()
    if type(value)=="function" then
        value = '#function#loadstring(string.gsub('..string.gsub(string.format('%q',string.dump(value)),"(\\000)","`")..',"`","\\000"))'
    elseif type(value)=="table" then
        inp = ""
        local function dmp(tab)
            inp = inp..'{'
            table.foreach(tab,function(i,l)
            if type(i) == 'string' then
                inp = inp..'['..string.format('%q',i)..']='
            end
            if type(l) == 'string' then
                inp = inp..string.format('%q',l)..','
            elseif type(l) == 'number' then
                inp = inp..l..','
            elseif type(l) == 'table' then
                dmp(l)
            elseif type(l) == 'function' then
                inp = inp..'loadstring(string.gsub('..string.gsub(string.format('%q',string.dump(l)),"(\\000)","`")..',"`","\\000")),'
            end
            end)
            inp = inp..'}'
        end
        dmp(value)
        value = "#table#"..inp
        inp = nil
    elseif type(value)=="string" or type(value)=="number" then
        value = "#"..tostring(type(value)).."#"..value
    end
    if not tab[q.getcurrentquestindex()] then
        tab[q.getcurrentquestindex()]={}
    end
    if tab[q.getcurrentquestindex()][name] then
        tab[q.getcurrentquestindex()][name]=1
    end
    tab[q.getcurrentquestindex()][name]=value
    pc.write_table(tab)
end
pc.getff = function(name)
    local _,_,typ,value = loadstring(io.open(pc.get_name(),"r"):read("*a"))()[q.getcurrentquestindex()][name]:find("#(%S+)#(.+)")
    if typ=="string" or typ=="number"then
        return tonumber(value) or tostring(value)
    else
        return assert(loadstring('return '..value))()
    end
end

beispiel:

PHP Code:


			
main = {
    ["hierbinich"]= {
        ["Dasistmeinefamilie"]={
            "vater"
        },
    ["schlampe"]="Noa"
    },
    2
}
pc.setff("tabelle",main)

funktion = function()
    return 1
end
pc.setff("func",funktion)

pc.setff("buchstabe","a")
pc.setff("zahl",999)

str = pc.getff("tabelle")
print(str[1])

mit deine alten version kann man ja nur das verenden... pc.setff("tabelle","{1,2,3}") usw

codeschnipsel von mijago enthalten