Pisanie / Poprawa Questów !

maniek1310 · 6 Marca 2012

@up zapomniałeś o " w

say("On przyrzšdzi dla Ciebie ten napój. Niech Ci)

popraw na

say("On przyrzšdzi dla Ciebie ten napój. Niech Ci")

tutaj masz poprawiony cały kod

----------------------------------------------------
--Triadica.net By Bambus3k
--METIN2 Biolog Quest Lv.60
----------------------------------------------------
quest collect_quest_lv60 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 60 and pc.level <= 125 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, "Badania Biologa")
end
send_letter("Badania Biologa")
end

when button or info begin
say_title("Badania Biologa")
say("")
say("Biolog Chaegirab, uczeń Uriela,")
say("właśnie Cię szukał. Proszę idź ")
say("do niego i zaoferuj mu swoją pomoc.")
say("")
end

when __TARGET__.target.click or
20084.chat."Znajdz Biologa" begin
target.delete("__TARGET__")
say("Biolog Chaegirab:")
--- l
say("Niebiosa, proszę pomóżcie mi...")
say("Badam wszystkie rodzaje roślin w tym ")
say("imperium. Jest bardzo dużo rzeczy, ")
say("które muszą zostać zbadane. Nie mam ")
say("czasu abym mógł sam wybrać się na wyprawe. ")
say("Proszę, pomóż mi.")
wait()
say("Aktualnie badam Matowe Lody.")
say("Muszę przeprowadzić kilka eksperymentów,")
say("dlatego potrzebuję kilku egzemplarzy...")
say("Czy mógłby? przynie?ć mi dwadzie?cia Matowych Lodów?")
say("Proszę, pomóż mi! Zawsze przyno? mi po jednym,")
say("abym miał czas na ich dokładne przebadanie!")
say("")
say_item_vnum(30050)
set_state(go_to_disciple)
pc.setqf("duration",0) -- ĽiĽH¸Ő¸ŐŞşŽÉśĄ
pc.setqf("collect_count",0)-- ¨úąoŞşŞŤŤ~źĆśq
pc.setqf("drink_drug",0) -- łÜ°g´bĂÄ¤ôŞş¸Ü1
end
end

state go_to_disciple begin
when letter begin
send_letter("Zadanie specjalne!")

end
when button or info begin
say_title("Matowy Lód z Góry Sohan")
--- l
say("")
say("Biolog Chaegirab, uczeń Uriela, bada Górę Sohan")
say("na zachodzie kontynentu. Do swoich badań ")
say("potrzebuje on 20 Matowych Lodów, pamiętaj jednak,")
say("żeby zawsze przynosić mu je pojedynczo, aby mógł ")
say("je w spokoju przebadać. Znajdziesz je u Lodowych")
say("Stworów.")
say_item_vnum(30050)
say_reward("Do tej pory dostarczyłe? ".." "..pc.getqf("collect_count").." Matowych Lodów.")
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(30050)==0 then
say("Biolog Chaegirab:")
say("Coo? Nie przyniosłeś mi żadnego")
say("Matowego Lodu?!")
say("")
return
end

item.remove()
pc.setqf("drink_drug",1)
end
when 1101.kill or
1102.kill or
1103.kill or
1104.kill or
1105.kill or
1106.kill or
1107.kill begin
local s = number(1, 15)
if s == 1 and pc.count_item(30050)==0 then
pc.give_item2(30050)
end
end


when 20084.chat." Matowy Lód " with pc.count_item(30050) >0 begin
if pc.count_item(30050) == 0 then
say("Informacja przekazana administracji.")
say("Używanie bugu nie jest mile widziane,")
say("w konsekwencji może zakończyć się banem.")
say("Miej się na baczności!")
say("Za karę następnego loda możesz oddać za 24h.")
pc.setqf("duration",get_time()+60*60*24)
return
end
if get_time() > pc.getqf("duration") then
say("Biolog Chaegirab:")
--- l
say("Och! Znalazłe? Matowy Lód! Poczekaj chwileczkę,")
say("muszę go tylko sprawdzić...")
say("")
pc.remove_item(30050, 1)
pc.setqf("duration",get_time()+60*30*1)------------------1¤pŽÉ
wait()

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

local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 19 then --20
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨úąo¤@+1
say("Biolog Chaegirab:")
say("Och! Ten Matowy Lód jest doskonałej jakości!")
say("Natychmiast rozpoczynam badania. Jednak")
say("potrzebuję jeszcze ".." "..20-pc.getqf("collect_count").. " sztuk. Proszę, spróbuj je")
say("znaleść!")
say("Ale pamiętaj o tym, że potrzebuję czasu na")
say("analizę. Kolejny Matowy Lód będę mógł zbadać ")
say("dopiero za 30 minut.")
pc.setqf("drink_drug",0) --ĂÄ¤ôŞěąl¤Ć
return
end
say("Biolog Chaegirab:")
say("Skompletowałeś 20 Matowych Lodów! Dziękuję Ci.")
say("Do rozwiązania zagadki Góry Lodowej potrzebuję ")
say("jeszcze tylko Kamienia Duszy Aurtumryu.")
say("Podejmiesz się tego zadania? Znajdziesz go")
say("u lodowych stworów.")
say("")

say_item("Kamień Duszy Aurtumryu", 30223, "")

say_reward("Lodowy Wieloryb Zabójca")
say_reward("Lodowy Robak")
say_reward("Lodowy Lew")
say_reward("Lodowy Człowiek")
say_reward("Yeti")


pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say("Biolog Chaegirab:")
say("Wybacz niestety...")
say("Twój Matowy Lód jest zbyt roztopiony...")
say("Proszę, przynieś mi inny!")
say("Nie zawiedź mnie!")
say("")
pc.setqf("drink_drug",0) --ĂÄ¤ôŞěąl¤Ć
return
end
else
say("Biolog Chaegirab:")
say("Jeszcze nie skończyłem badać ostatniego Matowego Lodu!")
say("Wróc później, jak już skończę!")
say("Jeden Matowy Lód badam 30 minut.")
say("")
return
end

end
end


state key_item begin
when letter begin
send_letter("Kamień Duszy Aurtumryu")

if pc.count_item(30223)>0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Kamień Duszy Aurtumryu")
end
end

end
when button or info begin
if pc.count_item(30223) >0 then
say_title("Kamień Duszy Aurtumryu")
say("")
--- l
say("W końcu znalazłeś Kamień Duszy Aurtumryu! Zanie? ")
say("go do Biologa Chaegirab. On czeka już na Ciebie.")
say("")
return
end

say_title("Kamień Duszy Aurtumryu")
say("")
--- l
say("Zebrałeś 20 Matowych Lodów do badań dla biologa")
say("Chaegirab. Teraz, żeby zrozumieć tą szczególną ")
say("krystaliczną strukturę, potrzebuje on już tylko ")
say("Kamień Duszy Aurtumryu.")
say_item_vnum(30223)---------- ŚBŹyĆFťîĽŰ
say("Możesz go zdobyć z lodowych potworów na Górze")
say("Sohan.")
end


when 1102.kill or
1103.kill or
1104.kill or
1106.kill begin
local s = number(1, 50)
if s == 1 and pc.count_item(30223)==0 then
pc.give_item2(30223, 1)
send_letter("Znalazłeś Kamień Duszy Aurtumryu")
end
end



when __TARGET__.target.click or
20084.chat."Kamień Duszy Aurtumryu" with pc.count_item(30223) > 0 begin
target.delete("__TARGET__")
say_title("Biolog Chaegirab:")
say("Bardzo dziękuję! W nagrodę otrzymasz recepturę.")
say("Składniki jej są skrzętnie przechowywane i tylko")
say("nieliczni je znają. Mikstura, którą można zrobić ")
say("na podstawie przepisu, wzmocni Twoją siłę ")
say("ataku. Ruszaj w drogę i odszukaj Baek-Go. On")
say("On przyrządzi dla Ciebie ten napój. Niech Ci")
say("szczęście sprzyja, mój przyjacielu. Z Twoją ")
say("pomocą dowiedziałem się wielu istotnych rzeczy")
say("o Lodowej Ziemi!")
say("")
pc.remove_item(30223,1)
set_state(__reward)
end

