Pisanie / Poprawa Questów !

Stelios · 19 Maja 2011

@Elite Valder

A nie ma takiego questa już gdzieś?

Wydaje mi się, że jest quest na 'bank'

(bank.quest)

Poszukaj na necie ;P

xDeStRuCtx · 19 Maja 2011

@2up

Ma być dostępny od 25 lvla, tzn. od wtedy, po zabiciu 120 mobów pojawia się say

@Elite

Po czesku:

quest eventnpc begin
state start begin
	when 20350.chat."Banka" begin
		local pin = pc.getqf("konto_pin")
		local konto_yang = pc.getqf("konto_yang")
		if pin == 0 then
			--------------------------- PIN FESTLEGEN! ---------------------------
			say_title("Kuba mluvi na ".. pc.get_name() ..".")
			say("")
			say("Dobry den jmenuji se Kuba")
			say("Protoze semnou mluvite  poprve")
			say("Musite nastavit vas PIN kod pro pristup do banky")
			say("Pin musi byt 5 mistny! A pouze z cisel")
			say("Ujistete se, ze Vas ucet je v bezpeci pred zlodeji")
			say("pokud je vse OK tak zadejte vas novy PIN.")
			say("")
			say_reward("Prosim o zadani Pinu (Jen cisla)")
			local pin_eing = tonumber(input("12345"))
			if pin_eing > 9999 and pin_eing < 100000 then
				say_title("Kuba prave mluvi s".. pc.get_name() ..".")
				say("")
				say("Pin prijat OK")
				say("")
				say_reward("Pin : " ..pin_eing.. " Ulozit?")
				local sel=select("Ano", "Ne")
				if sel==1 then
					pc.setqf("konto_pin", pin_eing)
					say_title("Kuba mluvi s ".. pc.get_name() ..".")
					say("")
					say("Pin kod byl ulozen.")
					say("Brzy nashledanou.")
				elseif sel==2 then
					say_title("Kuba mluvi s".. pc.get_name() ..".")
					say("")
					say("Brzy Ahoj.")
				else
					-- Fehler abfangen!
					say("Neznama chyba")
					say("Prosim okamzik")
					say("Kod chyby pro spravce")
					say("Report!")
					say("Kod chyby: 1")
				end
			elseif pin_eing > 99999 or pin_eing == 0 or pin_eing < 10000 then
				say_title("Roland mluvi s".. pc.get_name() ..".")
				say("")
				say("Omlouvam se ale neno neni v poradku s")
				say("vasim Pinem.")
				say("")
				say_reward("Info: Pin musi obsahovat pouze cisla!")
				say_reward("Info: Pin nesmi byt vetsi nez 99999")
				say_reward("Nebo byt nizsi nez 10000")
			else
				-- Fehler abfangen!
				say("Neznama Chyba!")
				say("Prosim okamzik")
				say("kriticka chyba")
				say("_")
				say("Nahlseno na ucet BusBus kod: 2")
			end
		else
			--------------------------- PIN VORHANDEN! ---------------------------
			say_title("Kuba mluvi s".. pc.get_name() ..".")
			say("")
			say("Dobry den jsem Kuba a staram se o Vase uspory.")
			say("U me jsou v bezpeci .")
			say("")
			say_reward("Co chces udelat?")
			say("")
			local sel=select("Vlozit penize", "Vybrat penize", "Zobrazit castku na konte", "Zmenit PIN", "Zavrit ")
			if sel==1 then
				---------------------------GELD GEBEN---------------------------
				say_title("Roland mluvi s".. pc.get_name() ..".")
				say("")
				say("Prosim, zadejte PIN.")
				local pin_abf = tonumber(input(""))
				if pin_abf == pc.getqf("konto_pin") then
					say_title("Kuba mluvi s".. pc.get_name() ..".")
					say("")
					say("Pin je dobre")
					say("Kolik penez chces vlozit na ucet?")
					say("Maximalne muzes vlozit 1.999.999.999!")
					say("")
					say_reward("Ted mas u sebe : " ..pc.get_money())
					say("")
					local geld_auf_konto = tonumber(input(""))
					local auf_konto_new = tonumber(geld_auf_konto) + pc.getqf("konto_yang")
					if geld_auf_konto < 0 then
						say_title("Kuba mluvi s".. pc.get_name() ..".")
						say("")
						say("Nastala chyba! Cod 2 nahlaseno adminovi.")
					else
						if pc.get_money() < geld_auf_konto then
							say_title("Kuba  mluvi s".. pc.get_name() ..".")
							say("")
							say("TOlik nemuzes vlozit..")
						else
							if auf_konto_new < 2000000000 then
								pc.change_money(-geld_auf_konto)
								pc.setqf("konto_yang", auf_konto_new)
								say_title("Kuba  mluvi s".. pc.get_name() ..".")
								say("")
								say("Na tvuj ucet bylo pripsano: " ..geld_auf_konto.. " yangu:).")
							else
								say_title("Kuba  mluvi s".. pc.get_name() ..".")
								say("")
								say("To neni mozne lituji.")
								say("Na jendoho cloveka nemamte takovej trezor")
								say("Max je 1 999 999 999.")
							end
						end
					end
				else
					say_title("Roland mluvi s".. pc.get_name() ..".")
					say("")
					say("Chybny PIN.")
				end
			elseif sel==2 then
				---------------------------GELD ABHEBEN---------------------------
				say_title("Roland mluvi s".. pc.get_name() ..".")
				say("")
				say("Prosim zadejte PIN")
				local pin_abf = tonumber(input(""))
				if pin_abf == pc.getqf("konto_pin") then
					say_title("Kuba mluvi s".. pc.get_name() ..".")
					say("")
					say("Pin je Dobre.")
					say("Kolik yangu chcete vyzvednout z vaseho uctu?")
					say("")
					say_reward("Na konte mate: " ..pc.getqf("konto_yang"))
					say("")
					local geld_von_konto = tonumber(input(""))
					if geld_von_konto < 0 then
						say_title("Kuba  mluvi s".. pc.get_name() ..".")
						say("")
						say("To nemate...")
					else
						if geld_von_konto > pc.getqf("konto_yang") then
							say_title("Kuba mluvi s".. pc.get_name() ..".")
							say("")
							say("Tolik je na vasem uctu")
						elseif geld_von_konto <= pc.getqf("konto_yang") then
							local yang_bug_check = pc.get_money() + geld_von_konto
							if yang_bug_check < 2000000000 then
								local auf_konto_new = tonumber(pc.getqf("konto_yang") - geld_von_konto)
								pc.setqf("konto_yang", auf_konto_new)
								pc.change_money(geld_von_konto)
								say_title("Roland mluvi s".. pc.get_name() ..".")
								say("")
								say("Vyzvedk jsi" ..geld_von_konto.. "Prijd klidne zase  .")
							else
								say_title("Kuba mluvi s ".. pc.get_name() ..".")
								say("")
								say("TO nepujde")
								say("Chyba nahlasena BusBus -)")
							end
						end
					end
				else
					say_title("Kuba mluvi s".. pc.get_name() ..".")
					say("")
					say("Zadal jsi spatne pin .")
				end
			elseif sel==3 then
				---------------------------GELD ABFRAGEN---------------------------
				say_title("Kuba mluvi s".. pc.get_name() ..".")
				say("")
				say("Chces vedet kolik mas yangu na svem konte??")
				say("Tady jsem ti to vyjel :")
				say("")
				say_reward("Stav yangu : " ..pc.getqf("konto_yang"))
			elseif sel==4 then
				---------------------------PIN ÄNDERN---------------------------
				say_title("Kuba mluvi s".. pc.get_name() ..".")
				say("")
				say("Prosim zadejte aktualni PIN.")
				local pin_abf = tonumber(input(""))
				if pin_abf == pc.getqf("konto_pin") then
					say_title("Kuba mluvi s".. pc.get_name() ..".")
					say("")
					say("Pin je Dobre.")
					say("Prosim, zadejte novy PIN. (Pouze cisla))")
					local pin_eing = tonumber(input("12345"))
					if pin_eing > 9999 and pin_eing < 100000 then
						say_title("Kuba mluvi s".. pc.get_name() ..".")
						say("")
						say("PIN je Dobre!")
						say("")
						say_reward("Pin " ..pin_eing.. " Ulozit zmenu?")
						local sel=select("Ano", "Ne")
						if sel==1 then
							pc.setqf("konto_pin", pin_eing)
							say_title("Kuba mluvi s".. pc.get_name() ..".")
							say("")
							say("PIN byl uspesne zmenen.")
							say(" .")
						elseif sel==2 then
							say_title("Kuba mluvi s".. pc.get_name() ..".")
							say("")
							say("Brzy ahoj.")
						else
							-- Fehler abfangen!
							say("kriticka chyba!")
							say("Prosim cekej")
							say("Hlaseni odeslano spravci")
							say("------")
							say("Kod chyby: 3")
						end
					elseif pin_eing > 99999 or pin_eing == 0 or pin_eing < 10000 then
						say_title("Kuba mluvi s".. pc.get_name() ..".")
						say("")
						say("Omlouvam se ale neco neni v poradku ")
						say("Pin nebyl zmenen.")
						say("")
						say("")
						say_reward("Info: Pin musi obsahovat pouze cisla")
						say_reward("Info: PIN nesmi byt vetsi nez 99999")
						say_reward("Nebo nizsi nez 10000")
					else
						-- Fehler abfangen!
						say("Kriticka chyba!")
						say("Prosim cekej..")
						say("Odeslano hlaseni spravci")
						say("......")
						say("Kod chyby: 4")
					end
				else
					say_title("Kuba mluvi s ".. pc.get_name() ..".")
					say("")
					say("Chybny kod PIN.")
				end
			elseif sel==5 then
				---------------------------Abbrechen---------------------------
				say_title("Roland mluvi s ".. pc.get_name() ..".")
				say("")
				say("Brzy Cau.")
			else
				-- Fehler abfangen!
				say("Neznama CHYBA!!")
				say("Prosim okamzik")
				say("Kody chyby:")
				say("Nahlaseno!!")
				say("Kod chyby: 5")
			end
		end
	end
end
end

i po Polsku

quest bank_skrypt begin
   state start begin
               when 9005.chat."Bank" begin
                       local pin = pc.getqf("konto_pin")
                       local konto_yang = pc.getqf("konto_yang")
                       if pin == 0 then
                               --------------------------- PIN FESTLEGEN! ---------------------------
                               say_title(mob_name(9005).. " mowi do Ciebie ".. pc.get_name() ..".")
                               say("Witam cię na xxx")
                               say("Jestem bankierem tego serwera")
                               say("Ponieważ rozmawiasz ze mna po raz pierwszy,")
                               say("prosze Cie, abys ustawil swoj kod PIN.")
                               say("5 cyfrowy kod jest bezpieczny.")
                               say("Ten kod musi byc bezpieczny przed zlodziejami!")
                               say("")
                               say_reward("Wprowadz swoj 5 cyfrowy kod (tylko cyfry!)")
                               local pin_eing = tonumber(input("12345"))
                               if pin_eing > 9999 and pin_eing < 100000 then
                                       say_title(mob_name(20006).. " mowi Ci ".. pc.get_name() ..".")
                                       say("")
                                       say("Ten PIN jest OK")
                                       say("")
                                       say_reward("Zapisac " ..pin_eing.. " jako Twoj numer PIN?")
                                       local sel=select("Tak", "Nie")
                                       if sel==1 then
                                               pc.setqf("konto_pin", pin_eing)
                                               say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                               say("")
                                               say("Pin zostal zapisany.")
                                               say("Do zobaczenia wkrotce.")
                                       elseif sel==2 then
                                               say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                               say("")
                                               say("Do zobaczenia wkrotce.")
                                       else
                                               -- Fehler abfangen!
                                               say("Unbekannter Fehler!")
                                               say("Bitte umgehend mit ihren")
                                               say("Fehler Code beim Serverleiter")
                                               say("melden!")
                                               say("Fehler Code: 1")
                                       end
                               elseif pin_eing > 99999 or pin_eing == 0 or pin_eing < 10000 then
                                       say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                       say("")
                                       say("Przykro mi, ale cos jest nie tak z")
                                       say("Twoim kodem PIN")
                                       say("")
                                       say_reward("Info: Pin musi zawierac tylko liczby!")
                                       say_reward("PIN nie moze byc wiekszy niz 99999")
                                       say_reward("lub mniejszy niz 10000!")
                               else
                                       -- Fehler abfangen!
                                       say("Unbekannter Fehler!")
                                       say("Bitte umgehend mit ihren")
                                       say("Fehler Code beim Serverleiter")
                                       say("melden!")
                                       say("Fehler Code: 2")
                               end
                       else
                               --------------------------- PIN VORHANDEN! ---------------------------
                               say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                               say("")
                               say("Witam. Jestem bankierem.")
                               say("Mozesz powierzyc mi nadmiar gotowki.")
                               say("")
                               say_reward("Co chcesz zrobic?")
                               say("")
                               local sel=select("Wplac pieniadze", "Wyplac pieniadze", "Sprawdz moje konto", "Zmien kod PIN", "Nic")
                               if sel==1 then
                                       ---------------------------GELD GEBEN---------------------------
                                       say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                       say("")
                                       say("Prosze podac kod PIN")
                                       local pin_abf = tonumber(input(""))
                                       if pin_abf == pc.getqf("konto_pin") then
                                               say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                               say("")
                                               say("Pin jest prawidlowy.")
                                               say("Ile chcesz wplacic?")
                                               say("")
                                               say_reward("Masz: " ..pc.get_money())
                                               say("")
                                               local geld_auf_konto = tonumber(input(""))
if geld_auf_konto < 0 then return end
                                               local auf_konto_new = tonumber(geld_auf_konto) + pc.getqf("konto_yang")
                                               if pc.get_money() < geld_auf_konto then
                                                       say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                                       say("")
                                                       say("Nie masz tyle gotowki!")
                                               else
                                                       if auf_konto_new < 2000000000 then
                                                               pc.change_money(-geld_auf_konto)
                                                               pc.setqf("konto_yang", auf_konto_new)
                                                               say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                                               say("")
                                                               say("Mam " ..geld_auf_konto.. " Yang na koncie")
                                                       else
                                                               say_title(" Bankier ")
                                                               say("")
                                                               say("Nie mozesz na koncie")
                                                               say("miec wiecej niz")
                                                               say("1.999.999.999")
                                                       end
                                               end
                                       else
                                               say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                               say("")
                                               say("Zly pin")
                                       end
                               elseif sel==2 then
                                       ---------------------------GELD ABHEBEN---------------------------
                                       say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                       say("")
                                       say("Prosze podac kod PIN")
                                       local pin_abf = tonumber(input(""))
                                       if pin_abf == pc.getqf("konto_pin") then
                                               say_title(mob_name(20006).. " mowi Ci ".. pc.get_name() ..".")
                                               say("")
                                               say("Pin jest prawidlowy")
                                               say("Ile pieniedzy chcesz wyplacic?")
                                               say("")
                                               say_reward("Na koncie: " ..pc.getqf("konto_yang"))
                                               say("")
                                               local geld_von_konto = tonumber(input(""))
                                               if geld_von_konto < 0 then
                                               return
                                               elseif geld_von_konto > pc.getqf("konto_yang") then
                                                       say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                                       say("")
                                                       say("Nie masz tylu pieniedzy na koncie!")
                                               elseif geld_von_konto <= pc.getqf("konto_yang") then
                                                       local yang_bug_check = pc.get_money() + geld_von_konto
                                                       if yang_bug_check < 2000000000 then
                                                               local auf_konto_new = tonumber(pc.getqf("konto_yang") - geld_von_konto)
                                                               pc.setqf("konto_yang", auf_konto_new)
                                                               pc.change_money(geld_von_konto)
                                                               say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                                               say("")
                                                               say("Otrzymales " ..geld_von_konto.. " Yang.")
                                                       else
                                                               say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                                               say("")
                                                               say("Pamietaj aby nie wyplacac za duzo")
                                                               say("gdyz Yang moga Ci sie zbugowac!")
                                                       end
                                               end
                                       else
                                               say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                               say("")
                                               say("Zly kod PIN")
                                       end
                               elseif sel==3 then
                                       ---------------------------GELD ABFRAGEN---------------------------
                                       say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                       say("")
                                       say("Chcesz wiedziec ile yang masz na koncie?")
                                       say("Sprawdzmy...")
                                       say("")
                                       say_reward("Yang na koncie: " ..pc.getqf("konto_yang"))
                               elseif sel==4 then
                                       ---------------------------PIN ÄNDERN---------------------------
                                       say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                       say("")
                                       say("Wpisz aktualny kod PIN")
                                       local pin_abf = tonumber(input(""))
                                       if pin_abf == pc.getqf("konto_pin") then
                                               say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                               say("")
                                               say("Pin jest prawidlowy.")
                                               say("Wpisz nowy kod PIN (tylko cyfry!)")
                                               local pin_eing = tonumber(input("12345"))
                                               if pin_eing > 9999 and pin_eing < 100000 then
                                                       say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                                       say("")
                                                       say("Ten PIN jest OK")
                                                       say("")
                                                       say_reward("Ustawic " ..pin_eing.. " jako nowy PIN?")
                                                       local sel=select("Tak", "Nie")
                                                       if sel==1 then
                                                               pc.setqf("konto_pin", pin_eing)
                                                               say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                                               say("")
                                                               say("Kod PIN zostal zmieniony.")
                                                               say("Do zobaczenia wkrotce.")
                                                       elseif sel==2 then
                                                               say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                                               say("")
                                                               say("Do zobaczenia wkrotce.")
                                                       else
                                                               -- Fehler abfangen!
                                                               say("Unbekannter Fehler!")
                                                               say("Bitte umgehend mit ihren")
                                                               say("Fehler Code beim Serverleiter")
                                                               say("melden!")
                                                               say("Fehler Code: 3")
                                                       end
                                               elseif pin_eing > 99999 or pin_eing == 0 or pin_eing < 10000 then
                                                       say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                                       say("")
                                                       say("Przykro mi, ale cos jest nie tak z")
                                                       say("Twoim PIN. Dlatego tez nie ulegl zmianie")
                                                       say("")
                                                       say("")
                                                       say_reward("Info:PIN musi zawierac tylko liczby!")
                                                       say_reward("Info: Nie wieksze niz 99999")
                                                       say_reward("i nie mniejsze niz 10000!")
                                               else
                                               -- Fehler abfangen!
                                                       say("Unbekannter Fehler!")
                                                       say("Bitte umgehend mit ihren")
                                                       say("Fehler Code beim Serverleiter")
                                                       say("melden!")
                                                       say("Fehler Code: 4")
                                               end
                                       else
                                               say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                               say("")
                                               say("Zly kod PIN")
                                       end
                               elseif sel==5 then
                                       ---------------------------Nic---------------------------
                                       say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
                                       say("")
                                       say("Do zobaczenia wkrotce")
                               else
                               -- Fehler abfangen!
                                       say("Unbekannter Fehler!")
                                       say("Bitte umgehend mit ihren")
                                       say("Fehler Code beim Serverleiter")
                                       say("melden!")
                                       say("Fehler Code: 5")
                               end
                       end
               end
       end
end

Ano, i po niemiecku

quest eventnpc begin
state start begin
	when 20350.chat."Bank" begin
		local pin = pc.getqf("konto_pin")
		local konto_yang = pc.getqf("konto_yang")
		if pin == 0 then
			--------------------------- PIN FESTLEGEN! ---------------------------
			say_title("Roland spricht zu ".. pc.get_name() ..".")
			say("")
			say("Hallo. Ich bin Roland und Verwalte das")
			say("Da du das erste mal mit mir sprichst möchte")
			say("Ich dich bitten deine Pin fest zu legen.")
			say("Nur eine Sichere 5 stellige Pin stellt")
			say("sicher das dein Konto vor Dieben sicher")
			say("ist.")
			say("")
			say_reward("Bitte 5 stellige Pin eingeben (Nur Zahlen)")
			local pin_eing = tonumber(input("12345"))
			if pin_eing > 9999 and pin_eing < 100000 then
				say_title("Roland spricht zu ".. pc.get_name() ..".")
				say("")
				say("Diese Pin ist ok!")
				say("")
				say_reward("Pin " ..pin_eing.. " Speichern?")
				local sel=select("Ja", "Nein")
				if sel==1 then
					pc.setqf("konto_pin", pin_eing)
					say_title("Roland spricht zu ".. pc.get_name() ..".")
					say("")
					say("Pin wurde gespeichert.")
					say("Bis bald mal.")
				elseif sel==2 then
					say_title("Roland spricht zu ".. pc.get_name() ..".")
					say("")
					say("Bis bald mal.")
				else
					-- Fehler abfangen!
					say("Unbekannter Fehler!")
					say("Bitte umgehend mit ihren")
					say("Fehler Code beim Serverleiter")
					say("melden!")
					say("Fehler Code: 1")
				end
			elseif pin_eing > 99999 or pin_eing == 0 or pin_eing < 10000 then
				say_title("Roland spricht zu ".. pc.get_name() ..".")
				say("")
				say("Tut mir leid doch irgendwas stimmt nicht mit")
				say("deiner Pin.")
				say("")
				say_reward("Info: Pin darf nur Zahlen enthalten!")
				say_reward("Info: Pin darf nicht größer als 99999")
				say_reward("oder kleiner als 10000 sein!")
			else
				-- Fehler abfangen!
				say("Unbekannter Fehler!")
				say("Bitte umgehend mit ihren")
				say("Fehler Code beim Serverleiter")
				say("melden!")
				say("Fehler Code: 2")
			end
		else
			--------------------------- PIN VORHANDEN! ---------------------------
			say_title("Roland spricht zu ".. pc.get_name() ..".")
			say("")
			say("Hallo. Ich bin Roland und Verwalte das")
			say("Geld was die Leute mir anvertraun.")
			say("")
			say_reward("Was möchtest du tun?")
			say("")
			local sel=select("Geld geben", "Geld nehmen", "Konto Abfragen", "Pin ändern", "Nichts")
			if sel==1 then
				---------------------------GELD GEBEN---------------------------
				say_title("Roland spricht zu ".. pc.get_name() ..".")
				say("")
				say("Bitte Pin eingeben.")
				local pin_abf = tonumber(input(""))
				if pin_abf == pc.getqf("konto_pin") then
					say_title("Roland spricht zu ".. pc.get_name() ..".")
					say("")
					say("Pin ist Korrekt.")
					say("Wie viel Geld auf Konto einzahlen?")
					say("Maximal 1.999.999.999!")
					say("")
					say_reward("Dabei: " ..pc.get_money())
					say("")
					local geld_auf_konto = tonumber(input(""))
					local auf_konto_new = tonumber(geld_auf_konto) + pc.getqf("konto_yang")
					if geld_auf_konto < 0 then
						say_title("Roland spricht zu ".. pc.get_name() ..".")
						say("")
						say("Das geht leider nicht.")
					else
						if pc.get_money() < geld_auf_konto then
							say_title("Roland spricht zu ".. pc.get_name() ..".")
							say("")
							say("Soviel hast du garnicht dabei.")
						else
							if auf_konto_new < 2000000000 then
								pc.change_money(-geld_auf_konto)
								pc.setqf("konto_yang", auf_konto_new)
								say_title("Roland spricht zu ".. pc.get_name() ..".")
								say("")
								say("Ich habe " ..geld_auf_konto.. " Yang auf dein Konto getan.")
							else
								say_title("Roland spricht zu ".. pc.get_name() ..".")
								say("")
								say("Soviel kannst du nicht aufs Konto.")
								say("machen. Das würde die Maximal menge")
								say("von 1.999.999.999 überschreiten.")
							end
						end
					end
				else
					say_title("Roland spricht zu ".. pc.get_name() ..".")
					say("")
					say("Falsche Pin.")
				end
			elseif sel==2 then
				---------------------------GELD ABHEBEN---------------------------
				say_title("Roland spricht zu ".. pc.get_name() ..".")
				say("")
				say("Bitte Pin eingeben.")
				local pin_abf = tonumber(input(""))
				if pin_abf == pc.getqf("konto_pin") then
					say_title("Roland spricht zu ".. pc.get_name() ..".")
					say("")
					say("Pin ist Korrekt.")
					say("Wie viel Geld vom Konto abheben?")
					say("")
					say_reward("Auf Konto: " ..pc.getqf("konto_yang"))
					say("")
					local geld_von_konto = tonumber(input(""))
					if geld_von_konto < 0 then
						say_title("Roland spricht zu ".. pc.get_name() ..".")
						say("")
						say("Das geht leider nicht.")
					else
						if geld_von_konto > pc.getqf("konto_yang") then
							say_title("Roland spricht zu ".. pc.get_name() ..".")
							say("")
							say("Soviel hast du nicht auf deinem Konto.")
						elseif geld_von_konto <= pc.getqf("konto_yang") then
							local yang_bug_check = pc.get_money() + geld_von_konto
							if yang_bug_check < 2000000000 then
								local auf_konto_new = tonumber(pc.getqf("konto_yang") - geld_von_konto)
								pc.setqf("konto_yang", auf_konto_new)
								pc.change_money(geld_von_konto)
								say_title("Roland spricht zu ".. pc.get_name() ..".")
								say("")
								say("Ich habe dir " ..geld_von_konto.. " Yang gegeben.")
							else
								say_title("Roland spricht zu ".. pc.get_name() ..".")
								say("")
								say("Soviel kann ich dir nicht geben. Das würde")
								say("Dein Yang auf 0 Setzen! (0 YANG BUG)")
							end
						end
					end
				else
					say_title("Roland spricht zu ".. pc.get_name() ..".")
					say("")
					say("Falsche Pin.")
				end
			elseif sel==3 then
				---------------------------GELD ABFRAGEN---------------------------
				say_title("Roland spricht zu ".. pc.get_name() ..".")
				say("")
				say("Du möchtest wissen wie viel Yang du auf deinem")
				say("Konto hast? Nun gut du hast:")
				say("")
				say_reward("Yang auf Konto: " ..pc.getqf("konto_yang"))
			elseif sel==4 then
				---------------------------PIN ÄNDERN---------------------------
				say_title("Roland spricht zu ".. pc.get_name() ..".")
				say("")
				say("Bitte aktuelle Pin eingeben.")
				local pin_abf = tonumber(input(""))
				if pin_abf == pc.getqf("konto_pin") then
					say_title("Roland spricht zu ".. pc.get_name() ..".")
					say("")
					say("Pin ist Korrekt.")
					say("Bitte Neue Pin eingeben. (Nur Zahlen)")
					local pin_eing = tonumber(input("12345"))
					if pin_eing > 9999 and pin_eing < 100000 then
						say_title("Roland spricht zu ".. pc.get_name() ..".")
						say("")
						say("Diese Pin ist ok!")
						say("")
						say_reward("Pin " ..pin_eing.. " Speichern?")
						local sel=select("Ja", "Nein")
						if sel==1 then
							pc.setqf("konto_pin", pin_eing)
							say_title("Roland spricht zu ".. pc.get_name() ..".")
							say("")
							say("Pin wurde erfolgreich geändert.")
							say("Bis bald mal.")
						elseif sel==2 then
							say_title("Roland spricht zu ".. pc.get_name() ..".")
							say("")
							say("Bis bald mal.")
						else
							-- Fehler abfangen!
							say("Unbekannter Fehler!")
							say("Bitte umgehend mit ihren")
							say("Fehler Code beim Serverleiter")
							say("melden!")
							say("Fehler Code: 3")
						end
					elseif pin_eing > 99999 or pin_eing == 0 or pin_eing < 10000 then
						say_title("Roland spricht zu ".. pc.get_name() ..".")
						say("")
						say("Tut mir leid doch irgendwas stimmt nicht mit")
						say("deiner Pin. Deshalb habe ich sie nicht geändert.")
						say("")
						say("")
						say_reward("Info: Pin darf nur Zahlen enthalten!")
						say_reward("Info: Pin darf nicht größer als 99999")
						say_reward("oder kleiner als 10000 sein!")
					else
						-- Fehler abfangen!
						say("Unbekannter Fehler!")
						say("Bitte umgehend mit ihren")
						say("Fehler Code beim Serverleiter")
						say("melden!")
						say("Fehler Code: 4")
					end
				else
					say_title("Roland spricht zu ".. pc.get_name() ..".")
					say("")
					say("Falsche Pin.")
				end
			elseif sel==5 then
				---------------------------Abbrechen---------------------------
				say_title("Roland spricht zu ".. pc.get_name() ..".")
				say("")
				say("Bis bald mal.")
			else
				-- Fehler abfangen!
				say("Unbekannter Fehler!")
				say("Bitte umgehend mit ihren")
				say("Fehler Code beim Serverleiter")
				say("melden!")
				say("Fehler Code: 5")
			end
		end
	end
end
end

Stelios · 19 Maja 2011

@xDeStRuCtx mógłbyś, proszę, zrobić te questy w spoilerach? ;P

@Dziękuję dziękuję dziękuję

;P

Z okazji tego, że pierwszego, no może drugiego, questa napisałem od początku do końca bez błędów. Postanawiam wam go podać ;)Nie jest on jakiś szczególnie trudny, długi czy cokolwiek, ale trzeba użyć pamięci (swojej )

------------------------------------
--- Misja by Czarny dla CzarnyMT2
--- Prosze o nie przypisywanie sobie
--- cudzej pracy! Pozdrawiam
-------------------------------------

quest znajdz_kogos begin
state start begin
when login or levelup with pc.level >= 175 begin
setstate(list)
end
end
state list begin
when letter begin
local v = find_npc_by_vnum(20354)
if v != 0 then
target.vid("__TARGET__", v, "20354")
end
send_letter("Idz do Straznika ")
end
when button or info begin
say("Straznik cie szuka. ")
say("Idz do niego aby dowiedziec sie o co mu chodzi. ")
say(" ")
setstate(idz)
end
end
state idz begin
when __TARGET__.target.click or 20354.chat."Szukales mnie?" begin
target.delete("__TARGET__ ")
say_title(mob_name(20354)..": ")
say("Witaj! Mam dla ciebie pewną misję... ")
say("Dam ci pewną rzecz, zapytaj się Uriela o napis ")
say("na niej. Co on oznacza..? Dobrze? ")
say(" ")
local s = select("Dobrze, pojde zapytac ", "Jakbym nie mial nic lepszego do roboty.. ")
if s == 2 then
say("Nie to nie. ")
wait()
return
end
if s == 1 then
say_title(mob_name(20354)..": ")
say("Cieszy mnie twoja decyzja, idź teraz do Uriela ")
say("zapytać co oznacza ten napis. ")
say(" ")
pc.give_item2(70009)
end
end
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET2__", v, "20011 ")
end
send_letter("Idz do Uriela")
setstate(uriel)
end
end
state uriel begin
when __TARGET2__.target.click or 20011.chat."Pomożesz mi?" begin
target.delete("__TARGET2__ ")
say_title(mob_name(20011)..": ")
say("Witaj! Oczywiście, że ci pomogę! ")
say("Ty pomogłeś mi tyle razy, jakoś ci ")
say("ci sie w końcu odwdzięcze! ")
say(" ")
say_title(pc.get_name()..": ")
say("Przetłumacz mi napis na tym przedmiocie ")
say(" ")
say_title(mob_name(20011)..": ")
say("Oczywiście, już patrzę co tu napisano. ")
say(" ")
pc.removeitem(70009)
wait()
say_title(mob_name(20011)..": ")
say("Niewiarygodne! ")
say("Skąd masz ten przedmiot?! ")
say("Nie! Lepiej nie mów! ")
say("Powiem ci co oznacza ten napis i uciekaj! ")
say(" ")
say("Oznacza on: ")
say_reward("Wojny juz czas! Haha! ")
say(" ")
wait()
say("Wyglada mi to na pismo starochinskie... ")
say("Lepiej sie strzec... ")
say(" ")
setstate(list34)
end
end
state list34 begin
when letter begin
local v = find_npc_by_vnum(20354)
if v != 0 then
target.vid("__TARGET3__", v, "20354 ")
end
send_letter("Wroc do Straznika")
setstate(miejski)
end
end
state miejski begin
when __TARGET3__.target.click or 20354.chat."Dowiedzialem sie!" begin
target.delete("__TARGET3__ ")
say_title(mob_name(20354)..": ")
say("Napisz mi na kartce co to oznacza, ")
say("zebym tego nie zapomnial! ")
say(" ")
say_reward("UWAGA! Wielkosc liter sie liczy! ") 
local s = input() 
if s ~= "Wojny juz czas! Haha!" then 
say_title(mob_name(20354)..": ")
say("A czy wiesz cos wiecej o tym teksie? ")
say(" ")
say_title(pc.get_name()..": ")
say("Tak, podobno napisany jest ")
say("w jezyku starochinskim... ")
say("Cokolwiek to oznacza... ")
say(" ")
say_title(mob_name(20354)..": ")
say("Dziękuje za tyle informaji. ")
say("Oddaj mi teraz ten przedmiot, wez nagrodę ")
say("i idz już stąd... ")
say(" ")
say_title(pc.get_name()..": ")
say("Ale Uriel nie oddał mi go... ")
say(" ")
say_title(mob_name(20354)..": ")
say("To idz i go od niego zabierz! Już! ")
say(" ")
end
end
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET4__", v, "20011 ")
end
send_letter("Odbierz przedmiot")
setstate(uriel2)
end
end
state uriel2 begin
when __TARGET4__.target.click or 20011.chat."Oddaj go!" begin
target.delete("__TARGET4__ ")
say_title(mob_name(20011)..": ")
say("Dobrze, już dobrze... ")
say("Spokojnie przyjacielu... Chciałem go ")
say("tylko dokładniej obejrzeć. Długo nie wracałeś ")
say("więc postanowiłem go zamienić na coś... ")
say(" ")
say("U Handlarki Różnościami... ")
say("Chciałem się jej tylko o coś zapytać a ta ")
say("zapytała się mnie o coś i tak jakoś wyszło... ")
say(" ")
say("Idz do niej i powiedz, że odkupisz od niej ")
say("ten przedmiot albo cokolwiek, wymyśl coś... ")
say(" ")
setstate(list44)
end
end
state list44 begin
when letter begin
local v = find_npc_by_vnum(9003)
if v != 0 then
target.vid("__TARGET5__", v, "9003 ")
end
send_letter("Idz do Handlarki")
setstate(wymiana)
end
end
state wymiana begin
when __TARGET5__.target.click or 9003.chat."Masz coś mojego.." begin
target.delete("__TARGET5__ ")
if pc.get_money() >= 50000 then
say_title(mob_name(9003)..": ")
say("Na prawdę? To dlaczego ja to mam? ")
say("Albo inaczej... Skąd to mam i czy na pewno ")
say("to mam? Hmm.? ")
say(" ")
say_title(pc.get_name()..": ")
say("Mam swoje źródła... ")
say("Oddaj mi to. ")
say_item_vnum(70009)
say(" ")
say_title(mob_name(9003)..": ")
say("Nie dam ci tego! Chyba, że chcesz ")
say("to możesz to ode mnie wykupić. Co ty na to? ")
say(" ")
say_title(pc.get_name()..": ")
say("Niech ci będzie! Dam ci za to 50.000 ")
say("yang, i ani 1yang więcej! ")
say(" ")
say_title(mob_name(9003)..": ")
say("Trzymaj! ")
say(" ")
pc.changemoney( -50000 )
pc.give_item2(70009, 1)
wait()
say_reward("Wracaj do Straznika! ")
say(" ")
setstate(list54)
end
end
end
state list54 begin
when letter begin
local v = find_npc_by_vnum(20354)
if v != 0 then
target.vid("__TARGET6__", v, "20354 ")
end
send_letter("Wracaj do Straznika")
setstate(miejski6)
end
end
state miejski6 begin
when __TARGET6__.target.click or 20354.chat."Odzyskałem! " begin
target.delete("__TARGET6__ ")
if pc.count_item(70009) > 0 then
say_title(mob_name(20354)..": ")
say("Dziękuję! Teraz idz! ")
say(" ")
say(" ")
say(" ")
say("Aha! Czekaj, mam dla ciebie nagrodę! ")
say(" ")
wait()
say("Strażnik Miejski: ")
say("Nic wiekliego, ale zawsze coś! ")
say(" ")
pc.removeitem(70009)
pc.give_exp2(355000000)
pc.changemoney(15000000)
pc.give_item2(25041)
setstate(com)
end
end
end
state com begin
end
end

Quest zaczyna się na 175lvl (można przecież zmienić ;P). Idziemy do Strażnika, ten prosi nas o pójście z przedmiotem (70009 - szkatułka) do Uriela aby przetłumaczył nam tekst który znajduje się na niej. Idziemy do Uriela, ten nam tłumaczy tekst i zabiera przedmiot. Wracamy do Strażnika i przekazujemy przetłumaczony tekst, jednak nie posiadamy przedmiotu i musimy wracać do Uriela. Wracając do niego po przedmiot dowiadujemy się o tym, że on go już nie posiada. Zamienił go na coś u Handlarki, ale żeby odzyskać przedmiot musimy jej zapłacić, więc idąc do niej musimy posiadać 50k yang. Odkupujemy przedmiot i wracamy do Strażnika, dostajemy nagrodę i oddajemy przedmiot.

(działa w 199% )

@EDIT Czekam na jakieś zadania, nie to od xDeStRuCtx bo jednak trudne jest

Ale coś tam próbowałem napisać ;P ;/

Mniejsza, piszcie prośby o questy, albo coś do poprawy ;D bo normalnie nuda ;|

z4z0l · 19 Maja 2011

@UP

potem sprawdzę jak coś ;P

tak przy okazji to dawaj questy jeszcze w code bo lepiej widać wtedy

@Destr. bez sensu to jest ale dobra ;D

no i nie napiszę ci całego questa bo niektórych funkcji niestety nie będę umiał wykorzystać, bądź nie wiem jakie ;p

kijoslaw · 19 Maja 2011

Witam proszę o napisanie mi takiego questa:

- nazwa misji - brak

- od którego levela - brak

- rozmowy opcja Koń Militar,Skille P

- ID itemków oraz NPC id itema 70023 Quest ma dawać po kliknięciu na Skille P all skille p a na Koń Militar militara 100% przyw. i ks .

polecą plusy i 5*

adm · 19 Maja 2011


quest ksiazka  begin
       state start begin
               when login or levelup with pc.level >= 73 and pc.level <= 90 begin
                       set_state(information)
               end     
       end

state information begin
               when letter begin
                       local v = find_npc_by_vnum(20023)
                       if v != 0 then
                               target.vid("__TARGET__", v, "start")
                       end
                       send_letter("soon")
               end

                       when button or info begin
                   say_title("Ciekawa Ksiazka")
                   say("")
                   say("Soon ma do Ciebie pewne pytanie,")
                   say("chciała bys ja odwiedzil")
                   say("wiec idz do niej i zaoferuj jej swoja pomoc")
                   say("")
                       end

                       when __TARGET__.target.click or
                       20023.chat."Ciekawa Ksiazka" begin
                       target.delete("__TARGET__")
                       say("Biolog Chaegirab:")
                       ---                                                   l
                       say("Witaj! Mam wielką prośbę do Ciebie.")
                       wait()
           say("Otóż przeczytałem bardzo ciekawą")
           say("książkę na temat mrocznej świątynii")
           say("ktore musza zostac zrobione. Nie mam")
           say("i dowiedziałem się, iż Ropusze Generały")
           say("przetrzymują bardzo drogocenny kamień")
                       say("należący do ich wodza - Zjawy żółtego Tygrysa")
           wait()
           say("Ten kamień pozwala zjawie na")
           say("zaklinanie dusz tych istot i przywoływanie")
           say("ich do siebie. Proszę, zabij głównego")
           say("ropuszego generała, który przetrzymuje")
           say("ten kamień i przynieś mi ten kamień.")
           say("Dam Ci wielką nagrodę!")
           say("")     
                       say_reward("Czy chcesz przyjąć te zadanie?")
               local s = select("Tak", "Nie mam ochoty...")

               if 1 == s then
               say("Nawet nie wiesz jak bardzo sie ciesze!")
               say("Dziękuję! Trzymaj się i powodzenia!")

               set_state(key_item)

               elseif 2 == s then
               say("ech... zawidlam sie troche na Tobie")
               say("No cóż, więc poproszę kogoś innego.")
               say("zegnam...")
               end
       end
                       lear_letter()

                       set_state(__complete)
               end

       end
end

       state key_item begin
               when letter begin
                       send_letter("Znajdz kamien")

                       if pc.count_item(90005)>0 then  
                               local v = find_npc_by_vnum(20023)
                               if v != 0 then
                                       target.vid("__TARGET__", v, "start")
                               end
                       end

               end
       when button or info begin
                       if pc.count_item(90005) >0 then
                               say_title("Znalazles kamien!")
                               say("")
                               ---                                                   l
                               say("Wroc do Soon, aby")
                               say("odniesc mu kamien!")
                               say("")
                               return
                       end
                       say_title("Kamien Duszy")
                       say("")
                       ---                                                   l
                       say("Soon chciala bys poszukal")
                       say("pewnego kamienia gdyz")
                       say("bardzo go potrzebuje....")
                       say_item_vnum(90005)
                       say("Mozesz go znalezc zabujajac")
                       say("Zjawe Zoltego Tygrysa")
                       say("")
               end

       when 1304.kill or
                       local s = number(1, 5)
                       if s == 1 and pc.count_item(90005)==0 then
                               pc.give_item2(90005, 1)
                               send_letter("Wroc do Soon!")            
                       end     
               end

       when __TARGET__.target.click  or
                       20023.chat."Znalazlem Kamien " with pc.count_item(90005) > 0  begin
                   target.delete("__TARGET__")
                       say("Son:")
                       say("Oh, Znalazles!")
                       say("Bardzo Tobie dziekuje!")
                       say("")
                       say_reward("Mozesz teraz isc do Baek-Go po nagrode!")
                       say("")
                       pc.remove_item(90005,1)
                       set_state(__reward)
               end

       end

       state __reward begin
               when letter begin
                       send_letter("Analiza Biologa - Nagroda")

                       local v = find_npc_by_vnum(20018)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Baek-Go")
                       end

               end
               when button or info begin
                       say_title("Skonczyles Zadanie!")
                       ---                                                   l
                       say("Soon wysyla Cie")
                       say("po nagrode do Baek-Go!")
                       say("")
               end

               when __TARGET__.target.click  or
                       20018.chat."Nagroda"  begin
                   target.delete("__TARGET__")
                       say("Baek-Go:")
                       say("Hmm, a wiec Soon")
                       say("wyslala Cie po nagrode?")
                       say("Zobaczmy, co tam masz...")
                       say("")



                                                                               if pc.job==0 then
                                               pc.give_item2(183, 1)
                                               say_reward("Otrzymujesz Zatruty Miecz+3")
                                                                                               say_reward("Otrzymujesz 50.000.000 yang") 
                                       end
                                       if pc.job==1 then
                                               pc.give_item2(1133, 1)
                                                    say_reward("Otrzymales Skrzydla Demona +3")
                                                                                                        say_reward("Otrzymujesz 50.000.000 yang") 
                                                                  end
                                       if pc.job==2 then
                                               pc.give_item2(193, 1)
                                               say_reward("Otrzymales Lwi miecz +3")
                                                                                               say_reward("Otrzymujesz 50.000.000 yang") 
                                       end
                                       if pc.job==3 then               
                                               pc.give_item2(5123, 1)
                                               say_reward("Otrzymales Bambusowy Dzwon+3")
                                                                                               say_reward("Otrzymujesz 50.000.000 yang")   
                                       end     
                        pc.change_money(50000000)


                       clear_letter()
                       set_state(__complete)
               end

       end
end

quest neff begin
       state start begin
       local LIMIT_LEVEL_MIN = 80
       local LIMIT_LEVEL_MAX = 110
               when login or levelup with pc.level >= LIMIT_LEVEL_MIN and pc.level <= LIMIT_LEVEL_MAX begin
                       set_state(informacja)
               end
       end
       state informacja begin
               when letter begin
                       local v = find_npc_by_vnum(9003)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Informacja")
                       end
                       send_letter("Tajemnicze Zadanie")
               end

               when button or info begin
                   say_title("Tajemnicze Zadanie")
                   say("")
                                       say("Handlarka Różnościami ma dla Ciebie,")
                   say("właśnie dziwne tajemnicze zadanie.")
                   say("Idź do niej i zapytaj się o misję.")
                   say("")
               end
               when 9003.chat."Nudzi Mi Się " begin
                       target.delete("__TARGET__")
                       say_title("Handlarka Różnościami:")
                                               say("Witaj "..pc.get_name()..".")
                                               say("***TEKST***")
                                               say("***TEKST***")
                                               say("***TEKST***")
                                               say("***TEKST***")
                                               wait() -- next strona
                                               say("***2TEKST2***")
                                               say("***2TEKST2***")
                                               say("***2TEKST2***")
                                               say("***2TEKST2***")
                                               wait() -- next strona
                                               say("***3TEKST3***")
                                               say("***3TEKST3***")
                                               say("***3TEKST3***")
                                               say("***3TEKST3***")
                                               say("") -- odstęp
                                               say_reward("Czy podejmiesz się tego zadania?")
                               local s=select(locale.yes, locale.no)
                       if 2==s then
                               say("Czy jesteś pewnien że nie pomożesz mi??")
                               local a=select("Nie pomogę!","Jednak postaram się pomóc")
                               if  2==a then
                                       say_title("Handlarka Różnościami:")
                                       say("Dobrze że zmieniłeś zdanie")
                                       say("i nie rezygnujesz z mojego zadania.")
                                       say("Wróc kiedy będziesz już gotowy!")
                                       say("")
                                       return
                               end             
                               say_title("Handlarka Różnościami:")
                               say("Misja została anulowana..")
                               say("Żegnam Cie.!")
                               say("")
                               set_state(__GIVEUP__)
                               return
                       end
                       say_title("Handlarka Różnościami:")
                       say("Świetnie..!")
                       say("Czekam na Twój powrót.")
                       set_state(kill_boss_tiger) 
               end     

       end

       state kill_boss_tiger begin
               when letter begin
                       send_letter("Zabij Zjawę Żółtego Tygrysa")
               end

               when button or info begin
                       say_title("Zabij Zjawę Żółtego Tygrysa")
                       say("")
                       say("Zabij Zjawę Żółtego Tygrysa[ENTER]a otrzymasz nagrodę!")
                               local count = pc.getqf("zjawa")
               end

               when 1304.kill begin
                                               local count = pc.getqf("zjawa") + 1

                                                       if count < 1 then
                                                       pc.setqf("zjawa", count)

                                                               if count == 1 then
                                                                       say_title("Misja Wykonana!")
                                                                       say("Udało Ci się wykonać misję!.")
                                                                       say("Wróć do handlarki Różnościami.")
                                                                               set_state(back_go)
                                                               end
                                                       end
               end
       end
       state back_go begin
               when letter begin
                       local v = find_npc_by_vnum(9003)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Handlarka")
                       end
                       send_letter("Misja Wykonana")
               end

               when button or info begin
                   say_title("Misja Wykonana")
                   say("")
                                       say("Wróć do Handlarki po nagrodę.")
                                       say("")
               end
               when 9003.chat."Wykonałem Misję!" begin
                       target.delete("__TARGET__")
                       say_title("Handlarka Różnościami:")
                                               say("Świetnie, brawo i takie tam..")
                                               say("W zamian otrzymasz nagrodę:")
                                               say("")
                                               say_item("Magiczny Metal", 25041, "")
                                               say_reward("Otrzymałeś: Magiczny Metal")
                                               pc.give_item2(25041, 1)
                                               pc.give_item2(25041, 1)
                                               pc.give_item2(25041, 1)
                                               set_state(__THEEND__)
               end
       end

       state __THEEND__ begin
       end
       state __GIVEUP__ begin
       end
end

Proszę o sprawdzenie tych 2 questów gdzie jest błąd.

Stelios · 20 Maja 2011

@kijoslaw

-----------------------------------
--- Misja by Czarny dla CzarnyMT2
--- Prosze o nie przypisywanie sobie
--- cudzej pracy! Pozdrawiam
-----------------------------------

quest blabla begin
state start begin
when 70023.use begin
say_title("asd")
say("bla")
local s = select("Skille na P", "Przywolanie i lvl konia", "Anuluj")
if s == 3 then
say("Może innym razem.")
say("")
wait()
return
end
if s ==1 then
say("Dostałeś skille na P ")
say("")
pc.set_skill_level(1, 59)
pc.set_skill_level(2, 59)
pc.set_skill_level(3, 59)
pc.set_skill_level(4, 59)
pc.set_skill_level(5, 59)
pc.set_skill_level(16, 59)
pc.set_skill_level(17, 59)
pc.set_skill_level(18, 59)
pc.set_skill_level(19, 59)
pc.set_skill_level(20, 59)
pc.set_skill_level(31, 59)
pc.set_skill_level(32, 59)
pc.set_skill_level(33, 59)
pc.set_skill_level(34, 59)
pc.set_skill_level(35, 59)
pc.set_skill_level(46, 59)
pc.set_skill_level(47, 59)
pc.set_skill_level(48, 59)
pc.set_skill_level(49, 59)
pc.set_skill_level(50, 59)
pc.set_skill_level(61, 59)
pc.set_skill_level(62, 59)
pc.set_skill_level(63, 59)
pc.set_skill_level(64, 59)
pc.set_skill_level(65, 59)
pc.set_skill_level(66, 59)
pc.set_skill_level(76, 59)
pc.set_skill_level(77, 59)
pc.set_skill_level(78, 59)
pc.set_skill_level(79, 59)
pc.set_skill_level(80, 59)
pc.set_skill_level(81, 59)
pc.set_skill_level(91, 59)
pc.set_skill_level(92, 59)
pc.set_skill_level(93, 59)
pc.set_skill_level(94, 59)
pc.set_skill_level(95, 59)
pc.set_skill_level(96, 59)
pc.set_skill_level(106, 59)
pc.set_skill_level(107, 59)
pc.set_skill_level(108, 59)
pc.set_skill_level(109, 59)
pc.set_skill_level(110, 59)
pc.set_skill_level(111, 59)
wait()
end
if s == 2 then
say("Dostałeś 30lvl konia oraz przywołanie na 100% ")
say("")

pc.set_skill_level(131, 10)
horse.set_level(30)
pc.give_item2(50053, 1)
wait()
horse.ride()
end
end
end
end

@UP adm

Pierwszy quest masz

lear_letter()

zmien na

clear_letter()

(sprawdziłem na szybko, nie wiem czy czegoś więcej tam nie ma... ;/ ;P )

hunterola · 20 Maja 2011

Poproszę o questa który blokuje zdejmowanie itemku dala każdego lvl

xDeStRuCtx · 20 Maja 2011

@adm

na szybko widzę jeszcze polskie znaki na końcu sayów

Elite Valder · 20 Maja 2011

A ja bym was prosił jeszcze o dopisanie do tego otwarcia magazynu i przedmiotów z item shopu.

Oczywiście do questu z bankeim. Z góry dzięki!

Stelios · 20 Maja 2011

@UP Proste

Sprawdzam czy na 100% działa i wrzucam

Działa w 99999999%

----------------------------------------------
--- Edit. by Czarny (CzarnyMT2) dla MPCForum
--- Prosze o nie przypisywanie sobie
--- cudzej pracy! Pozdrawiam
----------------------------------------------

quest bank_depo_is begin
state start begin
when 9005.chat."Wybor " begin
say_title(mob_name(9005)..":")
say("Wybierz co chcesz : ")
say("")
local s = select("Magazyn", "Item Shop", "Bank", "Sztabki", "Anuluj")
if s == 5 then
return
end
if s == 4 then
npc.open_shop(7)
say("")
setskin(NOWINDOW)
end
if s == 2 then
game.open_mall()
say("")
end
if s == 1 then
game.open_safebox()
say("")
end
if s == 3 then
local pin = pc.getqf("konto_pin")
local konto_yang = pc.getqf("konto_yang")
if pin == 0 then
--------------------------- PIN FESTLEGEN! ---------------------------
say_title(mob_name(9005).. " mowi do Ciebie ".. pc.get_name() ..".")
say("Witam cię na xxx")
say("Jestem bankierem tego serwera")
say("Ponieważ rozmawiasz ze mna po raz pierwszy,")
say("prosze Cie, abys ustawil swoj kod PIN.")
say("5 cyfrowy kod jest bezpieczny.")
say("Ten kod musi byc bezpieczny przed zlodziejami!")
say("")
say_reward("Wprowadz swoj 5 cyfrowy kod (tylko cyfry!)")
local pin_eing = tonumber(input("12345"))
if pin_eing > 9999 and pin_eing < 100000 then
say_title(mob_name(20006).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Ten PIN jest OK")
say("")
say_reward("Zapisac " ..pin_eing.. " jako Twoj numer PIN?")
local sel=select("Tak", "Nie")
if sel==1 then
pc.setqf("konto_pin", pin_eing)
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Pin zostal zapisany.")
say("Do zobaczenia wkrotce.")
elseif sel==2 then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Do zobaczenia wkrotce.")
else
-- Fehler abfangen!
say("Unbekannter Fehler!")
say("Bitte umgehend mit ihren")
say("Fehler Code beim Serverleiter")
say("melden!")
say("Fehler Code: 1")
end
elseif pin_eing > 99999 or pin_eing == 0 or pin_eing < 10000 then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Przykro mi, ale cos jest nie tak z")
say("Twoim kodem PIN")
say("")
say_reward("Info: Pin musi zawierac tylko liczby!")
say_reward("PIN nie moze byc wiekszy niz 99999")
say_reward("lub mniejszy niz 10000!")
else
-- Fehler abfangen!
say("Unbekannter Fehler!")
say("Bitte umgehend mit ihren")
say("Fehler Code beim Serverleiter")
say("melden!")
say("Fehler Code: 2")
end
else
--------------------------- PIN VORHANDEN! ---------------------------
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Witam. Jestem bankierem.")
say("Mozesz powierzyc mi nadmiar gotowki.")
say("")
say_reward("Co chcesz zrobic?")
say("")
local sel=select("Wplac pieniadze", "Wyplac pieniadze", "Sprawdz moje konto", "Zmien kod PIN", "Nic")
if sel==1 then
---------------------------GELD GEBEN---------------------------
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Prosze podac kod PIN")
local pin_abf = tonumber(input(""))
if pin_abf == pc.getqf("konto_pin") then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Pin jest prawidlowy.")
say("Ile chcesz wplacic?")
say("")
say_reward("Masz: " ..pc.get_money())
say("")
local geld_auf_konto = tonumber(input(""))
if geld_auf_konto < 0 then return end
local auf_konto_new = tonumber(geld_auf_konto) + pc.getqf("konto_yang")
if pc.get_money() < geld_auf_konto then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Nie masz tyle gotowki!")
else
if auf_konto_new < 2000000000 then
pc.change_money(-geld_auf_konto)
pc.setqf("konto_yang", auf_konto_new)
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Mam " ..geld_auf_konto.. " Yang na koncie")
else
say_title(" Bankier ")
say("")
say("Nie mozesz na koncie")
say("miec wiecej niz")
say("1.999.999.999")
end
end
else
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Zly pin")
end
elseif sel==2 then
---------------------------GELD ABHEBEN---------------------------
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Prosze podac kod PIN")
local pin_abf = tonumber(input(""))
if pin_abf == pc.getqf("konto_pin") then
say_title(mob_name(20006).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Pin jest prawidlowy")
say("Ile pieniedzy chcesz wyplacic?")
say("")
say_reward("Na koncie: " ..pc.getqf("konto_yang"))
say("")
local geld_von_konto = tonumber(input(""))
if geld_von_konto < 0 then
return
elseif geld_von_konto > pc.getqf("konto_yang") then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Nie masz tylu pieniedzy na koncie!")
elseif geld_von_konto <= pc.getqf("konto_yang") then
local yang_bug_check = pc.get_money() + geld_von_konto
if yang_bug_check < 2000000000 then
local auf_konto_new = tonumber(pc.getqf("konto_yang") - geld_von_konto)
pc.setqf("konto_yang", auf_konto_new)
pc.change_money(geld_von_konto)
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Otrzymales " ..geld_von_konto.. " Yang.")
else
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Pamietaj aby nie wyplacac za duzo")
say("gdyz Yang moga Ci sie zbugowac!")
end
end
else
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Zly kod PIN")
end
elseif sel==3 then
---------------------------GELD ABFRAGEN---------------------------
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Chcesz wiedziec ile yang masz na koncie?")
say("Sprawdzmy...")
say("")
say_reward("Yang na koncie: " ..pc.getqf("konto_yang"))
elseif sel==4 then
---------------------------PIN ÄNDERN---------------------------
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Wpisz aktualny kod PIN")
local pin_abf = tonumber(input(""))
if pin_abf == pc.getqf("konto_pin") then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Pin jest prawidlowy.")
say("Wpisz nowy kod PIN (tylko cyfry!)")
local pin_eing = tonumber(input("12345"))
if pin_eing > 9999 and pin_eing < 100000 then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Ten PIN jest OK")
say("")
say_reward("Ustawic " ..pin_eing.. " jako nowy PIN?")
local sel=select("Tak", "Nie")
if sel==1 then
pc.setqf("konto_pin", pin_eing)
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Kod PIN zostal zmieniony.")
say("Do zobaczenia wkrotce.")
elseif sel==2 then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Do zobaczenia wkrotce.")
else
-- Fehler abfangen!
say("Unbekannter Fehler!")
say("Bitte umgehend mit ihren")
say("Fehler Code beim Serverleiter")
say("melden!")
say("Fehler Code: 3")
end
elseif pin_eing > 99999 or pin_eing == 0 or pin_eing < 10000 then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Przykro mi, ale cos jest nie tak z")
say("Twoim PIN. Dlatego tez nie ulegl zmianie")
say("")
say("")
say_reward("Info:PIN musi zawierac tylko liczby!")
say_reward("Info: Nie wieksze niz 99999")
say_reward("i nie mniejsze niz 10000!")
else
-- Fehler abfangen!
say("Unbekannter Fehler!")
say("Bitte umgehend mit ihren")
say("Fehler Code beim Serverleiter")
say("melden!")
say("Fehler Code: 4")
end
else
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Zly kod PIN")
end
elseif sel==5 then
---------------------------Nic---------------------------
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Do zobaczenia wkrotce")
else
-- Fehler abfangen!
say("Unbekannter Fehler!")
say("Bitte umgehend mit ihren")
say("Fehler Code beim Serverleiter")
say("melden!")
say("Fehler Code: 5")
end
end
end
end
end
end

xZaba191x · 21 Maja 2011

Elo, mam prośbę. Chciałbym abyście mi zrobili questa do biologa ,gdzie mógłbym sobie sam wpisywać id przedmiotu i co biolog mówi. Na początku żeby mówił Potrzebuje... (dodam sobie) klikamy kontynuuj . I jak dostarczamy to normalnie tak jak w standardzie biologa. Na końcu gdy oddamy Biolog mówi: Dziękuje za pomoc zyskujesz... (dodam sobie)prosiłbym tam miejsce na 3 rzeczy (exp, gold, item) z góry dzięki

boooooo · 21 Maja 2011

Można prosić o takiego questa który by był w grze razem z innymi questami ale po naciśnięciu go wpisało jakie są nowe komendy Takie coś Na serwerze .... Są nowe komendy takie jak :

-213234

-234324

-234234

-324234

itp

I zamknij

Stelios · 21 Maja 2011

@UP xZaba191x

---------------------------------------

--- Serwer Rehab Quest by Flexior

--- Edit. by Czarny dla MPCForum

--- Prosze o nie przypisywanie sobie

--- cudzej pracy! Pozdrawiam

---------------------------------------

quest blabla begin

state start begin

end

state run begin

when login or levelup with pc.level >= 60 and pc.level <= 255 begin

set_state(info)

end

state info begin

when letter begin

local v = find_npc_by_vnum(20084)

if v != 0 then

target.vid("__TARGET__", v, "Analiza Biologa - nazwa_item1")

end

send_letter("Analiza Biologa - nazwa_item1")

end

when button or info begin

say_title("Analiza Biologa - nazwa_item1")

say("")

say("Biolog Chaegirab, uczen Uriela,")

say("wlasnie Cie szukal. Prosze idz")

say("do niego i zaoferuj mu swoja pomoc")

say("")

end

when __TARGET__.target.click or

20084.chat."Znajdz Biologa" begin

target.delete("__TARGET__")

say("Biolog Chaegirab:")

say("")

wait()

say("")

set_state(go_to_disciple)

pc.setqf("duration",0) -- ĄiĄH¸Ő¸ŐŞş®É¶ˇ

pc.setqf("collect_count",0)----ˇX¨ú±oŞşŞ««~ĽĆ¶q

pc.setqf("drink_drug",0) ------ˇV łÜ°g´bĂÄ¤ôŞş¸Ü 1

end

state go_to_disciple begin

when letter begin

send_letter("Zadanie Specjalne - nazwa_item1")

end

when button or info begin

say_title("Znajdz nazwa_item1")

--- l

say("")

say("Biolog Chaegirab, uczen Uriela,")

say("szuka nazwa_item1.")

say("Zawsze przynos mu po jednej, aby mial czas")

say("na ich dokladne przebadanie.")

say("nazwa_item1 szukaj w Miejsce!")

say("")

say_item_vnum(item1)

say_reward("Do tej pory zebrales".." "..pc.getqf("collect_count").." nazwa_item1")

say("")

end

when 71035.use begin --°g´bĂÄ¤ô

if get_time() < pc.getqf("duration") then

say("")

say("ÁŮ¤ŁĄiĄH¨ĎĄÎ°g´bĂÄ¤ô")

say("")

return

end

if pc.getqf("drink_drug")==1 then

say("")

say("¤w¸g¨ĎĄÎ¤F1¦¸")

say("")

return

end

if pc.count_item(item1)==0 then

say("Biolog Chaegirab:")

say("Co? Nie przyniosles mi zadnych")

say("Tajemnych Regulaminow?...")

say("")

return

end

item.remove()

pc.setqf("drink_drug",1)

end

when ID_mob1.kill begin

local s = number(1, 5)

if s == 1 and pc.count_item(item1)==0 then

pc.give_item2(item1, 1)

end

when 20084.chat."nazwa_item1" with pc.count_item(item1) >0 begin

if get_time() > pc.getqf("duration") then

say("Biolog Chaegirab:")

--- l

say("Oh!! Znalazles!")

say("Pozwol, ze rzuce okiem...")

say("Jeszcze chwilke.")

say("")

pc.remove_item(item1, 1)

pc.setqf("duration",get_time()+60*60*6) -----------------------------------22??

wait()

local pass_percent

if pc.getqf("drink_drug")==0 then

pass_percent=50

else

pass_percent=50

end

local s= number(1,100)

if s<= pass_percent then

if pc.getqf("collect_count")< 29 then --30ÓĄH¤U

local index =pc.getqf("collect_count")+1

pc.setqf("collect_count",index) -- ¨ú±o¤F¤@Ó+1

say("Biolog Chaegirab:")

say("Oh!! Ten nazwa_item1 jest doskonalej jakosci!")

say("")

say("Przynies mi jeszcze".." "..30-pc.getqf("collect_count").. " nazwa_item1")

say("Prosze, sprobuj je znalezc!")

say("")

pc.setqf("drink_drug",0) --ĂÄ¤ôŞě©l¤Ć

return

end

say("Biolog Chaegirab:")

say("Oh, zebrales juz wszystkie?")

say("Dobra robota...")

say("Ale poczekaj!")

say("Aby zakonczyc swoja prace, potrzebuje")

say("abys przyniosl dla mnie jeszcze jeden przedmiot!")

say("")

pc.setqf("collect_count",0)

pc.setqf("drink_drug",0)

pc.setqf("duration",0)

set_state(key_item)

return

else

say("Biolog Chaegirab:")

say("Ta nazwa_item1 jest zlej jakosci!")

say("Sprobuj przyniesc inny!")

say("Prosze, pomoz mi!")

pc.setqf("drink_drug",0) --ĂÄ¤ôŞě©l¤Ć

return

end

else

say("Biolog Chaegirab:")

say("Jeszcze nie skonczylem badac ostatniego Regulaminu!")

say("Wroc pozniej, kiedy juz skoncze!")

say("")

return

end

state key_item begin

when letter begin

send_letter("Zadanie Specjalne - nazwa_item1")

if pc.count_item(item2)>0 then

local v = find_npc_by_vnum(20084)

if v != 0 then

target.vid("__TARGET__", v, "Analiza Biologa - nazwa_item1")

end

when button or info begin

if pc.count_item(item2) >0 then

say_title("Znalazles nazwa_item2!")

say("")

--- l

say("Wroc do biologa, aby")

say("odniesc mu nazwa_item2!")

say("")

return

end

say_title("Nazwa_item2")

say("")

--- l

say("Zebrales juz wszystkie 30 nazwa_item1!")

say("Teraz, biolog potrzebuje ostatni")

say("przedmiot, aby zakonczyc swoje badania!")

say_item_vnum(item2)

say("Mozesz go znalezc zabijajac potwory")

say("w Misjsce!")

say("")

end

when ID_mob2.kill begin

local s = number(1, 50)

if s == 1 and pc.count_item(item2)==0 then

pc.give_item2(item2, 1)

send_letter("Wroc do biologa!")

end

when __TARGET__.target.click or

20084.chat."Znalazlem nazwa_item2" with pc.count_item(item2) > 0 begin

target.delete("__TARGET__")

say("Biolog Chaegirab:")

say("Oh, Znalazles!")

say("Bardzo Tobie dziekuje!")

say("")

say_reward("Mozesz teraz odebrac nagrode!")

say("")

pc.remove_item(item2,1)

pc.give_item2(id, ilosc)

pc.give_exp2(ilosc)

pc.changemoney(ilosc)

end

clear_letter()

set_state(__complete)

end

state __complete begin

end

Chyba będzie działać

@UP booooooo

Co?

Zrozumiałem, że ma być quest z listem a w tym liście tylko jakie są nazwy komend..

Tak...?

@EDIT Coś takiego? :

-------------------------------------
--- Misja by Czarny dla MPCForum
--- Prosze o nie przypisywanie sobie
--- cudzej pracy! Pozdrawiam
-------------------------------------

quest komendy begin
state start begin
when login or levelup  with pc.is_gm() begin
setstate(list)
end
end
state list begin
when letter begin
send_letter("komendy")
end
when button or info begin
say("1. komenda ")
say("2. komenda ")
say("3. komenda ")
say("4. komenda ")
end
end
end

boooooo · 21 Maja 2011

@up

A można zrobić tak żeby było np strona 2 tegoo questa ? bo jak wpisze dużo komend to wyjdzie po za gre napisy ;/

Stelios · 21 Maja 2011

@up

A można zrobić tak żeby było np strona 2 tegoo questa ? bo jak wpisze dużo komend to wyjdzie po za gre napisy ;/

Może być

EDIT z kilkoma stronami

pomiędzy wait() możesz wpisywać więcej sayów ;P

-------------------------------------
--- Misja by Czarny dla MPCForum
--- Prosze o nie przypisywanie sobie
--- cudzej pracy! Pozdrawiam
-------------------------------------

quest komendy begin
state start begin
when login or levelup  with pc.is_gm() begin
setstate(list)
end
end
state list begin
when letter begin
send_letter("komendy")
end
when button or info begin
say("1. komenda ")
say("2. komenda ")
say("3. komenda ")
say("4. komenda ")
wait()
say(" ")
say(" ")
say(" ")
say(" ")
say(" ")
wait()
say(" ")
say(" ")
say(" ")
say(" ")
say(" ")
wait()
say(" ")
say(" ")
say(" ")
say(" ")
say(" ")
end
end
end

W tym masz 4 strony questa ;P

Elite Valder · 21 Maja 2011

Jeszcze bym prosił o parę questów.

1.Idziemy do stajennego i sprzedaje on za 10kk od razu 21 lvl konia z książką.

2.Ostateczny sąd (nazwa). Czyli mamy zabić wszystkie bossy z misji a są nimi: Królowa pająków(2091) , zjawa żółt tygrysa(1304), Riperek(1093), król demonów(1091), 9gonów(1901), niebianski smok (2493),ognisty król (2206), silna lodowa wiedźa (1192). Misja ma być od Uriel na levelu 85. Nagroda 1kkk i stal+9 która zależy od klasy ( czyli jak sura wykona quest to stal dla sury+9 np.).

3. Groza Metinów. Trzeba zabić 10 metinów na 150 lvl czyli (8039). Misja od Octavio na 95 lvl. Rozmowa dowolna byle bez wuglów. Nagroda 1kkk, i syrek +9 (279).

Z góry dziękuje. Pozdrawiam

old_kwiatosz · 21 Maja 2011

Może być

EDIT z kilkoma stronami

pomiędzy wait() możesz wpisywać więcej sayów ;P

-------------------------------------
--- Misja by Czarny dla MPCForum
--- Prosze o nie przypisywanie sobie
--- cudzej pracy! Pozdrawiam
-------------------------------------

quest komendy begin
state start begin
when login or levelup  with pc.is_gm() begin
setstate(list)
end
end
state list begin
when letter begin
send_letter("komendy")
end
when button or info begin
say("1. komenda ")
say("2. komenda ")
say("3. komenda ")
say("4. komenda ")
wait()
say(" ")
say(" ")
say(" ")
say(" ")
say(" ")
wait()
say(" ")
say(" ")
say(" ")
say(" ")
say(" ")
wait()
say(" ")
say(" ")
say(" ")
say(" ")
say(" ")
end
end
end

W tym masz 4 strony questa ;P

Nie lepsza by była opcja chat("") ?

Bo z tych "okienek" z say można coś nie zapamiętać, a na chacie wszystko widać

Więc do tego polecam opcję chat("").

GraczMetin2 · 21 Maja 2011

Siemka prosze o questa ze jak ktos wejdzie na mapke ( Index 12 ) (warpy 3333 3333 )

To mu sie pokazuje jakis say

Ale tylko jak PIERWSZY raz wejdzie a nie caly czas

Stelios · 21 Maja 2011

@kwiatmix a jeśli dużo osób pisze na chacie?

można też użyć notice("") ;P wtedy wciskając L i patrząc w ogłoszenia też można zobaczyć

Jeszcze bym prosił o parę questów.

1.Idziemy do stajennego i sprzedaje on za 10kk od razu 21 lvl konia z książką.

2.Ostateczny sąd (nazwa). Czyli mamy zabić wszystkie bossy z misji a są nimi: Królowa pająków(2091) , zjawa żółt tygrysa(1304), Riperek(1093), król demonów(1091), 9gonów(1901), niebianski smok (2493),ognisty król (2206), silna lodowa wiedźa (1192). Misja ma być od Uriel na levelu 85. Nagroda 1kkk i stal+9 która zależy od klasy ( czyli jak sura wykona quest to stal dla sury+9 np.).

3. Groza Metinów. Trzeba zabić 10 metinów na 150 lvl czyli (8039). Misja od Octavio na 95 lvl. Rozmowa dowolna byle bez wuglów. Nagroda 1kkk, i syrek +9 (279).

Z góry dziękuje. Pozdrawiam

Quest 1.

-------------------------------------
--- Misja by Czarny dla MPCForum
--- Prosze o nie przypisywanie sobie
--- cudzej pracy! Pozdrawiam
-------------------------------------

quest konik begin
state start begin
when idstajennego.chat."Kupie konia" begin
say_title(mob_name(idstajennego)..":")
say("Witaj, mozesz u mnie kupic konia militarnego")
say("za jedyne 10.000.000 yang!")
say("")
say("Chcesz kupic konia?")
say("")
local s = select("Tak, kupuje!", "Nie, dziekuje.")
if s == 2 then
say("Może innym razem ")
end
if s == 1 then
say("Dobrze, dostales 21lvl konia oraz ")
say("ksiege do przywolania go! ")
say("")
pc.give_item2(50053, 1)
horse.get_level(21)
end
end
end

(nie jestem pewny ednów, piszę na szybko ;P

@DOWN Ajejku

z4z0l · 21 Maja 2011

Siemka prosze o questa ze jak ktos wejdzie na mapke ( Index 12 ) (warpy 3333 3333 )

To mu sie pokazuje jakis say

Ale tylko jak PIERWSZY raz wejdzie a nie caly czas

Już piszę, zaraz dam edit.

@UP

DAWAJ TE QUESTY W CODEEEEEEEEEEEEEEE !!!

-------------------------------------
--QUEST BY z4z0l
-------------------------------------
quest namape begin
state start begin
	when login with pc.get_map_index() == 12 begin
		if pc.getqf("pierwszyraz") == 0 then
			say("Wszedłeś na mapę po raz pierwszy !")
			say("Wpisz resztę saya. Bądź coś. ")
			pc.setqf("pierwszyraz", 1)
		else
		return
		end
	end
end
end

equalxxx · 21 Maja 2011

Siemka. Dało by rade zrobić taki quest:

Po 99 levelu udajemy się do kapitana, płacimy mu 20kk i po tym
Tekst"Gratulacje zrobiłeś resa" + notka na cały serwer"Gracz xxxxxx ukończył xx res"
warp na brame miasta
level spada do 1
punkty resetują sie +10 do rozdania
skille zostają
dodatkowo w nowo dodanej kolumnie w player "res_number" następuję inkrementacja liczby resów

Bambus3k™ · 21 Maja 2011

Siemka. Dało by rade zrobić taki quest:

Po 99 levelu udajemy się do kapitana, płacimy mu 20kk i po tym
Tekst"Gratulacje zrobiłeś resa" + notka na cały serwer"Gracz xxxxxx ukończył xx res"
warp na brame miasta
level spada do 1
punkty resetują sie +10 do rozdania
skille zostają
dodatkowo w nowo dodanej kolumnie w player "res_number" następuję inkrementacja liczby resów

Tak, a tak gra nazywa się MU-Online.

equalxxx · 21 Maja 2011

Wyświetl postUżytkownik equalxxx dnia 21 maj 2011 - 13:53 napisał
Siemka. Dało by rade zrobić taki quest:

Po 99 levelu udajemy się do kapitana, płacimy mu 20kk i po tym

Tekst"Gratulacje zrobiłeś resa" + notka na cały serwer"Gracz xxxxxx ukończył xx res"

warp na brame miasta

level spada do 1

punkty resetują sie +10 do rozdania

skille zostają

dodatkowo w nowo dodanej kolumnie w player "res_number" następuję inkrementacja liczby resów

Tak, a tak gra nazywa się MU-Online.

Tak zgadłeś Pomysł nie jest taki zły i może okazać się ciekawy choćby z tego punktu że nie każdy lubi się patrzeć na stojący pasek doświadczenia wyższych lvl.

Ktoś wie jak zrobić wczyt i zapis do do odpowiedniej kolumny w navi?

Stelios · 21 Maja 2011

@Elite Valder

Quest nr. 3

-------------------------------------
--- Misja by Czarny dla MPCForum
--- Prosze o nie przypisywanie sobie
--- cudzej pracy! Pozdrawiam
-------------------------------------

quest metiny_95lvl begin
state start begin
when login or levelup with pc.level() >= 95 begin
when letter begin
local v = find_npc_by_vnum(id octavio)
if v != 0 then
target.vid("__TARGET__", v, "id octavio")
end
send_letter("Misja od Octavio")
end
when button or info begin
say("Octavio ma dla ciebie misje. ")
say("idz do niego aby dowiedziec sie ")
say("wiecej szczegolow! ")
say(" ")
setstate(idz)
end
end
state idz begin
when __TARGET__.target.lik or id octavio.chat."Misja" begin
say_title(mob_name(id octavio)..":")
say(" ")
say(" ")
say(" ")
setstate(list)
end
end
state list begin
when letter begin
send_letter("Zabij 10 metinow")
end
when button or info begin
say("Masz do zabicia 10 "..mob_name(8039).."!")
say("Zrob to szybko!")
say("")
setstate(zabij)
end
end
state zabij begin
when 8039.kill begin
local a = pc.getqf("ile")+1
if a < 10 then
pc.setqf("ile", a)
else
say("Gratulacje! Udalo ci sie! ")
say("Idz odebrac nagrode od Octavio! ")
say("")
local v = find_npc_by_vnum(id octavio)
if v != 0 then
target.vid("__TARGET2__", v, "id octavio")
end
end
when __TARGET2__.target.click or id octavio.chat."Zabilem" begin
say_title(mob_name(id octavio)..":")
say("Gratuluje! Oto twoja nagroda! ")
say("")
pc.changemoney(1000000000)
pc.give_exp2(1000000000)
pc.give_item2(279, 1)
setstate(koniec)
end
end
end
state koniec begin
end
end

@EDIT Biorę się za pisanie Questa nr. 2 ;P

@EDIT2 Przyznaje się, z tym miałem trochę problemów.

Musiałem go zrobić, że każdy boss osobno, niestety ;/

-------------------------------------
--- Misja by Czarny dla MPCForum
--- Prosze o nie przypisywanie sobie
--- cudzej pracy! Pozdrawiam
-------------------------------------

quest ostateczny_sad begin
state start begin
when login or levelup with pc.level() >= 85 begin
setstate(liscik)
end
end
state liscik begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET__", v, "20011")
end
send_letter("Uriel ma misje dla ciebie")
end
when button or info begin
say("Uriel ma dla ciebie misje. ")
say("Idz do niego aby dowiedziec sie ")
say("wiecej szczegolow! ")
say(" ")
setstate(idz)
end
end
state idz begin
when __TARGET__.target.click or 20011.chat."Misja" begin
target.delete("__TARGET__")
say_title(mob_name(20011)..":")
say(" ")
say(" ")
say(" ")
setstate(list)
end
end
state list begin
when letter begin
send_letter("Zabij Krolowa Pajakow")
end
when button or info begin
say("Masz do zabicia Krolowa Pajakow! ")
say("Zrob to szybko! ")
say("")
setstate(zabij)
end
end
state zabij begin
when 2091.kill begin
setstate(zabilem)
end
end
state zabilem begin
when letter begin
send_letter("zabiles")
end
when button or info begin
say("Gratulacje! Udalo ci sie! ")
say("Idz do Uriela! ")
say("")
setstate(list)
end
end
state list begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET2__", v, "20011")
end
send_letter("Wroc do Uriela")
end
when __TARGET2__.target.click or 20011.chat."Zabilem" begin
target.delete("__TARGET2__")
say_title(mob_name(20011)..":")
say("Gratuluje! Teraz zabij Zjawe Tygrysa! ")
say("")
setstate(zabij2)
end
end
state zabij2 begin
when 1304.kill begin
setstate(zabilem2)
end
end
state zabilem2 begin
when letter begin
send_letter("zabiles")
end
when button or info begin
say("Gratulacje! Udalo ci sie! ")
say("Idz do Uriela! ")
say("")
setstate(list2)
end
end
state list2 begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET3__", v, "20011")
end
send_letter("Wroc do Uriela")
end
when __TARGET3__.target.click or 20011.chat."Zabilem" begin
target.delete("__TARGET3__")
say_title(mob_name(20011)..":")
say("Gratuluje! Teraz zabij Rozpruwacza! ")
say("")
setstate(zabij3)
end
end
state zabij3 begin
when 1093.kill begin
setstate(zabilem3)
end
end
state zabilem3 begin
when letter begin
send_letter("zabiles")
end
when button or info begin
say("Gratulacje! Udalo ci sie! ")
say("Idz do Uriela! ")
say("")
setstate(list3)
end
end
state list3 begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET4__", v, "20011")
end
send_letter("Wroc do Uriela")
end
when __TARGET4__.target.click or 20011.chat."Zabilem" begin
target.delete("__TARGET4__")
say_title(mob_name(20011)..":")
say("Gratuluje! Teraz zabij Krola Demonow! ")
say("")
setstate(zabij4)
end
end
state zabij4 begin
when 1091.kill begin
setstate(zabilem4)
end
end
state zabilem4 begin
when letter begin
send_letter("zabiles")
end
when button or info begin
say("Gratulacje! Udalo ci sie! ")
say("Idz do Uriela! ")
say("")
setstate(list4)
end
end
state list4 begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET5__", v, "20011")
end
send_letter("Wroc do Uriela")
end
when __TARGET5__.target.click or 20011.chat."Zabilem" begin
target.delete("__TARGET5__")
say_title(mob_name(20011)..":")
say("Gratuluje! Teraz zabij Dziewiec Ogonow! ")
say("")
setstate(zabij5)
end
end
state zabij5 begin
when 1901.kill begin
setstate(zabilem5)
end
end
state zabilem5 begin
when letter begin
send_letter("zabiles")
end
when button or info begin
say("Gratulacje! Udalo ci sie! ")
say("Idz do Uriela! ")
say("")
setstate(list5)
end
end
state list5 begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET6__", v, "20011")
end
send_letter("Wroc do Uriela")
end
when __TARGET6__.target.click or 20011.chat."Zabilem" begin
target.delete("__TARGET6__")
say_title(mob_name(20011)..":")
say("Gratuluje! Teraz zabij Nieb. Smoka! ")
say("")
setstate(zabij6)
end
end
state zabij6 begin
when 2493.kill begin
setstate(zabilem7)
end
end
state zabilem7 begin
when letter begin
send_letter("zabiles")
end
when button or info begin
say("Gratulacje! Udalo ci sie! ")
say("Idz do Uriela! ")
say("")
setstate(list6)
end
end
state list6 begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET7__", v, "20011")
end
send_letter("Wroc do Uriela")
end
when __TARGET7__.target.click or 20011.chat."Zabilem" begin
target.delete("__TARGET7__")
say_title(mob_name(20011)..":")
say("Gratuluje! Teraz zabij Ognistego Krola! ")
say("")
setstate(zabij7)
end
end
state zabij7 begin
when 2206.kill begin
setstate(zabilem8)
end
end
state zabilem8 begin
when letter begin
send_letter("zabiles")
end
when button or info begin
say("Gratulacje! Udalo ci sie! ")
say("Idz do Uriela! ")
say("")
setstate(list7)
end
end
state list7 begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET8__", v, "20011")
end
send_letter("Wroc do Uriela")
end
when __TARGET8__.target.click or 20011.chat."Zabilem" begin
target.delete("__TARGET8__")
say_title(mob_name(20011)..":")
say("Gratuluje! Teraz zabij Silna Lodowa Wiedzme! ")
say("")
setstate(zabij8)
end
end
state zabij8 begin
when 1192.kill begin
setstate(zabilem9)
end
end
state zabilem9 begin
when letter begin
send_letter("zabiles")
end
when button or info begin
say("Gratulacje! Udalo ci sie! ")
say("Idz do Uriela! ")
say("")
setstate(list8)
end
end
state list8 begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET9__", v, "20011")
end
send_letter("Wroc do Uriela!!! ")
end
when __TARGET9__.target.click or 20011.chat."Zabilem Wszystko!" begin
target.delete("__TARGET9__")
say_title(mob_name(20011)..":")
say("Gratuluje! Teraz dam ci nagrode!! ")
say("")
setstate(koniec)
pc.changemoney(1000000000)
if pc.job == 0 then
pc.give_item2(11299, 1)
end
if pc.job == 1 then
pc.give_item2(11499, 1)
end
if pc.job == 2 then
pc.give_item2(11699, 1)
end
if pc.job == 3 then
pc.give_item2(11899, 1)
end
end
end
state koniec begin
end
end

Tekst se tam pozmieniaj jak chcesz ;P

(na początku nie miałem pomysłu, a później pisałem bo pisałem (te saye ;P))

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany