[Quest] Panou Administrator cu opţiuni noi!

Avatar utilizator
Mikkelsen
Mister Just4Metin

Mister Just4Metin
Mesaje: 2353
Membru din: 06 Mar 2014, 23:53
Server: ETH
Regat: Jinno
Aprecieri: 11  
Mulţumiri: 40  
 Contact:
Medalii

Salutare Just4Metin.

Am găsit într-un serverfiles un quest interesant după părerea mea şi m-am gândit să vi-l postez şi vouă!

Cod: Selectaţi tot

quest admin_panel begin
	state start begin	
		when letter with pc.is_gm() begin
			send_letter("GM: Panou de administrare")
		end	
		when button or info begin
				say_gm_title("Panou de administrare")	
				say_gm("")
				say_gm("Te rog introdu parola în căsuta de de mai jos.")
				say_gm("")
				
				local password = input(boss)
				if password ~= settings.ap_password then
					say_title("Panou de administrare")	
					say("")
					say("Ai gresit parola.")
					say("")
					else
						
				say_gm_title("Panou de administrare")		
				say_gm("")
				say_gm("Selectează o opţiune din meniul de de mai jos.")
				say_gm("")

				local s = select("Activează ratele","Teleportare","Blochează/Deblochează şoapta","Ieşire")
					
				if s == 1 then
					
				say_gm_title("Panou de administrare")		
				say("")
				say_gm("Te rog introdu parola în căsuţa de de mai jos.[ENTER]")					
				local pw = input()
						
				if pw == "m2" then 		
					say_gm_title("Panou de administrare")		
					say("")
					say_gm("Ce rată doreşti să modifici?")	
					say("")
					
					local r = select("Yang","Experienţă ","Drop","Toate","Renunţă ")
								
					if r == 1 then					
						say_gm_title("Panou de administrare")		
						say("")
						say_gm("Ce rată doreşti să pui la Yang?")	
								
						local rate1 = input()					
						command ( "priv 0 2 "..rate1.." 200" )
								
					elseif r == 2 then							
						say_gm_title("Panou de administrare")		
						say("")
						say_gm("Ce rată doreşti să pui la Experienţă?")	
								
						local rate2 = input()		
						command ( "priv 0 4 "..rate2.." 200" )	
									
					elseif r == 3 then							
						say_gm_title("Panou de administrare")		
						say("")
						say_gm("Ce rată doreşti să pui la Drop?")	
								
						local rate3 = input()		
						command ( "priv 0 1 "..rate3.." 200" )

					elseif r == 4 then							
						say_gm_title("Panou de administrare")		
						say("")
						say_gm("Ce rate doreşti să pui?")	
								
						local rate4 = input()	
						
						command ( "priv 0 1 "..rate4.." 200" )
						command ( "priv 0 2 "..rate4.." 200" )
						command ( "priv 0 4 "..rate4.." 200" )								
								
					elseif r == 5 then
						send_letter("GM: Panou de administrare")
						return								
					end
				end
						
			elseif s == 2 then
					say_gm_title("Panou de administrare")		
					say("")
					say_gm("Unde vrei să te teleportezi?")	
					say_gm("")	
					
					local teleport = select( "V3 (Început)", "V3 (Sfârşit)", "V4 (Început)", "V4 (Sfârşit)", "Pagina următoare", "Ieşire" )
											
						if teleport == 1 then
							pc.warp(900 , 1207800)

						elseif teleport == 2 then
							pc.warp(135500,	1343600)

						elseif teleport == 3 then
							pc.warp(153600,	1203200)

						elseif teleport == 4 then
							pc.warp(181500,	1220500)

						elseif teleport == 5 then
							say_gm_title("Panou de administrare")		
							say("")
							say_gm ( "Unde vrei să te teleportezi?" )	
							say_gm ( "" )		
							
						local teleport2 = select("Cape Dragon Fire","Nephrite Bay","Thunder Mountains","Guatama Cliff","Ieşire")

						if teleport2 == 1 then	
							pc.warp( 1104600, 1788300)
													
						elseif teleport2 == 2 then
							pc.warp ( 1087000, 1656300 )
														
						elseif teleport2 == 3 then
							pc.warp ( 1134300, 1654900 )

						elseif teleport2 == 4 then
							pc.warp ( 1226400, 1680900 )
														
						elseif teleport2 == 5 then
							send_letter("GM: Panou de administrare")
							return
						end
					end								
													
				elseif s == 3 then							
					say_gm_title("Panou de administrare")		
					say("")	
					
					local s1 = select("Blochează şoapta", "Deblochează şoapta", "Renunţă ")
									
					if s1 == 1 then												
						say_gm_title("Panou de administrare")		
						say("")		
						say_gm("Introdu numele exact al jucătorului")
						say_gm("căruia vrei să-i blochezi şoapta.")
						say_gm("")
						
						local name = input()
										
						say_gm_title("Panou de administrare")		
						say("")		
						say_gm("Câte minute doreşti să-i blochezi")
						say_gm("şoapta jucătorului "..name.."?")
						say_gm("")
						
						local time = input()
						local min = math.floor(time) * 60
										
						say_gm_title("Panou de administrare")		
						say("")			
						say_gm("Motivul pentru care doreşti să-i blochezi")
						say_gm("şoapta jucătorului "..name.."?")
						say_gm("")
						
						local reason = input()
						local block = select("Blochează şoapta "..name.."" ,"Renunţă ")						
								
						if block == 1 then				
							command("block_chat "..name.." "..min)
							command("n Jucătorului "..name.." i-a fost blocată şoapta de către "..pc.get_name().." timp de "..time.." minute.")
							command("n Motiv: "..reason)	
						end
						
					elseif s1 == 2 then										
						say_gm_title("Panou de administrare")		
						say("")			
						say_gm("Introdu numele exact al jucătorului")
						say_gm("căruia vrei să-i deblochezi şoapta.")
						say_gm("")
									
						local unblock = input()
														
						command("block_chat "..unblock.." 3")
						command("n Jucătorului "..unblock.." i-a fost deblocată şoapta de către "..pc.get_name()..".")										
					end
				end
			end
		end				
	end