end

state __reward begin
when letter begin
send_letter("Nagroda Chaegiraba")

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("Nagroda Chaegiraba")
---
say("W nagrodę za Matowe Lody i")
say("Kamień Duszy Aurtumryu biolog Chaegirab dał Ci")
say("tajemną recepturę. Idź teraz do Baek-Go, on")
say("wykona dla Ciebie cudowną miksturę.")
say("")
end

when __TARGET__.target.click or
20018.chat." Nagroda " begin
target.delete("__TARGET__")
say("Baek-Go:")
say("Spójrz tylko, czy to nie Sekretna Receptura od")
say("Chaegirab, tego znanego biologa? Hm, zwiększy")
say("ona Twoją Siłę Ataku o 50 punktów. Oto")
say("Twój napój! Ponadto mam Ci przekazać jeszcze tą ")
say("Drewnianią Skrzynkę. Starannie ją przechowuj.")
say("")
say_reward("Twoja Siła Ataku jest większa o 50 punktów.")
say_reward("Otrzymałe? Jasnozieloną Szkatułkę.")
say("")
affect.add_collect(apply.ATT_GRADE_BONUS,50,60*60*24*365*60)--ĄX60Ś~
pc.give_item2(50078, 1)

clear_letter()
set_quest_state("collect_quest_lv70", "run")
set_state(__complete)
end

end


state __complete begin
end
end

Panth · 6 Marca 2012

Poprawi ktoś ? Na końcu wyskakuje "deviltower_zone.quest:440:Abort (core dumped)" Dam 10x Lajk ;<

quest deviltower_zone begin
state start begin
when login begin
  	 if pc.get_map_index() == 66 then
	-- ¨A«D¦b1LÓ®É, °eSdA~±.
	-- LhLC ?dln
	-- 1LÓ  88  577  236 737
	-- 2LÓ  91  343  238 504
	-- 3LÓ 104  107  248 269
	if pc.get_x() < 2048+88 or pc.get_y() < 6656+577 or pc.get_x() > 2048+236 or pc.get_y() > 6656+737 then
   	 pc.warp((5376+532)*100, (512+596+4)*100, 65)
	end
	pc.set_warp_location(65, 5376+532, 512+596+4)
  	 elseif pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 then
	pc.set_warp_location(65, 5376+532, 512+596+4)
  	 end
end
when deviltower_man.chat.locale.deviltower_man_chat begin
  	 if pc.get_level() < 40 then
	say(locale.deviltower_man_say_you_cant)
  	 else
	say(locale.deviltower_man_say)
	local s = select(locale.deviltower_enter,locale.deviltower_no_enter)
	if s == 1 then
   	 -- warp into!
   	 pc.warp(216500,727000)
	end
  	 end
end
when devil_stone1.kill begin
  	 timer("devil_stone1_1", 6)
