[Release]Ingame-Itemshop Quest

Nєχιz™ · 01/15/2015, 18:23

Hier eine schlicht und einfach formulierte Ingame-Itemshop Quest.

Das einzige was ihr machen müsst ist eine 'coins' Spalte in account.account zu erstellen und eventuell eine Funktion in die quest_functions einzufügen. Wie ihr dies macht könnt ihr bei Epvp suchen oder mich per PN fragen. Sollten weitere Komplikationen entstehen einfach fragen, kostet nichts.

Funktion:
Ihr könnt ein beliebiges Item festlegen, welches dann quasi der 'Ingame-Coin' ist. Diesen könnt ihr euch dann per festgelegten NPC auszahlen lassen. Mit dem/den Ingame-Coin(s) könnt ihr dann den Handel mit anderen Spielern anregen oder euch selbst etwas im Ingame-Itemshop kaufen.

Hier ist die dazugehörige Quest:

Spoiler

PHP Code:



quest ingame_itemshop begin 
    state start begin 
     
        function select_from_big_table(big_table) 
            local max_per_page = 5 
            local count = table.getn(big_table) 
            local n = 1 
             
            while true do 
                local table_part = {} 
                local m = n + max_per_page - 1 
                local end_reached = false 
                if m >= count then 
                    m = count 
                    end_reached = true 
                end 
                 
                for i = n, m do 
                    table.insert(table_part, big_table[i]) 
                end 
                 
                if not end_reached then 
                    table.insert(table_part, "Weiter") 
                end 
                 
                table.insert(table_part, "Abbrechen") 
                 
                local s = select_table(table_part) 
                local count_table_part = table.getn(table_part) 
                 
                if s == count_table_part then -- Abbrechen 
                    return nil 
                elseif s == count_table_part - 1 and not end_reached then -- Weiter 
                    n = n + max_per_page 
                else 
                    return n + s - 1 
                end 
            end 
             
            return nil 
        end 
     
     
        when 30122.chat."Itemshop" begin 
            local coin_vnum = HIER DIE VNUM VON DEM ITEM WELCHES DER INGAME-COIN SEIN SOLL 
            local categories = {"ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE" } 
            local shop = { 
                -- ITEM_KATEGORIE 
                { 
                    {ITEM_VNUM, KOSTEN(in Coins)}, 
                    {ITEM_VNUM, KOSTEN(in Coins)} 
                }, 
                -- ITEM_KATEGORIE 
                { 
                    {ITEM_VNUM, KOSTEN(in Coins)}, 
                    {ITEM_VNUM, KOSTEN(in Coins)} 
                }, 
                -- ITEM_KATEGORIE 
                { 
                    {ITEM_VNUM, KOSTEN(in Coins)}, 
                    {ITEM_VNUM, KOSTEN(in Coins)} 
                }, 
                -- ITEM_KATEGORIE 
                { 
                    {ITEM_VNUM, KOSTEN(in Coins)}, 
                    {ITEM_VNUM, KOSTEN(in Coins)} 
                }, 
                -- ITEM_KATEGORIE 
                { 
                    {ITEM_VNUM, KOSTEN(in Coins)}, 
                    {ITEM_VNUM, KOSTEN(in Coins)} 
                }, 
                -- ITEM_KATEGORIE 
                { 
                    {ITEM_VNUM, KOSTEN(in Coins)}, 
                    {ITEM_VNUM, KOSTEN(in Coins)} 
                }, 
                -- ITEM_KATEGORIE 
                { 
                    {ITEM_VNUM, KOSTEN(in Coins)}, 
                    {ITEM_VNUM, KOSTEN(in Coins)} 
                }, 
                -- ITEM_KATEGORIE 
                { 
                    {ITEM_VNUM, KOSTEN(in Coins)}, 
                    {ITEM_VNUM, KOSTEN(in Coins)} 
                }, 
                -- ITEM_KATEGORIE 
                { 
                    {ITEM_VNUM, KOSTEN(in Coins)}, 
                    {ITEM_VNUM, KOSTEN(in Coins)} 
                }, 
                -- ITEM_KATEGORIE 
                { 
                    {ITEM_VNUM, KOSTEN(in Coins)}, 
                    {ITEM_VNUM, KOSTEN(in Coins)} 
                }, 
                -- ITEM_KATEGORIE 
                { 
                    {ITEM_VNUM, KOSTEN(in Coins)}, 
                    {ITEM_VNUM, KOSTEN(in Coins)} 
                }, 
                -- ITEM_KATEGORIE 
                { 
                    {ITEM_VNUM, KOSTEN(in Coins)}, 
                    {ITEM_VNUM, KOSTEN(in Coins)} 
                } 
                }                 
             
             
             
             
            local categorie = ingame_itemshop.select_from_big_table(categories) 
             
            if categorie == nil then 
                return 
            end 
             
            local item_select = {} 
             
            for i = 1, table.getn(shop[categorie]) do 
                table.insert(item_select, item_name(shop[categorie][i][1]) .. " (" .. shop[categorie][i][2] .. ")") 
            end 
             
            local item = ingame_itemshop.select_from_big_table(item_select) 
             
            if item == nil then 
                return 
            end 
             
            local item_obj = shop[categorie][item] 
            local item_vnum = item_obj[1] 
            local item_cost = item_obj[2] 
            local item_name = item_name(item_vnum) 
             
            say_title("Itemshop:") 
            say("Möchtest du") 
            say_item(item_name, item_vnum, "") 
            say("für " .. item_cost .. " Coins kaufen?") 
            say("") 
            if select("Kaufen", "Abbrechen") == 1 then 
                if pc.count_item(coin_vnum) >= item_cost then 
                    pc.give_item2(item_vnum) 
                    pc.remove_item(coin_vnum, item_cost) 
                    say_title("Itemshop:") 
                    say("Du hast " .. item_name .. " erfolgreich gekauft.") 
                    say("") 
                else 
                    say_title("Itemshop:") 
                    say("Du besitzt nicht genügend Coins.") 
                    say("") 
                end 
            end 
        end 
         
        when NPC.chat."IngameCoins bekommen" begin 
            local coin_vnum = HIER DIE VNUM VON DEM ITEM WELCHES DER INGAME-COIN SEIN SOLL 
            local factor = 1 
            local sql = mysql_query("SELECT coins FROM account.account WHERE id = "..pc.get_account_id()) 
            if sql == "ERROR" then 
                say("Fehler beim Auslesen deiner Coins.") 
                say("") 
                return 
            end 
            local coins = sql.coins[1] 
            local allowed = math.floor(coins * factor) 
            local cost = allowed / factor 
            say_reward("Du besitzt momentan "..coins.." Coins.") 
            say("") 
            say("Davon kannst du dir "..allowed.." IG-Coins kaufen.") 
            say("") 
            say("") 
            say_reward("Möchtest du "..allowed.." IG-Coins für "..cost.." Coins kaufen?") 
            say("") 
            if select("Kaufen", "Abbrechen") == 1 then 
                mysql_query("UPDATE account.account SET coins = "..(coins-cost).." WHERE id = "..pc.get_account_id()) 
                while allowed > 0 do 
                    local packet = 200 
                    if packet > allowed then 
                        packet = allowed 
                    end 
                    allowed = allowed - packet 
                    pc.give_item2(coin_vnum, packet) 
                end 
            end 
        end 
    end 
end

Ist nichts besonderes, vielleicht könnt ihr damit ja etwas anfangen.

Gruß

[Castro] · 01/15/2015, 18:35

Für eine lua Lösung sieht das doch ganz sauber aus^^ Bestimmt nützlich für kleinere Server

Danke^^

~~'Mahone~~ · 01/15/2015, 18:55

Nicht wirklich gut gelöst.
Wieso nicht aus der DB auslesen?

Code:

quest ingameis begin
	state start begin
		function getCoins() 
			return tonumber(mysql_query("select coins from account.account where id = ".. pc.get_account_id())[1][1]) or 0
		end
		when 20095.chat."Itemshop" begin
			local coins,category = ingameis.getCoins(),{}
			for k,v in pairs(mysql_query("select titel from account.is_kategorien")) do
				table.insert(category, v)
			end
			say_title("Itemshop")
			say_reward("Deine Coins: ".. coins)
			say("Wähle eine Kategorie")
			say()
			local cat = select3(category)
			if cat == -1 then return end
			local items = {{},{},{}}
			for k,v in pairs(mysql_query("select vnum,beschreibung,preis from account.is_items where kategorie_id = ".. cat)) do
				table.insert(items[1], k.vnum)
				table.insert(items[2], k.beschreibung)
				table.insert(items[3], k.preis)
			end
			say_title("Itemshop")
			say_reward("Deine Coins: ".. coins)
			say("Wähle ein Item")
			say()
			local it = select3(items)
			if it == -1 then return end
			say_title("Itemshop")
			say_reward("Deine Coins: ".. coins)
			say_item_vnum(items[1][it])
			say()
			say2(items[2][it])
			say_reward("Preis: ".. items[3][it])
			say()
			if select("Kaufen", "Abbrechen") == 2 then return end
			if items[3][it] > coins then return syschat("Du hast nicht genügend Coins") end
			pc.give_item2(items[1][it])
			mysql_query("update account.account set coins = coins - ".. items[3][it] .." where id = ".. pc.get_account_id())
		end
	end