end
Aveţi grijă,dacă vreţi să folosiţi acest panou de administrator în joc,va trebui să băgaţi o parolă care desigur că tot din quest îl setaţi.
Parola se setează la rândul acesta:

Cod: Selectaţi tot

local password = input(boss)
Acolo unde scrie cuvântul boss,voi puneţi ce parolă doriţi voi!

Tutorial instalare quest:
1. Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu q1.quest .
2. Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).
3. Îl puneţi acolo (să fie .quest) şi da-ţi permisiuni 777.
4. Te loghezi în FreeBSD / putty şi scrii în felul următor: cd /usr/home/game/share/locale/germany/quest apoi ./qc q1.quest
5. Intraţi pe server şi scrieţi /reload q .
6. Testaţi quest-ul .
Ultima oară modificat 06 Apr 2016, 18:31 de către Filipino, modificat 1 dată în total.
Motiv: Adăugat tutorial instalare.
Avatar utilizator
sk1per
Nivel 7

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

mie numi funtioneaza dau click pe el si dispare ...
Cauti un host bun si preturi superbe te astept pe www.softserver.ro :heart_eyes:
Afișează semnătura
Avatar utilizator
LunguSilviu18
Nou Venit

Nou Venit
Mesaje: 35
Membru din: 06 Noi 2014, 20:31
Regat: Chunjo
Aprecieri: 0
Mulţumiri: 1  
Medalii

Nu merge .. dai pe ea si dispare :(
Avatar utilizator
ilgryu
Nivel 3

Nivel 3
Mesaje: 452
Membru din: 13 Dec 2013, 16:14
Server: O sa fie si ala.
Regat: Jinno
Aprecieri: 225  
Mulţumiri: 23  
Discord: Copiază ID
 Contact:
Medalii

Normal ca va dispare uite aici un quest mai special e facut nush de cine dar il am si eu
:
quest teleportarea_jucatorului begin
state start begin
when 40004.use begin
local ramas = pc.getqf("next_time") - get_time()
local ramas_min = ramas / 60
if get_time() < pc.getqf("next_time")then
say_title("Teleportarea jucatorului:")
say("Trebuie sa mai astepti "..ramas_min.." minute[ENTER]pentru a te putea teleporta din nou!")
else
say_title("Teleportarea jucatorului:")
say("Acest obiect iti permite sa te teleportezi la un[ENTER]jucator.")
say_reward("Vrei sa te teleportezi?")
local a = select("Da","Nu am timp!")
if a == 1 then
say_title("Teleportarea jucatorului:")
say_reward("Scrie numele jucatorului la care vrei sa te[ENTER]teleportezi:")
local name = input()
if pc.get_level() < 35 then
say_title("Teleportarea jucatorului:")
say("Poti folosi acest item decat dupa nivelul 35!")
else
pc.teleport(name)
pc.setqf("next_time", get_time() + 3600)
end
end
end
end
end
end

astai sa dea mut sa scoata mut
Fusai Aci
Facui Asta
Afișează semnătura
Avatar utilizator
Geo.RO
Nivel 3

Nivel 3
Mesaje: 424
Membru din: 05 Oct 2014, 18:32
Server: Metin2AnyLas
Regat: Jinno
Aprecieri: 0
Mulţumiri: 1  
 Contact:
Medalii

Ati dat permisiuni 777, ./qc numequest.lua/quest?
Avatar utilizator
saranana2002
Nou Venit

Nou Venit
Mesaje: 17
Membru din: 07 Noi 2014, 17:26
Server: metin
Regat: Jinno
Aprecieri: 0
Mulţumiri: 0
Medalii

Nu mere !
Avatar utilizator
sury1210
Nivel 3

Nivel 3
Mesaje: 369
Membru din: 08 Ian 2015, 20:43
Regat: Jinno
Aprecieri: 209  
Mulţumiri: 42  
  Rezolvări prob.: 1
Discord: Copiază ID
 Contact:
Medalii

Frumos...
Avatar utilizator
Synea
Nou Venit

Nou Venit
Mesaje: 14
Membru din: 27 Ian 2015, 18:19
Server: Metin2Aloys
Aprecieri: 0
Mulţumiri: 0
Medalii

Ai luat questul de la hope :)) d'aia nu merge
Avatar utilizator
Filipino
Metin Master

Metin Master
Mesaje: 2789
Membru din: 03 Sep 2014, 21:02
Server: ▬▬▬▬▬▬
Aprecieri: 39  
Mulţumiri: 785  
Discord: Copiază ID
Medalii

Mutat în quest-uri!

[ Mesaj scris via Android ] Imagine
Imagine
Afișează semnătura
Avatar utilizator
blackwater
Nou Venit

Nou Venit
Mesaje: 41
Membru din: 25 Oct 2014, 17:52
Server: Valerys
Aprecieri: 8  
Mulţumiri: 0
 Contact:
Medalii

Da la mine a functionat multumesc frumos ;) ;)
Închis
Răspunsuri
1
Vizualizări
349
Răspunsuri
10
Vizualizări
366
Răspunsuri
3
Vizualizări
226

Înapoi la “Arhivă”

  • Informaţie
  • Cine este conectat

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