end
when devil_stone1_1.timer begin
	local mapto7= pc.count_item(30302)  -- ®r·R¤LSl¬O§_¦s¦bSsZu¤`CF¶d
	pc.remove_item(30302,mapto7)

	local boxto7= pc.count_item(30300)  -- ®r·R¤LSl¬O§_¦s¦bSs¤LSl¦WSs?c¤l
	pc.remove_item(30300,boxto7)

  	 d.new_jump_all(66, special.devil_tower[1][1], special.devil_tower[1][2])
  	 d.regen_file("data/dungeon/deviltower2_regen.txt")
  	 d.set_warp_at_eliminate(4, d.get_map_index(), special.devil_tower[2][1], special.devil_tower[2][2], "data/dungeon/deviltower3_regen.txt")
end
--when devil_stone2.kill begin
--d.jump_all_local(special.devil_tower[2][1], special.devil_tower[2][2])
--end
when devil_stone3.kill begin
  	 --d.jump_all_local(special.devil_tower[3][1], special.devil_tower[3][2])
  	 --d.set_exit_all_at_eliminate(6)
  	 --d.set_warp_at_eliminate(6, d.get_map_index(), 100, 100)
  	 --d.set_warp_at_eliminate(4, 65, 5376+532, 512+596+4)
  	 d.set_warp_at_eliminate(4, d.get_map_index(), special.devil_tower[3][1], special.devil_tower[3][2], "data/dungeon/deviltower4_regen.txt")
  	 d.check_eliminated()
  	 --d.exit_all()
end
function get_4floor_stone_pos()
  	 local positions = {
	{368, 629},
	{419, 630},
	{428, 653},
	{422, 679},
	{395, 689},
	{369, 679},
	{361, 658},
  	 }
  	 for i = 1, 6 do
	local j = number(i, 7)
	if i != j then
   	 local t = positions[i];
   	 positions[i] = positions[j];
   	 positions[j] = t;
	end
  	 end
  	 --for i = 1, 7 do
--	positions[i][1] = positions[i][1] * 100
--	positions[i][2] = positions[i][2] * 100
 --   end
  	 return positions
end
when 8016.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
  	 d.setf("level", 4)
  	 -- ¦A?{¤j¶q©ÇS«¤Î»slyZuAURY©M°?AURY
  	 --d.regen_file("data/dungeon/deviltower4_regen.txt")
  	 local positions = deviltower_zone.get_4floor_stone_pos()
  	 for i = 1, 6 do
	chat(positions[i][1], positions[i][2])
	d.set_unique("fake" .. i , d.spawn_mob(8017, positions[i][1], positions[i][2]))
  	 end
  	 chat(positions[7][1], positions[7][2])
  	 local vid = d.spawn_mob(8017, positions[7][1], positions[7][2])
  	 chat(vid)
  	 d.set_unique("real", vid)
  	 server_loop_timer('devil_stone4_update', 10, pc.get_map_index())
  	 server_timer('devil_stone4_fail1', 5*60, pc.get_map_index())

  	 d.notice("Brawo, udalo sie Tobie");
  	 d.notice("zniszczyc kamien metin!");
  	 d.notice("Macie 15 minut na nastepnym pietrze[ENTER] zanim zostaniecie wylogowani.");
  	 d.notice("Spieszcie sie!");
end

when devil_stone4_fail1.server_timer begin
  	 if d.select(get_server_timer_arg()) then
	d.notice("Pozostalo 10 minut!")
	server_timer('devil_stone4_fail2', 5*60, get_server_timer_arg())
  	 end
end

when devil_stone4_fail2.server_timer begin
  	 if d.select(get_server_timer_arg()) then
	d.notice("Pozostalo 5 minut![ENTER]Tenma tu byl...")
	server_timer('devil_stone4_fail', 5*60, get_server_timer_arg())
  	 end
end

when devil_stone4_fail.server_timer begin
  	 if d.select(get_server_timer_arg()) then
	d.notice("Nie udalo sie, zostaniecie wylogowany!")
	d.exit_all()
	clear_server_timer('devil_stone4_update', get_server_timer_arg())
  	 end
end

when devil_stone4_update.server_timer begin
  	 if d.select(get_server_timer_arg()) then
	if not d.is_unique_dead("real") then
   	 for i = 1, 6 do
		if d.getf("fakedead" .. i) == 0 then
	   	 if d.unique_get_hp_perc("fake" .. i) < 50 then
			d.purge_unique("fake" .. i)
			d.setf("fakedead" .. i, 1)
			d.notice("To nie ten kamien!");
	   	 end
		end
   	 end
	else
   	 --d.clear_regen()
   	 --d.regen_file("data/dungeon/deviltower5_regen.txt")
   	 server_timer("devil_stone4_end", 5, get_server_timer_arg())
   	 d.notice("Udalo sie! Zabij wszystkie potwory na nastepnym");
   	 d.notice("pietrze, aby zdobyc kamien otwarcia!")
   	 clear_server_timer('devil_stone4_fail1', get_server_timer_arg())
   	 clear_server_timer('devil_stone4_fail2', get_server_timer_arg())
   	 clear_server_timer('devil_stone4_fail', get_server_timer_arg())
	end
  	 else
	server_timer('devil_stone4_stop_timer', 1, get_server_timer_arg())
  	 end
end

when devil_stone4_stop_timer.server_timer begin
  	 clear_server_timer('devil_stone4_update', get_server_timer_arg())
end

when devil_stone4_end.server_timer begin
  	 if d.select(get_server_timer_arg()) then
	d.setf("level", 5)
	d.setf("stone_count", 5)
	d.notice("Brawo, jestes na 5 pietrze!")
	d.notice("Aby przejsc na 6 pietro musisz zabic")
	d.notice("wszystkie potwory tutaj, zdobyc kamien")
	d.notice("otwarcia i otworzyc pieczecie przed czasem!")
	d.jump_all(special.devil_tower[4][1], special.devil_tower[4][2])
	server_timer('devil_stone5_fail1', 5*60, get_server_timer_arg())
	clear_server_timer('devil_stone4_update', get_server_timer_arg())

	-- 5LÓÄ~Än¦A?{
	d.set_regen_file("data/dungeon/deviltower5_regen.txt")

	-- 5LÓ«E¦LAU¦A?{
	d.spawn_mob(20073, 421, 452)
	d.spawn_mob(20073, 380, 460)
	d.spawn_mob(20073, 428, 414)
	d.spawn_mob(20073, 398, 392)
	d.spawn_mob(20073, 359, 426)
  	 end
end
when devil_stone5_fail1.server_timer begin
  	 if d.select(get_server_timer_arg()) then
	d.notice("Pozostalo 15 minut!")
	server_timer('devil_stone5_fail2', 5*60, get_server_timer_arg())
  	 end
end

when devil_stone5_fail2.server_timer begin
  	 if d.select(get_server_timer_arg()) then
	d.notice("Pozostalo 10 minut!")
	server_timer('devil_stone5_fail3', 5*60, get_server_timer_arg())
  	 end
end

when devil_stone5_fail3.server_timer begin
  	 if d.select(get_server_timer_arg()) then
	d.notice("Pozostalo 5 minut!")
	server_timer('devil_stone5_fail', 5*60, get_server_timer_arg())
  	 end
end

when devil_stone5_fail.server_timer begin
  	 if d.select(get_server_timer_arg()) then
	d.notice("Nie udalo sie, zostaniesz wylogowany!")
	d.exit_all()
  	 end
end

--when devil_stone4.kill begin
  	 --d.setf("level", 5)
  	 --d.setf("stone_count", 4)
  	 --d.clear_regen()
  	 --d.regen_file("data/dungeon/deviltower5_regen.txt")
  	 --d.jump_all_local(special.devil_tower[4][1], special.devil_tower[4][2])
--end

when 1062.kill with pc.in_dungeon() and d.getf("level") == 5 begin
  	 local KILL_COUNT_FOR_DROP_KEY = 50
  	 --if is_test_server() then
	--KILL_COUNT_FOR_DROP_KEY = 1
  	 --end
  	 local n =d.getf("count") + 1
  	 d.setf("count", n)
  	 if n == KILL_COUNT_FOR_DROP_KEY then
	-- ±L¤UÂe°Í
	game.drop_item(50084, 1)
	d.setf("count", 0)
  	 end
end
when devil_stone5.take with item.vnum == 50084 begin
  	 npc.purge()
  	 item.remove()
  	 d.setf("stone_count", d.getf("stone_count") - 1)
  	 if d.getf("stone_count") <= 0 then
	d.setf("level", 6)
	d.clear_regen()
	d.regen_file("data/dungeon/deviltower6_regen.txt")

	d.notice("Brawo udalo sie! jestes na 6 pietrze!")
	d.notice("Zabij wszystkie potwory!")
	d.jump_all(special.devil_tower[5][1], special.devil_tower[5][2])
	clear_server_timer('devil_stone5_fail1', get_server_timer_arg())
	clear_server_timer('devil_stone5_fail2', get_server_timer_arg())
	clear_server_timer('devil_stone5_fail3', get_server_timer_arg())
	clear_server_timer('devil_stone5_fail', get_server_timer_arg())
  	 else
	d.notice("Nie wiem1"..d.getf("stone_count").."Nie wiem 2")
  	 end
end

when devil_stone6.kill begin
  	 -- ¶Ç°e¨e·N¸t©N¦bSs¦aaD
  	 -- §_«h?A¶}l]¤@Ó·s·N¸t
  	 --d.jump_all(special.devil_tower[6][1], special.devil_tower[6][2])
  	 d.kill_all()
   -- d.set_warp_at_eliminate(3*60, 65, 5376+532, 512+596+4)
  	 d.check_eliminated()
  	 local reward_alchemist = {20074, 20075, 20076}
  	 d.spawn_mob(reward_alchemist[number(1,3)], 425, 216);
  	 d.setqf("can_refine", 1)
end

--------------------------------------
-- AN¶i¤J7LÓ¦Ü¨eaF8LÓ¤§«e
--------------------------------------

when 20074.chat."Chce przejsc dalej" with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
	say(""..mob_name(20074).."")
	say("Zostaniesz przeniesiony")
	say("na 7 pietro Wiezy Demonow!")
	say("Lecz uwazaj...")
	say("Tam nie bedzie tak latwo jak wczesniej!")
	wait()
	if pc.level >=75 then
		say("Kazdy z graczy zostanie przeniesiony!")
		timer("devil_jump_7", 6)
		return
	end
	say("Mozesz przejsc dalej!")
	say("")
	say("")
	wait()
	pc.warp(590500, 110500)
	return
end
when 20075.chat."Chce przejsc dalej" with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
	say(""..mob_name(20075).."")
	say("Zostaniesz przeniesiony")
	say("na 7 pietro Wiezy Demonow!")
	say("Lecz uwazaj...")
	say("Tam nie bedzie tak latwo jak wczesniej!")
	wait()
	if pc.level >=75 then
		say("Kazdy z graczy zostanie przeniesiony!")
		timer("devil_jump_7", 6)
		return
	end
	say("Mozesz przejsc dalej!")
	say("")
	say("")
	wait()
	pc.warp(590500, 110500)
	return
end
when 20076.chat."Chce przejsc dalej" with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
			say(""..mob_name(20076).."")
			say("Zostaniesz przeniesiony")
			say("na 7 pietro Wiezy Demonow!")
			say("Lecz uwazaj...")
			say("Tam nie bedzie tak latwo jak wczesniej!")
			wait()
			if pc.level >=75 then
					say("Kazdy z graczy zostanie przeniesiony!")
					timer("devil_jump_7", 6)
					return
			end
			say("Mozesz przejsc dalej!")
			say("")
			say("")
			wait()
			pc.warp(590500, 110500)
			return
end

  when devil_jump_7.timer begin
	d.clear_regen()

	d.spawn_mob(8018, 639, 658)
	d.spawn_mob(8018, 611, 637)
	d.spawn_mob(8018, 596, 674)
	d.spawn_mob(8018, 629, 670)

	d.setf("level", 7)

	d.jump_all(2048+590, 6656+638)
end

when 8018.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
	local cont = d.getf("7_stone_kill") + 1
	d.setf("7_stone_kill", cont)

	if cont >= 4 then
		d.setf("7_stone_kill", 0)
		d.set_regen_file("data/dungeon/deviltower7_regen.txt")
	end	
end

when 8019.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
	game.drop_item(30300, 1)
end

when 30300.use with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
	pc.remove_item("30300", 1)

	local pct = number(1,10)

	if pct == 1 then
		-- ±L¤UZu¦aaD
		game.drop_item(30302, 1)
		d.clear_regen()
	else
		-- ±L¤U°?¦aaD
		game.drop_item(30301, 1)

	end
end

when 30302.use with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
	-- ¶Ç°e¨e8LÓ
	say("Przeniesiesz sie na 8 pietro!")
	pc.remove_item("30302", 1)
  	 timer("devil_jump_8", 6)
	d.clear_regen()
end

--------------------------------------------
-- AN¶i¤J8LÓ¦Ü¨eaF9LÓ¤§«e
--------------------------------------------
when devil_jump_8.timer begin
	d.setf("level", 8)
	d.jump_all(2048+590, 6656+403)
	d.set_regen_file("data/dungeon/deviltower8_regen.txt")
	d.spawn_mob(20366, 640, 460)
	local _count= pc.count_item(30302)-- ®r·RZu¤`CF¶d
	pc.remove_item(30302,_count)

end

when 1040.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
	local pct1 = number(1, 5)
	if pct1 == 1 then
		local pct2 = number(1, 10)
		if pct2 == 1 then
			-- ±L¤UZuÂe°Í
			game.drop_item(30304, 1)
		else
			-- ±L¤U°?Âe°Í
			game.drop_item(30303, 1)
		end
	else
		return
	end
end

when 20366.take with item.vnum == 30304 begin
	-- 9LÓ«E¦L¸N°L
	d.notice("Zostaniecie przeniesieni na 9 pietro!")
	npc.purge()
	item.remove()
	timer("devil_jump_9", 6)
end

---------------------------------------------
-- AN¶i¤J9LÓ¦Üµ?§ô
---------------------------------------------
when devil_jump_9.timer begin
	d.setf("level", 9)
	d.jump_all(2048+590, 6656+155)
	d.regen_file("data/dungeon/deviltower9_regen.txt")
end

when 1093.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
	d.kill_all()
	notice_all(pc.get_name().." zabil Umarlego Rozpruwacza!")
	d.notice("Zostaniecie przeniesieni na 10 pietro!")
	timer("devil_end_jump", 6)
end

when devil_end_jump.timer begin
	d.jump_all(2048+590, 6656+403)
	d.spawn_mob(1095, 640, 460)
end
when 1095.kill with pc.in_dungeon() begin
  	 --d.exit_all()
	notice_all(pc.get_name().." zabil Niebieska Smierc!")
	timer("devil_jump_10", 6)
end
when devil_jump_10.timer begin
	d.exit_all()
end
end
end
end
end

Warlok20 · 6 Marca 2012

Czy mógłby ktoś napisać mi przykładowego questa..., w którym będzie:

a) jakaś szansa dropu danego itemu.

jakaś szansa przyjęcia przez npc tego itemu.

c)w eq można mieć jedynie jeden taki item.

d) status na stałe.

Idzie gracz do npc. On każe iść coś zlać i dropnąć 15 sztuk czegoś ale w eq można mieć tylko 1 taki item... i tak w kółko... dropi oddaje... przyjmuje, nie... aż odda a jak odda wszystko... to ma możliwość wybrania nagrody. Mogą być to itemy ale wolałbym dodatkowe staty np... 3khp lub 500 wartości czy coś w tym stylu i te statki na stałe miały by być.

maniek1310 · 6 Marca 2012

@Panth podaj cały tekst jaki ci się wyświetlił podczas wgrywania questu

qualit · 7 Marca 2012

Witam mam problem Chce zrobic v2 Wymiaru Wladcy

I mam taki problem gdy zmienie bosy jakie maja sie respic i jakie maja byc zabite to:

*bos sie respi ale i tak trzeba zabic tego ktory jest orginalnie czyli nap

Mam ripka ale i tak trzeba zabic Best.Kapitana

Quest mojej edycij

Index (xx,) gdzie i na jakiej mapie dziala bez problemow

quest wymiar_wladcow begin
	state start begin
			when 20355.chat."Wymiar Władców" with pc.get_level()>=40 and pc.get_level()<=100 begin
									say_title("Strażnik Wymiaru Władców:")
									say("Ta Magiczna moc pozwala Twojej Postaci otworzyć ")
									say("bardzo tajemniczy Wymiar Władców, w którym musisz")
									say("pokonać każdego przeciwnika w najszybszym czasie.")
									say_red("Uwaga!")
									say_red("Aby wejsc potrzebujesz 10.000.000 Yang!")
									say_red("i nie możesz byc w grupie!")
									say_reward("Możesz zakupić marmur u handlarki różnosciami")
									say_reward("i użyć go na Wymiarze Władców.")
									say("")
									wait()
									if pc.money>=10000000 and not party.is_party() then
									say_title("Strażnik Wymiaru Władców:")
									say("Posiadasz wystarczajaca ilosc yang.")
									say("")
									say_reward("Jestes gotowy?")
									local q=select("Jestem Gotów!", "To nie ten moment...")
											if q==1 then
											say_title("Strażnik Wymiaru Władców:")
											say("Zostaniesz przeniesiony do Wymiaru Władców.")
													pc.setqf("starcik", 1)
													pc.changemoney(-10000000)
													d.join(xx)
											end
											end
											end
			when login with pc.in_dungeon() and pc.getqf("starcik") == 1 begin
			notice_in_map("Witaj w Wymiarze Władców...")
			timer("start2", 3)
			pc.setqf("starcik", 0)
			pc.setqf("starcik2", 1)
			affect.remove_good()
			end
			when start2.timer begin
			pc.setqf("starcik2", 1)
			d.new_jump_all(xx, 110, 90)
			end
			when login with pc.getqf("starcik2") == 1 and pc.in_dungeon() begin
			timer("wymiar_2", 5)
			end
			when wymiar_2.timer begin
			pc.setqf("starcik2", 0)
			notice_in_map("No to zaczynamy! Oto Best Kapitan!")
			mob.spawn(1091, 120, 90, 1, 1, 1)
			d.jump_all(110, 90)
			pc.setqf("time1", get_time())
			end
			when 1091.kill with pc.in_dungeon() begin
			notice_in_map("Best Kapitan został pokonany!")
			timer("wymiar_3", 5)
			end
			when wymiar_3.timer begin
			notice_in_map("No to zaczynamy! Oto Lord Małp!")
			d.jump_all(110, 90)
			mob.spawn(1092, 120, 90, 1, 1, 1)
			end
			when 1092.kill with pc.in_dungeon() begin
			notice_in_map("Lord Małp został Pokonany!")
			timer("wymiar_4", 5)
			end
			when wymiar_4.timer begin
			mob.spawn(1094, 120, 90, 1, 1, 1)
			notice_in_map("No to zaczynamy! Oto Wódz Orków!")
			d.jump_all(120, 90)
			end
			when 1094.kill with pc.in_dungeon() begin
			notice_in_map("Wódz Orków został pokonany!")
			timer("wymiar_5", 5)
			end
			when wymiar_5.timer begin
			mob.spawn(1093, 120, 90, 1, 1, 1)
			notice_in_map("No to zaczynamy! Oto Królowa Pajaków!")
			d.jump_all(110, 90)
			end
			when 1093.kill with pc.in_dungeon() begin
			notice_in_map("Królowa Pajaków została pokonana!")
			timer("wymiar_6", 5)
			end
			when wymiar_6.timer begin
			mob.spawn(1095, 120, 90, 1, 1, 1)
			notice_in_map("No to zaczynamy! Oto ostatni przeciwnik! Umarly Rozpruwacz!")
			d.jump_all(120, 90)
			end
			when 1095.kill with pc.in_dungeon() begin
			notice_in_map("Pomyslnie ukończyłeś wyzwanie Wymiaru Władców!")
			notice_in_map("Za 10 sekund zostaniesz przeniesiony do Pierwszego Miasta!")
			timer("wymiar_exit", 10)
			pc.remove_polymorph()
			pc.setqf("czas", 1)
			pc.setqf("time2", get_time())
			end
			when wymiar_exit.timer begin
			warp_to_village()
			end
			when login with pc.getqf("czas") == 1 begin
			pc.setqf("czas", 0)
			pc.remove_polymorph()
			local x = pc.getqf("time1")
			local y = pc.getqf("time2")
			local s = pc.setqf("time3", y-x)
			local czas = pc.getqf("time3")
			local nejm = pc.get_name()
			say_title("Wymiar Władców - Escaria.pl")
			say("Gratulacje "..nejm.."!")
			say("Twój czas to: "..czas.." sekund.")
			say("Wyniki znajdziesz na stronie głownej!")
			say("")
			say_reward("Walcz o najlepszy czas w Wymiarze Władców!")
			say_reward("Nie daj się konkurencji...")
			say_reward("Mogło być lepiej?")
			notice_all("[Escaria.PL] "..pc.get_name().." ukończył Wymiar Władców Łatwy z czasem "..czas.." Sekund !")
			affect.remove()
			end
			end
			end