end

Keine Ahnung ob da nun ein paar Flüchtigkeitsfehler drin sind, hab die nur eben hingekritzelt um eine bessere Methode zu zeigen.

Nєχιz™ · 01/15/2015, 19:00

Ich finde sie nicht besser, es per Quest zu regeln finde ich wesentlich einfacher für Anfänger.

~~'Mahone~~ · 01/15/2015, 19:02

Quote:

Originally Posted by Nєχιz™

Ich finde sie nicht besser, es per Quest zu regeln finde ich wesentlich einfacher für Anfänger.

Alles noch mal eintragen ist einfacher als nichts machen?
Naja, da sind wir wohl verschiedener Meinung
Wenn sie schon alles in der Db eingetragen haben wieso sollten sie es nochmal in die Quest eintragen?

Nєχιz™ · 01/15/2015, 19:04

Warum nochmal eintragen? Wenn Sie es per Quest eintragen ohne Datenbank sind die Items ingame beim NPC zu sehen und man muss nur noch in der Datenbank die coins eintragen, was man auch mit einem Auto script machen kann.

~~'Mahone~~ · 01/15/2015, 19:08

Quote:

Originally Posted by Nєχιz™

Warum nochmal eintragen? Wenn Sie es per Quest eintragen ohne Datenbank sind die Items ingame beim NPC zu sehen und man muss nur noch in der Datenbank die coins eintragen, was man auch mit einem Auto script machen kann.

Hast du überhaupt Ahnung von deiner eigenen Quest?
Man muss alles in die Tabelle shop eintragen.
Es wird nichts aus der Datenbank ausgelesen.

Alergix2 · 01/15/2015, 19:13

Quote:

Originally Posted by Nєχιz™

Hier eine schlicht und einfach formulierte Ingame-Itemshop Quest.

Das einzige was ihr machen müsst ist eine 'coins' Spalte in account.account zu erstellen und eventuell eine Funktion in die quest_functions einzufügen. Wie ihr dies macht könnt ihr bei Epvp suchen oder mich per PN fragen. Sollten weitere Komplikationen entstehen einfach fragen, kostet nichts.

Funktion:
Ihr könnt ein beliebiges Item festlegen, welches dann quasi der 'Ingame-Coin' ist. Diesen könnt ihr euch dann per festgelegten NPC auszahlen lassen. Mit dem/den Ingame-Coin(s) könnt ihr dann den Handel mit anderen Spielern anregen oder euch selbst etwas im Ingame-Itemshop kaufen.

Hier ist die dazugehörige Quest:

Spoiler

PHP Code:

quest ingame_itemshop begin state start begin function select_from_big_table(big_table) local max_per_page = 5 local count = table.getn(big_table) local n = 1 while true do local table_part = {} local m = n + max_per_page - 1 local end_reached = false if m >= count then m = count end_reached = true end for i = n, m do table.insert(table_part, big_table[i]) end if not end_reached then table.insert(table_part, "Weiter") end table.insert(table_part, "Abbrechen") local s = select_table(table_part) local count_table_part = table.getn(table_part) if s == count_table_part then -- Abbrechen return nil elseif s == count_table_part - 1 and not end_reached then -- Weiter n = n + max_per_page else return n + s - 1 end end return nil end when 30122.chat."Itemshop" begin local coin_vnum = HIER DIE VNUM VON DEM ITEM WELCHES DER INGAME-COIN SEIN SOLL local categories = {"ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE", "ITEM_KATEGORIE" } local shop = { -- ITEM_KATEGORIE { {ITEM_VNUM, KOSTEN(in Coins)}, {ITEM_VNUM, KOSTEN(in Coins)} }, -- ITEM_KATEGORIE { {ITEM_VNUM, KOSTEN(in Coins)}, {ITEM_VNUM, KOSTEN(in Coins)} }, -- ITEM_KATEGORIE { {ITEM_VNUM, KOSTEN(in Coins)}, {ITEM_VNUM, KOSTEN(in Coins)} }, -- ITEM_KATEGORIE { {ITEM_VNUM, KOSTEN(in Coins)}, {ITEM_VNUM, KOSTEN(in Coins)} }, -- ITEM_KATEGORIE { {ITEM_VNUM, KOSTEN(in Coins)}, {ITEM_VNUM, KOSTEN(in Coins)} }, -- ITEM_KATEGORIE { {ITEM_VNUM, KOSTEN(in Coins)}, {ITEM_VNUM, KOSTEN(in Coins)} }, -- ITEM_KATEGORIE { {ITEM_VNUM, KOSTEN(in Coins)}, {ITEM_VNUM, KOSTEN(in Coins)} }, -- ITEM_KATEGORIE { {ITEM_VNUM, KOSTEN(in Coins)}, {ITEM_VNUM, KOSTEN(in Coins)} }, -- ITEM_KATEGORIE { {ITEM_VNUM, KOSTEN(in Coins)}, {ITEM_VNUM, KOSTEN(in Coins)} }, -- ITEM_KATEGORIE { {ITEM_VNUM, KOSTEN(in Coins)}, {ITEM_VNUM, KOSTEN(in Coins)} }, -- ITEM_KATEGORIE { {ITEM_VNUM, KOSTEN(in Coins)}, {ITEM_VNUM, KOSTEN(in Coins)} }, -- ITEM_KATEGORIE { {ITEM_VNUM, KOSTEN(in Coins)}, {ITEM_VNUM, KOSTEN(in Coins)} } } local categorie = ingame_itemshop.select_from_big_table(categories) if categorie == nil then return end local item_select = {} for i = 1, table.getn(shop[categorie]) do table.insert(item_select, item_name(shop[categorie][i][1]) .. " (" .. shop[categorie][i][2] .. ")") end local item = ingame_itemshop.select_from_big_table(item_select) if item == nil then return end local item_obj = shop[categorie][item] local item_vnum = item_obj[1] local item_cost = item_obj[2] local item_name = item_name(item_vnum) say_title("Itemshop:") say("Möchtest du") say_item(item_name, item_vnum, "") say("für " .. item_cost .. " Coins kaufen?") say("") if select("Kaufen", "Abbrechen") == 1 then if pc.count_item(coin_vnum) >= item_cost then pc.give_item2(item_vnum) pc.remove_item(coin_vnum, item_cost) say_title("Itemshop:") say("Du hast " .. item_name .. " erfolgreich gekauft.") say("") else say_title("Itemshop:") say("Du besitzt nicht genügend Coins.") say("") end end end when NPC.chat."IngameCoins bekommen" begin local coin_vnum = HIER DIE VNUM VON DEM ITEM WELCHES DER INGAME-COIN SEIN SOLL local factor = 1 local sql = mysql_query("SELECT coins FROM account.account WHERE id = "..pc.get_account_id()) if sql == "ERROR" then say("Fehler beim Auslesen deiner Coins.") say("") return end local coins = sql.coins[1] local allowed = math.floor(coins * factor) local cost = allowed / factor say_reward("Du besitzt momentan "..coins.." Coins.") say("") say("Davon kannst du dir "..allowed.." IG-Coins kaufen.") say("") say("") say_reward("Möchtest du "..allowed.." IG-Coins für "..cost.." Coins kaufen?") say("") if select("Kaufen", "Abbrechen") == 1 then mysql_query("UPDATE account.account SET coins = "..(coins-cost).." WHERE id = "..pc.get_account_id()) while allowed > 0 do local packet = 200 if packet > allowed then packet = allowed end allowed = allowed - packet pc.give_item2(coin_vnum, packet) end end end end end

Ist nichts besonderes, vielleicht könnt ihr damit ja etwas anfangen.

Gruß

Nice quest

Wird sicher einigen helfen

Nєχιz™ · 01/15/2015, 19:16

Quote:

Originally Posted by 'Mahone

Hast du überhaupt Ahnung von deiner eigenen Quest?
Man muss alles in die Tabelle shop eintragen.
Es wird nichts aus der Datenbank ausgelesen.

Anscheinend hast du keine Ahnung. Er liest nur die items aus der item_proto aus, man muss nur die Quest bearbeiten!!!

~~'Mahone~~ · 01/15/2015, 19:20

Quote:

Originally Posted by Nєχιz™

Anscheinend hast du keine Ahnung. Er liest nur die items aus der item_proto aus, man muss nur die Quest bearbeiten!!!

Wo wird da etwas aus der item_proto ausgelesen?
Und was hat die item_proto damit zu tun?

jubox123 · 01/15/2015, 20:12

Ist nicht deine Quest.
Ist von den Shizuka Files die Quest.

Quote:

Originally Posted by Nєχιz™

Anscheinend hast du keine Ahnung. Er liest nur die items aus der item_proto aus, man muss nur die Quest bearbeiten!!!

Facepalm du Held