Intrebare (Quest)

Totalitatea subiectelor care nu respectă regulamentul impus in sectiunea "Probleme şi Întrebări" vor fi stocate aici.
Închis
Avatar utilizator
t4zu
Nivel 3

Nivel 3
Mesaje: 476
Membru din: 16 Iul 2015, 21:31
Server: Doar testez
Regat: Chunjo
Aprecieri: 94  
Mulţumiri: 44  
 Contact:
Vezi detalii
Medalii

Salutare. Imi poate face cineva un quest, la care este necesar sa bagi o parola, iar dupa introducerea acesteia sa faceti sa imi apara acest quest, in continuare: http://just4metin.ro/quest-uri/creeaz-i ... t9719.html

Aaa si daca se poate sa apara in stanga (cum sunt pergamentele acelea), cu urmatorul nume "Admin - Item"

Si daca se poate sa faca un fisier log (.txt), in "usr/home/game/InfoMod", in care sa imi spuna: caracterul Xyz, la ora xyz, a creat un item modat cu urmatoarele bonusuri xyz.

Daca functioneaza mii de multumiri si un big like! :D
Sus
Avatar utilizator
[RaffaeL]
Software Developer

Software Developer
Mesaje: 3223
Membru din: 19 Mar 2016, 12:58
Server: ...
Aprecieri: 15  
Mulţumiri: 2502  
  Rezolvări prob.: 2
Discord: Copiază ID
 Contact:
Vezi detalii
Medalii

Ti-am creat un quest(mai bine zis am editat pe cel existent), pentru modare iteme.
Asa cum ai cerut , apare ca un panou/letter, in partea stanga.
Se activeaza cu parola(aceasta fiind mutantj4m, si pe care o poti schimba)
Nu creeaza fisier log.txt, insa l-am facut sa poata fi folosit numai de acei gm,
carora le specifici numele.(M-am gandit ca il vrei pentru cineva de incredere).
Sfatul meu ar fi sa il salvezi .lua(asa a fost lucrat/editat)
Totusi va trebui sa ai la indemana, lista bonusurilor, codurile de pietre,
si bineinteles, id-ul playerului caruia i se modeaza item.

Cod: Selectaţi tot

-------------------------------------------
----- Quest Modare item            --------
----- Edit Mutant pentru j4m (t4zu) --------
----- 07.05.2017 ora 4:20 /Esp     --------
-------------------------------------------
quest modare_item begin
	state start begin
		when login with pc.is_gm() and pc.get_name() == "[GM]Mutant" or pc.get_name() == "[xx]xxx" or pc.get_name() == "[xx]xxx" begin
			send_letter("Panou ADMIN")
		end
		 when button or info begin
            say_title("Iteme mod:")
			say_gm ( "Parola:[ENTER]" )
			local password = input()
			if password != "mutantj4m" then
			say("Nu ai introdus parola, sau aceasta este gresita!")
			return
			elseif password == "mutantj4m" then
			say_gm_title( "Panou modare item" )
            ---                                                   l
            say("Cu acest panou poti creea iteme")
            say("mod.")
            say("")
            say("Nu abuzati de el !")
            say("Pot aparea buguri!")
            say("")
             local s = select("O sa creez modul", "Inchide")
             if s==2 then
                return
             else
                say("Introdu ID-ul playerului:")
                local id = tonumber(input())
                say("Introdu id-ul item-ului:")
                local item = tonumber(input())
                mysql_query("INSERT INTO player.item (owner_id, window, pos, count, vnum)   VALUES  ('".. id .."', 'MALL', '34', '1', '".. item .."')");
                say("Introdu prima piatra:")
                local p1 = tonumber(input())
                mysql_query("UPDATE player.item SET socket0='".. p1 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu a doua piatra:")
                local p2 = tonumber(input())
                mysql_query("UPDATE player.item SET socket1='".. p2 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu a treia piatra:")
                local p3 = tonumber(input())
                mysql_query("UPDATE player.item SET socket2='".. p3 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul primului bonus:")
                local b1 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype0='".. b1 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina primul bonus?")
                local vb1 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue0='".. vb1 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 2:")
                local b2 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype1='".. b2 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 2?")
                local vb2 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue1='".. vb2 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 3:")
                local b3 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype2='".. b3 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 3?")
                local vb3 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue2='".. vb3 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 4:")
                local b4 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype3='".. b4 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 4?")
                local vb4 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue3='".. vb4 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 5:")
                local b5 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype4='".. b5 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 5?")
                local vb5 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue4='".. vb5 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 6:")
                local b6 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype5='".. b6 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 6?")
                local vb6 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue5='".. vb6 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 7:")
                local b7 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype6='".. b7 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 7?")
                local vb7 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue6='".. vb7 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
             end
            say_title("Item mod:")
            say("")
            ---                                                   l
            say("Item-ul a fost creeat cu succes !")
            say("Uitate in item shop !.")
            say("")
            say("")
            syschat("Uitate in item_shop dupa itemul mod.")
         end
    end
end
end --quest
Sper sa fie ceea ce voiai tu , si ca te-am ajutat.
Pentru acest mesaj, [RaffaeL] for the post:
t4zu
Imagine
Imagine
https://www.youtube.com/watch?v=GhYkCIETEto
Do everything, if you know what you're doing, else... Imagine
Ma gasesti si aici: Discord https://discord.gg/5J5GnyZVSR
Afișează semnătura
Sus
Avatar utilizator
t4zu
Nivel 3

Nivel 3
Mesaje: 476
Membru din: 16 Iul 2015, 21:31
Server: Doar testez
Regat: Chunjo
Aprecieri: 94  
Mulţumiri: 44  
 Contact:
Vezi detalii
Medalii

Mutant scrie:Ti-am creat un quest(mai bine zis am editat pe cel existent), pentru modare iteme.
Asa cum ai cerut , apare ca un panou/letter, in partea stanga.
Se activeaza cu parola(aceasta fiind mutantj4m, si pe care o poti schimba)
Nu creeaza fisier log.txt, insa l-am facut sa poata fi folosit numai de acei gm,
carora le specifici numele.(M-am gandit ca il vrei pentru cineva de incredere).
Sfatul meu ar fi sa il salvezi .lua(asa a fost lucrat/editat)
Totusi va trebui sa ai la indemana, lista bonusurilor, codurile de pietre,
si bineinteles, id-ul playerului caruia i se modeaza item.

Cod: Selectaţi tot

-------------------------------------------
----- Quest Modare item            --------
----- Edit Mutant pentru j4m (t4zu) --------
----- 07.05.2017 ora 4:20 /Esp     --------
-------------------------------------------
quest modare_item begin
	state start begin
		when login with pc.is_gm() and pc.get_name() == "[GM]Mutant" or pc.get_name() == "[xx]xxx" or pc.get_name() == "[xx]xxx" begin
			send_letter("Panou ADMIN")
		end
		 when button or info begin
            say_title("Iteme mod:")
			say_gm ( "Parola:[ENTER]" )
			local password = input()
			if password != "mutantj4m" then
			say("Nu ai introdus parola, sau aceasta este gresita!")
			return
			elseif password == "mutantj4m" then
			say_gm_title( "Panou modare item" )
            ---                                                   l
            say("Cu acest panou poti creea iteme")
            say("mod.")
            say("")
            say("Nu abuzati de el !")
            say("Pot aparea buguri!")
            say("")
             local s = select("O sa creez modul", "Inchide")
             if s==2 then
                return
             else
                say("Introdu ID-ul playerului:")
                local id = tonumber(input())
                say("Introdu id-ul item-ului:")
                local item = tonumber(input())
                mysql_query("INSERT INTO player.item (owner_id, window, pos, count, vnum)   VALUES  ('".. id .."', 'MALL', '34', '1', '".. item .."')");
                say("Introdu prima piatra:")
                local p1 = tonumber(input())
                mysql_query("UPDATE player.item SET socket0='".. p1 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu a doua piatra:")
                local p2 = tonumber(input())
                mysql_query("UPDATE player.item SET socket1='".. p2 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu a treia piatra:")
                local p3 = tonumber(input())
                mysql_query("UPDATE player.item SET socket2='".. p3 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul primului bonus:")
                local b1 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype0='".. b1 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina primul bonus?")
                local vb1 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue0='".. vb1 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 2:")
                local b2 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype1='".. b2 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 2?")
                local vb2 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue1='".. vb2 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 3:")
                local b3 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype2='".. b3 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 3?")
                local vb3 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue2='".. vb3 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 4:")
                local b4 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype3='".. b4 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 4?")
                local vb4 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue3='".. vb4 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 5:")
                local b5 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype4='".. b5 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 5?")
                local vb5 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue4='".. vb5 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 6:")
                local b6 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype5='".. b6 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 6?")
                local vb6 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue5='".. vb6 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 7:")
                local b7 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype6='".. b7 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 7?")
                local vb7 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue6='".. vb7 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
             end
            say_title("Item mod:")
            say("")
            ---                                                   l
            say("Item-ul a fost creeat cu succes !")
            say("Uitate in item shop !.")
            say("")
            say("")
            syschat("Uitate in item_shop dupa itemul mod.")
         end
    end
end
end --quest
Sper sa fie ceea ce voiai tu , si ca te-am ajutat.

Salut, daca il execut apare asta:
root@:/usr/home/game/share/locale/germany/quest # ./qc Iteme_mod.lua
QUEST : modare_item
STATE : start
WHEN : login
with pc . is_gm ( ) and pc . get_name ( ) == "[GM]Mutant" or pc . get_name ( ) == "[xx]xxx" or pc . get_name ( ) == "[xx]xxx"
WHEN : button or
WHEN : info
Calls undeclared function! :
say_gm
say_gm_title
Abort (core dumped)
Sus
Avatar utilizator
[RaffaeL]
Software Developer

Software Developer
Mesaje: 3223
Membru din: 19 Mar 2016, 12:58
Server: ...
Aprecieri: 15  
Mulţumiri: 2502  
  Rezolvări prob.: 2
Discord: Copiază ID
 Contact:
Vezi detalii
Medalii

t4zu scrie:
Mutant scrie:Ti-am creat un quest(mai bine zis am editat pe cel existent), pentru modare iteme.
Asa cum ai cerut , apare ca un panou/letter, in partea stanga.
Se activeaza cu parola(aceasta fiind mutantj4m, si pe care o poti schimba)
Nu creeaza fisier log.txt, insa l-am facut sa poata fi folosit numai de acei gm,
carora le specifici numele.(M-am gandit ca il vrei pentru cineva de incredere).
Sfatul meu ar fi sa il salvezi .lua(asa a fost lucrat/editat)
Totusi va trebui sa ai la indemana, lista bonusurilor, codurile de pietre,
si bineinteles, id-ul playerului caruia i se modeaza item.

Cod: Selectaţi tot

-------------------------------------------
----- Quest Modare item            --------
----- Edit Mutant pentru j4m (t4zu) --------
----- 07.05.2017 ora 4:20 /Esp     --------
-------------------------------------------
quest modare_item begin
	state start begin
		when login with pc.is_gm() and pc.get_name() == "[GM]Mutant" or pc.get_name() == "[xx]xxx" or pc.get_name() == "[xx]xxx" begin
			send_letter("Panou ADMIN")
		end
		 when button or info begin
            say_title("Iteme mod:")
			say_gm ( "Parola:[ENTER]" )
			local password = input()
			if password != "mutantj4m" then
			say("Nu ai introdus parola, sau aceasta este gresita!")
			return
			elseif password == "mutantj4m" then
			say_gm_title( "Panou modare item" )
            ---                                                   l
            say("Cu acest panou poti creea iteme")
            say("mod.")
            say("")
            say("Nu abuzati de el !")
            say("Pot aparea buguri!")
            say("")
             local s = select("O sa creez modul", "Inchide")
             if s==2 then
                return
             else
                say("Introdu ID-ul playerului:")
                local id = tonumber(input())
                say("Introdu id-ul item-ului:")
                local item = tonumber(input())
                mysql_query("INSERT INTO player.item (owner_id, window, pos, count, vnum)   VALUES  ('".. id .."', 'MALL', '34', '1', '".. item .."')");
                say("Introdu prima piatra:")
                local p1 = tonumber(input())
                mysql_query("UPDATE player.item SET socket0='".. p1 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu a doua piatra:")
                local p2 = tonumber(input())
                mysql_query("UPDATE player.item SET socket1='".. p2 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu a treia piatra:")
                local p3 = tonumber(input())
                mysql_query("UPDATE player.item SET socket2='".. p3 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul primului bonus:")
                local b1 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype0='".. b1 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina primul bonus?")
                local vb1 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue0='".. vb1 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 2:")
                local b2 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype1='".. b2 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 2?")
                local vb2 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue1='".. vb2 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 3:")
                local b3 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype2='".. b3 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 3?")
                local vb3 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue2='".. vb3 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 4:")
                local b4 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype3='".. b4 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 4?")
                local vb4 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue3='".. vb4 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 5:")
                local b5 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype4='".. b5 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 5?")
                local vb5 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue4='".. vb5 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 6:")
                local b6 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype5='".. b6 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 6?")
                local vb6 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue5='".. vb6 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 7:")
                local b7 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype6='".. b7 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 7?")
                local vb7 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue6='".. vb7 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
             end
            say_title("Item mod:")
            say("")
            ---                                                   l
            say("Item-ul a fost creeat cu succes !")
            say("Uitate in item shop !.")
            say("")
            say("")
            syschat("Uitate in item_shop dupa itemul mod.")
         end
    end
end
end --quest
Sper sa fie ceea ce voiai tu , si ca te-am ajutat.

Salut, daca il execut apare asta:
root@:/usr/home/game/share/locale/germany/quest # ./qc Iteme_mod.lua
QUEST : modare_item
STATE : start
WHEN : login
with pc . is_gm ( ) and pc . get_name ( ) == "[GM]Mutant" or pc . get_name ( ) == "[xx]xxx" or pc . get_name ( ) == "[xx]xxx"
WHEN : button or
WHEN : info
Calls undeclared function! :
say_gm
say_gm_title
Abort (core dumped)
Asta pentru ca nu ai acele functii declarate.
Copiaza aceste functii in questlib.lua:

Cod: Selectaţi tot

function say_gm(name) say(color256(238, 201, 0)..name..color256(196, 196, 196)) end
function say_gm_title(name) say(color256(238, 118, 0)..name..color256(196, 196, 196)) end
si acestea jos la sfarsitul fisierului quest_functions:

Cod: Selectaţi tot

say_gm
say_gm_title
dupa care reinstaleaza questul.
Pentru acest mesaj, [RaffaeL] for the post:
alin8600
Imagine
Imagine
https://www.youtube.com/watch?v=GhYkCIETEto
Do everything, if you know what you're doing, else... Imagine
Ma gasesti si aici: Discord https://discord.gg/5J5GnyZVSR
Afișează semnătura
Sus
Avatar utilizator
t4zu
Nivel 3

Nivel 3
Mesaje: 476
Membru din: 16 Iul 2015, 21:31
Server: Doar testez
Regat: Chunjo
Aprecieri: 94  
Mulţumiri: 44  
 Contact:
Vezi detalii
Medalii

Mutant scrie:
t4zu scrie:
Mutant scrie:Ti-am creat un quest(mai bine zis am editat pe cel existent), pentru modare iteme.
Asa cum ai cerut , apare ca un panou/letter, in partea stanga.
Se activeaza cu parola(aceasta fiind mutantj4m, si pe care o poti schimba)
Nu creeaza fisier log.txt, insa l-am facut sa poata fi folosit numai de acei gm,
carora le specifici numele.(M-am gandit ca il vrei pentru cineva de incredere).
Sfatul meu ar fi sa il salvezi .lua(asa a fost lucrat/editat)
Totusi va trebui sa ai la indemana, lista bonusurilor, codurile de pietre,
si bineinteles, id-ul playerului caruia i se modeaza item.

Cod: Selectaţi tot

-------------------------------------------
----- Quest Modare item            --------
----- Edit Mutant pentru j4m (t4zu) --------
----- 07.05.2017 ora 4:20 /Esp     --------
-------------------------------------------
quest modare_item begin
	state start begin
		when login with pc.is_gm() and pc.get_name() == "[GM]Mutant" or pc.get_name() == "[xx]xxx" or pc.get_name() == "[xx]xxx" begin
			send_letter("Panou ADMIN")
		end
		 when button or info begin
            say_title("Iteme mod:")
			say_gm ( "Parola:[ENTER]" )
			local password = input()
			if password != "mutantj4m" then
			say("Nu ai introdus parola, sau aceasta este gresita!")
			return
			elseif password == "mutantj4m" then
			say_gm_title( "Panou modare item" )
            ---                                                   l
            say("Cu acest panou poti creea iteme")
            say("mod.")
            say("")
            say("Nu abuzati de el !")
            say("Pot aparea buguri!")
            say("")
             local s = select("O sa creez modul", "Inchide")
             if s==2 then
                return
             else
                say("Introdu ID-ul playerului:")
                local id = tonumber(input())
                say("Introdu id-ul item-ului:")
                local item = tonumber(input())
                mysql_query("INSERT INTO player.item (owner_id, window, pos, count, vnum)   VALUES  ('".. id .."', 'MALL', '34', '1', '".. item .."')");
                say("Introdu prima piatra:")
                local p1 = tonumber(input())
                mysql_query("UPDATE player.item SET socket0='".. p1 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu a doua piatra:")
                local p2 = tonumber(input())
                mysql_query("UPDATE player.item SET socket1='".. p2 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu a treia piatra:")
                local p3 = tonumber(input())
                mysql_query("UPDATE player.item SET socket2='".. p3 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul primului bonus:")
                local b1 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype0='".. b1 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina primul bonus?")
                local vb1 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue0='".. vb1 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 2:")
                local b2 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype1='".. b2 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 2?")
                local vb2 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue1='".. vb2 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 3:")
                local b3 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype2='".. b3 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 3?")
                local vb3 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue2='".. vb3 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 4:")
                local b4 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype3='".. b4 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 4?")
                local vb4 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue3='".. vb4 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 5:")
                local b5 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype4='".. b5 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 5?")
                local vb5 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue4='".. vb5 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 6:")
                local b6 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype5='".. b6 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 6?")
                local vb6 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue5='".. vb6 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Introdu id-ul bonusului 7:")
                local b7 = tonumber(input())
                mysql_query("UPDATE player.item SET attrtype6='".. b7 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
                say("Cat sa contina bonusul 7?")
                local vb7 = tonumber(input())
                mysql_query("UPDATE player.item SET attrvalue6='".. vb7 .."' WHERE (owner_id='".. id .."' and window='MALL' and pos=34 and count=1)");
             end
            say_title("Item mod:")
            say("")
            ---                                                   l
            say("Item-ul a fost creeat cu succes !")
            say("Uitate in item shop !.")
            say("")
            say("")
            syschat("Uitate in item_shop dupa itemul mod.")
         end
    end
end
end --quest
Sper sa fie ceea ce voiai tu , si ca te-am ajutat.

Salut, daca il execut apare asta:
root@:/usr/home/game/share/locale/germany/quest # ./qc Iteme_mod.lua
QUEST : modare_item
STATE : start
WHEN : login
with pc . is_gm ( ) and pc . get_name ( ) == "[GM]Mutant" or pc . get_name ( ) == "[xx]xxx" or pc . get_name ( ) == "[xx]xxx"
WHEN : button or
WHEN : info
Calls undeclared function! :
say_gm
say_gm_title
Abort (core dumped)
Asta pentru ca nu ai acele functii declarate.
Copiaza aceste functii in questlib.lua:

Cod: Selectaţi tot

function say_gm(name) say(color256(238, 201, 0)..name..color256(196, 196, 196)) end
function say_gm_title(name) say(color256(238, 118, 0)..name..color256(196, 196, 196)) end
si acestea jos la sfarsitul fisierului quest_functions:

Cod: Selectaţi tot

say_gm
say_gm_title
dupa care reinstaleaza questul.
Salut, l-am putut instala, dar din pacate nu imi apare in stanga, nu sti de ce?
Sus
Avatar utilizator
[RaffaeL]
Software Developer

Software Developer
Mesaje: 3223
Membru din: 19 Mar 2016, 12:58
Server: ...
Aprecieri: 15  
Mulţumiri: 2502  
  Rezolvări prob.: 2
Discord: Copiază ID
 Contact:
Vezi detalii
Medalii

Incearca dupa un reboot, dupa ce in prealabil ai adaugat numele tau la admini.
Trebuie sa modifici pe aceasta linie cu numele tau:

Cod: Selectaţi tot

when login with pc.is_gm() and pc.get_name() == "[GM]Mutant" or pc.get_name() == "[xx]xxx" or pc.get_name() == "[xx]xxx" begin
Daca nu adaugi numele tau, la "pc.get_name()", nu va functiona questul.
Imagine
Imagine
https://www.youtube.com/watch?v=GhYkCIETEto
Do everything, if you know what you're doing, else... Imagine
Ma gasesti si aici: Discord https://discord.gg/5J5GnyZVSR
Afișează semnătura
Sus
Avatar utilizator
t4zu
Nivel 3

Nivel 3
Mesaje: 476
Membru din: 16 Iul 2015, 21:31
Server: Doar testez
Regat: Chunjo
Aprecieri: 94  
Mulţumiri: 44  
 Contact:
Vezi detalii
Medalii

Mutant scrie:Incearca dupa un reboot, dupa ce in prealabil ai adaugat numele tau la admini.
Trebuie sa modifici pe aceasta linie cu numele tau:

Cod: Selectaţi tot

when login with pc.is_gm() and pc.get_name() == "[GM]Mutant" or pc.get_name() == "[xx]xxx" or pc.get_name() == "[xx]xxx" begin
Daca nu adaugi numele tau, la "pc.get_name()", nu va functiona questul.
Ceva de genul "pc.get_name(NumeleMeu)" ?
Sus
Avatar utilizator
[RaffaeL]
Software Developer

Software Developer
Mesaje: 3223
Membru din: 19 Mar 2016, 12:58
Server: ...
Aprecieri: 15  
Mulţumiri: 2502  
  Rezolvări prob.: 2
Discord: Copiază ID
 Contact:
Vezi detalii
Medalii

t4zu scrie:
Mutant scrie:Incearca dupa un reboot, dupa ce in prealabil ai adaugat numele tau la admini.
Trebuie sa modifici pe aceasta linie cu numele tau:

Cod: Selectaţi tot

when login with pc.is_gm() and pc.get_name() == "[GM]Mutant" or pc.get_name() == "[xx]xxx" or pc.get_name() == "[xx]xxx" begin
Daca nu adaugi numele tau, la "pc.get_name()", nu va functiona questul.
Ceva de genul "pc.get_name(NumeleMeu)" ?
Inlocuie [GM]Mutant(am pus ca exemplu), cu numele tau de gm din joc.
Imagine
Imagine
https://www.youtube.com/watch?v=GhYkCIETEto
Do everything, if you know what you're doing, else... Imagine
Ma gasesti si aici: Discord https://discord.gg/5J5GnyZVSR
Afișează semnătura
Sus
Avatar utilizator
t4zu
Nivel 3

Nivel 3
Mesaje: 476
Membru din: 16 Iul 2015, 21:31
Server: Doar testez
Regat: Chunjo
Aprecieri: 94  
Mulţumiri: 44  
 Contact:
Vezi detalii
Medalii

Mutant scrie:
t4zu scrie:
Mutant scrie:Incearca dupa un reboot, dupa ce in prealabil ai adaugat numele tau la admini.
Trebuie sa modifici pe aceasta linie cu numele tau:

Cod: Selectaţi tot

when login with pc.is_gm() and pc.get_name() == "[GM]Mutant" or pc.get_name() == "[xx]xxx" or pc.get_name() == "[xx]xxx" begin
Daca nu adaugi numele tau, la "pc.get_name()", nu va functiona questul.
Ceva de genul "pc.get_name(NumeleMeu)" ?
Inlocuie [GM]Mutant(am pus ca exemplu), cu numele tau de gm din joc.
si acolo unde este [xx]xxx trebuie sa inlocuiesc?
Sus
Avatar utilizator
[RaffaeL]
Software Developer

Software Developer
Mesaje: 3223
Membru din: 19 Mar 2016, 12:58
Server: ...
Aprecieri: 15  
Mulţumiri: 2502  
  Rezolvări prob.: 2
Discord: Copiază ID
 Contact:
Vezi detalii
Medalii

t4zu scrie:si acolo unde este [xx]xxx trebuie sa inlocuiesc?
Nu neaparat.Acolo inlocuiesti numai in cazul in care mai adugi un gm cu drept de modare iteme.
Imagine
Imagine
https://www.youtube.com/watch?v=GhYkCIETEto
Do everything, if you know what you're doing, else... Imagine
Ma gasesti si aici: Discord https://discord.gg/5J5GnyZVSR
Afișează semnătura
Sus
Închis
Intrebare quest
Răspunsuri
3 Vizualizări
237
Citește mai mult
Intrebare - Cat. Quest 2
Răspunsuri
4 Vizualizări
520
Citește mai mult
Intrebare quest
Răspunsuri
7 Vizualizări
903
Citește mai mult
Intrebare Quest
Răspunsuri
8 Vizualizări
710
Citește mai mult

Înapoi la “Arhivă Probleme şi Întrebări”

  • Informaţie

  • Cine este conectat

    Utilizatori ce ce navighează pe acest forum: Niciun utilizator înregistrat și 65 vizitatori

+ Anunțul tău aici + Anunțul tău aici + Anunțul tău aici + Anunțul tău aici