Ps.

Jezeli Cos jest zle to prosze o wytlumaczeni

NeerLik · 7 Marca 2012

Ja również mam pytanie jak dodać np jak mam quest i dałem opcje wyboru "zmiany w moba" np w małego pająka jak zrobić żeby po kliknięciu nie zmieniało w tego moba.. tylko po przeteleportowaniu na mapę ..

Za pomoc dam +

TEKEN5 · 7 Marca 2012

Witam dodalem u siebie pewien quest i dodalem do niego wybór bonusów tych w localnej:

local i = select("+15 Szybkości Ataku", "+200 Siła Ataku", "+25 Krytyczne","+20 Otrucie")

+15 Szybkości Ataku
+200 Siła Ataku
+25 Krytyczne
+20 Otrucie

Czy mógłby mi ktoś podać co mam dodać w if i w elseif zeby te bonusy zadzialaly?

Podam na przykladzie :

affect.add(apply.DEF_GRADE_BONUS,120)

to jest bonus na 120 obrony . Na inne bonusy nie znam kodow czy ktos by podal na te powyzej bony?

Pro100ST · 7 Marca 2012

+15 Szybkości Ataku
+200 Siła Ataku

+25 Krytyczne

+20 Otrucie

+15 Szybkości Ataku-ATT_SPEED

+200 Siła Ataku-ATT_GRADE_BONUS

+25 Krytyczne-CRITICAL_PCT

+20 Otrucie-POISON_PCT

Przykład:

affect.add_collect(apply.ATT_SPEED, 15, 60*60*24*365*60) <---15% szybkości Ataku

TEKEN5 · 7 Marca 2012

@Pro100ST

dzieki lap + a jak dodać , zeby po ukonczeniu dangeonu zabieralo te bonusy? da sie jakos je zdezaktywowac? czy musze nastawic na czas? a jak tak to niech ktos mi nastawi na tym przykladzie:

affect.add_collect(apply.ATT_SPEED, 15, 60*60*24*365*60) <---15% szybkości Ataku

Czas na 10 minut zeby po 10 min sie bonus dezaktywował ale chyba da sie jakos usunac ten bonus ale dobra odpowiedz pozostawiam wam.

affect.add_collect(apply.ATT_SPEED, 15, 10*60) <---15% szybkości Ataku

- To jest na 10 minut tak?

Sunushi · 7 Marca 2012

affect.remove_collect

nie pytaj się mnie jak to działa bo sam nie wiem

Lexor · 7 Marca 2012

affect.remove_collect

usuwa dany bonus który dostałeś np od biologa.

kilu · 8 Marca 2012

czy moglby mi ktos powiedziec co tytaj jest nie tak? Gdy wgrywam tzn doklejam to do questa z pierscieniem teleportacji to nie chce sie wgrac, rozne bledy wyskakują ktore sa bez sensu

To jest to co chce wgrac:

elseif s == 7 then
                                   say_reward ( "hmm..." )
                                   say ( pc.get_name().." co chciałbyś kupić?" )
                                   local s = select ( "1000 Czerwonych Miksturek" , "400 Niebieskich Miksturek" , "200 pelerynek męstwa" , "Bryłę złota" , "Anuluj" )
                                       if 4 == s then
                                           say_title("Informacja:")
                                           say("Czy chcesz zmienić 475kk za bryłkę złota?")
                                           local a == select("Tak", "Nie")
                                           if a == 1 then
                                               if pc.get_money() >= 475000000 then
                                                   pc.change_money(-475000000)
                                                   pc.give_item2(80088)

                                               end
                                           end
                                       end
                       end

a to quest bez tego:

