[QUEST] Ziua pescuitului

PoKe
Site Admin
Mesaje: 29
Membru din: Sâm Mai 30, 2020 6:33 pm

Dum Iun 21, 2020 4:02 pm

Cod: Selectaţi tot

quest eveniment_pescuit begin
	state start begin
		when login begin
			if game.get_event_flag("eveniment_pescar") == 1 then
				chat("[EVENIMENT]: Ziua pescuitului - ACTIVAT.")
			end
		end
		when 9009.chat."Administrare eveniment" with pc.is_gm() begin
			if game.get_event_flag("eveniment_pescar") == 1 then
				say_title("Pescar:")
				say("                                        ")
				say("Doresti sa inchizi acest eveniment?     ")
				say("                                        ")
				local confirma = select ("Da", "Nu acum")
				if 1 == confirma then
					notice_all("[EVENIMENT]: Ziua pescuitului - TERMINAT.")
					game.set_event_flag("eveniment_pescar", 0)
					return
				end
			end
			if game.get_event_flag("eveniment_pescar") == 0 then
				say_title("Pescar:")
				say("                                        ")
				say("Doresti sa deschizi acest eveniment?    ")
				say("                                        ")
				local confirma = select ("Da", "Nu acum")
				if 1 == confirma then
					notice_all("[EVENIMENT]: Ziua pescuitului - ACTIVAT.")
					game.set_event_flag("eveniment_pescar", 1)
					return
				end
			end
		end
		when 9009.chat."Ziua pescuitului" with game.get_event_flag("eveniment_pescar") == 1 begin
			say_title("Pescar:")
			say("                                          ")
			say("Saluare! Dupa cum poate stii astazi este  ")
			say("ziua pescuitului. Toti jucatorii pescuiesc")
			say("pentru a primi in schimbul pestilor iteme ")
			say("care ii vor ajuta in aventura lor pe ser- ")
			say("ver. Asadar, daca prinzi crap sau crap    ")
			say("chinezesc adu-mii mie pentru a-ti da la   ")
			say("schimb un premiu!                         ")
			say("                                          ")
			return
		end
		when 9009.take with item.vnum == 27806 and game.get_event_flag("eveniment_pescar") == 1 begin
			say_title("Pescar:")
			say("                                          ")
			say("Oh, se pare ca ai prins ceva peste. Ei bi-")
			say("ne, dupa cum ti-am promis iti voi da in   ")
			say("schimbul lui un premiu. Doresti sa facem  ")
			say("schimbul?                                 ")
			say("                                          ")
			local confirmare = select ("Desigur", "Nu")
			if 1 == confirmare then
				pc.remove_item(27806, 1)
				pc.give_item2(50037, 1)
				return
			end
			if 2 == confirmare then
				return
			end
		end
		when 9009.take with item.vnum == 27808 and game.get_event_flag("eveniment_pescar") == 1 begin
			say_title("Pescar:")
			say("                                          ")
			say("Oh, se pare ca ai prins ceva peste. Ei bi-")
			say("ne, dupa cum ti-am promis iti voi da in   ")
			say("schimbul lui un premiu. Doresti sa facem  ")
			say("schimbul?                                 ")
			say("                                          ")
			local confirmare = select ("Desigur", "Nu")
			if 1 == confirmare then
				pc.remove_item(27808, 1)
				pc.give_item2(50037, 1)
				return
			end
			if 2 == confirmare then
				return
			end
		end
	end
end

Tutorial instalare quest:
1. Salvati continutul quest-ului intr-un fisier text cu extensia .quest (exp: nume.quest)
2. Va conectati la filezilla / winscp si intrati in /usr/game/share/locale/romania/quest (depinde ce tip de server aveti, poate fi diferita calea).
3. Il urcati acolo (atentie sa fie .quest) si da-ti permisiuni 777.
4. Apoi te loghezi in FreeBSD / putty si scrii in felul următor: cd /usr/game/share/locale/romania/quest apoi ./qc nume.quest
5. Intrati pe server si scrieti /reload q .
6. Acum intrati pe server si testati questul.
Scrie răspuns