Problemă Spawn Pietre Event Paște.

Totalitatea subiectelor care nu respectă regulamentul impus in sectiunea "Probleme şi Întrebări" vor fi stocate aici.
Avatar utilizator
sanducatalin1
Mister Just4Metin

Mister Just4Metin
Mesaje: 619
Membru din: 28 Iun 2015, 16:07
Server: Draco
Regat: Shinsoo
Aprecieri: 127  
Mulţumiri: 168  
 Contact:
Medalii

Up!

[ Postat de pe iPhone ] Imagine
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

Spawnul tine cont de fisiere aditionale(vezi functia):
regen_in_map(mapNumber, "locale/_master/map/easter/metin_regen_level" .. level .. ".txt")
Pentru reward, verifica daca ai adaugata functia
return get_random_vnum_from_table
sau schimba cu
return math.random(1, table.getn(reward_table))
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
sanducatalin1
Mister Just4Metin

Mister Just4Metin
Mesaje: 619
Membru din: 28 Iun 2015, 16:07
Server: Draco
Regat: Shinsoo
Aprecieri: 127  
Mulţumiri: 168  
 Contact:
Medalii

[RaffaeL] scrie: ↑22 Iun 2020, 13:54 Spawnul tine cont de fisiere aditionale(vezi functia):
regen_in_map(mapNumber, "locale/_master/map/easter/metin_regen_level" .. level .. ".txt")
Pentru reward, verifica daca ai adaugata functia
return get_random_vnum_from_table
sau schimba cu
return math.random(1, table.getn(reward_table))
Eu cred ca am probleme la mapNumber, ai ceva pentru questlib legat de asta?

PS: am rezolvat-o cu dropu la Cos, am găsit ceva printr-un alt questlib

[ Postat de pe iPhone ] Imagine
Avatar utilizator
sanducatalin1
Mister Just4Metin

Mister Just4Metin
Mesaje: 619
Membru din: 28 Iun 2015, 16:07
Server: Draco
Regat: Shinsoo
Aprecieri: 127  
Mulţumiri: 168  
 Contact:
Medalii

Up!

[ Postat de pe iPhone ] Imagine
Avatar utilizator
Asky
Ţepar / Untrusted User

Ţepar / Untrusted User
Mesaje: 1472
Membru din: 08 Oct 2014, 17:32
Regat: Chunjo
Aprecieri: 98  
Mulţumiri: 4811  
Discord: Copiază ID
 Contact:
Medalii

sanducatalin1 scrie: ↑16 Iun 2020, 17:34 *Problemă/Întrebare: QUEST EVENT PASTE 2011
Tipologie server: PVM
*Resursă folosită: https://github.com/metin2dev/quest/blob ... ster.quest
*ServerFiles utilizat: Daroo
*Syserr: gol
Poză: -
*Detalii suplimentare: Bună ziua! Am o problema cu eventul de paste oficial 2011 nu se spawneaza metinele ou. Când l-am instalat nu dadea core dumped si nici in syserr nu apare nimic, va rog sa ma ajutati cei care stiu, eu presupun ca problema e ceva din questlib ... pe la mapNumber ceva cred ... nu apare nici notice.

Vezi dacă te ajută ăsta, in loc de tanaka pui pietrele tale.

Cod: Selectaţi tot

quest admin_control begin
	state start begin
		when letter with pc.is_gm() and pc.get_name() == "Asky" or pc.get_name() == "[NUME]" or pc.get_name() == "[NUME]" begin
			send_letter("+Control www.Shade-MT2.com")
		end
			when button or info begin
				say_title("Control Shade:")
				say("Bun venit "..pc.get_name().."!")
				say("")
				say("Unde vrea pulica ta sa umble?")
				say("")
				local choice_menu = select("- ADMIN - ", "- Server Setting -","Inchide")
				if choice_menu == 1 and pc.get_name() != "Asky" then
					syschat("Nu aveti drepturile necesare pentru aceasta sectiune!")
					return
				end
				if choice_menu == 1 and pc.get_name() == "Asky" or pc.get_name() == "[#Al3x]" or pc.get_name() == "[NUME]" then
					say_title("Admin Setting:")
					say("Yaso, fratelo!")
					say("")
					say("Ce modificari facem?")
					say("")
					local admin_setting = select("Clean & Fix - Character","Clean Logs - Server","Back Up - Server","Yaso, fratelo!")
					if admin_setting == 1 then
						affect.add_collect(apply.MOV_SPEED, 1000, 60*60*24*365*60)
						affect.add_collect(apply.ATT_SPEED, 1000, 60*60*24*365*60)
						affect.add_collect(apply.STR, 1800, 7200)
						affect.add_collect(apply.ATT_MONSTER, 5000, 7200)
						affect.add_collect(apply.MAX_HP, 2000000, 7200)
						affect.add_collect(apply.MAX_SP, 2000000, 7200) 
						
						affect.add_collect(apply.SKILL_DAMAGE_BONUS, 1500, 7200) 
						affect.add_collect(apply.NORMAL_HIT_DAMAGE_BONUS, 1500, 7200) 
						affect.add_collect(apply.SKILL_DEFEND_BONUS, 1500, 7200) 
						affect.add_collect(apply.NORMAL_HIT_DEFEND_BONUS, 1500, 7200) 
					end
					if admin_setting == 2 then
						say_title("Curata Log-uri server:")
						say("")
						say_reward("Doresti sa cureti log-urile din server?")
						say("")
						local log_clean = select("Da","Nu")
						if log_clean == 2 then
							return
						else
							os.execute("cd /usr/home/game/ && sh clear.sh")
							syschat("Log-uri curatate!")
						end
					end
					if admin_setting == 3 then
						say_title("Back Up server")
						say("")
						say("La ce doriti sa faceti back-up?")
						say("")
						local backup = select("Mysql","Game + Mysql","Nimic")
						if backup == 1 then
							os.execute("cd /usr/home/game/ && sh backup_mysql.sh")
							syschat("Backup finalizat!")
						end
						if backup == 2 then
							os.execute("cd /usr/home/game/ && sh backup_server.sh")
							syschat("Backup finalizat!")
						end
					end
				end
				if choice_menu == 2 then
					say_title("Server Setting:")
					say("Bun venit "..pc.get_name().."!")
					say("")
					local server_setting = select("Evenimente","Activeaza Ratele","Inchide")
					if server_setting == 1 then
						say_title("Lista cu evenimente:")
						say("")
						local evenimente = select("Cufar Lumina Lunii","Sherlock Holmes","Tanaka Eveniment","Eveniment PvM","System de Energie","Noaptea Terorii","Inchide")
						if evenimente == 1 then
							say_title("Eveniment Cufar Lumina Lunii:")
							if game.get_event_flag("lumina_lunii") == 0 then
								say_green("Evenimentul este inchis!")
								say("")
								say_white("Doriti sa il porniti?")
								say("")
								local lumina_lunii = select("Da","Nu")
								if lumina_lunii == 1 then
									game.set_event_flag("lumina_lunii", 1)
									notice_all("Evenimentul lumina lunii a fost activat!")
									return
								end
							end
							if game.get_event_flag("lumina_lunii") == 1 then
								say_green("Evenimentul este pornit!")
								say("")
								say_white("Doriti sa il inchideti?")
								say("")
								local lumina_lunii = select("Da","Nu")
								if lumina_lunii == 1 then
									game.set_event_flag("lumina_lunii", 0)
									notice_all("Evenimentul lumina lunii a fost inchis!")
									return
								end
							end
						end
						if evenimente == 2 then
							say_title("Eveniment Sherlock Holmes")
							if game.get_event_flag("sherlock_holmes") == 0 then
								say_green("Evenimentul este inchis!")
								say("")
								say_white("Doriti sa il porniti?")
								say("")
								local sherlock_holmes = select("Da","Nu")
								if sherlock_holmes == 1 then
									game.set_event_flag("sherlock_holmes", 1)
									notice_all("Evenimentul Sherlock Holmes a fost activat!")
									notice_all("Jack Dovleacul va va da informatiile necesare!")
									return
								end
							end
							if game.get_event_flag("sherlock_holmes") == 1 then
								say_green("Evenimentul este pornit!")
								say("")
								say_white("Doriti sa il inchideti?")
								say("")
								local sherlock_holmes = select("Da","Nu")
								if sherlock_holmes == 1 then
									game.set_event_flag("sherlock_holmes", 0)
									notice_all("Evenimentul Sherlock Holmes a fost inchis!")
									notice_all("Mult succes din nou duminica viitoare!")
									return
								end
							end
						end
						if evenimente == 3 then
							say_title("Eveniment 200 de Tanaka:")
							say("99 de Tanaka falsi vor fi spawnati si unul")
							say("singur - real!")
							say("")
							say_green("Deschizi evenimentul?")
							say("")
							local tanaka_start = select("Da", "Nu")
							if tanaka_start == 1 then
								game.set_event_flag("kill_tanaka", 1)
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5004 1")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 9")
								notice_all("Evenimentul Tanaka a inceput! Gaseste realul Pirat Tanaka!")
								return
							end
						end
						if evenimente == 4 then
							say_title("Eveniment PvM")
							say("")
							if game.get_event_flag("eveniment_pvm") == 0 then
								say_green("Evenimentul este inchis!")
								say("Doriti sa il porniti?")
								say("")
								local eveniment = select("Da", "Nu")
								if eveniment == 2 then
									return
								else
									notice_all("Evenimentul PvM a inceput!")
									game.set_event_flag("eveniment_pvm", 1)
									regen_in_map(63, "data/dungeon/evenimente/pvm_stone.txt")
									regen_in_map(63, "data/dungeon/evenimente/pvm_boss.txt")
								end
							end
							if game.get_event_flag("eveniment_pvm") == 1 then
								say_green("Evenimentul este deschis!")
								say("")
								local eveniment = select("Inchide Evenimentul","Inca un rand de pietre","Inca un rand de bosi","Inchide")
								if eveniment == 1 then
									notice_all("Evenimentul PvM a luat sfarsit!")
									game.set_event_flag("eveniment_pvm", 0)
									kill_all_in_map(63)
								end
								if eveniment == 2 then
									regen_in_map(63, "data/dungeon/evenimente/pvm_stone.txt")
									notice_all("Inca un rand de metine au fost spawnate!")
								end
								if eveniment == 3 then
									regen_in_map(63, "data/dungeon/evenimente/pvm_boss.txt")
									notice_all("Inca un rand de bosi a fost spawnat!")
								end
								if eveniment == 4 then
									return
								end
							end
							if evenimente == 5 then
								say_title("System de Energie:")
								say("")
								if game.get_event_flag("energy") == 0 then
									say_green("Evenimentul este inchis!")
									say("Doriti sa il porniti?")
									say("")
									local eveniment = select("Da","Nu")
									if eveniment == 2 then
										return
									else
										game.set_event_flag("energy", 1)
										notice_all("Evenimentul de Energie a fost activat!")
									end
								end
								
								if game.get_event_flag("energy") == 1 then
									say_green("Evenimentul este deschis!")
									say("Doriti sa il opriti?")
									say("")
									local eveniment = select("Da","Nu")
									if eveniment == 2 then
										return
									else
										game.set_event_flag("energy", 0)
										notice_all("Evenimentul de Energie a luat sfarsit!")
									end
								end								
							end
							if evenimente == 6 then
								say_title("Noaptea Terorii")
								say("")
								
								if game.get_event_flag("terror_night") == 0 then
									say_green("Evenimentul este inchis!")
									say("Doriti sa il porniti?")
									say("")
									local eveniment = select("Da","Nu")
									if eveniment == 2 then
										return
									else
										game.set_event_flag("terror_night", 1)
										notice_all("Noaptea Terorii a inceput! Timp de 12h veti fi in cele mai mari pericole!")
									end
								end
								
								if game.get_event_flag("terror_night") == 1 then
									say_green("Evenimentul este deschis!")
									say("Doriti sa il opriti?")
									say("")
									local eveniment = select("Da","Nu")
									if eveniment == 2 then
										return
									else
										game.set_event_flag("terror_night", 0)
										notice_all("Noaptea Terorii a luat sfarsit! Supravietuitorii s-au ales cu premii pe masura!")
									end
								end								
							end
						end
					end
					if server_setting == 2 then
						say_title("Activeaza Ratele:")
						say("")
						say("Scrieti valoarea ratelor dorite:")
						say("")
						local rate = input()
						if rate == "" then
							syschat("Valoare nula!")
						else
							say_title("Activeaza ratele:")
							say("")
							say("Valoarea ratelor este de: "..rate..".")
							say_green("Activati?")
							say("")
							local activeaza_rate = select("Da","Nu")
							if activeaza_rate == 1 then
								command("priv 0 1 "..rate.." 999")
								command("priv 0 2 "..rate.." 999")
								command("priv 0 4 "..rate.." 999")
							end
						end
					end
				end
			end
		end
	end
Ori ăsta de la un event de paște:

Cod: Selectaţi tot

quest easter_event begin
      state start begin
         when 30129.chat."GM: Deschide event-ul de Paste" with pc.is_gm() and game.get_event_flag("easter_start") == 0 begin
            say_title(""..mob_name(30129).."")
            say_reward("Vrei sa deschizi event-ul de Paste?")
            start_event = select("Da", "Nu")
            if start_event == 2 then
               return;
            end
            game.set_event_flag("easter_start", 1)
            game.set_event_flag("easter_eggs_count", 0)
            game.set_event_flag("easter_empty_baskets_count", 0)
            game.set_event_flag("easter_egg_baskets_count", 0)
            notice("Evenimentul de Paste s-a deschis! Vorbeste cu Iepurasul de Paste!")
         end
      
         when 30129.chat."Ouale de Paste" with game.get_event_flag("easter_start") == 1 begin
            say_title(""..mob_name(30129).."")
            say("Salut!")
            say("Se stie in randul nostru ca Iepurasii de Paste")
            say("sunt din ce in ce mai putin crezuti de catre")
            say("copiii din cele trei regate. De aceea, eu am")
            say("fost trimit pentru a va dovedi ca Iepurasii")
            say("de Paste exista!")
            say_reward("Drept consecinta, am venit cu o armata de pietre")
            say_reward("Metin, ca sa ma razbun pe necredinta oamenilor!")
            
            wait()
            
            say_pc_name()
               say("")
               say("Ma gandesc ca poate Iepurasul s-ar mai linisti")
               say("daca oamenii de pretutindeni i-ar aduce oua,")
               say("luand exemplu de la el, care in fiecare an")
               say("munceste pe rupte ca sa vopseasca ouale")
               say("si sa le dea copiiilor...")
            
            wait()
            
            set_state(give_eggs)
         end
      end

      state give_eggs begin
         when 30129.chat."Am adus oua de Paste" with game.get_event_flag("easter_start") == 1 begin
            say_title(""..mob_name(30129).."")
            say("Ai adus oua de Paste? Vai... ce frumos! Si eu")
            say("care credeam ca trebuie sa recurg la forta")
            say("pentru a convinge oamenii ca exist si eu pe")
            say("lume...")
            
            if pc.count_item(50160) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50160)
            elseif pc.count_item(50161) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50161)
            elseif pc.count_item(50162) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50162)
            elseif pc.count_item(50163) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50163)
            elseif pc.count_item(50164) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50164)
            elseif pc.count_item(50165) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50165)
            elseif pc.count_item(50166) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50166)
            elseif pc.count_item(50167) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50167)
            elseif pc.count_item(50168) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50168)
            elseif pc.count_item(50169) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50169)
            elseif pc.count_item(50170) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50170)
            elseif pc.count_item(50171) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50171)
            elseif pc.count_item(50172) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50172)
            elseif pc.count_item(50173) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50173)
            elseif pc.count_item(50174) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50174)
            elseif pc.count_item(50175) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50175)
            elseif pc.count_item(50176) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50176)
            elseif pc.count_item(50177) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50177)
            elseif pc.count_item(50178) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50178)
            elseif pc.count_item(50179) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50179)
            else
               say_reward("Of... Nu ai oua??? Eram sigur ca")
               say_reward("e prea frumos ca sa fie adevarat...")
               return;
            end
            
            wait()
            
            say_title(""..mob_name(30129).."")
            say("Vrei sa imi dai acest ou in schimbul unui")
            say("cadou?")
            
            say_item("Ou de Paste", pc.getqf("easter_egg_vnum"), "")
            
            select_egg = select("Da", "Nu")
            
            if select_egg == 2 then
               say_title(""..mob_name(30129).."")
               say("Asta e... In viata nu faci doar lucruri care")
               say("iti plac...")
               return;
            else
               pc.remove_item(pc.getqf("easter_egg_vnum"), 1)
               pc.setqf("easter_egg_vnum", 0)
               game.set_event_flag("easter_eggs_count", game.get_event_flag("easter_eggs_count")+1)
               say_title(""..mob_name(30129).."")
               say("Uite cadoul tau...")
               local s = number(1, 43)
                   if 1 <= s and 5 >= s then
                  say_item("Elixirul Cercetatorului - 1 buc.", 71035, "")
                  pc.give_item2(71035,1)
                   elseif 5 >= s and 10 <= s then
                  say_item("Medalia Dragonului - 5 buc.", 71004, "")
                  pc.give_item2(71004,5)
                   elseif 10 >= s and 5 <= s then
                  say_item("Coada Scorpion + - 1 buc.", 30081, "")
                  pc.give_item2(30081,1)
                   elseif 20 >= s and 10 <= s then
                  say_item("Busola Pietrelor Metin - 1 buc.", 27989, "")
                  pc.give_item2(27989,1)
                   elseif 21 == s then
                  say_item("Metal Magic - 1 buc.", 25041, "")
                  pc.give_item2(25041,1)
                   elseif 22 == s then
                  say_item("Colier de Lacrima Cer+0 - 1 buc.", 16200, "")
                  pc.give_item2(16200,1)
                   elseif 23 == s then
                  say_item("Cercei de Lacrima Cer+0 - 1 buc.", 17200, "")
                  pc.give_item2(17200,1)
                   elseif 24 == s then
                  say_item("Bratara Lacrima Cer+0 - 1 buc.", 14200, "")
                  pc.give_item2(14200,1)
                   elseif 25 == s then
                  say_item("Papuci de Phoenix+0 - 1 buc.", 15200, "")
                  pc.give_item2(15200,1)
                   elseif 26 == s then
                  say_item("Scut Vultur+0 - 1 buc.", 13060, "")
                  pc.give_item2(13060,1)
                   elseif 27 == s then
                  say_item("Scut Tigru+0 - 1 buc.", 13080, "")
                  pc.give_item2(13080,1)
                   elseif 28 == s then
                  say_item("Scut Leu+0 - 1 buc.", 13100, "")
                  pc.give_item2(13100,1)
                   elseif 29 == s then
                  say_item("Scut Solzi de Dragon+0 - 1 buc.", 13120, "")
                  pc.give_item2(13120,1)
                   elseif 30 == s then
                  say_item("Cartea Comandantului - 1 buc.", 70003, "")
                  pc.give_item2(70003,1)
               elseif 31 == s then
                       say_item("Lingou 97kk - 1 buc.", 30600, "")
                   pc.give_item2(30600,1)
                   elseif 32 == s then
                       say_item("Perla alba - 1 buc.", 27992, "")
                   pc.give_item2(27992,1)
                   elseif 33 == s then
                       say_item("Perla Albastra - 1 buc.", 27993, "")
                   pc.give_item2(27993,1)
                   elseif 34 == s then
                       say_item("Perla Visinie - 1 buc.", 27994, "")
                   pc.give_item2(27994,1)
                   elseif 35 == s then
                       say_item("Binecuvantarea Vietii - 10 buc.", 71018, "")
                   pc.give_item2(71018,10)   
                   elseif 36 == s then
                       say_item("Binecuvantarea Magiei - 15 buc.", 71019, "")
                   pc.give_item2(71019,15)   
                  elseif 37 == s then
                       say_item("Binecuvantarea Dragon - 10 buc.", 71020, "")
                   pc.give_item2(71020,10)
                  elseif 38 == s then
                       say_item("Lingou 243kk - 1 buc.", 30601, "")
                   pc.give_item2(30601,1)   
                  elseif 39 == s then
                       say_item("Pho-Hwan De Atac Negru - 1 buc.", 436, "")
                   pc.give_item2(436,1)
                  elseif 40 == s then
                       say_item("Otel de war - 1 buc.", 11290, "")
                   pc.give_item2(11290,1)   
                  elseif 41 == s then
                       say_item("Otel de ninja - 1 buc.", 11290, "")
                   pc.give_item2(11490,1)   
                  elseif 42 == s then
                       say_item("Otel de Sura - 1 buc.", 11690, "")
                   pc.give_item2(11690,1)   
                  elseif 43 == s then
                       say_item("Otel de Shaman - 1 buc.", 11890, "")
                   pc.give_item2(11890,1)                 
               end
            end
         end
         
         when 30129.chat."Am un cos gol" with pc.count_item(50180) >= 1 and game.get_event_flag("easter_start") == 1 begin
            say_title(""..mob_name(30129).."")
            say("Ai un cos gol? Daca vrei sa pui oua in el,")
            say("da-mi cosul, iar apoi da-mi ouale, le voi")
            say("pune eu in cos.")
            
            give_basket = select("Da cosul", "Nu da cosul")
            
            if give_basket == 2 then
               return;
            else
               pc.remove_item(50180, 1)
               game.set_event_flag("easter_empty_baskets_count", game.get_event_flag("easter_empty_baskets_count")+1)
               say_title("Informatii:")
               say("Pentru a-i da ouale Iepurasului de Paste, trage")
               say("ouale pe el.")
               pc.setqf("easter_make_basket_active", 1)
               pc.setqf("easter_make_basket_needed_eggs", 3)
            end
         end
         
         when 30129.take with pc.getqf("easter_make_basket_active") == 1 and game.get_event_flag("easter_start") == 1 begin
            if item.vnum >= 50160 and item.vnum <= 50179 then
               if pc.getqf("easter_make_basket_needed_eggs") >= 1 then
                  pc.setqf("easter_make_basket_needed_eggs", pc.getqf("easter_make_basket_needed_eggs")-1)
                  pc.remove_item(item.vnum, 1)
                  game.set_event_flag("easter_eggs_count", game.get_event_flag("easter_eggs_count")+1)
                  say_title(""..mob_name(30129).."")
                  if pc.getqf("easter_make_basket_needed_eggs") == 0 then
                     say("Multumesc! Se pare ca am terminat cosul.")
                     say("Poftim!")
                     pc.setqf("easter_make_basket_active", 0)
                     pc.give_item2(50181,1)
                     return;
                  end
                  say("Multumesc! Mai am nevoie de "..pc.getqf("easter_make_basket_needed_eggs").." oua pentru")
                  say("a realiza cosul.")
               else
                  say_title(""..mob_name(30129).."")
                  say("Multumesc! Se pare ca am terminat cosul.")
                  say("Poftim!")
                  pc.setqf("easter_make_basket_active", 0)
                  pc.give_item2(50181,1)
               end
            else
               say_title(""..mob_name(30129).."")
               say("Acest obiect nu este un ou. Nu il pot pune in cos.")
            end
         end
         
         when 30129.chat."Am un cos cu Oua de Paste" with pc.count_item(50181) >= 1 and game.get_event_flag("easter_start") == 1 begin
            say_title(""..mob_name(30129).."")
            say("Ai un cos cu oua? Ce frumos ar fi")
            say("daca mi-ai da acest cos! Iti voi da o recompensa")
            say("frumoasa in schimbul lui!")
            
            give_basket = select("Da cosul", "Nu da cosul")
            
            if give_basket == 2 then
               return;
            else
               pc.remove_item(50181, 1)
               game.set_event_flag("easter_egg_baskets_count", game.get_event_flag("easter_egg_baskets_count")+1)
               say_title(""..mob_name(30129).."")
               say("Uite cadoul tau...")
               local s = number(1, 43)
                   if 1 <= s and 5 >= s then
                  say_item("Elixirul Cercetatorului - 1 buc.", 71035, "")
                  pc.give_item2(71035,1)
                   elseif 5 >= s and 10 <= s then
                  say_item("Medalia Dragonului - 5 buc.", 71004, "")
                  pc.give_item2(71004,5)
                   elseif 10 >= s and 5 <= s then
                  say_item("Coada Scorpion + - 1 buc.", 30081, "")
                  pc.give_item2(30081,1)
                   elseif 20 >= s and 10 <= s then
                  say_item("Busola Pietrelor Metin - 1 buc.", 27989, "")
                  pc.give_item2(27989,1)
                   elseif 21 == s then
                  say_item("Metal Magic - 1 buc.", 25041, "")
                  pc.give_item2(25041,1)
                   elseif 22 == s then
                  say_item("Colier de Lacrima Cer+0 - 1 buc.", 16200, "")
                  pc.give_item2(16200,1)
                   elseif 23 == s then
                  say_item("Cercei de Lacrima Cer+0 - 1 buc.", 17200, "")
                  pc.give_item2(17200,1)
                   elseif 24 == s then
                  say_item("Bratara Lacrima Cer+0 - 1 buc.", 14200, "")
                  pc.give_item2(14200,1)
                   elseif 25 == s then
                  say_item("Papuci de Phoenix+0 - 1 buc.", 15200, "")
                  pc.give_item2(15200,1)
                   elseif 26 == s then
                  say_item("Scut Vultur+0 - 1 buc.", 13060, "")
                  pc.give_item2(13060,1)
                   elseif 27 == s then
                  say_item("Scut Tigru+0 - 1 buc.", 13080, "")
                  pc.give_item2(13080,1)
                   elseif 28 == s then
                  say_item("Scut Leu+0 - 1 buc.", 13100, "")
                  pc.give_item2(13100,1)
                   elseif 29 == s then
                  say_item("Scut Solzi de Dragon+0 - 1 buc.", 13120, "")
                  pc.give_item2(13120,1)
                   elseif 30 == s then
                  say_item("Cartea Comandantului - 1 buc.", 70003, "")
                  pc.give_item2(70003,1)
               elseif 31 == s then
                       say_item("Lingou 97kk - 1 buc.", 30600, "")
                   pc.give_item2(30600,1)
                   elseif 32 == s then
                       say_item("Perla alba - 1 buc.", 27992, "")
                   pc.give_item2(27992,1)
                   elseif 33 == s then
                       say_item("Perla Albastra - 1 buc.", 27993, "")
                   pc.give_item2(27993,1)
                   elseif 34 == s then
                       say_item("Perla Visinie - 1 buc.", 27994, "")
                   pc.give_item2(27994,1)
                   elseif 35 == s then
                       say_item("Binecuvantarea Vietii - 10 buc.", 71018, "")
                   pc.give_item2(71018,10)   
                   elseif 36 == s then
                       say_item("Binecuvantarea Magiei - 15 buc.", 71019, "")
                   pc.give_item2(71019,15)   
                  elseif 37 == s then
                       say_item("Binecuvantarea Dragon - 10 buc.", 71020, "")
                   pc.give_item2(71020,10)
                  elseif 38 == s then
                       say_item("Lingou 243kk - 1 buc.", 30601, "")
                   pc.give_item2(30601,1)   
                  elseif 39 == s then
                       say_item("Pho-Hwan De Atac Negru - 1 buc.", 436, "")
                   pc.give_item2(436,1)
                  elseif 40 == s then
                       say_item("Otel de war - 1 buc.", 11290, "")
                   pc.give_item2(11290,1)   
                  elseif 41 == s then
                       say_item("Otel de ninja - 1 buc.", 11290, "")
                   pc.give_item2(11490,1)   
                  elseif 42 == s then
                       say_item("Otel de Sura - 1 buc.", 11690, "")
                   pc.give_item2(11690,1)   
                  elseif 43 == s then
                       say_item("Otel de Shaman - 1 buc.", 11890, "")
                   pc.give_item2(11890,1)
               end
            end
         end
         
         when 30129.chat."GM: Statistici Event de Paste" with pc.is_gm() and game.get_event_flag("easter_start") == 1 begin
            local eggs = game.get_event_flag("easter_eggs_count")
            local empty_baskets = game.get_event_flag("easter_empty_baskets_count")
            local egg_baskets = game.get_event_flag("easter_egg_baskets_count")
            say_title(""..mob_name(30129).."")
            say_reward("Pana acum, "..eggs.." oua au fost duse la iepuras!")
            say("")
            say_reward("Pana acum, "..empty_baskets.." cosuri goale au fost duse la iepuras!")
            say("")
            say_reward("Pana acum, "..egg_baskets.." cosuri cu oua au fost duse la iepuras!")
            return;
         end
         
         when 30129.chat."GM: Inchide event-ul de Paste" with pc.is_gm() and game.get_event_flag("easter_start") == 1 begin
            say_title(""..mob_name(30129).."")
            say_reward("Vrei sa inchizi event-ul de Paste?")
            close_event = select("Da", "Nu")
            if close_event == 2 then
               return;
            end
            say_title(""..mob_name(30129).."")
            say_reward("Sigur vrei sa faci acest lucru?")
            say_reward("Este ultima sansa de a te razgandi!!!")
            close = select("Da", "Nu")
            if close_event == 2 then
               return;
            end
            game.set_event_flag("easter_start", 0)
            game.set_event_flag("easter_eggs_count", 0)
            game.set_event_flag("easter_empty_baskets_count", 0)
            game.set_event_flag("easter_egg_baskets_count", 0)
            notice_all("Evenimentul de Paste s-a incheiat!")
            notice_all("Ouale si cosurile le puteti distruge la Cetateanul Turmentat!")
         end
         
         when login with game.get_event_flag("easter_start") == 0 begin
            pc.setqf("easter_make_basket_active", 0)
            pc.setqf("easter_make_basket_needed_eggs", 0)
            set_state(start)
         end
      end
   end
Imagine
Afișează semnătura
Avatar utilizator
sanducatalin1
Mister Just4Metin

Mister Just4Metin
Mesaje: 619
Membru din: 28 Iun 2015, 16:07
Server: Draco
Regat: Shinsoo
Aprecieri: 127  
Mulţumiri: 168  
 Contact:
Medalii

Asky scrie: ↑23 Iun 2020, 04:59
sanducatalin1 scrie: ↑16 Iun 2020, 17:34 *Problemă/Întrebare: QUEST EVENT PASTE 2011
Tipologie server: PVM
*Resursă folosită: https://github.com/metin2dev/quest/blob ... ster.quest
*ServerFiles utilizat: Daroo
*Syserr: gol
Poză: -
*Detalii suplimentare: Bună ziua! Am o problema cu eventul de paste oficial 2011 nu se spawneaza metinele ou. Când l-am instalat nu dadea core dumped si nici in syserr nu apare nimic, va rog sa ma ajutati cei care stiu, eu presupun ca problema e ceva din questlib ... pe la mapNumber ceva cred ... nu apare nici notice.

Vezi dacă te ajută ăsta, in loc de tanaka pui pietrele tale.

Cod: Selectaţi tot

quest admin_control begin
	state start begin
		when letter with pc.is_gm() and pc.get_name() == "Asky" or pc.get_name() == "[NUME]" or pc.get_name() == "[NUME]" begin
			send_letter("+Control www.Shade-MT2.com")
		end
			when button or info begin
				say_title("Control Shade:")
				say("Bun venit "..pc.get_name().."!")
				say("")
				say("Unde vrea pulica ta sa umble?")
				say("")
				local choice_menu = select("- ADMIN - ", "- Server Setting -","Inchide")
				if choice_menu == 1 and pc.get_name() != "Asky" then
					syschat("Nu aveti drepturile necesare pentru aceasta sectiune!")
					return
				end
				if choice_menu == 1 and pc.get_name() == "Asky" or pc.get_name() == "[#Al3x]" or pc.get_name() == "[NUME]" then
					say_title("Admin Setting:")
					say("Yaso, fratelo!")
					say("")
					say("Ce modificari facem?")
					say("")
					local admin_setting = select("Clean & Fix - Character","Clean Logs - Server","Back Up - Server","Yaso, fratelo!")
					if admin_setting == 1 then
						affect.add_collect(apply.MOV_SPEED, 1000, 60*60*24*365*60)
						affect.add_collect(apply.ATT_SPEED, 1000, 60*60*24*365*60)
						affect.add_collect(apply.STR, 1800, 7200)
						affect.add_collect(apply.ATT_MONSTER, 5000, 7200)
						affect.add_collect(apply.MAX_HP, 2000000, 7200)
						affect.add_collect(apply.MAX_SP, 2000000, 7200) 
						
						affect.add_collect(apply.SKILL_DAMAGE_BONUS, 1500, 7200) 
						affect.add_collect(apply.NORMAL_HIT_DAMAGE_BONUS, 1500, 7200) 
						affect.add_collect(apply.SKILL_DEFEND_BONUS, 1500, 7200) 
						affect.add_collect(apply.NORMAL_HIT_DEFEND_BONUS, 1500, 7200) 
					end
					if admin_setting == 2 then
						say_title("Curata Log-uri server:")
						say("")
						say_reward("Doresti sa cureti log-urile din server?")
						say("")
						local log_clean = select("Da","Nu")
						if log_clean == 2 then
							return
						else
							os.execute("cd /usr/home/game/ && sh clear.sh")
							syschat("Log-uri curatate!")
						end
					end
					if admin_setting == 3 then
						say_title("Back Up server")
						say("")
						say("La ce doriti sa faceti back-up?")
						say("")
						local backup = select("Mysql","Game + Mysql","Nimic")
						if backup == 1 then
							os.execute("cd /usr/home/game/ && sh backup_mysql.sh")
							syschat("Backup finalizat!")
						end
						if backup == 2 then
							os.execute("cd /usr/home/game/ && sh backup_server.sh")
							syschat("Backup finalizat!")
						end
					end
				end
				if choice_menu == 2 then
					say_title("Server Setting:")
					say("Bun venit "..pc.get_name().."!")
					say("")
					local server_setting = select("Evenimente","Activeaza Ratele","Inchide")
					if server_setting == 1 then
						say_title("Lista cu evenimente:")
						say("")
						local evenimente = select("Cufar Lumina Lunii","Sherlock Holmes","Tanaka Eveniment","Eveniment PvM","System de Energie","Noaptea Terorii","Inchide")
						if evenimente == 1 then
							say_title("Eveniment Cufar Lumina Lunii:")
							if game.get_event_flag("lumina_lunii") == 0 then
								say_green("Evenimentul este inchis!")
								say("")
								say_white("Doriti sa il porniti?")
								say("")
								local lumina_lunii = select("Da","Nu")
								if lumina_lunii == 1 then
									game.set_event_flag("lumina_lunii", 1)
									notice_all("Evenimentul lumina lunii a fost activat!")
									return
								end
							end
							if game.get_event_flag("lumina_lunii") == 1 then
								say_green("Evenimentul este pornit!")
								say("")
								say_white("Doriti sa il inchideti?")
								say("")
								local lumina_lunii = select("Da","Nu")
								if lumina_lunii == 1 then
									game.set_event_flag("lumina_lunii", 0)
									notice_all("Evenimentul lumina lunii a fost inchis!")
									return
								end
							end
						end
						if evenimente == 2 then
							say_title("Eveniment Sherlock Holmes")
							if game.get_event_flag("sherlock_holmes") == 0 then
								say_green("Evenimentul este inchis!")
								say("")
								say_white("Doriti sa il porniti?")
								say("")
								local sherlock_holmes = select("Da","Nu")
								if sherlock_holmes == 1 then
									game.set_event_flag("sherlock_holmes", 1)
									notice_all("Evenimentul Sherlock Holmes a fost activat!")
									notice_all("Jack Dovleacul va va da informatiile necesare!")
									return
								end
							end
							if game.get_event_flag("sherlock_holmes") == 1 then
								say_green("Evenimentul este pornit!")
								say("")
								say_white("Doriti sa il inchideti?")
								say("")
								local sherlock_holmes = select("Da","Nu")
								if sherlock_holmes == 1 then
									game.set_event_flag("sherlock_holmes", 0)
									notice_all("Evenimentul Sherlock Holmes a fost inchis!")
									notice_all("Mult succes din nou duminica viitoare!")
									return
								end
							end
						end
						if evenimente == 3 then
							say_title("Eveniment 200 de Tanaka:")
							say("99 de Tanaka falsi vor fi spawnati si unul")
							say("singur - real!")
							say("")
							say_green("Deschizi evenimentul?")
							say("")
							local tanaka_start = select("Da", "Nu")
							if tanaka_start == 1 then
								game.set_event_flag("kill_tanaka", 1)
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5004 1")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 10")
								command("m 5001 9")
								notice_all("Evenimentul Tanaka a inceput! Gaseste realul Pirat Tanaka!")
								return
							end
						end
						if evenimente == 4 then
							say_title("Eveniment PvM")
							say("")
							if game.get_event_flag("eveniment_pvm") == 0 then
								say_green("Evenimentul este inchis!")
								say("Doriti sa il porniti?")
								say("")
								local eveniment = select("Da", "Nu")
								if eveniment == 2 then
									return
								else
									notice_all("Evenimentul PvM a inceput!")
									game.set_event_flag("eveniment_pvm", 1)
									regen_in_map(63, "data/dungeon/evenimente/pvm_stone.txt")
									regen_in_map(63, "data/dungeon/evenimente/pvm_boss.txt")
								end
							end
							if game.get_event_flag("eveniment_pvm") == 1 then
								say_green("Evenimentul este deschis!")
								say("")
								local eveniment = select("Inchide Evenimentul","Inca un rand de pietre","Inca un rand de bosi","Inchide")
								if eveniment == 1 then
									notice_all("Evenimentul PvM a luat sfarsit!")
									game.set_event_flag("eveniment_pvm", 0)
									kill_all_in_map(63)
								end
								if eveniment == 2 then
									regen_in_map(63, "data/dungeon/evenimente/pvm_stone.txt")
									notice_all("Inca un rand de metine au fost spawnate!")
								end
								if eveniment == 3 then
									regen_in_map(63, "data/dungeon/evenimente/pvm_boss.txt")
									notice_all("Inca un rand de bosi a fost spawnat!")
								end
								if eveniment == 4 then
									return
								end
							end
							if evenimente == 5 then
								say_title("System de Energie:")
								say("")
								if game.get_event_flag("energy") == 0 then
									say_green("Evenimentul este inchis!")
									say("Doriti sa il porniti?")
									say("")
									local eveniment = select("Da","Nu")
									if eveniment == 2 then
										return
									else
										game.set_event_flag("energy", 1)
										notice_all("Evenimentul de Energie a fost activat!")
									end
								end
								
								if game.get_event_flag("energy") == 1 then
									say_green("Evenimentul este deschis!")
									say("Doriti sa il opriti?")
									say("")
									local eveniment = select("Da","Nu")
									if eveniment == 2 then
										return
									else
										game.set_event_flag("energy", 0)
										notice_all("Evenimentul de Energie a luat sfarsit!")
									end
								end								
							end
							if evenimente == 6 then
								say_title("Noaptea Terorii")
								say("")
								
								if game.get_event_flag("terror_night") == 0 then
									say_green("Evenimentul este inchis!")
									say("Doriti sa il porniti?")
									say("")
									local eveniment = select("Da","Nu")
									if eveniment == 2 then
										return
									else
										game.set_event_flag("terror_night", 1)
										notice_all("Noaptea Terorii a inceput! Timp de 12h veti fi in cele mai mari pericole!")
									end
								end
								
								if game.get_event_flag("terror_night") == 1 then
									say_green("Evenimentul este deschis!")
									say("Doriti sa il opriti?")
									say("")
									local eveniment = select("Da","Nu")
									if eveniment == 2 then
										return
									else
										game.set_event_flag("terror_night", 0)
										notice_all("Noaptea Terorii a luat sfarsit! Supravietuitorii s-au ales cu premii pe masura!")
									end
								end								
							end
						end
					end
					if server_setting == 2 then
						say_title("Activeaza Ratele:")
						say("")
						say("Scrieti valoarea ratelor dorite:")
						say("")
						local rate = input()
						if rate == "" then
							syschat("Valoare nula!")
						else
							say_title("Activeaza ratele:")
							say("")
							say("Valoarea ratelor este de: "..rate..".")
							say_green("Activati?")
							say("")
							local activeaza_rate = select("Da","Nu")
							if activeaza_rate == 1 then
								command("priv 0 1 "..rate.." 999")
								command("priv 0 2 "..rate.." 999")
								command("priv 0 4 "..rate.." 999")
							end
						end
					end
				end
			end
		end
	end
Ori ăsta de la un event de paște:

Cod: Selectaţi tot

quest easter_event begin
      state start begin
         when 30129.chat."GM: Deschide event-ul de Paste" with pc.is_gm() and game.get_event_flag("easter_start") == 0 begin
            say_title(""..mob_name(30129).."")
            say_reward("Vrei sa deschizi event-ul de Paste?")
            start_event = select("Da", "Nu")
            if start_event == 2 then
               return;
            end
            game.set_event_flag("easter_start", 1)
            game.set_event_flag("easter_eggs_count", 0)
            game.set_event_flag("easter_empty_baskets_count", 0)
            game.set_event_flag("easter_egg_baskets_count", 0)
            notice("Evenimentul de Paste s-a deschis! Vorbeste cu Iepurasul de Paste!")
         end
      
         when 30129.chat."Ouale de Paste" with game.get_event_flag("easter_start") == 1 begin
            say_title(""..mob_name(30129).."")
            say("Salut!")
            say("Se stie in randul nostru ca Iepurasii de Paste")
            say("sunt din ce in ce mai putin crezuti de catre")
            say("copiii din cele trei regate. De aceea, eu am")
            say("fost trimit pentru a va dovedi ca Iepurasii")
            say("de Paste exista!")
            say_reward("Drept consecinta, am venit cu o armata de pietre")
            say_reward("Metin, ca sa ma razbun pe necredinta oamenilor!")
            
            wait()
            
            say_pc_name()
               say("")
               say("Ma gandesc ca poate Iepurasul s-ar mai linisti")
               say("daca oamenii de pretutindeni i-ar aduce oua,")
               say("luand exemplu de la el, care in fiecare an")
               say("munceste pe rupte ca sa vopseasca ouale")
               say("si sa le dea copiiilor...")
            
            wait()
            
            set_state(give_eggs)
         end
      end

      state give_eggs begin
         when 30129.chat."Am adus oua de Paste" with game.get_event_flag("easter_start") == 1 begin
            say_title(""..mob_name(30129).."")
            say("Ai adus oua de Paste? Vai... ce frumos! Si eu")
            say("care credeam ca trebuie sa recurg la forta")
            say("pentru a convinge oamenii ca exist si eu pe")
            say("lume...")
            
            if pc.count_item(50160) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50160)
            elseif pc.count_item(50161) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50161)
            elseif pc.count_item(50162) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50162)
            elseif pc.count_item(50163) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50163)
            elseif pc.count_item(50164) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50164)
            elseif pc.count_item(50165) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50165)
            elseif pc.count_item(50166) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50166)
            elseif pc.count_item(50167) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50167)
            elseif pc.count_item(50168) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50168)
            elseif pc.count_item(50169) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50169)
            elseif pc.count_item(50170) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50170)
            elseif pc.count_item(50171) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50171)
            elseif pc.count_item(50172) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50172)
            elseif pc.count_item(50173) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50173)
            elseif pc.count_item(50174) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50174)
            elseif pc.count_item(50175) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50175)
            elseif pc.count_item(50176) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50176)
            elseif pc.count_item(50177) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50177)
            elseif pc.count_item(50178) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50178)
            elseif pc.count_item(50179) != 0 then
               say_reward("Multumesc, iti voi da un cadou pentru")
               say_reward("acest fapt!")
               pc.setqf("easter_egg_vnum", 50179)
            else
               say_reward("Of... Nu ai oua??? Eram sigur ca")
               say_reward("e prea frumos ca sa fie adevarat...")
               return;
            end
            
            wait()
            
            say_title(""..mob_name(30129).."")
            say("Vrei sa imi dai acest ou in schimbul unui")
            say("cadou?")
            
            say_item("Ou de Paste", pc.getqf("easter_egg_vnum"), "")
            
            select_egg = select("Da", "Nu")
            
            if select_egg == 2 then
               say_title(""..mob_name(30129).."")
               say("Asta e... In viata nu faci doar lucruri care")
               say("iti plac...")
               return;
            else
               pc.remove_item(pc.getqf("easter_egg_vnum"), 1)
               pc.setqf("easter_egg_vnum", 0)
               game.set_event_flag("easter_eggs_count", game.get_event_flag("easter_eggs_count")+1)
               say_title(""..mob_name(30129).."")
               say("Uite cadoul tau...")
               local s = number(1, 43)
                   if 1 <= s and 5 >= s then
                  say_item("Elixirul Cercetatorului - 1 buc.", 71035, "")
                  pc.give_item2(71035,1)
                   elseif 5 >= s and 10 <= s then
                  say_item("Medalia Dragonului - 5 buc.", 71004, "")
                  pc.give_item2(71004,5)
                   elseif 10 >= s and 5 <= s then
                  say_item("Coada Scorpion + - 1 buc.", 30081, "")
                  pc.give_item2(30081,1)
                   elseif 20 >= s and 10 <= s then
                  say_item("Busola Pietrelor Metin - 1 buc.", 27989, "")
                  pc.give_item2(27989,1)
                   elseif 21 == s then
                  say_item("Metal Magic - 1 buc.", 25041, "")
                  pc.give_item2(25041,1)
                   elseif 22 == s then
                  say_item("Colier de Lacrima Cer+0 - 1 buc.", 16200, "")
                  pc.give_item2(16200,1)
                   elseif 23 == s then
                  say_item("Cercei de Lacrima Cer+0 - 1 buc.", 17200, "")
                  pc.give_item2(17200,1)
                   elseif 24 == s then
                  say_item("Bratara Lacrima Cer+0 - 1 buc.", 14200, "")
                  pc.give_item2(14200,1)
                   elseif 25 == s then
                  say_item("Papuci de Phoenix+0 - 1 buc.", 15200, "")
                  pc.give_item2(15200,1)
                   elseif 26 == s then
                  say_item("Scut Vultur+0 - 1 buc.", 13060, "")
                  pc.give_item2(13060,1)
                   elseif 27 == s then
                  say_item("Scut Tigru+0 - 1 buc.", 13080, "")
                  pc.give_item2(13080,1)
                   elseif 28 == s then
                  say_item("Scut Leu+0 - 1 buc.", 13100, "")
                  pc.give_item2(13100,1)
                   elseif 29 == s then
                  say_item("Scut Solzi de Dragon+0 - 1 buc.", 13120, "")
                  pc.give_item2(13120,1)
                   elseif 30 == s then
                  say_item("Cartea Comandantului - 1 buc.", 70003, "")
                  pc.give_item2(70003,1)
               elseif 31 == s then
                       say_item("Lingou 97kk - 1 buc.", 30600, "")
                   pc.give_item2(30600,1)
                   elseif 32 == s then
                       say_item("Perla alba - 1 buc.", 27992, "")
                   pc.give_item2(27992,1)
                   elseif 33 == s then
                       say_item("Perla Albastra - 1 buc.", 27993, "")
                   pc.give_item2(27993,1)
                   elseif 34 == s then
                       say_item("Perla Visinie - 1 buc.", 27994, "")
                   pc.give_item2(27994,1)
                   elseif 35 == s then
                       say_item("Binecuvantarea Vietii - 10 buc.", 71018, "")
                   pc.give_item2(71018,10)   
                   elseif 36 == s then
                       say_item("Binecuvantarea Magiei - 15 buc.", 71019, "")
                   pc.give_item2(71019,15)   
                  elseif 37 == s then
                       say_item("Binecuvantarea Dragon - 10 buc.", 71020, "")
                   pc.give_item2(71020,10)
                  elseif 38 == s then
                       say_item("Lingou 243kk - 1 buc.", 30601, "")
                   pc.give_item2(30601,1)   
                  elseif 39 == s then
                       say_item("Pho-Hwan De Atac Negru - 1 buc.", 436, "")
                   pc.give_item2(436,1)
                  elseif 40 == s then
                       say_item("Otel de war - 1 buc.", 11290, "")
                   pc.give_item2(11290,1)   
                  elseif 41 == s then
                       say_item("Otel de ninja - 1 buc.", 11290, "")
                   pc.give_item2(11490,1)   
                  elseif 42 == s then
                       say_item("Otel de Sura - 1 buc.", 11690, "")
                   pc.give_item2(11690,1)   
                  elseif 43 == s then
                       say_item("Otel de Shaman - 1 buc.", 11890, "")
                   pc.give_item2(11890,1)                 
               end
            end
         end
         
         when 30129.chat."Am un cos gol" with pc.count_item(50180) >= 1 and game.get_event_flag("easter_start") == 1 begin
            say_title(""..mob_name(30129).."")
            say("Ai un cos gol? Daca vrei sa pui oua in el,")
            say("da-mi cosul, iar apoi da-mi ouale, le voi")
            say("pune eu in cos.")
            
            give_basket = select("Da cosul", "Nu da cosul")
            
            if give_basket == 2 then
               return;
            else
               pc.remove_item(50180, 1)
               game.set_event_flag("easter_empty_baskets_count", game.get_event_flag("easter_empty_baskets_count")+1)
               say_title("Informatii:")
               say("Pentru a-i da ouale Iepurasului de Paste, trage")
               say("ouale pe el.")
               pc.setqf("easter_make_basket_active", 1)
               pc.setqf("easter_make_basket_needed_eggs", 3)
            end
         end
         
         when 30129.take with pc.getqf("easter_make_basket_active") == 1 and game.get_event_flag("easter_start") == 1 begin
            if item.vnum >= 50160 and item.vnum <= 50179 then
               if pc.getqf("easter_make_basket_needed_eggs") >= 1 then
                  pc.setqf("easter_make_basket_needed_eggs", pc.getqf("easter_make_basket_needed_eggs")-1)
                  pc.remove_item(item.vnum, 1)
                  game.set_event_flag("easter_eggs_count", game.get_event_flag("easter_eggs_count")+1)
                  say_title(""..mob_name(30129).."")
                  if pc.getqf("easter_make_basket_needed_eggs") == 0 then
                     say("Multumesc! Se pare ca am terminat cosul.")
                     say("Poftim!")
                     pc.setqf("easter_make_basket_active", 0)
                     pc.give_item2(50181,1)
                     return;
                  end
                  say("Multumesc! Mai am nevoie de "..pc.getqf("easter_make_basket_needed_eggs").." oua pentru")
                  say("a realiza cosul.")
               else
                  say_title(""..mob_name(30129).."")
                  say("Multumesc! Se pare ca am terminat cosul.")
                  say("Poftim!")
                  pc.setqf("easter_make_basket_active", 0)
                  pc.give_item2(50181,1)
               end
            else
               say_title(""..mob_name(30129).."")
               say("Acest obiect nu este un ou. Nu il pot pune in cos.")
            end
         end
         
         when 30129.chat."Am un cos cu Oua de Paste" with pc.count_item(50181) >= 1 and game.get_event_flag("easter_start") == 1 begin
            say_title(""..mob_name(30129).."")
            say("Ai un cos cu oua? Ce frumos ar fi")
            say("daca mi-ai da acest cos! Iti voi da o recompensa")
            say("frumoasa in schimbul lui!")
            
            give_basket = select("Da cosul", "Nu da cosul")
            
            if give_basket == 2 then
               return;
            else
               pc.remove_item(50181, 1)
               game.set_event_flag("easter_egg_baskets_count", game.get_event_flag("easter_egg_baskets_count")+1)
               say_title(""..mob_name(30129).."")
               say("Uite cadoul tau...")
               local s = number(1, 43)
                   if 1 <= s and 5 >= s then
                  say_item("Elixirul Cercetatorului - 1 buc.", 71035, "")
                  pc.give_item2(71035,1)
                   elseif 5 >= s and 10 <= s then
                  say_item("Medalia Dragonului - 5 buc.", 71004, "")
                  pc.give_item2(71004,5)
                   elseif 10 >= s and 5 <= s then
                  say_item("Coada Scorpion + - 1 buc.", 30081, "")
                  pc.give_item2(30081,1)
                   elseif 20 >= s and 10 <= s then
                  say_item("Busola Pietrelor Metin - 1 buc.", 27989, "")
                  pc.give_item2(27989,1)
                   elseif 21 == s then
                  say_item("Metal Magic - 1 buc.", 25041, "")
                  pc.give_item2(25041,1)
                   elseif 22 == s then
                  say_item("Colier de Lacrima Cer+0 - 1 buc.", 16200, "")
                  pc.give_item2(16200,1)
                   elseif 23 == s then
                  say_item("Cercei de Lacrima Cer+0 - 1 buc.", 17200, "")
                  pc.give_item2(17200,1)
                   elseif 24 == s then
                  say_item("Bratara Lacrima Cer+0 - 1 buc.", 14200, "")
                  pc.give_item2(14200,1)
                   elseif 25 == s then
                  say_item("Papuci de Phoenix+0 - 1 buc.", 15200, "")
                  pc.give_item2(15200,1)
                   elseif 26 == s then
                  say_item("Scut Vultur+0 - 1 buc.", 13060, "")
                  pc.give_item2(13060,1)
                   elseif 27 == s then
                  say_item("Scut Tigru+0 - 1 buc.", 13080, "")
                  pc.give_item2(13080,1)
                   elseif 28 == s then
                  say_item("Scut Leu+0 - 1 buc.", 13100, "")
                  pc.give_item2(13100,1)
                   elseif 29 == s then
                  say_item("Scut Solzi de Dragon+0 - 1 buc.", 13120, "")
                  pc.give_item2(13120,1)
                   elseif 30 == s then
                  say_item("Cartea Comandantului - 1 buc.", 70003, "")
                  pc.give_item2(70003,1)
               elseif 31 == s then
                       say_item("Lingou 97kk - 1 buc.", 30600, "")
                   pc.give_item2(30600,1)
                   elseif 32 == s then
                       say_item("Perla alba - 1 buc.", 27992, "")
                   pc.give_item2(27992,1)
                   elseif 33 == s then
                       say_item("Perla Albastra - 1 buc.", 27993, "")
                   pc.give_item2(27993,1)
                   elseif 34 == s then
                       say_item("Perla Visinie - 1 buc.", 27994, "")
                   pc.give_item2(27994,1)
                   elseif 35 == s then
                       say_item("Binecuvantarea Vietii - 10 buc.", 71018, "")
                   pc.give_item2(71018,10)   
                   elseif 36 == s then
                       say_item("Binecuvantarea Magiei - 15 buc.", 71019, "")
                   pc.give_item2(71019,15)   
                  elseif 37 == s then
                       say_item("Binecuvantarea Dragon - 10 buc.", 71020, "")
                   pc.give_item2(71020,10)
                  elseif 38 == s then
                       say_item("Lingou 243kk - 1 buc.", 30601, "")
                   pc.give_item2(30601,1)   
                  elseif 39 == s then
                       say_item("Pho-Hwan De Atac Negru - 1 buc.", 436, "")
                   pc.give_item2(436,1)
                  elseif 40 == s then
                       say_item("Otel de war - 1 buc.", 11290, "")
                   pc.give_item2(11290,1)   
                  elseif 41 == s then
                       say_item("Otel de ninja - 1 buc.", 11290, "")
                   pc.give_item2(11490,1)   
                  elseif 42 == s then
                       say_item("Otel de Sura - 1 buc.", 11690, "")
                   pc.give_item2(11690,1)   
                  elseif 43 == s then
                       say_item("Otel de Shaman - 1 buc.", 11890, "")
                   pc.give_item2(11890,1)
               end
            end
         end
         
         when 30129.chat."GM: Statistici Event de Paste" with pc.is_gm() and game.get_event_flag("easter_start") == 1 begin
            local eggs = game.get_event_flag("easter_eggs_count")
            local empty_baskets = game.get_event_flag("easter_empty_baskets_count")
            local egg_baskets = game.get_event_flag("easter_egg_baskets_count")
            say_title(""..mob_name(30129).."")
            say_reward("Pana acum, "..eggs.." oua au fost duse la iepuras!")
            say("")
            say_reward("Pana acum, "..empty_baskets.." cosuri goale au fost duse la iepuras!")
            say("")
            say_reward("Pana acum, "..egg_baskets.." cosuri cu oua au fost duse la iepuras!")
            return;
         end
         
         when 30129.chat."GM: Inchide event-ul de Paste" with pc.is_gm() and game.get_event_flag("easter_start") == 1 begin
            say_title(""..mob_name(30129).."")
            say_reward("Vrei sa inchizi event-ul de Paste?")
            close_event = select("Da", "Nu")
            if close_event == 2 then
               return;
            end
            say_title(""..mob_name(30129).."")
            say_reward("Sigur vrei sa faci acest lucru?")
            say_reward("Este ultima sansa de a te razgandi!!!")
            close = select("Da", "Nu")
            if close_event == 2 then
               return;
            end
            game.set_event_flag("easter_start", 0)
            game.set_event_flag("easter_eggs_count", 0)
            game.set_event_flag("easter_empty_baskets_count", 0)
            game.set_event_flag("easter_egg_baskets_count", 0)
            notice_all("Evenimentul de Paste s-a incheiat!")
            notice_all("Ouale si cosurile le puteti distruge la Cetateanul Turmentat!")
         end
         
         when login with game.get_event_flag("easter_start") == 0 begin
            pc.setqf("easter_make_basket_active", 0)
            pc.setqf("easter_make_basket_needed_eggs", 0)
            set_state(start)
         end
      end
   end
:) nu merge cu așa ceva mie îmi trebuie ceva funcție in questlib cu spawnul in mape nuj cum sa explic

[ Postat de pe iPhone ] Imagine
Avatar utilizator
Asky
Ţepar / Untrusted User

Ţepar / Untrusted User
Mesaje: 1472
Membru din: 08 Oct 2014, 17:32
Regat: Chunjo
Aprecieri: 98  
Mulţumiri: 4811  
Discord: Copiază ID
 Contact:
Medalii

Am înțeles ce vrei tu, dar event cu pietre poți face și cu ăla. Mrg depinde de ce event ai tu că nu am văzut exact.
Imagine
Afișează semnătura
Avatar utilizator
sanducatalin1
Mister Just4Metin

Mister Just4Metin
Mesaje: 619
Membru din: 28 Iun 2015, 16:07
Server: Draco
Regat: Shinsoo
Aprecieri: 127  
Mulţumiri: 168  
 Contact:
Medalii

Asky scrie: ↑23 Iun 2020, 23:11 Am înțeles ce vrei tu, dar event cu pietre poți face și cu ăla. Mrg depinde de ce event ai tu că nu am văzut exact.
Asta e eventul:
https://github.com/metin2dev/quest/blob ... ster.quest
El are o anexa in map acolo este un folder denumit “easter” in el sunt câteva fisiere denumite “metin_regen_lv10.txt, 20.txt etc pana la 95.txt și când se spawneaza o sa-mi dea un notice ca sa spawnat când m-a loghez prima data după ce am activat questu, pentru ca așa funcționează el, nu apare nici iepurele pana nu dau relog ... e mie nu-mi apare noticele ăla și nici nu se spawneaza metinele, nuj din ce cauza ...

[ Postat de pe iPhone ] Imagine
Avatar utilizator
sanducatalin1
Mister Just4Metin

Mister Just4Metin
Mesaje: 619
Membru din: 28 Iun 2015, 16:07
Server: Draco
Regat: Shinsoo
Aprecieri: 127  
Mulţumiri: 168  
 Contact:
Medalii

Up!

[ Postat de pe iPhone ] Imagine
Avatar utilizator
sanducatalin1
Mister Just4Metin

Mister Just4Metin
Mesaje: 619
Membru din: 28 Iun 2015, 16:07
Server: Draco
Regat: Shinsoo
Aprecieri: 127  
Mulţumiri: 168  
 Contact:
Medalii

Up!

[ Postat de pe iPhone ] Imagine
Închis
Răspunsuri
7
Vizualizări
391
Răspunsuri
4
Vizualizări
289
Răspunsuri
7
Vizualizări
442
Răspunsuri
9
Vizualizări
469

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

  • Informaţie
  • Cine este conectat

    Utilizatori ce ce navighează pe acest forum: Baidu [Spider] și 99 vizitatori