quest move_ring begin
    state start begin
		    when 80009.use begin
			    say_title ( "Pierscien Teleportacji:" )
                   say (pc.get_name().. " Moge cie przeniesc do :" )
                   say ( "" )
                   local s = select ( "Przenieś mnie do mojej wioski", "Miasta  M1" , "Miasta M2" , "Miejsca Przeznaczenia" , "Expowiska Łatwe" , "Expowiska Trudne" , "Chcę coś kupić!" , "Wyjdz" )
                       if s == 1 then
                               say_reward ( "hmm..." )
                               say ( pc.get_name()..", przeniosę Cię do Twojej wioski" )
                               warp_to_village()
                       elseif s == 2 then
                       say_reward ( "hmm..." )
                       say ( pc.get_name().." Do którego miasta chcesz sie wybrac??" )
                           local s = select ( "Shinsoo" , "Chunjo" , "Jinno" , "Nigdzie!" )
                               if s == 1 then
                                   say_title ( pc.get_name().."!")
                                   say ("Przeniosę Cię do wioski Shinsso")
                                   wait ()
                                   pc.warp ( 474300 , 954800 )

                               elseif 2 == s then
                                   say_title ( pc.get_name().."!")
                                   say ("Przeniosę Cię do wioski Chunjo")
                                   wait ()
                                   pc.warp ( 63800 , 166400 )

                               elseif 3 == s then
                                   say_title ( pc.get_name().."!")
                                   say ("Przeniosę Cię do wioski Jinno")
                                   wait ()
                                   pc.warp ( 959900 , 269200 )
                               end
                       elseif s == 3 then
                                   say_reward ( "hmm..." )
                                   say ( pc.get_name().." Do którego miasteczka chcesz sie wybrac?" )
                                   local s = select ( "Shinsoo M2" , "Chujno M2" , "Jinno M2" , "Nigdzie!" )
                                       if s == 1 then
                                           say_title ( pc.get_name().."!")
                                           say ("Przeniosę Cię do drugiej wioski Shinsso")
                                           wait ()
                                           pc.warp ( 353100 , 882900 )

                                       elseif 2 == s then
                                           say_title ( pc.get_name().."!")
                                           say ("Przeniosę Cię do drugiej wioski Chujno")
                                           wait ()
                                           pc.warp ( 145500 , 240000 )

                                       elseif 3 == s then
                                           say_title ( pc.get_name().."!")
                                           say ("Przeniosę Cię do drugiej wioski Jinno")
                                           wait ()
                                           pc.warp ( 863900 , 246000 )

                                       end
                       elseif s == 4 then
                                   say_title ( pc.get_name().."!")
                                   say ( "Zwiedz też inne miejsca:")
                                   say_reward ( "Żeby to zrobić musisz posiadać 60LvL+")
                                   local s = select ( "Przed DT" , "Ziemia Gigantów" ,  "Nigdzie!" )

                                       if s == 1 then
                                           if pc.level >= 60 then
                                                   say_title ( pc.get_name().."!")
                                                   say ("Przeniosę Cię przed DT")
                                                   wait ()
                                                   pc.warp ( 590500 , 110500 )
                                           elseif pc.level < 60 then
                                                   say_title ( "Możesz się przenieść od 60 poziomu")
                                                   say ("Nie posiadasz 60 poziomu!")
                                           end

                                       elseif 2 == s then
                                           if pc.level >= 60 then
                                                   say_title ( pc.get_name().."!")
                                                   say ("Przeniosę Cię na Ziemię Gigantów")
                                                   wait ()
                                                   pc.warp ( 845100 , 745900 )
                                           elseif pc.level < 60 then
                                                   say_title ( "Możesz się przenieść od 60 poziomu")
                                                   say ("Nie posiadasz 60 poziomu!")
                                           end
                                       end
                       elseif s == 5 then
                                   say_title ( pc.get_name().."!")
                                   say ( "Wybierz lokację " )
                                   local s = select ( "Dolina Orków" , "Świątynia Hwang", "Pustynia Yongbi" , "Góra Sohan" , "Loch Pająków v1" , "Ognista Ziema" , "Wyjdz" )
                                       if s == 1 then
                                                   say_title ("Zostaniesz Przeniesiony")
                                                   say ("Trzymaj się Mocno")
                                                   wait ()
                                                   local empire = pc . get_empire ( )
                                                   if empire == 1 then
                                                           pc.warp ( 402100 , 673900 )
                                                   elseif empire == 2 then
                                                           pc.warp ( 270400 , 739900 )
                                                   elseif empire == 3 then
                                                           pc.warp ( 321300 , 808000 )
                                                   end    
                                       elseif 2 == s then
                                                   say_title ("Zostaniesz Przeniesiony do Świątyni Hwang")
                                                   say ("Trzymaj się Mocno")
                                                   wait ()
                                                   pc.warp ( 16100 , 94300 )

                                       elseif 3 == s then
                                                   say_title ("Zostaniesz Przeniesiony")
                                                   say ("Trzymaj się Mocno")
                                                   wait ()
                                                   local empire = pc . get_empire ( )
                                                   if empire == 1 then
                                                       pc.warp ( 217800 , 627200 )
                                                   elseif empire == 2 then
                                                       pc.warp ( 221900 , 502700 )
                                                   elseif empire == 3 then
                                                       pc.warp ( 344000 , 502500 )
                                                   end


                                       elseif 4 == s then
                                                   say_title ("Zostaniesz Przeniesiony")
                                                   say ("Trzymaj się Mocno")
                                                   wait ()
                                                   local empire = pc . get_empire ( )
                                                   if empire == 1 then
                                                       pc.warp ( 434200 , 290600 )
                                                   elseif empire == 2 then
                                                       pc.warp ( 375200 , 174900 )
                                                   elseif empire == 3 then
                                                       pc.warp ( 491800 , 173600 )
                                                   end

                                       elseif 5 == s then
                                                   say_title ("Zostaniesz Przeniesiony")
                                                   say ("Trzymaj się Mocno")
                                                   wait ()
                                                   local empire = pc . get_empire ( )
                                                   if empire == 1 then
                                                       pc.warp ( 60000 , 496000 )
                                                   elseif empire == 2 then
                                                       pc.warp ( 60000 , 496000 )
                                                   elseif empire == 3 then
                                                       pc.warp ( 60000 , 496000 )
                                                   end

                                       elseif 6 == s then
                                                   say_title ("Zostaniesz Przeniesiony")
                                                   say ("Trzymaj się Mocno")
                                                   wait ()
                                                   local empire = pc . get_empire ( )
                                                   if empire == 1 then
                                                       pc.warp ( 599400 , 756300 )
                                                   elseif empire == 2 then
                                                       pc.warp ( 597800 , 622200 )
                                                   elseif empire == 3 then
                                                       pc.warp ( 730700 , 689800 )
                                                   end
                                       end     
                       elseif s == 6 then
                                   say_reward ( "hmm..." )
                                   say ( pc.get_name().." Do którego mistasta chcesz sie wybrac" )
                                   local s = select ( "Loch Pająków V2 - wymagany 60LvL" , "Czerwony Las - wymagany 80LvL" , "Grota Wygnańców V1  - wymagany 75LvL", "Atlantyda V2 - wymagany 75LvL" , "Anuluj" )

                                       if s == 1 then
                                           if pc.level >= 60 then
                                               say_title ("Zostaniesz Przeniesiony do Lochy Pajaków V2")
                                               say ("Trzymaj się Mocno")
                                               wait ()
                                               pc.warp ( 704100 , 464100 )
                                           elseif pc.level < 60 then
                                               say_title ( "Możesz się przenieść od 60 poziomu")
                                               say ("Nie posiadasz 60 poziomu!")
                                           end

                                       elseif 2 == s then
                                           if pc.level >= 80 then
                                               say_title ("Zostaniesz Przeniesiony do Czerwonego Lasu")
                                               say ("Trzymaj się Mocno")
                                               wait ()
                                               pc.warp ( 1119900 , 70800 )
                                           elseif pc.level < 80 then
                                               say_title ( "Możesz się przenieść od 80 poziomu")
                                               say ("Nie posiadasz 80 poziomu!")
                                           end
                                       elseif 3 == s then
                                           if pc.level >= 75 then
                                               say_title ("Zostaniesz Przeniesiony do Groty Wygnańców V1")
                                               say ("Trzymaj się Mocno")
                                               wait ()
                                               pc.warp ( 10000 , 10000 )
                                           elseif pc.level < 75 then
                                               say_title ( "Możesz się przenieść od 75 poziomu")
                                               say ("Nie posiadasz 75 poziomu!")
                                           end    
                                       elseif 4 == s then
                                           if pc.level >= 75 then
                                               say_title ("Zostaniesz Przeniesiony do Groty Wygnańców V2")
                                               say ("Trzymaj się Mocno")
                                               wait ()
                                               pc.warp ( 87700 , 71100 )
                                           elseif pc.level < 75 then
                                               say_title ( "Możesz się przenieść od 75 poziomu")
                                               say ("Nie posiadasz 75 poziomu!")
                                           end  
					   end



               end
       end
end

Dziekuję za pomoc. A co do wymiaru władców to najprawdopodobniej przez object, tez chcialem to zmienic, ale nie wiedzialem jak ;]

kilu · 8 Marca 2012

Ja również mam pytanie jak dodać np jak mam quest i dałem opcje wyboru "zmiany w moba" np w małego pająka jak zrobić żeby po kliknięciu nie zmieniało w tego moba.. tylko po przeteleportowaniu na mapę ..

Za pomoc dam +

Poprostu dac funkcje

pc.polymorth czy jakos tak nie pamitam jak sie pisze sprawdz sobie, dac ta funkcje po przeniesieniu ;>

z4z0l · 9 Marca 2012

when login with pc.get_map_index () XX == ZZ begin
pc.polymorph

czy cokolwiek.

BlondynX · 9 Marca 2012

@up

chyba

when login with pc.get_map_index() == xx begin
pc.polymorph

...

Karpielek · 9 Marca 2012

Witam, wyjaśni mi ktoś, jeżeli w queście mam takie coś: pc.warp(843600, 1066900, (82*10000))

Co to jest to pogrubioną czcionką?

Co oznacza także to: when cośtam with pc.get_map_index() >= (82*10000) begin, dlaczego tutaj jest to podane a nie index mapy? Pozdrawiam.

maniek1310 · 9 Marca 2012

@kilu masz tutaj poprawiony kod powinno działać

quest move_ring begin
state start begin
when 80009.use begin
say_title ( "Pierscien Teleportacji:" )
say (pc.get_name().. " Moge cie przeniesc do :" )
say ( "" )
local s = select ( "Przenieś mnie do mojej wioski", "Miasta M1" , "Miasta M2" , "Miejsca Przeznaczenia" , "Expowiska Łatwe" , "Expowiska Trudne" , "Chcę coś kupić!" , "Wyjdz" )
if s == 1 then
say_reward ( "hmm..." )
say ( pc.get_name()..", przeniosę Cię do Twojej wioski" )
warp_to_village()
elseif s == 2 then
say_reward ( "hmm..." )
say ( pc.get_name().." Do którego miasta chcesz sie wybrac??" )
local s = select ( "Shinsoo" , "Chunjo" , "Jinno" , "Nigdzie!" )
if s == 1 then
say_title ( pc.get_name().."!")
say ("Przeniosę Cię do wioski Shinsso")
wait ()
pc.warp ( 474300 , 954800 )
elseif 2 == s then
say_title ( pc.get_name().."!")
say ("Przeniosę Cię do wioski Chunjo")
wait ()
pc.warp ( 63800 , 166400 )
elseif 3 == s then
say_title ( pc.get_name().."!")
say ("Przeniosę Cię do wioski Jinno")
wait ()
pc.warp ( 959900 , 269200 )
end
elseif s == 3 then
say_reward ( "hmm..." )
say ( pc.get_name().." Do którego miasteczka chcesz sie wybrac?" )
local s = select ( "Shinsoo M2" , "Chujno M2" , "Jinno M2" , "Nigdzie!" )
if s == 1 then
say_title ( pc.get_name().."!")
say ("Przeniosę Cię do drugiej wioski Shinsso")
wait ()
pc.warp ( 353100 , 882900 )
elseif 2 == s then
say_title ( pc.get_name().."!")
say ("Przeniosę Cię do drugiej wioski Chujno")
wait ()
pc.warp ( 145500 , 240000 )
elseif 3 == s then
say_title ( pc.get_name().."!")
say ("Przeniosę Cię do drugiej wioski Jinno")
wait ()
pc.warp ( 863900 , 246000 )
end
elseif s == 4 then
say_title ( pc.get_name().."!")
say ( "Zwiedz też inne miejsca:")
say_reward ( "Żeby to zrobić musisz posiadać 60LvL+")
local s = select ( "Przed DT" , "Ziemia Gigantów" , "Nigdzie!" )
if s == 1 then
if pc.level >= 60 then
say_title ( pc.get_name().."!")
say ("Przeniosę Cię przed DT")
wait ()
pc.warp ( 590500 , 110500 )
elseif pc.level < 60 then
say_title ( "Możesz się przenieść od 60 poziomu")
say ("Nie posiadasz 60 poziomu!")
end

elseif 2 == s then
if pc.level >= 60 then
say_title ( pc.get_name().."!")
say ("Przeniosę Cię na Ziemię Gigantów")
wait ()
pc.warp ( 845100 , 745900 )
elseif pc.level < 60 then
say_title ( "Możesz się przenieść od 60 poziomu")
say ("Nie posiadasz 60 poziomu!")
end
end
elseif s == 5 then
say_title ( pc.get_name().."!")
say ( "Wybierz lokację " )
local s = select ( "Dolina Orków" , "Świątynia Hwang", "Pustynia Yongbi" , "Góra Sohan" , "Loch Pająków v1" , "Ognista Ziema" , "Wyjdz" )
if s == 1 then
say_title ("Zostaniesz Przeniesiony")
say ("Trzymaj się Mocno")
wait ()
local empire = pc . get_empire ( )
if empire == 1 then
pc.warp ( 402100 , 673900 )
elseif empire == 2 then
pc.warp ( 270400 , 739900 )
elseif empire == 3 then
pc.warp ( 321300 , 808000 )
end
elseif 2 == s then
say_title ("Zostaniesz Przeniesiony do Świątyni Hwang")
say ("Trzymaj się Mocno")
wait ()
pc.warp ( 16100 , 94300 )
elseif 3 == s then
say_title ("Zostaniesz Przeniesiony")
say ("Trzymaj się Mocno")
wait ()
local empire = pc . get_empire ( )
if empire == 1 then
pc.warp ( 217800 , 627200 )
elseif empire == 2 then
pc.warp ( 221900 , 502700 )
elseif empire == 3 then
pc.warp ( 344000 , 502500 )
end
elseif 4 == s then
say_title ("Zostaniesz Przeniesiony")
say ("Trzymaj się Mocno")
wait ()
local empire = pc . get_empire ( )
if empire == 1 then
pc.warp ( 434200 , 290600 )
elseif empire == 2 then
pc.warp ( 375200 , 174900 )
elseif empire == 3 then
pc.warp ( 491800 , 173600 )
end

elseif 5 == s then
say_title ("Zostaniesz Przeniesiony")
say ("Trzymaj się Mocno")
wait ()
local empire = pc . get_empire ( )
if empire == 1 then
pc.warp ( 60000 , 496000 )
elseif empire == 2 then
pc.warp ( 60000 , 496000 )
elseif empire == 3 then
pc.warp ( 60000 , 496000 )
end

elseif 6 == s then
say_title ("Zostaniesz Przeniesiony")
say ("Trzymaj się Mocno")
wait ()
local empire = pc . get_empire ( )
if empire == 1 then
pc.warp ( 599400 , 756300 )
elseif empire == 2 then
pc.warp ( 597800 , 622200 )
elseif empire == 3 then
pc.warp ( 730700 , 689800 )
end
end
elseif s == 6 then
say_reward ( "hmm..." )
say ( pc.get_name().." Do którego mistasta chcesz sie wybrac" )
local s = select ( "Loch Pająków V2 - wymagany 60LvL" , "Czerwony Las - wymagany 80LvL" , "Grota Wygnańców V1 - wymagany 75LvL", "Atlantyda V2 - wymagany 75LvL" , "Anuluj" )
if s == 1 then
if pc.level >= 60 then
say_title ("Zostaniesz Przeniesiony do Lochy Pajaków V2")
say ("Trzymaj się Mocno")
wait ()
pc.warp ( 704100 , 464100 )
elseif pc.level < 60 then
say_title ( "Możesz się przenieść od 60 poziomu")
say ("Nie posiadasz 60 poziomu!")
end
elseif 2 == s then
if pc.level >= 80 then
say_title ("Zostaniesz Przeniesiony do Czerwonego Lasu")
say ("Trzymaj się Mocno")
wait ()
pc.warp ( 1119900 , 70800 )
elseif pc.level < 80 then
say_title ( "Możesz się przenieść od 80 poziomu")
say ("Nie posiadasz 80 poziomu!")
end
elseif 3 == s then
if pc.level >= 75 then
say_title ("Zostaniesz Przeniesiony do Groty Wygnańców V1")
say ("Trzymaj się Mocno")
wait ()
pc.warp ( 10000 , 10000 )
elseif pc.level < 75 then
say_title ( "Możesz się przenieść od 75 poziomu")
say ("Nie posiadasz 75 poziomu!")
end
elseif 4 == s then
if pc.level >= 75 then
say_title ("Zostaniesz Przeniesiony do Groty Wygnańców V2")
say ("Trzymaj się Mocno")
wait ()
pc.warp ( 87700 , 71100 )
elseif pc.level < 75 then
say_title ( "Możesz się przenieść od 75 poziomu")
say ("Nie posiadasz 75 poziomu!")
end
end
elseif s == 7 then
say_reward ( "hmm..." )
say ( pc.get_name().." co chciałbyś kupić?" )
local s = select ( "1000 Czerwonych Miksturek" , "400 Niebieskich Miksturek" , "200 pelerynek męstwa" , "Bryłę złota" , "Anuluj" )
if s == 4 then
say_title("Informacja:")
say("Czy chcesz zmienić 475kk za bryłkę złota?")
local a == select("Tak", "Nie")
if a == 1 then
if pc.get_money() >= 475000000 then
pc.change_money(-475000000)
pc.give_item2(80088)
end
end
elseif s == 1 then

elseif s == 2 then

elseif s == 3 then

end
end
end
end
end

Na końcu uzupełnij sobie kod jeszcze przy tych potach do kupienia

InBox · 9 Marca 2012

Witam potrzebuje aby ktos naprawił mi tego questa ;]

-------------------------------------------------------------------
---  Misja by Czarny dla CzarnyMT2 oraz Czarny-questy.cba.pl ---
--- Prosze o nie przypisywanie sobie cudzej pracy! Pozdrawiam ---
---    Życzę miłej zabawy i powodzenia     ---
-------------------------------------------------------------------
quest zabijanie begin
state start begin
 when login or levelup with pc.level() >= 41 begin
 setstate(info)
 end
end
state info begin
 when letter begin
  send_letter("Wbiles 41lvl ")
 end
 when button or info begin
  say("Wbiles 41lvl. ")
  say("")
  say("Na czas 20 minut dostajesz : ")
  say("+20 do szybkosci ataku ")
  say("oraz +50 obrony. ")
  affect.add_collect(apply.DEF_GRADE_BONUS, 50, 60*20) --60Ś~
  affect.add_collect(apply.ATT_SPEED, 20, 60*20) --60Ś~
  setstate(krok)
 end
end
state krok begin
 when 635.kill begin
 local a = pc.getqf("ile")+1
  if a < 25 then
   pc.setqf("ile", a)
  elseif a == 25 then
   setstate(krok2)
  end
 end
end
state krok2 begin
 when login or levelup with pc.level() >= 42 and pc.level() <= 43 begin
 end
 when 636.kill begin
  local count = pc.getqf("ile2")+1
   if count < 40 then
 pc.setqf("ile2", count)
   elseif count ==  40 then
 say_reward(" #BONUS DO TEAMU!!# ")
 say("")
 say_reward("Zabiles wiele orkow! ")
 say_reward("Dostajesz maly bonus ")
 say_reward("w postaci dodatkowego doswiadczenia")
 say_reward("czyli +10.000 doswiadczenia ")
 say_reward("20 mobow! ")
 say("")
 say_reward("Pozdrawiamy, Team Serwera  ")
 say("")
 setstate(krok3)
   end
 end
end
state krok3 begin
 when kill begin
  local potwory = pc.getqf("poi")+1
   if porwory > 20 then
 pc.setqf("poi", potwory)
 pc.give_exp2(10000)
   elseif potwory == 20 then
 setstate(krok4)
   end
 end
end
state krok4 begin
 say("Wykorzystales bonus! ")
 say("")
 setstate(koniec)
end
state koniec begin
end
end

watus · 9 Marca 2012

Witam, potrzebuje questa na drop jasnozielonej ebo szkaty która bedzie dropic z wszystkich mobków odpowiednio do lvl (tak jak róże czekoladki na pl),bez ustawiania pojedynczo kazdego mobka, którą bede mogl sobie włączyc z postaci GM u któregoś z npc w m1 chunjo (najlepiej takiego u którego nie ma duzej ilosci misji ani sklepu) lub komendą( /szkaty_quest start ).

Warlok20 · 9 Marca 2012

Jak błędy poprawić+ dodać, żeby npc miał jakiś procent na przyjęcie tego itemu...

quest diament begin

state start begin

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

set_state(info)

end

state info begin

when letter begin

local v = find_npc_by_vnum(20006)

if v != 0 then

target.vid("__TARGET", v, "Mirine")

end

send_letter("Zło Nadciąga!!!")

when button or info begin

say_title("")

say("")

say_reward("")

end

when _TARGET_.target.click or

20006.chat."Misja" begin

target.delete("__TARGET__")

say_title("")

say("")

say_reward("")

set_state(info2)

end

state info2 begin

when letter begin

send_letter("")

end

when button or info begin

say("")

end

when 101.kill with pc.countitem()==0 begin

local random = math.random(20)

if random == 1 then

pc.give_item2()

say("")

local v = find_npc_by_vnum(20006)

if v !=0 then

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

end

when 20006.chat."Misja" with pc.countitem()>0 begin

target.delete("__TARGET__")

say_title("")

say("")

say_reward("")

pc.remove_item()

pc.give_item2()

set_state(__COMPLETE__)

end

state __COMPLETE__ begin

end

maniek1310 · 9 Marca 2012

@InBox powinno działać

-------------------------------------------------------------------
--- Misja by Czarny dla CzarnyMT2 oraz Czarny-questy.cba.pl ---
--- Prosze o nie przypisywanie sobie cudzej pracy! Pozdrawiam ---
--- Życzę miłej zabawy i powodzenia  ---
-------------------------------------------------------------------
quest zabijanie begin
state start begin
when login or levelup with pc.level() >= 41 begin
setstate(info)
end
end

state info begin
when letter begin
send_letter("Wbiles 41lvl ")
end

when button or info begin
say("Wbiles 41lvl. ")
say("")
say("Na czas 20 minut dostajesz : ")
say("+20 do szybkosci ataku ")
say("oraz +50 obrony. ")
affect.add_collect(apply.DEF_GRADE_BONUS, 50, 60*20) --60Ś~
affect.add_collect(apply.ATT_SPEED, 20, 60*20) --60Ś~
setstate(krok)
end
end

state krok begin
when 635.kill begin
local a = pc.getqf("ile")+1
if a < 25 then
pc.setqf("ile", a)
elseif a == 25 then
setstate(krok2)
end
end
end

state krok2 begin
when 636.kill begin
local count = pc.getqf("ile2")+1
if count < 40 then
pc.setqf("ile2", count)
elseif count == 40 then
say_reward(" #BONUS DO TEAMU!!# ")
say("")
say_reward("Zabiles wiele orkow! ")
say_reward("Dostajesz maly bonus ")
say_reward("w postaci dodatkowego doswiadczenia")
say_reward("czyli +10.000 doswiadczenia ")
say_reward("20 mobow! ")
say("")
say_reward("Pozdrawiamy, Team Serwera  ")
say("")
setstate(krok3)
end
end
end

state krok3 begin
when kill begin
local potwory = pc.getqf("poi")+1
if porwory > 20 then
pc.setqf("poi", potwory)
pc.give_exp2(10000)
elseif potwory == 20 then
setstate(krok4)
end
end
end

state krok4 begin
say("Wykorzystales bonus! ")
say("")
setstate(koniec)
end

state koniec begin
end
end

@Warlok20 poprawiłem quest ale nie bardzo rozumię co mam dodać jeszcze do tego questu. A ten quest co ci poprawiłem to jeszcze musisz sobie go uzupełnić.

quest diament begin
state start begin
when login or levelup with pc.get_level() >= 40 begin
set_state(info)
end
end

state info begin
when letter begin
local v = find_npc_by_vnum(20006)
if v != 0 then
target.vid("__TARGET", v, "Mirine")
end
send_letter("Zło Nadciąga!!!")
end
when button or info begin
say_title("")
say("")
say_reward("")
end

when _TARGET_.target.click or 20006.chat."Misja" begin
target.delete("__TARGET__")
say_title("")
say("")
say_reward("")
set_state(info2)
end
end

state info2 begin
when letter begin
send_letter("")
end
when button or info begin
say("")
end
when 101.kill with pc.countitem() == 0 begin
local random = math.random(20)
if random == 1 then
pc.give_item2()
say("")
local v = find_npc_by_vnum(20006)
if v !=0 then
target.vid("__TARGET__", v, "Mirie")
end
end
end
when 20006.chat."Misja" with pc.countitem() > 0 begin
target.delete("__TARGET__")
say_title("")
say("")
say_reward("")
pc.remove_item()
pc.give_item2()
set_state(__COMPLETE__)
end
end

state __COMPLETE__ begin
end
end

@watus jak znajdę chwilę czasu to ci napiszę tego questa

Warlok20 · 9 Marca 2012

Chodzi mi o to aby dodać do tego questa..., że dany item może być tylko jeden w eq, mam oddać 25 tych itemów do npc, i npc może nie przyjmować tych itemów(jakiś % szansy na przyjęcie).

maniek1310 · 9 Marca 2012

to uzupełnij najpierw jak możesz tego questa bo muszę przyznać że nie wiem w którym miejscu mam ci to dodać

Warlok20 · 9 Marca 2012

Szczerze ja też nie:D

z4z0l · 9 Marca 2012

@up

chyba

when login with pc.get_map_index() == xx begin
pc.polymorph

...

dobra pojebało mi się

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany