Quest eveniment vara

Avatar utilizator
[Madalina]
Nivel 2

Nivel 2
Mesaje: 215
Membru din: 24 Apr 2016, 17:43
Server: Nu mai joc.
Regat: Shinsoo
Aprecieri: 6  
Mulţumiri: 577  
 Contact:
Medalii

Ce face acest quest?
Cu aest quest puteti pornii evenimentul de vara sa pice inghetata la orice mob si sa duci la octavio inghetatele si el te rasplateste cu altceva

Cod: Selectaţi tot

quest vara_2016 begin
        state start begin
      when login with game.get_event_flag("inghetata") == 1 begin
				syschat("Dragi jucatori evenimentul de vara este activ!")
				syschat("Aduna inghetata de la mobi si schimb-o pe un premiu")
				syschat("valoros la Octavio!")
               end
      when kill with game.get_event_flag("optiunefva") == 4 begin
               local inghetata=number(1, 500)
               if inghetata==1 and game.get_event_flag("inghetata") == 1 then 

                  pc.give_item2(30149,1)

               end
            end
      when kill with game.get_event_flag("optiunefva") == 3 begin
               local inghetata=number(1, 250)
               if inghetata==1 and game.get_event_flag("inghetata") == 1 then 

                  pc.give_item2(30149,1)

               end
            end
            when kill with game.get_event_flag("optiunefva") == 2 begin
               local inghetata=number(1, 150)
               if inghetata==1 and game.get_event_flag("inghetata") == 1 then 

                  pc.give_item2(30149,1)

               end
            end
            when kill with game.get_event_flag("optiunefva") == 1 begin
               local inghetata=number(1, 50)
               if inghetata==1 and game.get_event_flag("inghetata") == 1 then 

                  pc.give_item2(30149,1)

               end
            end
               when 33004.chat."Event: Vara 2016" with pc.is_gm() begin
               say_title("Eventul de Vara  -"..pc.getname().."-")
               local eventul = select("Porneste Event-ul de vara", "Opreste Eventul de vara", "Panoul de control", "Anuleaza.")
			   if eventul == 1 and game.get_event_flag("inghetata") == 1 then
               say_title("Eventul de inghetata :")
               say("Event-ul este deja pornit.")
               wait()

               return
               else
               if eventul == 1 then
               say_title("Eventul de vara :")
               say("Event-ul a fost pornit si automat a fost pus pe mod")
               say("'Normal',daca vrei sa modifici modul fa o tura prin")
               say("Panoul de control.Bafta!")
               notice_all("Dragi jucatori!")
               notice_all("Eventul de vara este activ!!")
               game.set_event_flag("optiunefva", 3)
               game.set_event_flag("inghetata", 1)
               wait()
             return
             end
            end
            if eventul == 2 and game.get_event_flag("inghetata") == 0 then
               say_title("Eventul de vara :")
               say("Event-ul este deja oprit.")
               wait()
               return
               else
               if eventul == 2 then
               say_title("Eventul de inghetata :")
               say("Event-ul a fost oprit.")
               notice_all("Dragi jucatori!")
               notice_all("Event-ul de vara a luat sfarsit!")
               game.set_event_flag("inghetata", 0)
               wait()
             return
             end
            end
            if eventul == 3 then
            say_title("Panou de control'Eventul de vara '")
                local optiunefva = select("Inghetata rata de 1/50 'USOR'","Inghetata rata de 1/150 'Binisor'","Inghetata rata de 1/250 'Normal'","Inghetata rata de 1/500 'Greu'","Inchide")
               if optiunefva == 1 then
               game.set_event_flag("optiunefva", 1)
               syschat("Succes!")
               return
               end
               if optiunefva == 2 then
               game.set_event_flag("optiunefva", 2)
               syschat("Succes!")
               return
               end
               if optiunefva == 5 then
               return
               end
               if optiunefva == 3 then
               syschat("Succes!")
               game.set_event_flag("optiunefva", 3)
               return
               end
               if optiunefva == 4 then
               game.set_event_flag("optiunefva", 4)
               syschat("Succes!")
               return
               end
             return
            end
            if eventul == 4 then
               return
            end
            end
            
      end
end[/spoiler]

[spoiler]quest negustoare_2016 begin
 state start begin
 when 9003.chat."Shop Special(Puncte)" begin

 say_title("Octavio!")
 say("")
 say("Salut "..pc.get_name().." aici poti sa")
 say("schimbi inghetata pe care o castigi")
 say("omorand mobii !")
 say("")
 say("Sansa de drop este random")
 say("In acest moment ai "..pc.count_item("30149").." Inghetata cu sirop")
 say("")
 wait()
 say("Lista de schimb:")
 say("Print Desert(Rosu,PvM) : 350x Inghetata")
 say("Print Desert(Albastru,PvP): 350x Inghetata")
 say("Printesa Desert(Rosu,PvM): 350x Inghetata")
 say("Printesa Desert(Albastru,PvP): 350x Inghetata")
 say("Sigiliu:Pepsi(15zile): 800x Inghetata")
 say("Amuleta Dragostei Eterne(60zile): 1600x Inghetata")
 say("Cufar Misterios(O Bucata): 30x Inghetata")
 say("")
 say("Ce alegi sa faci?")


 local canj = select ("Cumpara" , "Iesire") 

 if canj == 1 then


 say_title("Lista de schimb:")
 say("")
 local elegir = select("Print Desert(Rosu,PvM)","Print Desert(Albastru,PvP)","Printesa Desert(Rosu,PvM)","Printesa Desert(Albastru,PvP)","Sigiliu:Pepsi(15zile)","Amuleta Dragostei Eterne(60 zile)","Cufar Misterios","Iesire")
 local premios = {

 {41546,1,30149,350},
 {41547,1,30149,350},
 {41548,1,30149,350},
 {41549,1,30149,350},
 {52022,1,30149,800},
 {71145,1,30149,1600},
 {50125,1,30149,30}

 }

 if elegir != 14 then

 if pc.count_item(premios[elegir][3]) < premios[elegir][4] then

 say_title("Octavio")
 say("")
 say("Imi pare rau, dar nu ai inghetata necesara")
 say("pentru a cumpara acest item")
 say("")
 say("Mai ai nevoie de "..premios[elegir][4]-pc.count_item(premios[elegir][3]).." pentru al cumpara")
 say("revino cand ai toata inghetata necesara")
 say("")
 return
 end

 pc.give_item2(premios[elegir][1],premios[elegir][2])
 pc.remove_item(premios[elegir][3],premios[elegir][4])

 end
 end
 end 
 end
end
Modificati voi codurile si ce sa ofere dupa ce strangi inghetata ;)

Tutorial instalare quest:
  • Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu nume_quest.quest
  • Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).
  • Îl puneţi acolo (să fie .quest sau .lua).
  • Te loghezi în FreeBSD / putty şi scrii în felul următor: cd /usr/home/game/share/locale/germany/quest apoi ./qc nume_quest.quest
  • Intraţi pe server şi scrieţi /reload q
  • Testaţi quest-ul.
Ultima oară modificat 07 Noi 2016, 15:14 de către [Madalina], modificat de 2 ori în total.
Pentru acest mesaj, [Madalina] for the post:
Leo96
Afișează semnătura
Avatar utilizator
Robert
Traficant de ouă

Traficant de ouă
Mesaje: 1376
Membru din: 19 Feb 2015, 10:29
Server: Scorpions2
Regat: Chunjo
Aprecieri: 125  
Mulţumiri: 476  
Discord: Copiază ID
Medalii

Ai 24h sa modifici dupa model

[ Postat de pe Android ] Imagine
Avatar utilizator
[Madalina]
Nivel 2

Nivel 2
Mesaje: 215
Membru din: 24 Apr 2016, 17:43
Server: Nu mai joc.
Regat: Shinsoo
Aprecieri: 6  
Mulţumiri: 577  
 Contact:
Medalii

Robert scrie:Ai 24h sa modifici dupa model

[ Postat de pe Android ] Imagine
Am modificat tot acum :)
Afișează semnătura
Avatar utilizator
[SGA]Gabriel
Nivel 1

Nivel 1
Mesaje: 77
Membru din: 22 Oct 2014, 14:56
Regat: Jinno
Aprecieri: 25  
Mulţumiri: 2  
Medalii

Cod: Selectaţi tot

quest vara_2017 begin
        state start begin
      when login with game.get_event_flag("inghetata") == 1 begin
            syschat("Dragi jucatori evenimentul de vara este activ!")
            syschat("Aduna inghetata de la mobi si schimb-o pe un premiu")
            syschat("valoros la Octavio!")
               end
      when kill with game.get_event_flag("optiunefva") == 4 begin
               local inghetata=number(1, 500)
               if inghetata==1 and game.get_event_flag("inghetata") == 1 then

                  pc.give_item2(30149,1)

               end
            end
      when kill with game.get_event_flag("optiunefva") == 3 begin
               local inghetata=number(1, 250)
               if inghetata==1 and game.get_event_flag("inghetata") == 1 then

                  pc.give_item2(30149,1)

               end
            end
            when kill with game.get_event_flag("optiunefva") == 2 begin
               local inghetata=number(1, 150)
               if inghetata==1 and game.get_event_flag("inghetata") == 1 then

                  pc.give_item2(30149,1)

               end
            end
            when kill with game.get_event_flag("optiunefva") == 1 begin
               local inghetata=number(1, 50)
               if inghetata==1 and game.get_event_flag("inghetata") == 1 then

                  pc.give_item2(30149,1)

               end
            end
               when 33004.chat."Event: Vara 2016" with pc.is_gm() begin
               say_title("Eventul de Vara  -"..pc.getname().."-")
               local eventul = select("Porneste Event-ul de vara", "Opreste Eventul de vara", "Panoul de control", "Anuleaza.")
            if eventul == 1 and game.get_event_flag("inghetata") == 1 then
               say_title("Eventul de inghetata :")
               say("Event-ul este deja pornit.")
               wait()

               return
               else
               if eventul == 1 then
               say_title("Eventul de vara :")
               say("Event-ul a fost pornit si automat a fost pus pe mod")
               say("'Normal',daca vrei sa modifici modul fa o tura prin")
               say("Panoul de control.Bafta!")
               notice_all("Dragi jucatori!")
               notice_all("Eventul de vara este activ!!")
               game.set_event_flag("optiunefva", 3)
               game.set_event_flag("inghetata", 1)
               wait()
             return
             end
            end
            if eventul == 2 and game.get_event_flag("inghetata") == 0 then
               say_title("Eventul de vara :")
               say("Event-ul este deja oprit.")
               wait()
               return
               else
               if eventul == 2 then
               say_title("Eventul de inghetata :")
               say("Event-ul a fost oprit.")
               notice_all("Dragi jucatori!")
               notice_all("Event-ul de vara a luat sfarsit!")
               game.set_event_flag("inghetata", 0)
               wait()
             return
             end
            end
            if eventul == 3 then
            say_title("Panou de control'Eventul de vara '")
                local optiunefva = select("Inghetata rata de 1/50 'USOR'","Inghetata rata de 1/150 'Binisor'","Inghetata rata de 1/250 'Normal'","Inghetata rata de 1/500 'Greu'","Inchide")
               if optiunefva == 1 then
               game.set_event_flag("optiunefva", 1)
               syschat("Succes!")
               return
               end
               if optiunefva == 2 then
               game.set_event_flag("optiunefva", 2)
               syschat("Succes!")
               return
               end
               if optiunefva == 5 then
               return
               end
               if optiunefva == 3 then
               syschat("Succes!")
               game.set_event_flag("optiunefva", 3)
               return
               end
               if optiunefva == 4 then
               game.set_event_flag("optiunefva", 4)
               syschat("Succes!")
               return
               end
             return
            end
            if eventul == 4 then
               return
            end
            end
           
      end
end[/spoiler]

[spoiler]quest negustoare_2017 begin
 state start begin
 when 9003.chat."Shop Special(Puncte)" begin

 say_title("Magazin General!")
 say("")
 say("Salut "..pc.get_name().." aici poti sa")
 say("schimbi inghetata pe care o castigi")
 say("omorand mobii !")
 say("")
 say("Sansa de drop este random")
 say("In acest moment ai "..pc.count_item("30149").." Inghetata cu sirop")
 say("")
 wait()
 say("Lista de schimb:")
 say("Adauga Bonus 10 buc. : 350x Inghetata")
 say("Schimba Bonus 10 buc.: 350x Inghetata")
 say("Pergament Binecuvantat 20 buc. 350x Inghetata")
 say("Citit Concentrat 10 buc. 350x Inghetata")
 say("Pergament Exorcizare 10 buc. 350x Inghetata")
 say("Sigiliu Knuud: 800x Inghetata")
 say("Cufar Misterios(10 Bucati): 30x Inghetata")
 say("")
 say("Ce alegi sa faci?")


 local canj = select ("Cumpara" , "Iesire")

 if canj == 1 then


 say_title("Lista de schimb:")
 say("")
 local elegir = select("Print Desert(Rosu,PvM)","Print Desert(Albastru,PvP)","Printesa Desert(Rosu,PvM)","Printesa Desert(Albastru,PvP)","Sigiliu:Pepsi(15zile)","Amuleta Dragostei Eterne(60 zile)","Cufar Misterios","Iesire")
 local premios = {

 {71085,10,30149,350},
 {71084,1,30149,350},
 {25040,20,30149,350},
 {71094,1,30149,350},
 {71001,1,30149,350},
 {53008,1,30149,800},
 {50125,10,30149,30},

 }

 if elegir != 14 then

 if pc.count_item(premios[elegir][3]) < premios[elegir][4] then

 say_title("Octavio")
 say("")
 say("Imi pare rau, dar nu ai inghetata necesara")
 say("pentru a cumpara acest item")
 say("")
 say("Mai ai nevoie de "..premios[elegir][4]-pc.count_item(premios[elegir][3]).." pentru al cumpara")
 say("revino cand ai toata inghetata necesara")
 say("")
 return
 end

 pc.give_item2(premios[elegir][1],premios[elegir][2])
 pc.remove_item(premios[elegir][3],premios[elegir][4])

 end
 end
 end
 end
end
Am modificat questul si tot nu merge imi da eroare la quest ce probleme are?
Avatar utilizator
cosmin931
Nivel 2

Nivel 2
Mesaje: 213
Membru din: 25 Ian 2016, 18:15
Regat: Jinno
Aprecieri: 32  
Mulţumiri: 5  
Discord: Copiază ID
Medalii

A incercat cineva acest quest ?
Viata e un joc ... iar in jocuri exista si trisori .

Filme online
Afișează semnătura
Avatar utilizator
MariusExygo
Fost Helper

Fost Helper
Mesaje: 2063
Membru din: 09 Mar 2014, 15:47
Server: WildFantasy
Regat: Jinno
Aprecieri: 156  
Mulţumiri: 226  
  Rezolvări prob.: 4
Discord: Copiază ID
 Contact:
Medalii

What's this shit?

Afișează semnătura
Avatar utilizator
sk1per
Nivel 7

Nivel 7
Mesaje: 1351
Membru din: 14 Dec 2013, 18:03
Server: blackmetin2
Regat: Chunjo
Aprecieri: 584  
Mulţumiri: 882  
Medalii

merge doar ca fiti atenti in quest si stergeti
bucatile astea :))
Cauti un host bun si preturi superbe te astept pe www.softserver.ro :heart_eyes:
Afișează semnătura
Avatar utilizator
Antharas
Nou Venit

Nou Venit
Mesaje: 45
Membru din: 18 Dec 2015, 14:42
Server: Metin2Aizen
Regat: Shinsoo
Aprecieri: 11  
Mulţumiri: 2  
 Contact:
Medalii

Quest scos din svf zentoria...nu merge
Imagine
Afișează semnătura
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:
Medalii

Daca il modifici putin(sau putin mai mult...) va "merge"

Cod: Selectaţi tot

quest eveniment_vara begin
    state start begin
		when login with game.get_event_flag("inghetata") == 1 begin
			syschat("Dragi jucatori evenimentul de vara este activ!")
			syschat("Aduna inghetata de la mobi si schimb-o pe un premiu")
			syschat("valoros la magazin!")
		end
		when kill with game.get_event_flag("optiunefva") == 4 begin
			local inghetata=number(1, 500)
			if inghetata==1 and game.get_event_flag("inghetata") == 1 then
				pc.give_item2(30149,1)
			end
		end
		when kill with game.get_event_flag("optiunefva") == 3 begin
			local inghetata=number(1, 250)
			if inghetata==1 and game.get_event_flag("inghetata") == 1 then 
				pc.give_item2(30149,1)
			end
		end
		when kill with game.get_event_flag("optiunefva") == 2 begin
			local inghetata=number(1, 150)
			if inghetata==1 and game.get_event_flag("inghetata") == 1 then 
				pc.give_item2(30149,1)
			end
		end
		when kill with game.get_event_flag("optiunefva") == 1 begin
			local inghetata=number(1, 50)
			if inghetata==1 and game.get_event_flag("inghetata") == 1 then 
				pc.give_item2(30149,1)
			end
		end
		when 33004.chat."Event: Vara 2016" with pc.is_gm() begin
			say_title("Eventul de Vara")
			local eventul = select("Porneste Event-ul de vara", "Opreste Eventul de vara", "Panoul de control", "Anuleaza.")
			if eventul == 1 and game.get_event_flag("inghetata") == 1 then
				say_title("Eventul de inghetata :")
				say("Event-ul este deja pornit.")
			return
			end
			if eventul == 1 and game.get_event_flag("inghetata") == 0 then
				say_title("Eventul de vara :")
				say("Event-ul a fost pornit si automat a fost pus pe mod")
				say("'Normal',daca vrei sa modifici modul fa o tura prin")
				say("Panoul de control.Bafta!")
				notice_all("Dragi jucatori!")
				notice_all("Eventul de vara este activ!!")
				game.set_event_flag("optiunefva", 3)
				game.set_event_flag("inghetata", 1)
			end
			if eventul == 2 and game.get_event_flag("inghetata") == 0 then
				say_title("Eventul de vara :")
				say("Event-ul este deja oprit.")
			return
			end
			if eventul == 2 and game.get_event_flag("inghetata") == 1 then
				say_title("Eventul de inghetata :")
				say("Event-ul a fost oprit.")
				notice_all("Dragi jucatori!")
				notice_all("Event-ul de vara a luat sfarsit!")
				game.set_event_flag("inghetata", 0)
			end
			if eventul == 3 then
			say_title("Panou de control'Eventul de vara '")
				local optiunefva = select("Inghetata rata de 1/50 'USOR'","Inghetata rata de 1/150 'Binisor'","Inghetata rata de 1/250 'Normal'","Inghetata rata de 1/500 'Greu'","Inchide")
				if optiunefva == 5 then
				return
				end
				if optiunefva == 1 then
					game.set_event_flag("optiunefva", 1)
					syschat("Succes!")
				end
				if optiunefva == 2 then
					game.set_event_flag("optiunefva", 2)
					syschat("Succes!")
				end
				if optiunefva == 3 then
					syschat("Succes!")
					game.set_event_flag("optiunefva", 3)
				end
				if optiunefva == 4 then
					game.set_event_flag("optiunefva", 4)
					syschat("Succes!")
				end
			end
			if eventul == 4 then
			return
			end
		end
        when 9003.chat."Shop Special cu Puncte" begin
			say("")
			say("Salut "..pc.get_name().." aici poti sa")
			say("schimbi inghetata pe care o castigi")
			say("omorand mobii !")
			say("")
			say("Sansa de drop este random")
			say("In acest moment ai "..pc.count_item("30149").." Inghetata cu sirop")
			say("")
			wait()
			say("Lista de schimb:")
			say("Print Desert(Rosu,PvM) : 350x Inghetata")
			say("Print Desert(Albastru,PvP): 350x Inghetata")
			say("Printesa Desert(Rosu,PvM): 350x Inghetata")
			say("Printesa Desert(Albastru,PvP): 350x Inghetata")
			say("Sigiliu:Pepsi(15zile): 800x Inghetata")
			say("Amuleta Dragostei Eterne(60zile): 1600x Inghetata")
			say("Cufar Misterios(O Bucata): 30x Inghetata")
			say("")
			say("Ce alegi sa faci?")
			local canj = select ("Cumpara" , "Iesire") 
			if canj == 1 then
			say_title("Lista de schimb:")
			say("")
			local elegir = select("Print Desert(Rosu,PvM)","Print Desert(Albastru,PvP)","Printesa Desert(Rosu,PvM)","Printesa Desert(Albastru,PvP)","Sigiliu:Pepsi(15zile)","Amuleta Dragostei Eterne(60 zile)","Cufar Misterios","Iesire")
			local premios = {
			{41546,1,30149,350},
			{41547,1,30149,350},
			{41548,1,30149,350},
			{41549,1,30149,350},
			{52022,1,30149,800},
			{71145,1,30149,1600},
			{50125,1,30149,30}
			}
			if elegir != 14 then
			if pc.count_item(premios[elegir][3]) < premios[elegir][4] then
			say("")
			say("Imi pare rau, dar nu ai inghetata necesara")
			say("pentru a cumpara acest item")
			say("")
			say("Mai ai nevoie de "..premios[elegir][4]-pc.count_item(premios[elegir][3]).." pentru al cumpara")
			say("revino cand ai toata inghetata necesara")
			say("")
			return
			end
			pc.give_item2(premios[elegir][1],premios[elegir][2])
			pc.remove_item(premios[elegir][3],premios[elegir][4])
			end
			end
		end
	end
end
Pentru acest mesaj, [RaffaeL] for the post:
Andrei vlc
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
Avatar utilizator
Andrei vlc
Nivel 2

Nivel 2
Mesaje: 194
Membru din: 26 Apr 2017, 17:29
Server: Metin2
Regat: Jinno
Aprecieri: 6  
Mulţumiri: 186  
 Contact:
Medalii

[RaffaeL] scrie:Daca il modifici putin(sau putin mai mult...) va "merge"

Cod: Selectaţi tot

quest eveniment_vara begin
    state start begin
		when login with game.get_event_flag("inghetata") == 1 begin
			syschat("Dragi jucatori evenimentul de vara este activ!")
			syschat("Aduna inghetata de la mobi si schimb-o pe un premiu")
			syschat("valoros la magazin!")
		end
		when kill with game.get_event_flag("optiunefva") == 4 begin
			local inghetata=number(1, 500)
			if inghetata==1 and game.get_event_flag("inghetata") == 1 then
				pc.give_item2(30149,1)
			end
		end
		when kill with game.get_event_flag("optiunefva") == 3 begin
			local inghetata=number(1, 250)
			if inghetata==1 and game.get_event_flag("inghetata") == 1 then 
				pc.give_item2(30149,1)
			end
		end
		when kill with game.get_event_flag("optiunefva") == 2 begin
			local inghetata=number(1, 150)
			if inghetata==1 and game.get_event_flag("inghetata") == 1 then 
				pc.give_item2(30149,1)
			end
		end
		when kill with game.get_event_flag("optiunefva") == 1 begin
			local inghetata=number(1, 50)
			if inghetata==1 and game.get_event_flag("inghetata") == 1 then 
				pc.give_item2(30149,1)
			end
		end
		when 33004.chat."Event: Vara 2016" with pc.is_gm() begin
			say_title("Eventul de Vara")
			local eventul = select("Porneste Event-ul de vara", "Opreste Eventul de vara", "Panoul de control", "Anuleaza.")
			if eventul == 1 and game.get_event_flag("inghetata") == 1 then
				say_title("Eventul de inghetata :")
				say("Event-ul este deja pornit.")
			return
			end
			if eventul == 1 and game.get_event_flag("inghetata") == 0 then
				say_title("Eventul de vara :")
				say("Event-ul a fost pornit si automat a fost pus pe mod")
				say("'Normal',daca vrei sa modifici modul fa o tura prin")
				say("Panoul de control.Bafta!")
				notice_all("Dragi jucatori!")
				notice_all("Eventul de vara este activ!!")
				game.set_event_flag("optiunefva", 3)
				game.set_event_flag("inghetata", 1)
			end
			if eventul == 2 and game.get_event_flag("inghetata") == 0 then
				say_title("Eventul de vara :")
				say("Event-ul este deja oprit.")
			return
			end
			if eventul == 2 and game.get_event_flag("inghetata") == 1 then
				say_title("Eventul de inghetata :")
				say("Event-ul a fost oprit.")
				notice_all("Dragi jucatori!")
				notice_all("Event-ul de vara a luat sfarsit!")
				game.set_event_flag("inghetata", 0)
			end
			if eventul == 3 then
			say_title("Panou de control'Eventul de vara '")
				local optiunefva = select("Inghetata rata de 1/50 'USOR'","Inghetata rata de 1/150 'Binisor'","Inghetata rata de 1/250 'Normal'","Inghetata rata de 1/500 'Greu'","Inchide")
				if optiunefva == 5 then
				return
				end
				if optiunefva == 1 then
					game.set_event_flag("optiunefva", 1)
					syschat("Succes!")
				end
				if optiunefva == 2 then
					game.set_event_flag("optiunefva", 2)
					syschat("Succes!")
				end
				if optiunefva == 3 then
					syschat("Succes!")
					game.set_event_flag("optiunefva", 3)
				end
				if optiunefva == 4 then
					game.set_event_flag("optiunefva", 4)
					syschat("Succes!")
				end
			end
			if eventul == 4 then
			return
			end
		end
        when 9003.chat."Shop Special cu Puncte" begin
			say("")
			say("Salut "..pc.get_name().." aici poti sa")
			say("schimbi inghetata pe care o castigi")
			say("omorand mobii !")
			say("")
			say("Sansa de drop este random")
			say("In acest moment ai "..pc.count_item("30149").." Inghetata cu sirop")
			say("")
			wait()
			say("Lista de schimb:")
			say("Print Desert(Rosu,PvM) : 350x Inghetata")
			say("Print Desert(Albastru,PvP): 350x Inghetata")
			say("Printesa Desert(Rosu,PvM): 350x Inghetata")
			say("Printesa Desert(Albastru,PvP): 350x Inghetata")
			say("Sigiliu:Pepsi(15zile): 800x Inghetata")
			say("Amuleta Dragostei Eterne(60zile): 1600x Inghetata")
			say("Cufar Misterios(O Bucata): 30x Inghetata")
			say("")
			say("Ce alegi sa faci?")
			local canj = select ("Cumpara" , "Iesire") 
			if canj == 1 then
			say_title("Lista de schimb:")
			say("")
			local elegir = select("Print Desert(Rosu,PvM)","Print Desert(Albastru,PvP)","Printesa Desert(Rosu,PvM)","Printesa Desert(Albastru,PvP)","Sigiliu:Pepsi(15zile)","Amuleta Dragostei Eterne(60 zile)","Cufar Misterios","Iesire")
			local premios = {
			{41546,1,30149,350},
			{41547,1,30149,350},
			{41548,1,30149,350},
			{41549,1,30149,350},
			{52022,1,30149,800},
			{71145,1,30149,1600},
			{50125,1,30149,30}
			}
			if elegir != 14 then
			if pc.count_item(premios[elegir][3]) < premios[elegir][4] then
			say("")
			say("Imi pare rau, dar nu ai inghetata necesara")
			say("pentru a cumpara acest item")
			say("")
			say("Mai ai nevoie de "..premios[elegir][4]-pc.count_item(premios[elegir][3]).." pentru al cumpara")
			say("revino cand ai toata inghetata necesara")
			say("")
			return
			end
			pc.give_item2(premios[elegir][1],premios[elegir][2])
			pc.remove_item(premios[elegir][3],premios[elegir][4])
			end
			end
		end
	end
end

O sa mearga doar daca modifica putin mai mult =)
mai pe scurt tot questu sa il modifice =))
Imagine
Afișează semnătura
Răspunde

Înapoi la “Quest-uri”

  • Informaţie
  • Cine este conectat

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