Pisanie / Poprawa Questów !

kilu · 29 Stycznia 2012

Witam,

znalazlem na mpc questy do biologa, siedziałem 3h edytując nagrody gdyz sie na tym nie znam. Quest się wczytuje, ale po oddaniu zębów i kamienia, gdy idzie sie do bake-go po nagrode target sie swieci, lecz gdy sie na niego nacisnie nic sie nie dzieje, zadne menu sie nie wyswietla.


Quest collect_quest_lv30  begin
	state start begin
			when login or levelup with pc.level >= 30 and pc.level <= 90 begin
					set_state(information)
			end	
	end
	state information begin
			when letter begin
					local v = find_npc_by_vnum(20084)
					if v != 0 then
							target.vid("__TARGET__", v, "Analiza Biologa - Zeby Orka")
					end
					send_letter("Analiza Biologa - Zeby Orka")
			end
			when button or info begin
				say_title("Analiza Biologa - Zeby Orka")
				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:")
					---												   l
					say("Niebiosa, prosze pomozcie mi...")
		say("Badam wszystkie rodzaje potworow w tym ")
		say("imperium. Jest bardzo duzo rzeczy,")
		say("ktore musza zostac zrobione. Nie mam")
		say("czasu abym mogl sam wybrac sie na wyprawe.")
		say("Prosze, pomoz mi.")
		wait()
		say("Aktualnie badam Zeby Orka.")
		say("Musze przeprowadzic kilka eksperymentow,")
		say("dlatego potrzebuje kilku Zebow Orka.")
		say("Czy moglbys przyniesc mi 10 Zebow Orka?")
		say("Prosze, pomoz mi! Zawsze przynos mi po jednym,")
		say("abym mial czas na ich dokladne przebadanie!")
		say("")																																																																							  
					set_state(go_to_disciple)
					pc.setqf("duration",0)
					pc.setqf("collect_count",0)
					pc.setqf("drink_drug",0)
			end
	end
	state go_to_disciple begin
			when letter begin
					send_letter("Zadanie Specjalne - Zeby Orka")

			end
			when button or info begin
					say_title("Znajdz Zeby Orka")
					---												   l
					say("")
					say("Biolog Chaegirab, uczen Uriela,")
					say("szuka Zebow Orka.")
					say("Zawsze przynos mu po jednym, aby mial czas")
					say("na ich dokladne przebadanie.")
					say("Zebow orka szukaj u Czarnych Orkow!")
					say("")
					say_item_vnum(30006)
					say_reward("Do tej pory zebrales".." "..pc.getqf("collect_count").." Zebow Orka.")
					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(30006)==0 then
							say("Biolog Chaegirab:")
							say("Co? Nie przyniosles mi zadnych")
							say("Zebow Orka?...")
							say("")
							return
					end
					item.remove()  
					pc.setqf("drink_drug",1)
			end


	when 20084.chat."Zeby Orka" with pc.count_item(30006) >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("30006", 1)
							pc.setqf("duration",get_time()+0*0*0)
							wait()

							local pass_percent
							if pc.getqf("drink_drug")==0 then
									pass_percent=70
							else		  
									pass_percent=90
							end

							local s= number(1,100)
							if s<= pass_percent  then
							   if pc.getqf("collect_count")< 9 then	 --10ÓĄH¤U
											local index =pc.getqf("collect_count")+1
											pc.setqf("collect_count",index)	 --¨ú±o¤@Ó®É +1
											say("Biolog Chaegirab:")
											say("Oh!! Ten Zab Orka jest doskonalej jakosci!")
											say("Przynies mi jeszcze".." "..10-pc.getqf("collect_count").. " Zebow Orka.")
											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("Ten Zab orka 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 Zebu Orka!")
			  say("Wroc pozniej, kiedy juz skoncze!")
			  say("")
			  return
			end
	end
end

	state key_item begin
			when letter begin
					send_letter("Zadanie Specjalne - Zeby Orka")

					if pc.count_item(30220)>0 then
							local v = find_npc_by_vnum(20084)
							if v != 0 then
									target.vid("__TARGET__", v, "Analiza Biologa - Zeby Orka")
							end
					end
			end
			when button or info begin
					if pc.count_item(30220) >0 then
							say_title("Znalazles kamien duszy!")
							say("")
							---												   l
							say("Wroc do Biologa, aby")
							say("odniesc mu kamien!")
							say("")
							return
					end
					say_title("Kamien Duszy")
					say("")
					---												   l
					say("Zebrales juz wszystkie 10 Zebow!")
					say("Teraz, biolog potrzebuje ostatni")
					say("przedmiot, aby zakonczyc swoje badania!")
					say_item_vnum(30220)
					say("Mozesz go znalezc zabijajac orki")
					say("w Dolinie Seungryong!")
					say("")
			end


			when 635.kill or
					 636.kill or
					 637.kill  begin
					local s = number(1, 50)
					if s == 1 and pc.count_item(30220)==0 then
							pc.give_item2(30220, 1)
							send_letter("Wroc do Biologa!")		
					end	
			end

			when __TARGET__.target.click  or
					20084.chat."Znalazlem Kamien Duszy" with pc.count_item(30220) > 0  begin
				target.delete("__TARGET__")
					say("Biolog Chaegirab:")
					say("Oh, Znalazles!")
					say("Bardzo Tobie dziekuje!")
					say("")
					say_reward("Mozesz teraz isc do Baek-Go po nagrode!")
					say("")
					pc.remove_item(30220,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 analize Biologa!")
					---												   l
					say("Biolog Chaegirab 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 Biolog")
					say("wyslal Cie po nagrode?")
					say("Zobaczmy, co tam masz...")
					say("")
  say_reward("Otrzymujesz 15% szybkosci poruszania się")
  say_reward("Na zawsze!")
					say_reward("Oraz niespodzianke!")
					pc.give_item2(50070)
					pc.give_item2(50070)
					pc.give_item2(50070)
					pc.give_item2(50070)
					pc.give_item2(50070)
					affect.add_collect(apply.MOV_SPEED, 15, 60*60*24*365*60) --60¦~
					clear_letter()
					set_quest_state("collect_quest_lv40", "run")
					set_state(__complete)
			end

	end

	state __giveup__ begin
			when 20084.chat."Poddajesz sie?" begin
					say("Biolog Chaegirab:")
					say("Czy jestes pewien, ze chcesz sie poddac!?")
					say("Nie bedziesz mial szansy, aby zaczac")
					say("ponownie!")
		 end
	 end
	state __complete begin
	end
end

Dziękuję za pomoc.

BlondynX · 30 Stycznia 2012

hm dziwny blad a takie pytanko dedyk czy na kompie?

Sunushi · 30 Stycznia 2012

kilu:

say_reward("Otrzymujesz 15% szybkosci poruszania się")

zmień na

say_reward("Otrzymujesz 15% szybkosci poruszania się ")

z4z0l · 30 Stycznia 2012

Jop,

używam sobie itemka o id blablablabla i daję on bonus speeda na 10minut

Nie lepiej przez item_proto zrobić :P ?

Pon.Lok · 30 Stycznia 2012

Albo gdy quest się buguje strasznie, wyczyść tabelkę quest w mysql to pomaga ale pamiętaj potem sh make i musisz wgrac resztę questów których nie wpisałeś w locale_list.

ZbieramPlusiki · 30 Stycznia 2012

kto napisz mi misje na poziom 32 idzie sie do kapitana i dostaje sie questa by zabic 10 czarnych orkow wracamy do kapitana i dostajemy za misje 1kk oraz bron zaleznie od klasy daje lajki potrzebne fastem

zrobilem ale cos zle

: [spoiler/] quest psy begin

state start begin

when login with pc.get_level() >= 1 begin

setstate(jeden)

end

state jeden begin

when letter begin

send_letter("Misja u Kapitana")

local v = find_npc_by_vnum(20355)

if v != 0 then

target.vid("__TARGET__", v, "20355")

end

when __TARGET__.target.click or 20355.click begin

say_title(mob_name(20355)..":")

say("Witaj "..pc.get_name().." !")

say("")

say("Mam dla ciebie zadanie! ")

say("Zabij dla mnie 10 czarnych orków! ")

say("")

say("Powodzenia! ")

say("")

setstate(kill)

end

state kill begin

when letter begin

send_letter("Zabij 10 orków")

end

when 636.kill begin

local c = pc.setqf("orki")+1

if c < 10 then

pc.setqf("orki", c)

if c >= 10 then

chat("")

chat("Wróć do "..mob_name(20355)..". Ma dla ciebie nagrode! ")

chat("")

setstate(dwa)

end

state dwa begin

when letter begin

send_letter("Wroc do Kapitana")

local v = find_npc_by_vnum(20355)

if v != 0 then

target.vid("__TARGET__", v, "20355")

end

when __TARGET_.target.click or 20355.chat."Zabilem orki" begin

say_title(mob_name(20355)..":")

say("Gratuluje przyjacielu! ")

pc.change_money(1000000)

setstate(koniec)

end

state koniec begin

end

Karpielek · 30 Stycznia 2012

quest yang begin
   state start begin
    when logout begin
	    pc.get_gold()
	    if pc.gold <0 then
	    pc.change_gold(1999999999)
	    return
	    end
    end
   end
end

Może ktoś sprawdzić poprawność questu? Czy ten return przed endami jest potrzebny?

Stelios · 30 Stycznia 2012

quest yang begin
state start begin
	when logout begin
		pc.get_gold()
		if pc.gold <0 then
		pc.change_gold(1999999999)
		return
		end
	end
end
end
Może ktoś sprawdzić poprawność questu? Czy ten return przed endami jest potrzebny?

Najkrócej i najprościej

quest yang begin
   state start begin
       when logout begin
           if pc.get_money() <= 0 then
               pc.change_money( 1999999999 )
           else
               return
           end
       end
   end
end

Sunushi · 31 Stycznia 2012

Gówno prawda, nie zadziała. W eq mamy yang na 0 jednak w mysql mamy 2kkk+. Btw, po zalogowaniu na 1lvlu też dostaniemy 2kkk Yang?

Stelios · 31 Stycznia 2012

Gówno prawda, nie zadziała. W eq mamy yang na 0 jednak w mysql mamy 2kkk+. Btw, po zalogowaniu na 1lvlu też dostaniemy 2kkk Yang?

A ja też mówię gówno prawda.

Jeśli zbugują nam się yang to mamy -ileś tam a nie +ileś tam

Nie po zalogowaniu tylko po wylogowaniu

when logout begin

Pawemol13 · 31 Stycznia 2012

A ja mam takie pytanie, mianowicie jaki jest when co się wykonuje jak wstaniemy po zabiciu?

Sunushi · 31 Stycznia 2012

A ja też mówię gówno prawda.

Jeśli zbugują nam się yang to mamy -ileś tam a nie +ileś tam

Nie po zalogowaniu tylko po wylogowaniu
when logout begin

Zaloguje sie 1 lvl, wyloguje i już ma 2kkk Yang. Co do ilości w mysql, zależy od tego o ile przekroczymy limit. Jeśli będzie ponad pojemność komórki (~2.1kkk) to wejdzie na ujemne.

Pawemol13, taka funkcja nie jest mi znana, w sumie nie wiem czy w ogóle istnieje.

XydonisMT2 · 31 Stycznia 2012

1.Potrzebuję questa, ktory bedzie polegac na tym gdy gracz wbije 75-99 lv beda napisane gratulacje "Gracz xxx osiagnol xxx lv" A na 99 musi byc "Gracz xxx osiągnął maksymalny lv na serwerze. Gratulacje"

Drugi quest, chcial bym questa cos w stylu tego, : http://www.youtube.com/watch?v=PjI9zMQyE5M. Opcje: Lv 1-45 Dolina orkow metiny do 50 lv. 46-75 Ognista ziemia bossy: Krolowa pajakow krol demonow Metiny: od 55 do 70.76-99 sohan bossy: Umarly Rozpruwacz Krolowa pajakow krol pajakow, metiny: od 75- 85. tam gdzie ma byc id npc aktywowac event zeby prosze zostawic xxx.

3. Od bossow,metinow 60 lv + Ma byc "Gratulacje gracz xxx rozwalil metina xxx" Z gory dzieki za te questy.

Vatu · 31 Stycznia 2012

Kto jest kozak i naprawi tego questa:

quest biciemobow232 begin
state start begin
when 2604.chat."Bicie mobów" begin
say_title("Ubijanie mobów na czas jest B.Trudnym wyzwaniem!")
say("Musisz ubić kilka potworów i zobaczysz po ubiciu wszystkich jaki miałeś czas")
say("Jeżeli nagrasz film z ubijaniem potworów i zdobędziesz najlepszy czas ze wszystkich wygrasz nagrody!")
say_reward("Czy chcesz wejść na mapę?")
local wejscie == select("Chcę się spróbować ", "Jednak nie chce wejść ")
if wejscie == 2 then
return
elseif wejscie == 1 then
if pc.get_level() < 65 then
say("Wybacz, nie mogę Cię wpuścić. ")
say("")
return
if party.get_near_count() > 0
say("Wybacz, nie możesz iść z żadnymi członkami w PT na mapę.")
say("")
return
if party.is_leader() then
say("Nie możesz mieć PT na mapie ")
say("")
return
else
say("OK, ale by pokonać wszystkie potwory musisz")
say("być jeszcze silniejszy, pomogę Ci w tym.")
say("Możesz sobie wybrać jeden bonus.")
end
local bony = select("10% szybkość ataku", "+200 siła ataku", "30% szansa na krytyczne uderzenie", "30% na otrucie", "Nie chce")
if bony == 1 then
affect.add(apply.MOV_SPEED, 10, 60*60*24*365*60)
set_state(wybierz_marmur)
elseif bony == 2 then
																																																																																																																																																																																															   affect.add(apply.ATT_GRADE_BONUS, 200, 60*60*24*365*60)
																																																																																																																																																																																															   set_state(wybierz_marmur)
																																																																																																																																																																																							    elseif bony == 3 then
																																																																																																																																																																																															   affect.add(apply.ATT_POINT_CRITICAL_PCT, 30, 60*60*24*365*60)
																																																																																																																																																																																															   set_state(wybierz_marmur)
																																																																																																																																																																																							    elseif bony == 4 then
																																																																																																																																																																																															   affect.add(apply.ATT_POINT_POISON_PCT, 30, 60*60*24*365*60)
																																																																																																																																																																																															   set_state(wybierz_marmur)
elseif bony == 5 then
set_state(wybierz_marmur)
end
end
end
state wybierz_marmur begin
say("Ok, teraz wybierz sobie marmur.")
say("")
local marmur == select("Dziki pies", "Dziki Sługa", "Młody pająk", "Ezot.Fanatyk")
if marmur == 1 then
pc.polymorphy(101, 500)
																																																																																																																																							    set_state(wejscie_na_mape)
elseif marmur == 2 then
																																																																																																																																							    pc.polymorphy(502, 500)
																																																																																																																																							    set_state(wejscie_na_mape)
elseif marmur == 3 then
																																																																																																																																							    pc.polymorphy(2031)
																																																																																																																																							    set_state(wejscie_na_mape)
																																																																																							    elseif marmur == 4 then
																																																																																																																																							    pc.polymorphy(701)
																																																																																																																																							    set_state(wejscie_na_mape)
end
end
state wejscie_na_mape begin
pc.setqf("priv_bicie_mobow", 1)
																																																							    d.join(73)
when login with pc.in_dungeon() with pc.getgf("priv_bicie_mobow") == 1 begin
if pc.getqf("priv_bicie_mobow") == 1 then
pc.warp(8562, 99)
																																																																																																																							    pc.setqf("priv_bicie_mobow", 2)
																																																																																																																							    d.notice("Ubij moby jak najszybciej potrafisz!")
																																																																																																																							    d.notice("Powodzenia!")
timer("przygotuj", 5)
end
end
when przygotuj.timer begin
d.notice("Za chwilę nastąpi odliczanie do respu potwora!")
timer("respimy", 5)
end
when respimy.timer begin
d.notice("Resp nastąpi za 5")
timer("respimy2", 1)
end
when respimy2.timer begin
d.notice("Resp nastąpi za 4")
timer("respimy3", 1)
end
when respimy3.timer begin
d.notice("Resp nastąpi za 3")
timer("respimy4", 1)
end
when respimy4.timer begin
d.notice("Resp nastąpi za 2")
timer("respimy5", 1)
end
when respimy5.timer begin
d.notice("Resp nastąpi za 1")
timer("respimy6", 1)
end
when respimy6.timer begin
d.notice("Walka rozpoczyna się!")
d.notice("Twoim pierwszym przeciwnikiem będzie Elit. Ognisty Król")
pc.setqf("time1", get_time())
d.spawn_mob(2207, 195, 690)
end
when 2207.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
d.notice("Pokonałeś Elit. Ognistego Króla, zaraz zrespi się Elit. 9 ogonow.")
d.spawn_mob(1902, 195, 690)
end
when 1902.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
d.notice("Pokonałeś Elit. 9 ogonow, zaraz zrespi się Zjawa Zoltego Tygrysa.")
d.spawn_mob(2493, 195, 690)
end
when 1304.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
d.notice("Pokonałeś Zjawa Zoltego Tygrysa, zaraz zrespi się Ripper.")
d.spawn_mob(1093, 195, 690)
end
when 1093.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
d.notice("Pokonałeś wszystkie moby, zaraz zostaniesz wylogowany!")
pc.setqf("time2", get_time())
pc.setqf("priv_bicie_mobow", 3)
affect.remove()
timer("dowidzenia", 10)
end
when dowidzenia.timer begin
d.exit_all()
end
when login with pc.getqf("priv_bicie_mobow") == 3 begin
																																																															 pc.setqf("priv_bicie_mobow", 0)
																																																															 pc.remove_polymorph()
																																																															 local x = pc.getqf("time")
																																																															 local y = pc.getqf("time2")
																																																															 local diff = pc.setqf("time3", y-x)
if y-x > 60 then
say("Twój czas to: "..diff/60.." minut.")
else
say("Twój czas to: "..diff.." sekund.")
end
end
end
end

Chcę żeby przenosiło na 8562, 99

Sunushi · 31 Stycznia 2012

Już dziś zostań bohaterem w swoim domu, zacznij używać spoilera!

P.S. zmień pc.warp(8562, 99) na pc.warp(856200, 9900)

Vatu · 31 Stycznia 2012

@Up Ale mi on nie działa.

Bo chodzi o to że jak sie wgrywa do dochodzi do momętu:

quest biciemobow232 begin

state start begin

when 2604.chat."Bicie mobów" begin

I Tylko tyle mam w VBox

Nie wiem czemu nie chce całe się wczytać.

A sprawdziłem Czy działa i w grze nie ma tej rozmowy z 2604 Bicie mobów/

ForFunHard · 31 Stycznia 2012

Chciałem przerobić questa z FMS przerobiłem i nadaj daje FMS a powinien dawać Zatruty mieczyk ( Chciałem zobaczyć czy działa ) I Nie działa nie daje Trutki tylko FMS czemu tak jest ??. Lub jak jest quest boss.quest

I jak się zabije np. Wodza Orków to jest napisane nick.... zabił wodza orków, A jak zmieniałem na np. nick pokonał............ To pisze nadal zabil wodza..... Pomożesz dam + lub - co wolisz

Vatu · 31 Stycznia 2012

Z Tym wodzem to zobacz sobie w object i tam 691 i jak masz ustawione boss.quest czy jakoś tak.

A z fms daj quest.

nfsfankp50098 · 31 Stycznia 2012

Witam potrzebuje questa na oryginalną fryzurę np: idę do npc i tam jest opcja Oryginalna fryzura i jak naciśniemy to już mamy oryginał

npc ma id 9996

Sunushi · 31 Stycznia 2012

nfsfankp50098, oryginalny quest z plików raina:

quest hair_shop begin
state start begin
 when 20021.chat."¦łĂöŔYľvŞş¬G¨Ć" with pc.get_part(PART_HAIR) >= 1001 begin
  say("¦ăÄR®¦:")
  say("üň~ §AŞşľv«¬«Üş}«G~")
  say("¦ý¬OĄH«eŞşľv«¬¤ń¸ű¦n¬Ý¤ń¸űľA¦X§A¶Ü?")
  say("«ç»ňĽË? §A·Q¤Ł·Q§ó§ď¬°¤§«eŞşľv«¬?")
  say("»Ýn50¸U¨â")
  say("")
  say("")
  local a = select("¦nŞş~ §Ún§ó§ď¬°¤§«eŞşľv«¬", "«Ü©ęşp,¤Ł»Ýn")
  if a == 1 then
   if pc.money >= 500000 then
 pc.changemoney(-500000)
 say("¦ăÄR®¦:")
 say("§A¨M©wŞş«D±`¦n")
 say("ĄiĄHµĄµĄ§Ú?")
 say("")
 wait()
 say("łŘěŔ łŘěŔ")
 say("Ô|Ô| Ô|Ô|")
 say("łŘěŔ łŘěŔ")
 say("Ô|Ô| Ô|Ô|")
 say("")
 wait()
 say("¦ăÄR®¦:")
 say("®¦~ ¬Ý¤WĄh¤Ł¤Ó¦n..")
 say("")
 wait()
 say("¦ăÄR®¦:")
 say("®¦~ ˛{¦b§ą¦¨¤F")
 say("§AŔł¸Ó·|«D±`łßĹw˛{¦błoÓľv«¬Şş")
 say("")
 pc.set_part(PART_HAIR, 0)
   else
 say("¦ăÄR®¦:")
 say("łá~ ¬ÝĽË¤l,§A˛{¦b¨S¦łżúłá~..")
 say("»Ýn50¸U¨â.. .. ..50¸U¨â.")
 say("")
 wait()
 q.done()
   end
  elseif a == 2 then
   say("¦ăÄR®¦:")
   say("§Ú·|µą§A«Ü¦n¬ÝŞşľv«¬,§A¤Ł»Ýn¨ş´Nşâ¤F§a")
   say("")
   say("")
  else
   say("UNKNOWN BUTTON ["..a.."]")
  end
 end
end
end

Vatu · 31 Stycznia 2012

Skoro z tamtym nie da rady to moze tego da radę poprawić:

quest minotaur begin

state start begin

when login or levelup with pc.get_level >= 99 begin

set_state(idz)

end

state idz begin

when letter begin

local v = find_npc_by_vnum(2604)

if v != 0 then

target.vid("__TARGET__", v, "Minotaur")

end

send_letter("Potępiona Bestia")

end

when button or idz begin

say_title(col.orange("Potępiona Besita"))

say("Witaj dzielny wojowniku.")

say("Minotaur prosił abyś się do niego udał!")

say("Ponoć ma dla Ciebie arcy trudne zadanie.")

say_reward(col.orange("Udaj się do Minotaura!"))

end

when __TARGET__.target.click or

2604.chat."Potepiona Bestia" begin

target.delete("__TARGET__")

say_title(col.orange("Minotaur:"))

say("Witaj!")

say("Potrzebuję twojej pomocy!")

say("Pewnie już słyszałeś o Potępionej Besti!")

say("Jest ona bardzo niebezpieczna i chce się")

say("wydostać z piekła by zawładnąć krainami Metin2.")

say("Nie możemy do tego dopuścić!")

say("Jednak ja sam nie dam rady jej pokonać")

say("ponieważ jest zbyt potężna.")

say("Dlatego wezwałem właśnie Ciebie byś mi w tym pomógł!")

say("Bestia znajduję sie w Piekle, ale żeby do niej się")

say("dostać będziesz musiał pokonać najpierw jej podwadnych")

say("nie będzie to wcale takie łatwe, dlatego proponuję Ci")

say("abyś udał się tam z swoimi kolegami, wtedy może wam sie uda.")

say("Ode mnie jako pomoc otrzymasz 3 Marmury Polimorfi oraz")

say("Błogosławieństwo Smoka abyś mógł pokonać Potępioną Bestię!")

say("Jako dowód pokonania Potępionej Besti")

say("przynieś mi Pierścionek Zemsty")

say(col.red("Powodzenia! ))

pc.give_item2(71020, 200)

set_state(pokonaj)

end

state pokonaj begin

when letter begin

send_letter("Pokonaj Bestię")

end

when button or idz begin

say(col.orange("Pokonaj Bestię"))

say("Minotaur wysłał Cię abyś pokonał:")

say(col.red("Potępioną Besię"))

say("Na razie jeszcze nie udało Ci się jej pokonać!")

say("Pamiętaj jako dowód masz przynieść:")

say(col.red("Pierścionek Zemsty"))

say_item("30201")

end

when 2529.kill with pc.countitem(30201)==0 begin

local random = math.random(1)

if random == 1 then

pc.give_item2(730201, 1)

say(col.yellow("Nagle wrota piekłą zaczeły się zamykać!"))

say("")

say("Gratulacje!")

say("Udało Ci się pokonać Potępioną Bestię!")

say("Krainy Metin2 znowu są bezpieczne, dzięki Tobie!")

say(col.green("Udaj się z powrotem do Minotaura."))

local v = find_npc_by_vnum(2604)

if v != 0 then

target.vid("__TARGET__", v, "Minotaur")

end

when 2604.chat."Pokonałem Bestię" with pc.countitem(30201)>0 begin

target.delete("__TARGET__")

say_title(col.orange("pc . get_name () .."))

say("Udało mi sie pokonać Potępioną Bestię!")

say("Mam także Pierścionek Zemsty")

say("")

wait()

say_title(col.orange("Minotaur:")

say("Gratulacje!")

say("Nie myślałem, że Ci się to uda.")

say("Jednak mnie zaskoczyłeś!")

say("Zasłużyłeś na nagrodę!")

say(col.red("Otrzymujesz:"))

say(col.green("Pierścień Doświadczenia na 10 godz."))

say(col.green("Pięć Duchowych Kamieni"))

pc.remove_item(30201, 1)

pc.give_item2(72001, 1)

pc.give_item2(50513, 5)

set_state(__COMPLETE__)

end

Wgrać się wgra ale do:

when __TARGET__.target.click or

2604.chat."Potepiona Bestia" begin

a w grze nie ma go.

Proszę o pomoc daje like i 5.

To chyba prosty quest.

Sunushi · 31 Stycznia 2012

Skoro z tamtym nie da rady to moze tego da radę poprawić:

quest minotaur begin

state start begin

when login or levelup with pc.get_level >= 99 begin

set_state(idz)

end

end

state idz begin

when letter begin

local v = find_npc_by_vnum(2604)

if v != 0 then

target.vid("__TARGET__", v, "Minotaur")

end

send_letter("Potępiona Bestia")

end

when button or idz begin

say_title(col.orange("Potępiona Besita"))

say("Witaj dzielny wojowniku.")

say("Minotaur prosił abyś się do niego udał!")

say("Ponoć ma dla Ciebie arcy trudne zadanie.")

say_reward(col.orange("Udaj się do Minotaura!"))

end

when __TARGET__.target.click or

2604.chat."Potepiona Bestia" begin

target.delete("__TARGET__")

say_title(col.orange("Minotaur:"))

say("Witaj!")

say("Potrzebuję twojej pomocy!")

say("Pewnie już słyszałeś o Potępionej Besti!")

say("Jest ona bardzo niebezpieczna i chce się")

say("wydostać z piekła by zawładnąć krainami Metin2.")

say("Nie możemy do tego dopuścić!")

say("Jednak ja sam nie dam rady jej pokonać")

say("ponieważ jest zbyt potężna.")

say("Dlatego wezwałem właśnie Ciebie byś mi w tym pomógł!")

say("Bestia znajduję sie w Piekle, ale żeby do niej się")

say("dostać będziesz musiał pokonać najpierw jej podwadnych")

say("nie będzie to wcale takie łatwe, dlatego proponuję Ci")

say("abyś udał się tam z swoimi kolegami, wtedy może wam sie uda.")

say("Ode mnie jako pomoc otrzymasz 3 Marmury Polimorfi oraz")

say("Błogosławieństwo Smoka abyś mógł pokonać Potępioną Bestię!")

say("Jako dowód pokonania Potępionej Besti")

say("przynieś mi Pierścionek Zemsty")

say(col.red("Powodzenia! ))

pc.give_item2(71020, 200)

pc.give_item2(71020, 200)

set_state(pokonaj)

end

end

state pokonaj begin

when letter begin

send_letter("Pokonaj Bestię")

end

when button or idz begin

say(col.orange("Pokonaj Bestię"))

say("Minotaur wysłał Cię abyś pokonał:")

say(col.red("Potępioną Besię"))

say("Na razie jeszcze nie udało Ci się jej pokonać!")

say("Pamiętaj jako dowód masz przynieść:")

say(col.red("Pierścionek Zemsty"))

say_item("30201")

end

when 2529.kill with pc.countitem(30201)==0 begin

local random = math.random(1)

if random == 1 then

pc.give_item2(730201, 1)

say(col.yellow("Nagle wrota piekłą zaczeły się zamykać!"))

say("")

say("Gratulacje!")

say("Udało Ci się pokonać Potępioną Bestię!")

say("Krainy Metin2 znowu są bezpieczne, dzięki Tobie!")

say(col.green("Udaj się z powrotem do Minotaura."))

local v = find_npc_by_vnum(2604)

if v != 0 then

target.vid("__TARGET__", v, "Minotaur")

end

end

end

when 2604.chat."Pokonałem Bestię" with pc.countitem(30201)>0 begin

target.delete("__TARGET__")

say_title(col.orange("pc . get_name () .."))

say("Udało mi sie pokonać Potępioną Bestię!")

say("Mam także Pierścionek Zemsty")

say("")

wait()

say_title(col.orange("Minotaur:")

say("Gratulacje!")

say("Nie myślałem, że Ci się to uda.")

say("Jednak mnie zaskoczyłeś!")

say("Zasłużyłeś na nagrodę!")

say(col.red("Otrzymujesz:"))

say(col.green("Pierścień Doświadczenia na 10 godz."))

say(col.green("Pięć Duchowych Kamieni"))

pc.remove_item(30201, 1)

pc.give_item2(72001, 1)

pc.give_item2(50513, 5)

set_state(__COMPLETE__)

end

end

Wgrać się wgra ale do:

when __TARGET__.target.click or

2604.chat."Potepiona Bestia" begin

a w grze nie ma go.

Proszę o pomoc daje like i 5.

To chyba prosty quest.

say("Jest ona bardzo niebezpieczna i chce się")

zmień na

say("Jest ona bardzo niebezpieczna i chce sie")

Vatu · 31 Stycznia 2012

dalej błąd

Zrobiłem SS:

Rower1310 · 31 Stycznia 2012

sprawdź czy pierwsza lub ostatnia litera w say , say_title itd nie są polskimi znakami (np. ą , ś , ć itd)

@edit

@vatu masz tutaj kod po polskich znakach które były na końcu dodałem spację

quest minotaur begin
state start begin
when login or levelup with pc.get_level >= 99 begin
set_state(idz)
end
end
state idz begin
when letter begin
local v = find_npc_by_vnum(2604)
if v != 0 then
target.vid("__TARGET__", v, "Minotaur")
end
send_letter("Potępiona Bestia")
end

when button or idz begin
say_title(col.orange("Potępiona Besita"))
say("Witaj dzielny wojowniku.")
say("Minotaur prosił abyś się do niego udał!")
say("Ponoć ma dla Ciebie arcy trudne zadanie.")
say_reward(col.orange("Udaj się do Minotaura!"))
end
when __TARGET__.target.click or
2604.chat."Potepiona Bestia" begin
target.delete("__TARGET__")
say_title(col.orange("Minotaur:"))
say("Witaj!")
say("Potrzebuję twojej pomocy!")
say("Pewnie już słyszałeś o Potępionej Besti!")
say("Jest ona bardzo niebezpieczna i chce się ")
say("wydostać z piekła by zawładnąć krainami Metin2.")
say("Nie możemy do tego dopuścić!")
say("Jednak ja sam nie dam rady jej pokonać")
say("ponieważ jest zbyt potężna.")
say("Dlatego wezwałem właśnie Ciebie byś mi w tym pomógł!")
say("Bestia znajduję sie w Piekle, ale żeby do niej się ")
say("dostać będziesz musiał pokonać najpierw jej podwadnych")
say("nie będzie to wcale takie łatwe, dlatego proponuję Ci")
say("abyś udał się tam z swoimi kolegami, wtedy może wam sie uda.")
say("Ode mnie jako pomoc otrzymasz 3 Marmury Polimorfi oraz")
say("Błogosławieństwo Smoka abyś mógł pokonać Potępioną Bestię!")
say("Jako dowód pokonania Potępionej Besti")
say("przynieś mi Pierścionek Zemsty")
say(col.red("Powodzenia! ))
pc.give_item2(71020, 200)
pc.give_item2(71020, 200)
set_state(pokonaj)
end
end
state pokonaj begin
when letter begin
send_letter("Pokonaj Bestię ")
end
when button or idz begin
say(col.orange("Pokonaj Bestię "))
say("Minotaur wysłał Cię abyś pokonał:")
say(col.red("Potępioną Besię "))
say("Na razie jeszcze nie udało Ci się jej pokonać!")
say("Pamiętaj jako dowód masz przynieść:")
say(col.red("Pierścionek Zemsty"))
say_item("30201")
end

when 2529.kill with pc.countitem(30201)==0 begin
local random = math.random(1)
if random == 1 then
pc.give_item2(730201, 1)
say(col.yellow("Nagle wrota piekłą zaczeły się zamykać!"))
say("")
say("Gratulacje!")
say("Udało Ci się pokonać Potępioną Bestię!")
say("Krainy Metin2 znowu są bezpieczne, dzięki Tobie!")
say(col.green("Udaj się z powrotem do Minotaura."))
local v = find_npc_by_vnum(2604)
if v != 0 then
target.vid("__TARGET__", v, "Minotaur")
end
end
end
when 2604.chat."Pokonałem Bestię" with pc.countitem(30201)>0 begin
target.delete("__TARGET__")
say_title(col.orange("pc . get_name () .."))
say("Udało mi sie pokonać Potępioną Bestię!")
say("Mam także Pierścionek Zemsty")
say("")
wait()
say_title(col.orange("Minotaur:")
say("Gratulacje!")
say("Nie myślałem, że Ci się to uda.")
say("Jednak mnie zaskoczyłeś!")
say("Zasłużyłeś na nagrodę!")
say(col.red("Otrzymujesz:"))
say(col.green("Pierścień Doświadczenia na 10 godz."))
say(col.green("Pięć Duchowych Kamieni"))
pc.remove_item(30201, 1)
pc.give_item2(72001, 1)
pc.give_item2(50513, 5)
set_state(__COMPLETE__)
end
end

@edit2

@vatu masz tutaj poprawiony twój wcześniejszy kod

quest biciemobow232 begin
state start begin
	when 2604.chat."Bicie mobów" begin
		say_title("Ubijanie mobów na czas jest B.Trudnym wyzwaniem!")
		say("Musisz ubić kilka potworów i zobaczysz po ubiciu wszystkich jaki miałeś czas")
		say("Jeżeli nagrasz film z ubijaniem potworów i zdobędziesz najlepszy czas ze wszystkich wygrasz nagrody!")
		say_reward("Czy chcesz wejść na mapę?")
		local wejscie == select("Chcę się spróbować ", "Jednak nie chce wejść ")
			if wejscie == 2 then
				return
			elseif wejscie == 1 then
				if pc.get_level() < 65 then
					say("Wybacz, nie mogę Cię wpuścić. ")
					say("")
					return
				elseif party.get_near_count() > 0
					say("Wybacz, nie możesz iść z żadnymi członkami w PT na mapę.")
					say("")
					return
				elseif party.is_leader() then
					say("Nie możesz mieć PT na mapie ")
					say("")
					return
				else
					say("OK, ale by pokonać wszystkie potwory musisz")
					say("być jeszcze silniejszy, pomogę Ci w tym.")
					say("Możesz sobie wybrać jeden bonus.")
				end
			end
		local bony = select("10% szybkość ataku", "+200 siła ataku", "30% szansa na krytyczne uderzenie", "30% na otrucie", "Nie chce")
			if bony == 1 then
				affect.add(apply.MOV_SPEED, 10, 60*60*24*365*60)
				set_state(wybierz_marmur)
			elseif bony == 2 then
				affect.add(apply.ATT_GRADE_BONUS, 200, 60*60*24*365*60)
				set_state(wybierz_marmur)
			elseif bony == 3 then
				affect.add(apply.ATT_POINT_CRITICAL_PCT, 30, 60*60*24*365*60)
				set_state(wybierz_marmur)
			elseif bony == 4 then
				affect.add(apply.ATT_POINT_POISON_PCT, 30, 60*60*24*365*60)
				set_state(wybierz_marmur)
			elseif bony == 5 then
				set_state(wybierz_marmur)
			end
	end
end

state wybierz_marmur begin
	say("Ok, teraz wybierz sobie marmur.")
	say("")
	local marmur == select("Dziki pies", "Dziki Sługa", "Młody pająk", "Ezot.Fanatyk")
		if marmur == 1 then
			pc.polymorphy(101, 500)
			set_state(wejscie_na_mape)
		elseif marmur == 2 then
			pc.polymorphy(502, 500)
			set_state(wejscie_na_mape)
		elseif marmur == 3 then
			pc.polymorphy(2031)
			set_state(wejscie_na_mape)
		elseif marmur == 4 then
			pc.polymorphy(701)
			set_state(wejscie_na_mape)
		end
end

state wejscie_na_mape begin
	pc.setqf("priv_bicie_mobow", 1)
	d.join(73)
	when login with pc.in_dungeon() with pc.getgf("priv_bicie_mobow") == 1 begin
		if pc.getqf("priv_bicie_mobow") == 1 then
			pc.warp(8562, 99)
			pc.setqf("priv_bicie_mobow", 2)
			d.notice("Ubij moby jak najszybciej potrafisz!")
			d.notice("Powodzenia!")
			timer("przygotuj", 5)
		end
	end
	when przygotuj.timer begin
		d.notice("Za chwilę nastąpi odliczanie do respu potwora!")
		timer("respimy", 5)
	end
	when respimy.timer begin
		d.notice("Resp nastąpi za 5")
		timer("respimy2", 1)
	end
	when respimy2.timer begin
		d.notice("Resp nastąpi za 4")
		timer("respimy3", 1)
	end
	when respimy3.timer begin
		d.notice("Resp nastąpi za 3")
		timer("respimy4", 1)
	end
	when respimy4.timer begin
		d.notice("Resp nastąpi za 2")
		timer("respimy5", 1)
	end
	when respimy5.timer begin
		d.notice("Resp nastąpi za 1")
		timer("respimy6", 1)
	end
	when respimy6.timer begin
		d.notice("Walka rozpoczyna się!")
		d.notice("Twoim pierwszym przeciwnikiem będzie Elit. Ognisty Król")
		pc.setqf("time1", get_time())
		d.spawn_mob(2207, 856200, 9900)
	end
	when 2207.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
		d.notice("Pokonałeś Elit. Ognistego Króla, zaraz zrespi się Elit. 9 ogonow.")
		d.spawn_mob(1902, 856200, 9900)
	end
	when 1902.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
		d.notice("Pokonałeś Elit. 9 ogonow, zaraz zrespi się Zjawa Zoltego Tygrysa.")
		d.spawn_mob(2493, 856200, 9900)
	end
	when 1304.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
		d.notice("Pokonałeś Zjawa Zoltego Tygrysa, zaraz zrespi się Ripper.")
		d.spawn_mob(1093, 856200, 9900)
	end
	when 1093.kill with pc.in_duegon() and pc.getqf("priv_bicie_mobow") == 2 begin
		d.notice("Pokonałeś wszystkie moby, zaraz zostaniesz wylogowany!")
		pc.setqf("time2", get_time())
		pc.setqf("priv_bicie_mobow", 3)
		affect.remove()
		timer("dowidzenia", 10)
	end
	when dowidzenia.timer begin
		d.exit_all()
	end
	when login with pc.getqf("priv_bicie_mobow") == 3 begin
		pc.setqf("priv_bicie_mobow", 0)
		pc.remove_polymorph()
		local x = pc.getqf("time")
		local y = pc.getqf("time2")
		local diff = pc.setqf("time3", y-x)
		if y-x > 60 then
			say("Twój czas to: "..diff/60.." minut.")
		else
			say("Twój czas to: "..diff.." sekund.")
		end
	end
end
end

nfsfankp50098 · 31 Stycznia 2012

Witam otrzymałem questa od Sunushiego Lecz quest był w jakiś dziwnych znakach przetłumaczyłem kawałek ale nie wiem co powinno być w tej środkowej części

Oto Quest:

quest hair_shop begin
state start begin
 when 9991.chat."Oryginalna Fryzura" with pc.get_part(PART_HAIR) >= 1001 begin
  say("Goblin:")
  say("Czy chcesz otrzymac oryginalna fryzure?")
  say("Musisz posiadac 500.000.000 yang!")
  say("")
  local a = select("Tak", "Nie")
  if a == 1 then
if pc.money >= 500000000 then
	 pc.changemoney(-500000000)
	 say("¦ăÄR®¦:")
	 say("§A¨M©wŞş«D±`¦n")
	 say("ĄiĄHµĄµĄ§Ú?")
	 say("")
	 wait()
	 say("łŘěŔ łŘěŔ")
	 say("Ô|Ô| Ô|Ô|")
	 say("łŘěŔ łŘěŔ")
	 say("Ô|Ô| Ô|Ô|")
	 say("")
	 wait()
	 say("¦ăÄR®¦:")
	 say("®¦~ ¬Ý¤WĄh¤Ł¤Ó¦n..")
	 say("")
	 wait()
	 say("¦ăÄR®¦:")
	 say("®¦~ ˛{¦b§ą¦¨¤F")
	 say("§AŔł¸Ó·|«D±`łßĹw˛{¦błoÓľv«¬Şş")
	 say("")
	 pc.set_part(PART_HAIR, 0)
else
	 say("¦ăÄR®¦:")
	 say("łá~ ¬ÝĽË¤l,§A˛{¦b¨S¦łżúłá~..")
	 say("»Ýn50¸U¨â.. .. ..50¸U¨â.")
	 say("")
	 wait()
	 q.done()
end
  elseif a == 2 then
say("Goblin:")
say("Nie posiadasz 500.000.000 yang!")
say("")
say("")
  else
say("UNKNOWN BUTTON ["..a.."]")
  end
 end
end
end

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany