Cod: Selectaţi tot

quest skill_group begin
	state start begin
		when login or levelup with pc.get_level()>=5 and pc.get_skill_group()==0 begin
			set_state(run)
		end
	end
	state run begin
		function get_my_teacher(i)
			local teacher
			local empire=pc.get_empire()
			if empire==1 then
				teacher=20299+i
			elseif empire==2 then
				teacher=20319+i
			elseif empire==1 then 
				teacher=20339+i
			end
			return teacher
		end
		when letter begin
			send_letter("Instruirea")
			local job=pc.get_job()
			if job==0 then
				local v=pc_find_skill_teacher_vid(1)
				if 0!=v then target.vid("teacher1",v,"Razboinic corp") end
				local v=pc_find_skill_teacher_vid(2)
				if 0!=v then target.vid("teacher2",v,"Razboinic mental") end
			elseif job==1 then
				local v=pc_find_skill_teacher_vid(1)
				if 0!=v then target.vid("teacher3",v,"Ninja pumnal") end
				local v=pc_find_skill_teacher_vid(2)
				if 0!=v then target.vid("teacher4",v,"Ninja arc") end
			elseif job==2 then
				local v=pc_find_skill_teacher_vid(1)
				if 0!=v then target.vid("teacher5",v,"Sura arme") end
				local v=pc_find_skill_teacher_vid(2)
				if 0!=v then target.vid("teacher6",v,"Sura magie") end
			elseif job==3 then
				local v=pc_find_skill_teacher_vid(1)
				if 0!=v then target.vid("teacher7",v,"Saman dragon") end
				local v=pc_find_skill_teacher_vid(2)
				if 0!=v then target.vid("teacher8",v,"Saman vindecare") end
			elseif job==4 then
				local v=20400
				if 0!=v then target.vid("teacher9",v,"Lycan instinct") end
			end
		end
		when leave begin
			target.delete("teacher1")
			target.delete("teacher2")
			target.delete("teacher3")
			target.delete("teacher4")
			target.delete("teacher5")
			target.delete("teacher6")
			target.delete("teacher7")
			target.delete("teacher8")
			target.delete("teacher9")
		end
		when button or info begin
			say_title("Instruirea:")
			if pc.get_job()==0 then
				say("Ai o pasiune fata de razboinici?")
				say("Vrei sa iti omori adversarul cu rapiditate? Atunci")
				say("alege invatatura lupei corporale. Daca vrei sa")
				say("rapui grupuri de monstri dintr-o lovitura, atunci")
				say("alege invatatura luptei mentale.")
				say("Te asteptam in apropiere de centrul satului!")
				say()
			elseif pc.get_job()==1 then
				say("Ai o pasiune fata de luptatori ninja? Daca ai")
				say("admiratie fata de arcasi si doresti sa devi")
				say("unul atunci alege invatatura luptei cu acul.")
				say("Daca doresti sa umblii nevazut de adversari apoi")
				say("sa ii atragi intr-o capcana, alege invatatura")
				say("luptei cu lamele.")
				say("Te asteptam in apropiere de centrul satului!")
				say()
			elseif pc.get_job()==2 then
				say("Daca te pasioneaza magia atunci te sfatuiesc sa te")
				say("axezi pe magia neagra, iar daca vrei sa iti")
				say("ingrozesti adversarul atunci alege armele magice.")
				say()
			elseif pc.get_job()==3 then
				say("Iti plac samanii pentru ca pot manuii fulgerele")
				say("cu o precizie uimitoare? Atunci alege invatatura")
				say("regenerarii. Daca vrei sa iti ajuti colegii prin")
				say("forta magica a samanului dragon, atunci alege")
				say("invatatura dragon.")
				say("Te asteptam in apropiere de centrul satului!")
				say()
			elseif pc.get_job()==4 then
				say("Ai auzit vreodata de instinctul oamenilor lupi?")
				say("Care pot ataca cu o mare putere si precizie? Atunci alege ")
				say("invatatura instinctului. Daca vrei sa iti ajuti colegii prin")
				say("forta magica a Posesiei Lupului Indigo, atunci alege")
				say("invatatura instinctului.")
				say("Te asteptam in apropiere de centrul satului!")
				say()				
				
			end
		end
		function join(job,group,title,text)
			local pc_job=pc.get_job()
			if pc_job!=job then
				if pc_job==0 then
					say_title("Invatator:")
					say("Imi pare rau dar eu nu pot sa te instruiesc.")
					say("Cauta invatatorii pentru razboinici.")
					say()
				elseif pc_job==1 then
					say_title("Invatator:")
					say("Imi pare rau dar eu nu pot sa te instruiesc.")
					say("Cauta invatatorii pentru ninja.")
					say()
				elseif pc_job==2 then
					say_title("Invatator:")
					say("Imi pare rau dar eu nu pot sa te instruiesc.")
					say("Cauta invatatorii pentru sura.")
					say()
				elseif pc_job==3 then
					say_title("Invatator:")
					say("Imi pare rau dar eu nu pot sa te instruiesc.")
					say("Cauta invatatorii pentru samani.")
					say()
				elseif pc_job==4 then
					say_title("Invatator:")
					say("Imi pare rau dar eu nu pot sa te instruiesc.")
					say("Cauta invatatorii pentru Lycan.")
					say()
				end
			else
				say_title(title)
				say(text)
				local s=select("Da","Nu")
				if 1==s then
					if pc.get_job()==job and pc.get_skill_group()==0 then
						set_state("start")
						clear_letter()
						pc.set_skill_group(group)
						pc.clear_skill()
					end
				end
			end
			return false
		end
		when teacher1.target.click or skill_group1_1.chat."Razboinic corp" or skill_group2_1.chat."Razboinic corp" or skill_group3_1.chat."Razboinic corp" begin 
			target.delete("teacher1")
			if skill_group.join(0,1,"Invatator:","Datorita calitatilor lor, cat si a armelor si[ENTER]armurilor grele, razboinicii joaca un rol esential[ENTER]in lupta la apropiere.[ENTER][ENTER]Doresti sa inveti aceasta deprindere?[ENTER]") then
				say_title("Invatator:")
				if not pc.is_clear_skill_group() then
					local point=pc.level-1
					say("Ti-ai ales deprinderile, acum trebuie sa-ti")
					say("dezvolti capacitatile de luptator.")
					say()
					say_reward("Ai primit de inceput "..point.." puncte.")
					say()
				else
					say("Ai ales deja aceasta invatatura.")
					say()
				end
			end
		end
		when teacher2.target.click or skill_group1_2.chat."Razboinic mental" or skill_group2_2.chat."Razboinic mental" or skill_group3_2.chat."Razboinic mental" begin 
			target.delete("teacher2")
			if skill_group.join(0,2,"Invatator:","Datorita calitatilor lor, cat si a armelor si[ENTER]armurilor grele, razboinicii joacã un rol esential[ENTER]in lupta la apropiere.[ENTER][ENTER]Doresti sa inveti aceasta deprindere?[ENTER]") then
				say_title("Invatator:")
				if not pc.is_clear_skill_group() then
					local point=pc.level-1
					say("Ti-ai ales deprinderile, acum trebuie sa-ti")
					say("dezvolti capacitatile de luptator.")
					say()
					say_reward("Ai primit de inceput "..point.." puncte.")
					say()
				else
					say("Ai ales deja aceastã invatatura.")
					say()
				end
			end
		end
		when teacher3.target.click or skill_group1_3.chat."Ninja Pumnal" or skill_group2_3.chat."Ninja Pumnal" or skill_group3_3.chat."Ninja Pumnal" begin 
			target.delete("teacher3")
			if skill_group.join(1,1,"Invatator:","Ninja pumnale sunt asasini profesionisti, capabili[ENTER]in orice moment sa loveasca pe neasteptate.[ENTER][ENTER]Doresti sa inveti aceasta deprindere?[ENTER]") then		
				say_title("Învãtãtor:")
				if not pc.is_clear_skill_group() then
					local point=pc.level-1
					say("Ti-ai ales deprinderile, acum trebuie sa-ti")
					say("dezvolti capacitatile de luptator.")
					say()
					say_reward("Ai primit de inceput "..point.." puncte.")
					say()
				else
					say("Ai ales deja aceasta invatatura.")
					say()
				end
			end
		end
		when teacher4.target.click or skill_group1_4.chat."Ninja Arc" or skill_group2_4.chat."Ninja Arc" or skill_group3_4.chat."Ninja Arc" begin 
			target.delete("teacher4")
			if skill_group.join(1,2,"Invatator:","Ninja arc sunt maestri atacului la distanta.[ENTER]Cu arcul pot lovi inamicii de la distante mari[ENTER]cauzand pagube mari.[ENTER][ENTER]Doresti sa inveti aceasta deprindere?[ENTER]") then
				say_title("Invatator:")
				if not pc.is_clear_skill_group() then
					local point=pc.level-1
					say("Ti-ai ales deprinderile, acum trebuie sã-ti")
					say("dezvolti capacitãtile de luptãtor.")
					say()
					say_reward("Ai primit de inceput "..point.." puncte.")
					say()
				else
					say("Ai ales deja aceasta invatatura.")
					say()
				end
			end
		end
		when teacher5.target.click or skill_group1_5.chat."Sura Arme" or skill_group2_5.chat."Sura Arme" or skill_group3_5.chat."Sura Arme" begin 
			target.delete("teacher5")
			if skill_group.join(2,1,"Invatator:","Sura arme sunt luptatorii magici, datorita[ENTER]puterilor magice si maestria cu care manuiesc[ENTER]sabiile, sunt considerati acolitii diavolului.[ENTER][ENTER]Doresti sa inveti aceasta deprindere?[ENTER]") then
				say_title("Invatator:")
				if not pc.is_clear_skill_group() then
					local point=pc.level-1
					say("Ti-ai ales deprinderile, acum trebuie sa-ti")
					say("dezvolti capacitatile de luptator.")
					say()
					say_reward("Ai primit de inceput "..point.." puncte.")
					say()
				else
					say("Ai ales deja aceasta invatatura.")
					say()
				end
			end
		end
		when teacher6.target.click or skill_group1_6.chat."Sura Magie" or skill_group2_6.chat."Sura Magie" or skill_group3_6.chat."Sura Magie" begin 
			target.delete("teacher6")
			if skill_group.join(2,2,"Invatator:","Sura magie sunt luptatori inzestrati cu puteri[ENTER]magice de cand au lasat samanta diavolului[ENTER]sa incolteasca in bratele lor.[ENTER][ENTER]Doresti sa inveti aceasta deprindere?[ENTER]") then
				say_title("Invatator:")
				if not pc.is_clear_skill_group() then
					local point=pc.level-1
					say("Ti-ai ales deprinderile, acum trebuie sa-ti")
					say("dezvolti capacitatile de luptator.")
					say()
					say_reward("Ai primit de inceput "..point.." puncte.")
					say()
				else
					say("Ai ales deja aceasta invatatura.")
					say()
				end
			end
		end
		when teacher7.target.click or skill_group1_7.chat."Saman Dragon" or skill_group2_7.chat."Saman Dragon" or skill_group3_7.chat."Saman Dragon" begin 
			target.delete("teacher7")
			if skill_group.join(3,1,"Invatator:","Inzestrati cu intelepciunea unor lungi cercetari,[ENTER]samanii folosesc in lupta vraja si magia.[ENTER][ENTER]Doresti sa inveti aceasta deprindere?[ENTER]") then
				say_title("Invatator:")
				if not pc.is_clear_skill_group() then
					local point=pc.level-1
					say("Ti-ai ales deprinderile, acum trebuie sa-ti")
					say("dezvolti capacitatile de luptator.")
					say()
					say_reward("Ai primit de inceput "..point.." puncte.")
					say()
				else
					say("Ai ales deja aceasta invatatura.")
					say()
				end
			end
		end
		when teacher8.target.click or skill_group1_8.chat."Saman Vindecare" or skill_group2_8.chat."Saman Vindecare" or skill_group3_8.chat."Saman Vindecare" begin 
			target.delete("teacher8")
			if skill_group.join(3,2,"Invatator:","Inzestrati cu intelepciunea unor lungi cercetari,[ENTER]samanii folosesc in lupta vraja si magia.[ENTER][ENTER]Doresti sa inveti aceasta deprindere?[ENTER]") then
				say_title("Invatator:")
				if not pc.is_clear_skill_group() then
					local point=pc.level-1
					say("Ti-ai ales deprinderile, acum trebuie sa-ti")
					say("dezvolti capacitatile de luptator.")
					say()
					say_reward("Ai primit de început "..point.." puncte.")
					say()
				else
					say("Ai ales deja aceasta invatatura.")
					say()
				end
			end
		end
		when teacher9.target.click or 20400.chat."Instinct" begin 
			target.delete("teacher9")
			if skill_group.join(4,1,"Invatator:","Inzestrati cu cel mai puternic instinct de supravietuire,[ENTER]Lycanii isi folosesc instinctul pentru a-si dobora inamicii.[ENTER][ENTER]Doresti sa inveti aceasta deprindere?[ENTER]") then
				say_title("Invatator:")
				if not pc.is_clear_skill_group() then
					local point=pc.level-1
					say("Ti-ai ales deprinderile, acum trebuie sa-ti")
					say("dezvolti capacitatile de luptator.")
					say()
					say_reward("Ai primit de început "..point.." puncte.")
					say()
				else
					say("Ai ales deja aceasta invatatura.")
					say()
				end
			end
		end
	end
end

Cod: Selectaţi tot

Tutorial instalare : 

Tutorial instalare quest:
1. Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu depozit.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 depozit.quest
5. Intraţi pe server şi scrieţi /reload q .
6. Testaţi quest-ul .