Schimbare questuri din misiune pe npc

Înainte de a posta o problemă, caută în acest forum și poate găsești rezolvare.
Închis
Avatar utilizator
Marius Dragomir
Membru Club

Membru Club
Mesaje: 1020
Membru din: 13 Noi 2017, 21:32
Server: HellHound
Regat: Jinno
Aprecieri: 499  
Mulţumiri: 1211  
Discord: Copiază ID
Medalii

*Problemă: Vreau sa schimb questul de activare al eventurilor / ratelor pe npc
Tipologie server: PVM Mediu
*Resursă folosită: -
*ServerFiles utilizat: propriu
*Syserr: nu
Poză: nu
*Detalii suplimentare: O sa las si o parte din questuri, sunt de ajuns 2-3 exemple ca sa imi dau seama ce trebuie sa fac eu, am incercat sa le fac din send letter, pe when 9004.chat"Nume Event" etc, dar nu mai pot seta rata de drop in cazul cuferelor clar de luna, mingiilor de fotbal si prin urmare eventul nu functioneaza
Campionat Mondial
quest eveniment_campionat_mondial begin
    state start begin
	
        when login begin
            if game.get_event_flag("eveniment_campionat_mondial") == 1 then			
                notice("[BloodMoon] Evenimentul campionatului mondial este activ.")				
            end
        end
				
        when kill with not npc.is_pc() and game.get_event_flag("eveniment_campionat_mondial") == 1 begin
                        local chance = number(1, 500)
                        local chance_max = game.get_event_flag("campionat_sansa_drop")
                      
					if chance <= chance_max then						
                        pc.give_item2(50096, 1)							
				else							
			end
		end
		

  		when letter with pc.is_gm() begin
			send_letter("+ GM: Eveniment campionat mondial ")
		end
		
		when button or info begin
				
		if pc.is_gm() then
			
		say_gm_title ( "Eveniment campionat mondial: " )
		say_gm ( "Ce doresti sã faci?[ENTER]" )		
		if game.get_event_flag("eveniment_campionat_mondial") == 0 then
		say_kingdom_red ( "Evenimentul este oprit.[ENTER]" )		
		else		
		say_kingdom_yellow ( "Evenimentul este pornit.[ENTER]" )	
		end

			local sname = input()
            if sname == "O_parola" then 
			
			
				say_gm_title ( "PANOU DE ADMINISTRARE" )		
				say_gm ( "Selecteazã o optiune din meniul de de mai jos.[ENTER]" )
				
		   local s=select ( "Porneste evenimentul", "Opreste evenimentul", "Sansã aruncare", "Iesire" )
		   	   
		if s==1 then
		
				notice_all("[BloodMoon]			 Evenimentul campionatului mondial a început.")						
				game.set_event_flag("eveniment_campionat_mondial", 1)					
                char_log(0, "eveniment_campionat_mondial_start from" ..pc.get_name())
				
			say_gm_title ( "Eveniment campionat mondial: " )
			say_gm ( "Evenimentul a fost pornit.[ENTER]" )
		
				wait ()
				
				send_letter("+ GM: Eveniment campionat mondial ")
				return
					
        elseif s==2 then
								
				notice_all("[BloodMoon]			: Evenimentul campionatului mondial a luat sfârsit.")
				game.set_event_flag("eveniment_campionat_mondial", 0)					
                char_log(0, "eveniment_campionat_mondial_end from" ..pc.get_name())
				
			say_gm_title ( "Eveniment campionat mondial: " )
			say_gm ( "Evenimentul a luat sfârsit.[ENTER]" )
					
				wait ()
				
				send_letter("+ GM: Eveniment campionat mondial ")
				return
						
		elseif s==3 then

				say_gm_title ( "Eveniment campionat mondial: " )
				say_gm ( "Cât de mare doresti sã fie sansa de aruncare?[ENTER]" )
				say_orange ( "Între 1-500:[ENTER]" )
				
					local new_chance = tonumber(input())
					if new_chance < 0 or new_chance > 500 then
				
				say_gm_title ( "Eveniment campionat mondial: " )
				say_gm ( "Valorile introduse nu sunt bune.[ENTER]" )
				
				wait ()
				
				send_letter("+ GM: Eveniment campionat mondial ")
				return
	
                else
								
                    char_log(0, "eveniment_campionat_mondial_chance from" ..pc.get_name().. " to " ..new_chance.. "%")					
                    game.set_event_flag ( "campionat_sansa_drop", new_chance)
					
                say_gm_title ( "Eveniment campionat mondial: " )
                say_orange ("Sansa a fost modificatã; sansã " ..new_chance.. "%.[ENTER]")
				
					wait ()		
					
					send_letter("+ GM: Eveniment campionat mondial ")
					return
							
					end	
					
				elseif s==4 then	
				send_letter("+ GM: Eveniment campionat mondial ")
				return
				
				end
				end
			end
		end
    end
end
Halloween
quest eveniment_halloween begin
    state start begin
	
        when login begin
            if game.get_event_flag("eveniment_halloween") == 1 then			
                notice("[BloodMoon] Evenimentul de halloween este activ.")				
            end
        end
				
        when kill with not npc.is_pc() and game.get_event_flag("eveniment_halloween") == 1 begin
                        local chance = number(1, 500)
                        local chance_max = game.get_event_flag("halloween_sansa_drop")
                      
						if chance <= chance_max then
						local r = math.random(1, 2) 
						if 1==r then 
							pc.give_item2(50095, 1) 
						elseif 2==r then 
							pc.give_item2(30322, 1)  
						else
                        end
                    else
                    end
					end
		

  		when letter with pc.is_gm() begin
			send_letter("+ GM: Eveniment halloween ")
		end
		
		when button or info begin
				
		if pc.is_gm() then
			
		say_gm_title ( "Eveniment halloween:" )
		say_gm ( "Ce doresti sã faci?[ENTER]" )		
		if game.get_event_flag("eveniment_halloween") == 0 then
		say_kingdom_red ( "Evenimentul este oprit.[ENTER]" )		
		else		
		say_kingdom_yellow ( "Evenimentul este pornit.[ENTER]" )	
		end
				
			local sname = input()
            if sname == "a_doua_parola" then 
			
			
				say_gm_title ( "PANOU DE ADMINISTRARE" )		
				say_gm ( "Selecteazã o optiune din meniul de de mai jos.[ENTER]" )

		   local s=select ( "Porneste evenimentul", "Opreste evenimentul", "Sansã aruncare", "Iesire" )
		   	   
		if s==1 then
		
				notice_all("[BloodMoon] Evenimentul de halloween a început.")						
				game.set_event_flag("eveniment_halloween", 1)					
                char_log(0, "eveniment_halloween_start from" ..pc.get_name())
				
			say_gm_title ( "Eveniment halloween:" )
			say_gm ( "Evenimentul a fost pornit.[ENTER]" )
		
				wait ()
				
				send_letter("+ GM: Eveniment halloween ")
				return
					
        elseif s==2 then
								
				notice_all("[BloodMoon]: Evenimentul de halloween a luat sfârsit.")
				game.set_event_flag("eveniment_halloween", 0)					
                char_log(0, "eveniment_halloween_end from" ..pc.get_name())
				
			say_gm_title ( "Eveniment halloween:" )
			say_gm ( "Evenimentul a luat sfârsit.[ENTER]" )
					
				wait ()
				
				send_letter("+ GM: Eveniment halloween ")
				return
						
		elseif s==3 then

				say_gm_title ( "Eveniment halloween:" )
				say_gm ( "Cât de mare doresti sã fie sansa de aruncare?[ENTER]" )
				say_orange ( "Între 1-500:[ENTER]" )
				
					local new_chance = tonumber(input())
					if new_chance < 0 or new_chance > 500 then
				
				say_gm_title ( "Eveniment halloween:" )
				say_gm ( "Valorile introduse nu sunt bune.[ENTER]" )
				
				wait ()
				
				send_letter("+ GM: Eveniment halloween ")
				return
	
                else
								
                    char_log(0, "eveniment_halloween_chance from" ..pc.get_name().. " to " ..new_chance.. "%")					
                    game.set_event_flag ( "halloween_sansa_drop", new_chance)
					
                say_gm_title ( "Eveniment halloween:" )
                say_orange ("Sansa a fost modificatã; sansã " ..new_chance.. "%.[ENTER]")
				
					wait ()		
					
					send_letter("+ GM: Eveniment halloween ")
					return
							
					end	
					
				elseif s==4 then	
				send_letter("+ GM: Eveniment halloween ")
				return
				
				end
				end
			end
		end
    end
end
Rate
quest activare_saptamana begin
	state start begin
		when letter with pc.is_gm() begin
			send_letter("~ GM: Activeaza Rate Saptamana!")
		end
		when button or info begin
	     say_title("Activeazã ratele:")
			say("")
			say("")	
            say("Aceastã comandã se foloseste doar la cele mai")
            say("grave probleme de grad 1 din:")
            say("Termeni & Conditii generale de utilizare.")
			say_reward("Adaugã parola:")
			local sname = input()
            if sname == "activeazarate" then 
			command("priv_empire 0 1 125 999")
			command("priv_empire 0 2 125 999")
			command("priv_empire 0 3 125 999")
			command("priv_empire 0 4 125 999")
			return
			end
		end
	end	
end
Pentru acest mesaj, Marius Dragomir for the post:
kabstyle
Continut: Ascuns
Trebuie sa multumesti autorului pentru a putea vedea mesajul.
Afișează semnătura
Avatar utilizator
demonika1996
Nivel 2

Nivel 2
Mesaje: 277
Membru din: 31 Oct 2014, 00:07
Server: Nu ms!
Regat: Chunjo
Aprecieri: 85  
Mulţumiri: 8  
Discord: Copiază ID
 Contact:
Medalii

Salut cea mai simpla varianta ar fi sa modifici acest event Clar de luna de la npc 9010 pui doar traducerea pentru ce ai tu in loc de "clar de luna si etc"codul de la cl->50011" modifici cu ce cod ai tu la itm tale uite aici

Cod: Selectaţi tot

quest mondlicht_truhen begin
state start begin
when login begin
if game.get_event_flag("mondlicht_event") == 1 then
notice("Event: Cufere lumina lunii ~ activ Non-Stop!")
end
end
when kill begin
local m_ind = pc.get_map_index()
if npc.is_pc() then
else
if m_ind == 1 or m_ind == 3 or m_ind == 21 or m_ind == 23 or m_ind == 41 or m_ind == 43 and pc.get_level() <= 20 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 500)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50011)
--game.drop_item(50011)
else
end
else
end
elseif m_ind == 63 or m_ind == 64 and pc.get_level() <= 40 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 500)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50011)
--game.drop_item(50011)
else
end
else
end
elseif m_ind == 65 or m_ind == 61 or m_ind == 104 and pc.get_level() <= 60 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 500)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50011)
--game.drop_item(50011)
else
end
else
end
elseif m_ind == 62 or m_ind == 71 or m_ind == 67 or m_ind == 66 and pc.get_level() <= 85 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 500)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50011)
--game.drop_item(50011)
else
end
else
end
elseif m_ind == 68 or m_ind == 72 or m_ind == 73 or m_ind == 66 and pc.get_level() <= 105 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 500)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50011)
--game.drop_item(50011)
else
end
else
end
elseif m_ind == 103 or m_ind == 70 or m_imd == 69 or m_ind == 206 or m_ind == 207 or m_ind == 208 or m_ind == 209 or m_ind == 200 or m_ind or m_ind == 210 and pc.get_level() <= 115 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 500)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50011)
--game.drop_item(50011)
else
end
else
end
end
end
end
when 9010.chat."Administrare event Cufere lumina lunii" with pc.is_gm() begin
if game.get_event_flag("mondlicht_event") == 1 then
say_title("Administrare Eveniment:")
say("")
say("Eventul cu,cufere lumina lunii este pornit.")
say("")
say_reward("Inchidere eveniment?")
local s=select("Da", "Nu")
if s==1 then
say_title("Administrare Eveniment:")
say("")
say("Evenimentul a luat sfârsit .")
say("~ Pe data viitoare !")
game.set_event_flag("mondlicht_event", 0)
char_log(0, "Mondlicht_event_end from" ..pc.get_name())
notice_all("Event: Cufere lumina lunii ~ oprit!")
elseif s==2 then
say_title("Administrare Eveniment:")
say("")
say("~ Pe curând !")
end
else
say_title("Administrare Eveniment:")
say("")
say("Eventul cu,cufere lumina lunii este inchis.")
say("")
say_reward("Pornire eveniment?")
local s=select("Da", "Nu")
if s==1 then
say_title("Administrare Eveniment:")
say("")
say("Evenimentul ~ A Început ! .")
say("~ Succes la strâns mai multe cufere !")
game.set_event_flag("mondlicht_event", 1)
char_log(0, "Mondlicht_event_start from" ..pc.get_name())
notice_all("Event: Cufere lumina lunii ~ activ!")
elseif s==2 then
say_title("Administrare Eveniment:")
say("")
say("~ Pe curând !")
end
end
end
when 9010.chat."Dropul cuferelor lumina lunii" with pc.is_gm() begin
if pc . is_gm ( ) then
say_title("Administrare Eveniment:")
say("")
say("Cat de mare sã fie dropul acestora ?")
say("")
say_reward("Între 1-500")
say("")
local new_chance = tonumber(input())
if new_chance < 0 or new_chance > 500 then
say_title("Administrare Eveniment:")
say("")
say("Introducere incorectã ~")
else
char_log(0, "Mondlicht_event_chance from" ..pc.get_name().. " to " ..new_chance.. "%")
game.set_event_flag("mond_drop_chance", new_chance)
say_title("Administrare Eveniment:")
say("")
say("Dropul actual " ..new_chance.. " setat.")
say("~ Pe curând !")
end
else
say_title("Administrare Eveniment:")
say("")
say("Nu ai dreptul pentru a executa evenimentul .")
end
end
end
end
nu raspund pentru eventualele core dumped sau altele este copy&paste doar modifici cu ce ai tu si aia e :) succes
Avatar utilizator
Marius Dragomir
Membru Club

Membru Club
Mesaje: 1020
Membru din: 13 Noi 2017, 21:32
Server: HellHound
Regat: Jinno
Aprecieri: 499  
Mulţumiri: 1211  
Discord: Copiază ID
Medalii

demonika1996 scrie:Salut cea mai simpla varianta ar fi sa modifici acest event Clar de luna de la npc 9010 pui doar traducerea pentru ce ai tu in loc de "clar de luna si etc"codul de la cl->50011" modifici cu ce cod ai tu la itm tale uite aici

Cod: Selectaţi tot

quest mondlicht_truhen begin
state start begin
when login begin
if game.get_event_flag("mondlicht_event") == 1 then
notice("Event: Cufere lumina lunii ~ activ Non-Stop!")
end
end
when kill begin
local m_ind = pc.get_map_index()
if npc.is_pc() then
else
if m_ind == 1 or m_ind == 3 or m_ind == 21 or m_ind == 23 or m_ind == 41 or m_ind == 43 and pc.get_level() <= 20 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 500)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50011)
--game.drop_item(50011)
else
end
else
end
elseif m_ind == 63 or m_ind == 64 and pc.get_level() <= 40 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 500)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50011)
--game.drop_item(50011)
else
end
else
end
elseif m_ind == 65 or m_ind == 61 or m_ind == 104 and pc.get_level() <= 60 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 500)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50011)
--game.drop_item(50011)
else
end
else
end
elseif m_ind == 62 or m_ind == 71 or m_ind == 67 or m_ind == 66 and pc.get_level() <= 85 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 500)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50011)
--game.drop_item(50011)
else
end
else
end
elseif m_ind == 68 or m_ind == 72 or m_ind == 73 or m_ind == 66 and pc.get_level() <= 105 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 500)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50011)
--game.drop_item(50011)
else
end
else
end
elseif m_ind == 103 or m_ind == 70 or m_imd == 69 or m_ind == 206 or m_ind == 207 or m_ind == 208 or m_ind == 209 or m_ind == 200 or m_ind or m_ind == 210 and pc.get_level() <= 115 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 500)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50011)
--game.drop_item(50011)
else
end
else
end
end
end
end
when 9010.chat."Administrare event Cufere lumina lunii" with pc.is_gm() begin
if game.get_event_flag("mondlicht_event") == 1 then
say_title("Administrare Eveniment:")
say("")
say("Eventul cu,cufere lumina lunii este pornit.")
say("")
say_reward("Inchidere eveniment?")
local s=select("Da", "Nu")
if s==1 then
say_title("Administrare Eveniment:")
say("")
say("Evenimentul a luat sfârsit .")
say("~ Pe data viitoare !")
game.set_event_flag("mondlicht_event", 0)
char_log(0, "Mondlicht_event_end from" ..pc.get_name())
notice_all("Event: Cufere lumina lunii ~ oprit!")
elseif s==2 then
say_title("Administrare Eveniment:")
say("")
say("~ Pe curând !")
end
else
say_title("Administrare Eveniment:")
say("")
say("Eventul cu,cufere lumina lunii este inchis.")
say("")
say_reward("Pornire eveniment?")
local s=select("Da", "Nu")
if s==1 then
say_title("Administrare Eveniment:")
say("")
say("Evenimentul ~ A Început ! .")
say("~ Succes la strâns mai multe cufere !")
game.set_event_flag("mondlicht_event", 1)
char_log(0, "Mondlicht_event_start from" ..pc.get_name())
notice_all("Event: Cufere lumina lunii ~ activ!")
elseif s==2 then
say_title("Administrare Eveniment:")
say("")
say("~ Pe curând !")
end
end
end
when 9010.chat."Dropul cuferelor lumina lunii" with pc.is_gm() begin
if pc . is_gm ( ) then
say_title("Administrare Eveniment:")
say("")
say("Cat de mare sã fie dropul acestora ?")
say("")
say_reward("Între 1-500")
say("")
local new_chance = tonumber(input())
if new_chance < 0 or new_chance > 500 then
say_title("Administrare Eveniment:")
say("")
say("Introducere incorectã ~")
else
char_log(0, "Mondlicht_event_chance from" ..pc.get_name().. " to " ..new_chance.. "%")
game.set_event_flag("mond_drop_chance", new_chance)
say_title("Administrare Eveniment:")
say("")
say("Dropul actual " ..new_chance.. " setat.")
say("~ Pe curând !")
end
else
say_title("Administrare Eveniment:")
say("")
say("Nu ai dreptul pentru a executa evenimentul .")
end
end
end
end
nu raspund pentru eventualele core dumped sau altele este copy&paste doar modifici cu ce ai tu si aia e :) succes
Modific acest Mondlicht_event_chance cu denumirea eventului respectiv? Clar de luna sau campionat, bine inteles si item-ul respectiv nu? Cam asta e baza unui quest de event cu activare de la npc ca sa inteleg mai bine
Continut: Ascuns
Trebuie sa multumesti autorului pentru a putea vedea mesajul.
Afișează semnătura
Avatar utilizator
demonika1996
Nivel 2

Nivel 2
Mesaje: 277
Membru din: 31 Oct 2014, 00:07
Server: Nu ms!
Regat: Chunjo
Aprecieri: 85  
Mulţumiri: 8  
Discord: Copiază ID
 Contact:
Medalii

mariusdrg95 scrie: Modific acest Mondlicht_event_chance cu denumirea eventului respectiv? Clar de luna sau campionat, bine inteles si item-ul respectiv nu? Cam asta e baza unui quest de event cu activare de la npc ca sa inteleg mai bine
Din cate am vazut merge doar pentru al 2-lea event in schimb pentru rate la npc stiu ca erau cateva aici care mergeau activate de la npc 20094,sau administrator evenimente sau cv de genul
Avatar utilizator
Marius Dragomir
Membru Club

Membru Club
Mesaje: 1020
Membru din: 13 Noi 2017, 21:32
Server: HellHound
Regat: Jinno
Aprecieri: 499  
Mulţumiri: 1211  
Discord: Copiază ID
Medalii

demonika1996 scrie:
mariusdrg95 scrie: Modific acest Mondlicht_event_chance cu denumirea eventului respectiv? Clar de luna sau campionat, bine inteles si item-ul respectiv nu? Cam asta e baza unui quest de event cu activare de la npc ca sa inteleg mai bine
Din cate am vazut merge doar pentru al 2-lea event in schimb pentru rate la npc stiu ca erau cateva aici care mergeau activate de la npc 20094,sau administrator evenimente sau cv de genul
Ratele pana la urma pot sa le las in continuare pe quest fara npc, ma intereseaza mai mult de eventuri ca sa pot sa am si eu ecranul mai liber, multumesc

[ Postat de pe iPhone ] Imagine
Continut: Ascuns
Trebuie sa multumesti autorului pentru a putea vedea mesajul.
Afișează semnătura
Avatar utilizator
R8Sentinel
Nivel 2

Nivel 2
Mesaje: 224
Membru din: 23 Iul 2017, 01:17
Server: In lucru
Regat: Chunjo
Aprecieri: 14  
Mulţumiri: 248  
Medalii

Poftim un quest pentru eventul cu cl: (poti sa-l modifici si pentru elte evenimente)

Cod: Selectaţi tot

quest event_cl begin
	state start begin	
	when login begin
		if game.get_event_flag("event_cl") == 1 then	
			notice("[Event] Dropul la cufere clar de luna este activat.")	
		end
	end
	
		when letter with pc.is_gm() begin
		send_letter("Admin Event Cl")
		end
		
		when button or info begin
		if pc.is_gm() then
		local s=select ( "Porneste evenimentul", "Opreste evenimentul", "Sansa drop", "Iesire" )
		
			if s==1 then
				notice_all("[Event] Dropul la cufere clar de luna este activat.")
				game.set_event_flag("event_cl", 1)			
				say ( "Ai activat dropul la cufere clar de luna." )
				wait ()
				send_letter("Admin Event Cl")
			return
			
			elseif s==2 then
				notice_all("[Event] Dropul la cufere clar de luna este dezactivat.")
				game.set_event_flag("event_cl", 0)			
				say ( "Ai oprit dropul la cufere clar de luna." )
				wait ()
				send_letter("Admin Event Cl")
			return
			
			elseif s==3 then
				say_title ( "Seteaza sansa de drop." )
				say ( "Intre 1-300 [ENTER]" )
				
					local sansa_r8sentinel = tonumber(input())
					if sansa_r8sentinel < 0 or sansa_r8sentinel > 300 then
					
				say_title ( "Valoare incorecta" )
				say ( "Valoarea introdusa nu este corecta." )
				say ( "Sansa de drop trebuie sa fie intre 1-300" )
				wait ()
				
				else
				
                    char_log(0, "event_cl_sansa_noua from" ..pc.get_name().. " to " ..sansa_r8sentinel.. "%")					
                    game.set_event_flag ( "event_cl_sansa", sansa_r8sentinel)
					
                say_title ( "Eveniment campionat mondial: " )
                say_orange ("Sansa a fost modificata: " ..sansa_r8sentinel.. "%.[ENTER]")
				
					wait ()		
					
					send_letter("Admin Event Cl")
					return		
					end	
				
			elseif s==4 then	
				send_letter("Admin Event Cl")
				return
			end	
		end
	end
		when kill with npc.get_level() > pc.get_level() - 20 and game.get_event_flag("event_cl") == 1 begin --restrctie de nivel pentru drop
		--when kill with not npc.is_pc() and game.get_event_flag("event_cl") == 1 begin --fara restrctie de nivel pentru drop
			local chance = number(1, 200) --sansa normala de drop 
				local sansa_r8sentinel = game.get_event_flag("event_cl_sansa")
	
					if chance <= sansa_r8sentinel then						
						pc.give_item2(50011, 1)-- item dropat
			end
		end
	end
end
Questul cu rate functioneaza, trebuie sa pui parola corecta: activeazarate

Skype: ytrid8r
Afișează semnătura
Avatar utilizator
Marius Dragomir
Membru Club

Membru Club
Mesaje: 1020
Membru din: 13 Noi 2017, 21:32
Server: HellHound
Regat: Jinno
Aprecieri: 499  
Mulţumiri: 1211  
Discord: Copiază ID
Medalii

R8Sentinel scrie:Poftim un quest pentru eventul cu cl: (poti sa-l modifici si pentru elte evenimente)

Cod: Selectaţi tot

quest event_cl begin
	state start begin	
	when login begin
		if game.get_event_flag("event_cl") == 1 then	
			notice("[Event] Dropul la cufere clar de luna este activat.")	
		end
	end
	
		when letter with pc.is_gm() begin
		send_letter("Admin Event Cl")
		end
		
		when button or info begin
		if pc.is_gm() then
		local s=select ( "Porneste evenimentul", "Opreste evenimentul", "Sansa drop", "Iesire" )
		
			if s==1 then
				notice_all("[Event] Dropul la cufere clar de luna este activat.")
				game.set_event_flag("event_cl", 1)			
				say ( "Ai activat dropul la cufere clar de luna." )
				wait ()
				send_letter("Admin Event Cl")
			return
			
			elseif s==2 then
				notice_all("[Event] Dropul la cufere clar de luna este dezactivat.")
				game.set_event_flag("event_cl", 0)			
				say ( "Ai oprit dropul la cufere clar de luna." )
				wait ()
				send_letter("Admin Event Cl")
			return
			
			elseif s==3 then
				say_title ( "Seteaza sansa de drop." )
				say ( "Intre 1-300 [ENTER]" )
				
					local sansa_r8sentinel = tonumber(input())
					if sansa_r8sentinel < 0 or sansa_r8sentinel > 300 then
					
				say_title ( "Valoare incorecta" )
				say ( "Valoarea introdusa nu este corecta." )
				say ( "Sansa de drop trebuie sa fie intre 1-300" )
				wait ()
				
				else
				
                    char_log(0, "event_cl_sansa_noua from" ..pc.get_name().. " to " ..sansa_r8sentinel.. "%")					
                    game.set_event_flag ( "event_cl_sansa", sansa_r8sentinel)
					
                say_title ( "Eveniment campionat mondial: " )
                say_orange ("Sansa a fost modificata: " ..sansa_r8sentinel.. "%.[ENTER]")
				
					wait ()		
					
					send_letter("Admin Event Cl")
					return		
					end	
				
			elseif s==4 then	
				send_letter("Admin Event Cl")
				return
			end	
		end
	end
		when kill with npc.get_level() > pc.get_level() - 20 and game.get_event_flag("event_cl") == 1 begin --restrctie de nivel pentru drop
		--when kill with not npc.is_pc() and game.get_event_flag("event_cl") == 1 begin --fara restrctie de nivel pentru drop
			local chance = number(1, 200) --sansa normala de drop 
				local sansa_r8sentinel = game.get_event_flag("event_cl_sansa")
	
					if chance <= sansa_r8sentinel then						
						pc.give_item2(50011, 1)-- item dropat
			end
		end
	end
end
Questul cu rate functioneaza, trebuie sa pui parola corecta: activeazarate

Nu ai fost atent, eu am toate eventurile/questurile complect functionale, merg activate fara probleme, eu vreau sa le pun la npc si acolo e problema

[ Postat de pe iPhone ] Imagine
Continut: Ascuns
Trebuie sa multumesti autorului pentru a putea vedea mesajul.
Afișează semnătura
Avatar utilizator
R8Sentinel
Nivel 2

Nivel 2
Mesaje: 224
Membru din: 23 Iul 2017, 01:17
Server: In lucru
Regat: Chunjo
Aprecieri: 14  
Mulţumiri: 248  
Medalii

Cod: Selectaţi tot

--Stergi:
		when letter with pc.is_gm() begin
			send_letter("~ GM: Activeaza Rate Saptamana!")
		end 
--Schimbi dupa urmatorul model:
		when button or info begin	
		Schimbi cu:
		when 9003.chat."Rate server" with pc.is_gm() begin	
Exemplu de quest:

Cod: Selectaţi tot

quest activare_saptamana begin
	state start begin
		when 9003.chat."Rate server" with pc.is_gm() begin
	     say_title("Activeazã ratele:")
			say("")
			say("")	
            say("Aceastã comandã se foloseste doar la cele mai")
            say("grave probleme de grad 1 din:")
            say("Termeni & Conditii generale de utilizare.")
			say_reward("Adaugã parola:")
			local sname = input()
            if sname == "activeazarate" then 
			command("priv_empire 0 1 125 999")
			command("priv_empire 0 2 125 999")
			command("priv_empire 0 3 125 999")
			command("priv_empire 0 4 125 999")
			return
			end
		end
	end	
end
Pentru acest mesaj, R8Sentinel for the post:
Marius Dragomir

Skype: ytrid8r
Afișează semnătura
Avatar utilizator
Marius Dragomir
Membru Club

Membru Club
Mesaje: 1020
Membru din: 13 Noi 2017, 21:32
Server: HellHound
Regat: Jinno
Aprecieri: 499  
Mulţumiri: 1211  
Discord: Copiază ID
Medalii

R8Sentinel scrie:

Cod: Selectaţi tot

--Stergi:
		when letter with pc.is_gm() begin
			send_letter("~ GM: Activeaza Rate Saptamana!")
		end 
--Schimbi dupa urmatorul model:
		when button or info begin	
		Schimbi cu:
		when 9003.chat."Rate server" with pc.is_gm() begin	
Exemplu de quest:

Cod: Selectaţi tot

quest activare_saptamana begin
	state start begin
		when 9003.chat."Rate server" with pc.is_gm() begin
	     say_title("Activeazã ratele:")
			say("")
			say("")	
            say("Aceastã comandã se foloseste doar la cele mai")
            say("grave probleme de grad 1 din:")
            say("Termeni & Conditii generale de utilizare.")
			say_reward("Adaugã parola:")
			local sname = input()
            if sname == "activeazarate" then 
			command("priv_empire 0 1 125 999")
			command("priv_empire 0 2 125 999")
			command("priv_empire 0 3 125 999")
			command("priv_empire 0 4 125 999")
			return
			end
		end
	end	
end
Mersi mult, merge perfect dupa modelul dat, eu nu stergeam when button or info begin si imi dadea dump core.
Ai un thanks de la mine! :D
Continut: Ascuns
Trebuie sa multumesti autorului pentru a putea vedea mesajul.
Afișează semnătura
Avatar utilizator
Dragoș L. George
Nivel 4

Nivel 4
Mesaje: 555
Membru din: 26 Oct 2015, 18:08
Server: Neith2
Regat: Jinno
Aprecieri: 145  
Mulţumiri: 465  
Discord: Copiază ID
 Contact:
Medalii

Topic inchis si mutat in Probleme rezolvate.
Închis
Răspunsuri
3
Vizualizări
273
Răspunsuri
3
Vizualizări
116
Răspunsuri
2
Vizualizări
484
Răspunsuri
0
Vizualizări
799

Înapoi la “Probleme rezolvate”

  • Informaţie
  • Cine este conectat

    Utilizatori ce ce navighează pe acest forum: Google [Bot] și 22 vizitatori