Cerere questuri

Închis
Avatar utilizator
xTRRr
Mister Just4Metin

Mister Just4Metin
Mesaje: 275
Membru din: 25 Apr 2016, 09:36
Regat: Jinno
Aprecieri: 37  
Mulţumiri: 9  
Medalii

Salut , cine are questuri pentru :
1. Cal la nivel 25 (ca pe ro) iar la 35 cand ai nivelul 10 la cal sau cat e , sa iti poti lua armat.
2.Misiune de genul : Omoara x ursi sau alt mob , si primesti un item /2 .
Dau thx !
Nume Joc : Vitto!
Imagine
Afișează semnătura
Avatar utilizator
xTRRr
Mister Just4Metin

Mister Just4Metin
Mesaje: 275
Membru din: 25 Apr 2016, 09:36
Regat: Jinno
Aprecieri: 37  
Mulţumiri: 9  
Medalii

UP
Nume Joc : Vitto!
Imagine
Afișează semnătura
Avatar utilizator
Mihai Zamfirache
Nivel 4

Nivel 4
Mesaje: 534
Membru din: 21 Aug 2013, 01:38
Regat: Chunjo
Aprecieri: 6  
Mulţumiri: 8  
 Contact:
Medalii

Salut, Incearcale pe astea!

Cod: Selectaţi tot

----------------------------------------------------
----- 	Author: [DEV]TWIX - SoLuS              -----
----------------------------------------------------

quest horse_new begin
    state start begin
        when login or levelup with pc.level >= 25 begin
            send_letter("Du-te la Grăjdar")
            local v = find_npc_by_vnum(20349)
            target.vid("_TINTA_", v, "20349")
        end
     
        when info or button begin
            say_title("Grăjdar:")
            say("                                                 ")
            say("A venit momentul să îţi iei calul. Du-te până la ")
            say("grăjdar şi vorbeşte cu el despre armăsarul tău.  ")
            say("                                                 ")
            return
        end
     
        when _TINTA_.target.click begin
            say_title("Grăjdar:")
            say("                                                 ")
            say("Salutare! Îţi voi da şi ţie un armăsar de nivel 1")
            say("pentru a-ţi fi mai uşor să înfrunţi în luptă mon-")
            say("ştrii şi inamicii tăi. Pentru a urca nivelul ca- ")
            say("lului va trebui să îmi aduci câte o medalie de   ")
            say("cal pe care le poţi obţine în Peştera Maimuţelor.")
            say("                                                 ")
            pc.give_item2(50051, 1)
            horse.set_level(1)
            horse.summon() 
            horse.ride()
            clear_letter()
            target.delete("_TINTA_")
            set_state(completcal)
        end
    end
    state completcal begin
    end
end

Cod: Selectaţi tot

----------------------------------------------------
----- 	Author: [DEV]TWIX - SoLuS              -----
----------------------------------------------------

quest horse_level begin
	state start begin
		when 20349.chat."Măreşte nivelul armăsarului" with horse.get_level() >= 1 and horse.get_level() <= 9 begin
			say_title("Grăjdar:")
			say("")
			say("Poţi să măreşti nivelul armăsarului tău cu ajutorul")
			say("unei medalii de cal. Grăjdarul are nevoie de ele")
			say("pentru a înregistra rezultatele calificărilor.[ENTER]")
			say("Vrei să măreşti nivelul armăsarului?[ENTER]")

			local cal = select("Da","Nu")

				if cal == 1 then

				if pc.count_item(50050) < 1 then
					say_title("Grăjdar:")
					say("")
					say("Revin-o când ai o Medalie de cal.[ENTER]")	
					return
				end
					
				if horse.get_level() < 1 then
					say_title("Grăjdar:")	
					say("")
					say("Nivelul armăsarului tău este prea mic.[ENTER]")	
					return
				end
					
				if horse.get_level() > 9 then
					say_title("Grăjdar:")
					say("")
					say("Nivelul armăsarului tău este prea mare.[ENTER]")	
					return
				end	
					
				if horse.get_level() >= 1 and horse.get_level() <= 9 and pc.count_item(50050) >= 1 then	
					pc.remove_item(50050,1)
					horse.unride ()
					horse.ride ()
					horse.advance () 
					syschat("Armăsarul tău a ajuns la nivelul "..horse.get_level()..".")
				end
			end
		end
	end
end

Cod: Selectaţi tot

---------------------------------------------------
----- 	Author: [DEV]TWIX - SoLuS              -----
----------------------------------------------------

quest horse_summon begin
	state start begin
		function get_horse_summon_prob_pct()  local skill_level=pc.get_skill_level(131)  if skill_level==1 then   return 15  elseif skill_level==2 then   return 20  elseif skill_level==3 then   return 30  elseif skill_level==4 then   return 40  elseif skill_level==5 then   return 50  elseif skill_level==6 then   return 60  elseif skill_level==7 then   return 70  elseif skill_level==8 then   return 80  elseif skill_level==9 then   return 90  elseif skill_level>=10 then   return 100  end  return 10 end
		
		when 20349.chat."Am pierdut imaginea de cal" with horse.get_grade()==1 and pc.countitem("50051")<1 begin
			say_title("Grăjdar:")
			say("")
			say("Din câte văd ai pierdut imaginea de cal")
			say("Eu îţi pot fabrica altă imagine de cal dar te va costa 5k.")
			say("")
			local b=select("Vreau altă carte", "Nu-mi trebuie")
			if 1==b then
				if pc.money>=5000 then
					pc.changemoney(-5000)
					say_title("Grăjdar:")
					say("")
					say("Uite aici noua ta imagine de cal.")
					say("De acum fi mai atent.")
					say("")
					pc.give_item2("50051", 1)
				else
					say_title("Grăjdar:")
					say("")
					say("Nu ai suficienţi Yang.")
					say("")
				end
			elseif 2==b then
			else
				say("UNKNOWN BUTTON ["..b.."]")
			end
		end
		when 20349.chat."Am pierdut cartea calului armat" with horse.get_grade()==2 and pc.countitem("50052")<1 begin
			say_title("Grăjdar:")
			say("")
			say("Din câte văd ai pierdut cartea calului armat.")
			say("Eu îţi pot fabrica altă carte dar te va costa 100k.")
			say("")
			local b=select("Vreau altă carte", "Nu-mi trebuie")
			if 1==b then
				if pc.money>=100000 then
					pc.changemoney(-100000)
					say_title("Grăjdar:")
					say("")
					say("Uite aici noua ta carte pentru calul armat.")
					say("De acum fi mai atent.")
					say("")
					pc.give_item2("50052", 1)
				else
					say_title("Grăjdar:")
					say("")
					say("Nu ai suficienţi Yang.")
					say("")
				end
			elseif 2==b then
			else
				say("UNKNOWN BUTTON ["..b.."]")
			end
		end
		when 20349.chat."Am pierdut cartea calului militar" with horse.get_grade()==3 and pc.countitem("50053")<1 begin
			say_title("Grăjdar:")
			say("")
			say("Din câte văd ai pierdut cartea calului militar")
			say("Eu îţi pot fabrica altă carte dar te va costa 150k.")
			say("")
			local b=select("Vreau altă carte", "Nu-mi trebuie")
			if 1==b then
				if pc.money>=150000 then
					pc.changemoney(-150000)
					say_title("Grăjdar:")
					say("")
					say("Uite aici noua ta carte pentru calul militar.")
					say("De acum fi mai atent.")
					say("")
					pc.give_item2("50053", 1)
				else
					say_title("Grăjdar:")
					say("")
					say("Nu ai suficienţi Yang.")
					say("")
				end
			elseif 2==b then
			else
				say("UNKNOWN BUTTON ["..b.."]")
			end
		end
		when 50051.use with horse.get_grade()==0 begin
			say_title("Grăjdar:")
			say("")
			say("Nu deţii nici un cal!")
			say("")
		end
		when 50051.use with horse.get_grade()==1 begin
			if pc.getsp()>=250 then
				if number(1, 100)<=horse_summon.get_horse_summon_prob_pct() then
					say_title("Informaţie:")
					say("")
					say_reward("Calul nu a putut fi chemat!")
					say("")
					horse.summon()
				else
					say_title("Informaţie:")
					say("")
					say_reward("Calul nu a putut fi chemat!") 
					say_reward("Pentru a putea chema calul mai repede în situaţii de urgenţă")
					say_reward("trebuie să citeşti manualul Chemarea Calului.")
					say("")
				end
				pc.change_sp(-250)
			else
				say_title("Informaţie:")
				say("")
				say_reward("Nu ai reuşit să-ţi chemi calul!")
				say_reward("Pentru a chema calul ai nevoie de 250 mana!")
				say("")
			end
		end
		when 50051.use with horse.get_grade()==2 begin
			say("Calul nu a putut să vină.")
		end
		when 50051.use with horse.get_grade()==3 begin
			say("Calul nu a putut să vină.")
		end
		when 50052.use with horse.get_grade()==0 begin
			say("Calul nu a putut să vină.")
		end
		when 50052.use with horse.get_grade()==1 begin
			say("Calul nu a putut să vină.")
		end
		when 50052.use with horse.get_grade()==2 begin
			if pc.getsp()>=300 then
				if number(1, 100)<=horse_summon.get_horse_summon_prob_pct() then
					say_title("Informaţie:")
					say("")
					say_reward("Calul a fost chemat cu succes.")
					say("")
					horse.summon()
				else
					say_title("Informaţie:")
					say("")
					say_reward("Calul nu a putut fi chemat!") 
					say_reward("Pentru a putea chema calul mai repede în situaţii de urgenţă")
					say_reward("trebuie să citeşti manualul Chemarea Calului.")
					say("")
				end
				pc.change_sp(-300)
			else
				say_title("Informaţie:")
				say("")
				say_reward("Nu ai reuşit să-ţi chemi calul!")
				say_reward("Pentru a chema calul ai nevoie de 300 mana!")
				say("")
			end
		end
		when 50052.use with horse.get_grade()==3 begin
			say("Calul nu a putut să vină.")
		end
		when 50053.use with horse.get_grade()==0 begin
			say("Calul nu a putut să vină.")
		end
		when 50053.use with horse.get_grade()==1 begin
			say("Calul nu a putut să vină.")
		end
		when 50053.use with horse.get_grade()==2 begin
			say("Calul nu a putut să vină.")
		end
		when 50053.use with horse.get_grade()==3 begin
			if pc.getsp()>=500 then
				if number(1, 100)<=horse_summon.get_horse_summon_prob_pct() then
					say_title("Informaţie:")
					say("")
					say_reward("Calul a fost chemat cu succes.")
					say("")
					horse.summon()
				else
					say_title("Informaţie:")
					say("")
					say_reward("Calul nu a putut fi chemat!") 
					say_reward("Pentru a putea chema calul mai repede în situaţii de urgenţă")
					say_reward("trebuie să citeşti manualul Chemarea Calului.")
					say("")
				end
				pc.change_sp(-500)
			else
				say_title("Informaţie:")
				say("")
				say_reward("Nu ai reuşit să-ţi chemi calul!")
				say_reward("Pentru a chema calul ai nevoie de 500 mana!")
				say("")
			end
		end
	end
	state __COMPLETE__ begin
		when enter begin
			q.done()
		end
	end
end
Avatar utilizator
Ionuț Daniel
Nivel 8

Nivel 8
Mesaje: 1724
Membru din: 19 Noi 2016, 14:52
Aprecieri: 156  
Mulţumiri: 135  
 Contact:
Medalii

Mutat în cereri rezolvate.
Închis
Răspunsuri
4
Vizualizări
164
Răspunsuri
2
Vizualizări
210
Răspunsuri
2
Vizualizări
469
Răspunsuri
1
Vizualizări
395

Înapoi la “Cereri Rezolvate”

  • Informaţie
  • Cine este conectat

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