tinctura regatelor

spaz111 · 31 Ian 2017, 17:42

la mag general am tinctura regatelor si cand dau pe el nu apare nimic nu merge dar apare in inventar

vasi99 · 31 Ian 2017, 17:47

Adauga questul asta

: quest change_empire_item begin
   state start begin
      when login with pc.getqf("special_func") == 0 begin
         if pc.get_empire() == 1 then
            affect.add_collect(apply.GOLD_DOUBLE_BONUS,10,60*60*24*365*4)
            affect.add_collect(apply.ITEM_DROP_BONUS,10,60*60*24*365*4)
            affect.add_collect(apply.ATT_BONUS_TO_MONSTER,10,60*60*24*365*4)
            pc.setqf("special_func", 1)
         elseif pc.get_empire() == 2 then
            affect.add_collect(apply.ATT_GRADE_BONUS,50,60*60*24*365*4)
            affect.add_collect(apply.MAX_HP,1000,60*60*24*365*4)
            affect.add_collect(apply.EXP_DOUBLE_BONUS,10,60*60*24*365*4)
            pc.setqf("special_func", 2)
         elseif pc.get_empire() == 3 then
            affect.add_collect(apply.STR,10,60*60*24*365*4)
            affect.add_collect(apply.CON,10,60*60*24*365*4)
            affect.add_collect(apply.INT,10,60*60*24*365*4)
            affect.add_collect(apply.DEX,10,60*60*24*365*4)
            affect.add_collect(apply.GOLD_DOUBLE_BONUS,10,60*60*24*365*4)
            pc.setqf("special_func", 3)
         end         
      end      
      when 71054.use begin
         say_title("Tinctura Regatului")
         say("Cu aceastã tincturã poþi sã")
         say("îþi schimbi regatul cu unul nou")
         say("pe care tu îl doreºti.")
         say("")
         if get_time() < pc.getqf("next_use_time") then
            say_reward("Nu puteþi schimba regatul.")
            if pc.is_gm() then
               pc.setqf("next_use_time", 0)
            end
            return
         end
         if change_empire_item.move_pc() == true then
            if pc.getqf("special_func")==1 then
               affect.remove_collect(apply.GOLD_DOUBLE_BONUS,10)
               affect.remove_collect(apply.ITEM_DROP_BONUS,10)
               affect.remove_collect(apply.ATT_BONUS_TO_MONSTER,10)
            elseif pc.getqf("special_func")==2 then
               affect.remove_collect(apply.ATT_GRADE_BONUS)
               affect.remove_collect(apply.MAX_HP,1000)
               affect.remove_collect(apply.EXP_DOUBLE_BONUS,10)
            elseif pc.getqf("special_func")==3 then   
               affect.remove_collect(apply.STR,10)
               affect.remove_collect(apply.CON,10)
               affect.remove_collect(apply.INT,10)
               affect.remove_collect(apply.DEX,10)
               affect.remove_collect(apply.GOLD_DOUBLE_BONUS,10)
            end
            pc.setqf("special_func", 0)
            pc.setqf("next_use_time", get_time() + time_hour_to_sec(24*7))
         end
      end
      function move_pc()
         if pc.is_engaged() then
            say_reward("Eºti cãsãtorit/ã.")
            say_reward("Nu poþi schimba regatul.")
            return false
         end
         if pc.is_married() then
            say_reward("Eºti cãsãtorit/ã.")
            say_reward("Nu poþi schimba regatul.")
            return false
         end
         if pc.is_polymorphed() then
            say_reward("Eºti transformat.")
            say_reward("Nu poþi schimba regatul.")
            return false
         end
         if pc.has_guild() then
            say_reward("Eºti într-o breaslã.")
            say_reward("Nu poþi schimba regatul.")
            return false
         end
         if pc.money < 500000 then
            say_reward("Nu ai suficient Yang.")
            say_reward("Pentru a schimba regatul ai nevoie de 500.000 Yang.")
            return false
         end
         say_reward("In ce regat vrei sa te muti?")
         local s = select("Regatul Roºu", "Regatul Galben", "Regatul Albastru", "Nu mai vreau")
         if 4==s then
            return false
         end
         say_title("Tinctura Regatelor")
         say("Vrei sã pãrãseºti acest regat?")
         say("Pentru trãdare nu existã scuze!")
         local a = select("Schimb Regatul", "Nu mai vreau")
         if 2== a then
            return false
         end
         local ret = pc.change_empire(s)
         local oldempire = pc.get_empire()
         if ret == 999 then
            say_title("Tinctura Regatelor")
            say("Ai schimbat regatul cu succes.")
            say("Dacã vei dori sã schimbi din nou regatul")
            say("va trebui sã aºtepþi o sãptãmânã.")
            say("Vã rugãm relogaþi-vã.")
            pc.change_gold(-500000)         
            pc.remove_item(71054)         
            return  true
         elseif ret == 1 then
            say("Eºti deja în acest regat.")
            say("Te rog sã selectezi alt regat.")
         elseif ret == 2 then
            say("Încã nu poþi schimba regatul.")
            say("Nu poþi schimba regatul,")
            say("deoarece ai fost într-o breslã recent.")
         elseif ret == 3 then
            say("Nu poþi schimba regatul.")
            say("Nu poþi schimba regatul,")
            say("deoarece ai fost casatorit recent.")
         end
         return false
      end
   end
end

spaz111 · 31 Ian 2017, 18:10

gata ms

spaz111 · 01 Feb 2017, 18:13

defapt da eroare tot pica serverul de la quest

K3RN3L · 01 Feb 2017, 19:14

Poftim cel de la mine de pe server:

Cod: Selectaţi tot

quest change_empire_item begin
	state start begin
		when login with pc.getqf("special_func") == 0 begin
			if pc.get_empire() == 1 then
				affect.add_collect(apply.GOLD_DOUBLE_BONUS,10,60*60*24*365*4)
				affect.add_collect(apply.ITEM_DROP_BONUS,10,60*60*24*365*4)
				affect.add_collect(apply.ATT_BONUS_TO_MONSTER,10,60*60*24*365*4)
				pc.setqf("special_func", 1)
			elseif pc.get_empire() == 2 then
				affect.add_collect(apply.ATT_GRADE_BONUS,50,60*60*24*365*4)
				affect.add_collect(apply.MAX_HP,1000,60*60*24*365*4)
				affect.add_collect(apply.EXP_DOUBLE_BONUS,10,60*60*24*365*4)
				pc.setqf("special_func", 2)
			elseif pc.get_empire() == 3 then
				affect.add_collect(apply.STR,10,60*60*24*365*4)
				affect.add_collect(apply.CON,10,60*60*24*365*4)
				affect.add_collect(apply.INT,10,60*60*24*365*4)
				affect.add_collect(apply.DEX,10,60*60*24*365*4)
				affect.add_collect(apply.GOLD_DOUBLE_BONUS,10,60*60*24*365*4)
				pc.setqf("special_func", 3)
			end			
		end		
		when 71054.use begin
			say_title("Tinctura Regatului")
			say("Cu acest item poti sa")
			say("Iti schimbi regatul cu unul")
			say("Pe care tu il doresti.")
			say("")
			if get_time() < pc.getqf("next_use_time") then
				say_reward("Nu poti sa schimbi regatul.")
				if pc.is_gm() then
					pc.setqf("next_use_time", 0)
				end
				return
			end
			if change_empire_item.move_pc() == true then
				if pc.getqf("special_func")==1 then
					affect.remove_collect(apply.GOLD_DOUBLE_BONUS,10)
					affect.remove_collect(apply.ITEM_DROP_BONUS,10)
					affect.remove_collect(apply.ATT_BONUS_TO_MONSTER,10)
				elseif pc.getqf("special_func")==2 then
					affect.remove_collect(apply.ATT_GRADE_BONUS)
					affect.remove_collect(apply.MAX_HP,1000)
					affect.remove_collect(apply.EXP_DOUBLE_BONUS,10)
				elseif pc.getqf("special_func")==3 then	
					affect.remove_collect(apply.STR,10)
					affect.remove_collect(apply.CON,10)
					affect.remove_collect(apply.INT,10)
					affect.remove_collect(apply.DEX,10)
					affect.remove_collect(apply.GOLD_DOUBLE_BONUS,10)
				end
				pc.setqf("special_func", 0)
				pc.setqf("next_use_time", get_time() + time_hour_to_sec(24*7))
			end
		end
		function move_pc()
			if pc.is_engaged() then
				say_reward("Esti casatorit/casatorita.")
				say_reward("Nu poti schimba regatul.")
				return false
			end
			if pc.is_married() then
				say_reward("Esti casatorit/casatorita.")
				say_reward("Nu poti schimba regatul.")
				return false
			end
			if pc.is_polymorphed() then
				say_reward("Esti transformat/transformata.")
				say_reward("Nu poti schimba regatul.")
				return false
			end
			if pc.has_guild() then
				say_reward("Esti intr-o bresla.")
				say_reward("Nu poti schimba regatul.")
				return false
			end
			if pc.money < 500000 then
				say_reward("Nu ai suficienti Yang.")
				say_reward("Pentru a schimba regatul ai nevoie de 500k Yang.")
				return false
			end
			say_reward("In ce regat vrei sa te muti?")
			local s = select("Regatul Rosu", "Regatul Galben", "Regatul Albastru", "M-am razgandit")
			if 4==s then
				return false 
			end
			say_title("Tinctura Regatelor")
			say("Vrei sa parasesti acest regat?")
			say("Sa stii ce faci tu acum se numeste tradare!")
			say("Si pentru un asemenea lucru nu exista scuze.")
			local a = select("Schimb Regatul", "Nu mai vreau")
			if 2== a then
				return false
			end
			local ret = pc.change_empire(s)
			local oldempire = pc.get_empire()
			if ret == 999 then
				say_title("Tinctura Regatelor")
				say("Ai schimbat regatul cu succes.")
				say("Daca vei dori sa schimbi din nou regatul")
				say("Va trebuie sa astepti 7 zile.")
				pc.change_gold(-500000)			
				pc.remove_item(71054)			
				return  true
			elseif ret == 1 then
				say("Tu esti deja in acest regat")
				say("Te rog sa selectez alt regat.")
			elseif ret == 2 then
				say("Inca nu poti sa schimbi regatul")
				say("deoarece ai fost intr-o bresla recent.")
			elseif ret == 3 then
				say("Nu poti schimba regatul")
				say("deoarece ai fost casatorit recent.")
			end
			return false
		end
	end
end

spaz111 · 01 Feb 2017, 20:00

de unde il modific din folderul locale/germany ? sau germany/quest/71054

spaz111 · 02 Feb 2017, 12:27

Merge dati t/c

[Tupeu] · 10 Feb 2017, 17:01

Subiect inactiv. Arhivat !

tinctura regatelor

Tinctura regatelor !

Quest tinctura regatelor

[Quest] Tinctura regatelor

[2 Regate] [Functional] Tinctura Regatelor

Cine este conectat