Pisanie / Poprawa Questów !

Sunushi · 13 Grudnia 2011

Ten quest ma działać tak, że jak postać wbije 50lvl to od razu dostaję 12lvl konia i księgę bojowego konia... i ja już sobie zrobię drugi quest... że np na 80lvl postaci dostaje 21lvl konia i ksiegę militara..

quest konik begin
when login or levelup with pc.get_level() == 50 begin
 say("Otrzymujesz 12 poziom konia!")
 horse.set_level(12)
 horse.summon()
 horse.ride()
end
end

Powinno trybic

Pokplas:

quest lvl begin
when xx.chat begin -- w miejsce xx wpisz id kapitana
 say(mob_name(xx)..":") -- j.w.
 say("Wpisz jaki chcesz lvl:")
 local a = tonumber(input())
 if a != 0 and a <= 250 then
  local ile = a - pc.get_level()
  for i = 1, ile do
   x=pc.get_next_exp()
   pc.give_exp(x)
  end
 end
 say("Posiadasz teraz "..a.." poziom!")
end
end

Nie mam serwa by testować lecz powinno działać (oparte na zapiskach Tenmy )

Warlok20 · 13 Grudnia 2011

quest konik begin
when login or levelup with pc.get_level() == 50 begin
 say("Otrzymujesz 12 poziom konia!")
 horse.set_level(12)
 horse.summon()
 horse.ride()
end
end

Powinno trybic

Pokplas:

quest lvl begin
when xx.chat begin -- w miejsce xx wpisz id kapitana
 say(mob_name(xx)..":") -- j.w.
 say("Wpisz jaki chcesz lvl:")
 local a = tonumber(input())
 if a != 0 and a <= 250 then
  local ile = a - pc.get_level()
  for i = 1, ile do
x=pc.get_next_exp()
pc.give_exp(x)
  end
 end
 say("Posiadasz teraz "..a.." poziom!")
end
end

Nie mam serwa by testować lecz powinno działać (oparte na zapiskach Tenmy )

Nie działa

Stelios · 13 Grudnia 2011

@Sunushi, a state?

Ja bym go trochę poprawił.. Żeby był jednorazowy.

Bo tak możemy logować się 50 razy i za każdym razem dostaniemy wiadomość..



quest konik begin
state start begin
when login or levelup with pc.get_level() == 50 begin
if pc.getqf("raz") == 0 then
 pc.setqf("raz", 1)
 say("Otrzymujesz 12 poziom konia!")
 horse.set_level(12)
 horse.summon()
 horse.ride()
end
end
end
end

Sunushi · 14 Grudnia 2011

Racja, coś za mało endów tam było

Weles · 15 Grudnia 2011

Potrzebuję misji w której spośród podanych 50 przedmiotów, gracz dostaje 3x losowe spośród tych 50 na liście.

Za wykonanie tej misji mogę dać jedynie limit plusów.

Pozdrawiam.

GoGame · 15 Grudnia 2011

Witam was... Nie bede zakladal tematu

chcialbym napisac oryginalny dzialajacy quest taki jak na metin2.pl (Nie mam Lv zeby sprawdzic )

do Krysztalowej Komnaty (Komnata Beran-Setaou)

potrzebuje jedynie :

-Teksty Dialogow (say-e)

-Warunki jakie potrzeba (itemy , kasa, lv ?)

-I cos tam jeszcze

Questy potrafie pisac ...

Osoba ktora pomoze dostanie questa na PW ...

Narazie mam 2 rodzaje questow...

potrzebuje jedynie dialooogi

z4z0l · 15 Grudnia 2011

dialogi potrzebujesz ? ;O na youtubie masz filmy z komnaty, więc wejdź sobie i zobacz ...

GoGame · 15 Grudnia 2011

@UP

to mi daj , bo jakos nie widze wlasnie potrzebnych dialogow ...

od razu przerzuca do komnaty i ubijaja Smoczka .

dominikczek · 16 Grudnia 2011

Może mi ktoś dokończyć ten quest bo jest nie kompletny podobno a ja jestem zielony w pisaniu questów a co dopiero w poprawie

quest deviltower_zone begin
   state start begin
    when login begin
	    if pc.get_map_index() == 66 then
		    -- ¨Ă«D¦b1ĽÓ®É, °eŞđĄ~±.
		    -- ĽhĽĆ ˝dłň
		    -- 1ĽÓ  88  577  236 737
		    -- 2ĽÓ  91  343  238 504
		    -- 3ĽÓ 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)  -- ®ř·Ŕ¤ŁŞľ¬O§_¦s¦bŞşŻu¤`ĆF¶đ
		    pc.remove_item(30302,mapto7)
		    local boxto7= pc.count_item(30300)  -- ®ř·Ŕ¤ŁŞľ¬O§_¦s¦bŞş¤ŁŞľ¦WŞş˝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łyŻuĄŰŔY©M°˛ĄŰŔY
	    --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!")
		    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())
		    -- 5ĽÓÄ~Äň¦A˛{
		    d.set_regen_file("data/dungeon/deviltower5_regen.txt")
		    -- 5ĽÓ«Ę¦LĄŰ¦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
		    -- ±Ľ¤UÂę°Í
		    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("Do otwarcia posostały "..d.getf("stone_count").." pieczęcie")
	    end
    end
    when devil_stone6.kill begin
	    -- ¶Ç°e¨ě·Ň¸t©Ň¦bŞş¦aąĎ
	    -- §_«hˇA¶}ł]¤@Ó·s·Ň¸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
    --------------------------------------
    -- ĄŃ¶i¤J7ĽÓ¦Ü¨ěąF8ĽÓ¤§«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
				    -- ±Ľ¤UŻu¦aąĎ
				    game.drop_item(30302, 1)
				    d.clear_regen()
		    else
				    -- ±Ľ¤U°˛¦aąĎ
				    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¨ě8ĽÓ
		    say("Przeniesiesz sie na 8 pietro!")
		    pc.remove_item("30302", 1)
	    timer("devil_jump_8", 6)
		    d.clear_regen()
    end

    --------------------------------------------
    -- ĄŃ¶i¤J8ĽÓ¦Ü¨ěąF9ĽÓ¤§«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)-- ®ř·ŔŻu¤`ĆF¶đ
		    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
						    -- ±Ľ¤UŻuÂę°Í
						    game.drop_item(30304, 1)
				    else
						    -- ±Ľ¤U°˛Âę°Í
						    game.drop_item(30303, 1)
				    end
		    else
				    return
		    end
    end
    when 20366.take with item.vnum == 30304 begin
		    -- 9ĽÓ«Ę¦L¸Ń°Ł
		    d.notice("Zostaniecie przeniesieni na 9 pietro!")
		    npc.purge()
		    item.remove()
		    timer("devil_jump_9", 6)
    end
    ---------------------------------------------
    -- ĄŃ¶i¤J9ĽÓ¦Üµ˛§ô
    ---------------------------------------------
    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!")
		    timer("devil_end_jump", 60)
    end
    when devil_end_jump.timer begin
	    d.exit_all()
    end

    when login begin
		    if pc.get_map_index() == 65 then
				    if pc.getqf("priv_dt") > 0 then
						    pc.setqf("priv_dt", 0)
				    end
		    end
	    if pc.get_map_index() == 66 then
		    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."Wejdź do Wieży Wygnańców" with party.is_leader() begin
		    say_title("Strażnik Wieży Wygnańców:")
		    if party.get_near_count() < 5 then
				    say("Wybacz, musisz mieć ze sobą 5 osób w grupie.")
				    party.chat("Wasza grupa posiada zbyt mało członków.")
				    return
		    end
	    if pc.get_level() < 110 then
		    say("Wybacz, mogę wpuszczać tylko soby od 110 poziomu.")
		    party.chat("Lider grupy nie posiada 110 poziomu.")
	    else
		    say("Spełniasz wszystkie warunki..")
		    say("Czy aby na pewno chcesz wejść do Wieży?")
		    say("Czeka tam na Ciebie i Twoich znajomych ogromne")
		    say("niebezpieczeństwo.. Jesteś tego pewien?")
		    local s = select("Wejdź!","Nie wchodzę..")

		    if s == 1 then
				    pc.setqf("priv_dt", 1)
			    -- join into map!
			    d.join(66)
		    end
	    end
    end

    when login with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
				    --local i = nie ważne..
				    --chat("i: "..i) -- for test
				    if party.is_leader() == true and pc.getqf("priv_dt") > 0 then
						    pc.setqf("priv_dt", 0)
						    d.regen_file("data/dungeon/wygnancy.txt")
						    d.notice("Witajcie, w Wieży Wygnańców!")
						    d.notice("Zniszczie Metin Morderstwa, by przedostać się dalej.")
						    d.spawn_mob(8024, 195, 690)
				    end
    end


    when 8024.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
	    timer("wieza", 6)
		    chat(special.devil_tower[1][1].." "..special.devil_tower[1][2])
    end
    when wieza.timer begin
	    d.new_jump_all(66, special.devil_tower[1][1], special.devil_tower[1][2])
	    d.regen_file("data/dungeon/wygnancy2.txt")
	    d.set_warp_at_eliminate(4, d.get_map_index(), special.devil_tower[2][1], special.devil_tower[2][2], "data/dungeon/wygnancy3.txt")
    end
    when 1903.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
	    d.set_warp_at_eliminate(4, d.get_map_index(), special.devil_tower[3][1], special.devil_tower[3][2], "data/dungeon/wygnancy4.txt")
	    d.check_eliminated()
		    d.notice("Elit. Dziewięć Ogonów został pokonany!")
    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
	    return positions
    end
    when 8025.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
	    d.setf("levels", 4)
	    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(8026, positions[i][1], positions[i][2]))
	    end
	    chat(positions[7][1], positions[7][2])
	    local vid = d.spawn_mob(8026, positions[7][1], positions[7][2])
	    chat(vid)
	    d.set_unique("real", vid)
	    server_loop_timer('devil_stone4_updates', 10, pc.get_map_index())
	    server_timer('devil_stone4_fail1s', 5*60, pc.get_map_index())
	    d.notice("Brawo, udało się Tobie zniszczyć Metin Ma-An.");
	    d.notice("Musicie teraz znaleźć prawdziwy Kamień Metin,");
	    d.notice("by dostać się na kolejne piętro.");
	    d.notice("Macie na to 5 minut zanim zostaniecie wylogowani !");
	    d.notice("Śpieszcie się!");
    end
    when devil_stone4_fail1s.server_timer begin
	    if d.select(get_server_timer_arg()) then
		    d.notice("Pozostało 10 minut!")
		    server_timer('devil_stone4_fail2s', 5*60, get_server_timer_arg())
	    end
    end
    when devil_stone4_fail2s.server_timer begin
	    if d.select(get_server_timer_arg()) then
		    d.notice("Pozostało 5 minut!")
		    server_timer('devil_stone4_fails', 5*60, get_server_timer_arg())
	    end
    end
    when devil_stone4_fails.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_updates', get_server_timer_arg())
	    end
    end
    when devil_stone4_updates.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 kamień!");
					    end
				    end
			    end
		    else
			    server_timer("devil_stone4_ends", 5, get_server_timer_arg())
			    d.notice("Udało się wam zniszczyć prawdziwy Kamień Metin!");
			    d.notice("Zostaniecie przeniesieni na kolejne piętro.")
			    clear_server_timer('devil_stone4_fail1s', get_server_timer_arg())
			    clear_server_timer('devil_stone4_fail2s', get_server_timer_arg())
			    clear_server_timer('devil_stone4_fails', get_server_timer_arg())
		    end
	    else
		    server_timer('devil_stone4_stop_timers', 1, get_server_timer_arg())
	    end
    end
    when devil_stone4_stop_timers.server_timer begin
	    clear_server_timer('devil_stone4_updates', get_server_timer_arg())
    end
    when devil_stone4_ends.server_timer begin
	    if d.select(get_server_timer_arg()) then
		    d.setf("levels", 5)
		    d.setf("stone_counts", 5)
		    d.notice("Świetnie.. Przechodzicie na 5 piętro!")
		    d.notice("Aby przejść na kolejne musicie zabić wszystkie potwory.")
		    d.notice("Poczym podnieść Kamień Otwarcia i otworzyć,")
		    d.notice("wszystkie pięć pieczęci przed czasem!")
		    d.jump_all(special.devil_tower[4][1], special.devil_tower[4][2])
		    server_timer('devil_stone5_fail1s', 5*60, get_server_timer_arg())
		    clear_server_timer('devil_stone4_updates', get_server_timer_arg())
		    -- 5ĽÓÄ~Äň¦A˛{
		    d.set_regen_file("data/dungeon/wygnancy5.txt")
		    -- 5ĽÓ«Ę¦LĄŰ¦A˛{
		    d.spawn_mob(20353, 421, 452)
		    d.spawn_mob(20353, 380, 460)
		    d.spawn_mob(20353, 428, 414)
		    d.spawn_mob(20353, 398, 392)
		    d.spawn_mob(20353, 359, 426)
	    end
    end
    when devil_stone5_fail1s.server_timer begin
	    if d.select(get_server_timer_arg()) then
		    d.notice("Do Końca pozostało 15 minut.")
		    server_timer('devil_stone5_fail2s', 5*60, get_server_timer_arg())
	    end
    end
    when devil_stone5_fail2s.server_timer begin
	    if d.select(get_server_timer_arg()) then
		    d.notice("Do Końca pozostało 10 minut.")
		    server_timer('devil_stone5_fail3s', 5*60, get_server_timer_arg())
	    end
    end
    when devil_stone5_fail3s.server_timer begin
	    if d.select(get_server_timer_arg()) then
		    d.notice("Do Końca pozostało 5 minut.")
		    server_timer('devil_stone5_fails', 5*60, get_server_timer_arg())
	    end
    end
    when devil_stone5_fails.server_timer begin
	    if d.select(get_server_timer_arg()) then
		    d.notice("Niestety... Nie udało się! Zostaniecie wylogowani.")
		    d.exit_all()
	    end
    end
    when 2412.kill with pc.in_dungeon() and d.getf("levels") == 5 begin
	    local KILL_COUNT_FOR_DROP_KEYs = 50
	    local n =d.getf("counts") + 1
	    d.setf("counts", n)
	    if n == KILL_COUNT_FOR_DROP_KEYs then
		    pc.give_item2(50084, 1)
		    d.notice(pc.get_name().." Podniósł Kamień Otwarcia!")
		    d.setf("counts", 0)
	    end
    end
    when 20353.take with item.vnum == 50084 and d.getf("levels") == 5 begin
	    npc.purge()
	    item.remove()
	    d.setf("stone_counts", d.getf("stone_counts") - 1)
	    if d.getf("stone_counts") <= 0 then
		    d.setf("levels", 6)
		    d.clear_regen()
		    d.regen_file("data/dungeon/wygnancy6.txt")
		    d.notice("Brawo, udało się! Jesteście na 6 piętrze!")
		    d.notice("Zabijcie wszystkie potwory!")
		    d.jump_all(special.devil_tower[5][1], special.devil_tower[5][2])
		    timer("mob",6)
		    clear_server_timer('devil_stone5_fail1s', get_server_timer_arg())
		    clear_server_timer('devil_stone5_fail2s', get_server_timer_arg())
		    clear_server_timer('devil_stone5_fail3s', get_server_timer_arg())
		    clear_server_timer('devil_stone5_fails', get_server_timer_arg())
	    else
						    d.notice("Do otwarcia pozostały "..d.getf("stone_counts").." pieczęcie.")
	    end
    end

    when mob.timer begin
		    d.spawn_mob(1304, 425, 216);
    end
    when 1306.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 and d.getf("levels") == 6 begin
	    d.kill_all()
	    d.check_eliminated()
	    local reward_alchemists = {20074, 20075, 20076}
	    d.spawn_mob(reward_alchemists[number(1,3)], 425, 216);
	    d.setqf("can_refine", 2)
    end

    --------------------------------------
    -- ĄŃ¶i¤J7ĽÓ¦Ü¨ěąF8ĽÓ¤§«e
    --------------------------------------
    when 20074.chat."Chce przejść dalej (smok)" with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 and d.getf("levels") == 6 begin
		    say_title(""..mob_name(20074).."")
		    say("Możesz przejsć na 7 piętro Wieży Wygnańców?")
		    say("Lecz uważaj..")
		    say("Tam wyżej nie będzie tak łatwo jak wcześniej!")
		    wait()
		    if pc.level >=110 then
				    say_title(""..mob_name(20074).."")
				    say("Posiadasz odpowiedni level.")
				    say("Zostaniesz przeniesiony na 7 piętro.")
				    timer("devil_jump_7s", 6)
				    return
		    end
		    say_title(""..mob_name(20074).."")
		    say("Wybacz.. nie posiadasz 110 poziomu")
		    say("Nie mogę Cię przenieść na kolejne piętro.")
		    wait()
		    pc.warp(590500, 110500)
		    return
   end
    when 20075.chat."Chce przejść dalej (smok)" with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 and d.getf("levels") == 6 begin
		    say_title(""..mob_name(20074).."")
		    say("Możesz przejsć na 7 piętro Wieży Wygnańców.")
		    say("Lecz uważaj..")
		    say("Tam wyżej nie będzie tak łatwo jak wcześniej!")
		    wait()
		    if pc.level >=110 then
				    say_title(""..mob_name(20074).."")
				    say("Posiadasz odpowiedni level.")
				    say("Zostaniesz przeniesiony na 7 piętro.")
				    timer("devil_jump_7s", 6)
				    return
		    end
		    say_title(""..mob_name(20074).."")
		    say("Wybacz.. nie posiadasz 110 poziomu")
		    say("Nie mogę Cię przenieść na kolejne piętro.")
		    wait()
		    pc.warp(590500, 110500)
		    return
   end
    when 20076.chat."Chce przejść dalej (smok)" with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 and d.getf("levels") == 6 begin
		    say_title(""..mob_name(20074).."")
		    say("Możesz przejsć na 7 piętro Wieży Wygnańców.")
		    say("Lecz uważaj..")
		    say("Tam wyżej nie będzie tak łatwo jak wcześniej!")
		    wait()
		    if pc.level >=110 then
				    say_title(""..mob_name(20074).."")
				    say("Posiadasz odpowiedni level.")
				    say("Zostaniesz przeniesiony na 7 piętro.")
				    timer("devil_jump_7s", 6)
				    return
		    end
		    say_title(""..mob_name(20074).."")
		    say("Wybacz.. nie posiadasz 110 poziomu")
		    say("Nie mogę Cię przenieść na kolejne piętro.")
		    wait()
		    pc.warp(590500, 110500)
		    return
   end
  when devil_jump_7s.timer begin
		    d.clear_regen()
		    d.spawn_mob(1095, 617, 676)
		    d.setf("levels", 7)
		    d.regen_file("data/dungeon/wygnancy7.txt")
		    d.jump_all(2048+590, 6656+638)
    end
    ---------------------------------------------
    -- Niebieska Śmierć
    ---------------------------------------------
    when 1095.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
		    timer("devil_jump_8S", 30)
		    d.clear_regen()
		    d.notice("Pokonaliście Niebieską Śmierć!")
		    d.notice("Zostaniecie przeniesieni na piętro smoka!")
    end

    ---------------------------------------------
    -- Niebiański Smok
    ---------------------------------------------
    when devil_jump_8S.timer begin
		    d.setf("levels", 8)
		    d.jump_all(2048+590, 6656+155)
		    d.spawn_mob(2493,630,195)
    end
    when 2493.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
		    d.kill_all()
		    local m_sex = pc.get_sex()
							    if m_sex == 0 then
		    notice_all(pc.get_name().." zabił Niebiańskiego Smoka!")
				    else
		    notice_all(pc.get_name().." zabiła Niebiańskiego Smoka!")
						    end
		    timer("devil_end_jumps", 60)
    end
    when devil_end_jumps.timer begin
	    d.exit_all()
    end
end
state __GOOD__ begin
end
end

z4z0l · 16 Grudnia 2011

a testowałeś go w ogóle ?

piotrekkkkkk · 16 Grudnia 2011

Siemka

Może ktos napisać mi questa polegajacego na kill'aniu okreslonej liczby graczy np.10 i otrzymywaniu za to okreslonej nagrody. U kogo to sobie sam ustawie (bo chce dodac do kilku npc w roznych ilosciach do zabicia)

Daje "lajki"

Z góry dziekuje

SϒS™ · 17 Grudnia 2011

Witajcie poszukuję takich questów :

1.)Kup bonus na zawsze ! (u 20091 jest zakladka Kup bonus na zawsze ! , po kliknieciu na nią są 4 bonusy do wyboru

+ 5000 Obrony

+140 Wartosc ataku

+100% speeda

+250 Ataku

Bonusy można kupować za 50 krwistych kamieni i 1kkk yang . Mozna kupować bez przerwy :>Jak się ma wymag. itemy

!.Szymcio:* · 17 Grudnia 2011

say ( "Witaj" )

say ( "Masz Do wyboru Opcje Wybierz Jaka Ci sie Podoba !" )

say ( "" )

wait ( )

local s = select ( "Wróć Do Miasta" ,"Idź Do Groty Wygnańców" , "Idź do Czerwonego Las" , "Idź Do Lochu Pająków 2 Poziom " , "Polimorfia" , "Yang" , "Umiejętności" , "Polimorfia 2" , "Skille P" , "Anuluj" )

if 1 == s then

say_title ("Zostaniesz Przeniesiony")

say ("Trzymaj się Mocno")

wait ()

local empire = pc . get_empire ( )

if empire == 1 then

pc . warp ( 474300 , 954800 )

elseif empire == 2 then

pc . warp ( 63800 , 166400 )

elseif empire == 3 then

pc . warp ( 959900 , 269200 )

end

elseif 2 == s then

say_title ("Zostaniesz Przeniesiony")

say ("Trzymaj się Mocno")

wait ()

local empire = pc . get_empire ( )

if empire == 1 then

pc.warp ( 9800 , 1215100 )

elseif empire == 2 then

pc.warp ( 9800 , 1215100 )

elseif empire == 3 then

pc.warp ( 9800 , 1215100 )

end

elseif 3 == s then

say_title ("Zostaniesz Przeniesiony")

say ("Trzymaj się Mocno")

wait ()

local empire = pc . get_empire ( )

if empire == 1 then

pc.warp ( 1119900 , 70800 )

elseif empire == 2 then

pc.warp ( 1119900 , 70800 )

elseif empire == 3 then

pc.warp ( 1119900 , 70800 )

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 ( 704100 , 464100 )

elseif empire == 2 then

pc.warp ( 704100 , 464100 )

elseif empire == 3 then

pc.warp ( 704100 , 464100 )

end

elseif 5 == s then

say ( "Cześć" )

say ( "Wybierz Jednego Z tych Bossów" )

say ("Lub Wybierz Opcje Powrotu Do Noralnej Postaci ")

local s = select ( "Umarły Rozpruwacz" ,"Ognisty Krol" , "Eli.Krol Demonów" , "Tysięczny Wojownik" , "Wroc Do Normalnej Postaci." )

say ("Czy Napewno Chcesz Kontynuowac?")

local scelta = select ( "Tak","Nie" )

if scelta==1 then

pc.polymorph ( 1093, 80 )

elseif scelta==2 then

say ( "Nie...Może innym razem." )

return

end

if 2 == s then

pc.polymorph ( 2206, 90 )

end

if 3 == s then

pc.polymorph ( 1092, 80 )

end

if 4 == s then

pc.polymorph ( 1403, 80 )

end

if 5 == s then

pc.polymorph ( 1, 1 )

end

elseif 6 == s then

say_title ( "Czesc" )

say ( "Chcesz Yang?" )

local s = select ( "Tak" , "Nie" )

if scelta==1 then

pc . give_money ( 500000000 )

elseif scelta==2 then

return

end

elseif 7 == s then

say_title ( "Witam" )

say ( "Czy chciałbyś dostać potrzebne ci umiejętności" )

local s = select ( "Tak" , "Nie" )

if 2 == s then

say ("Nie...Może później...")

return

end

say ( "Otrzymałeś Wszystkie Potrzebne Ci Umiejętności!" )

if pc . get_job() == 0 and pc . get_skill_group()==1 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

elseif pc . get_job()==0 and pc . get_skill_group()==2 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

elseif pc . get_job()==1 and pc . get_skill_group()==1 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

elseif pc . get_job()==1 and pc . get_skill_group()==2 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

elseif pc . get_job()==2 and pc . get_skill_group()==1 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

elseif pc . get_job()==2 and pc . get_skill_group()==2 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

elseif pc . get_job()==3 and pc . get_skill_group()==1 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

elseif pc . get_job()==3 and pc . get_skill_group()==2 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

end

elseif 8 == s then

say ( "Witam" )

say ( "Hmmm...a więc chiałbyś się zmienić w jakiegoś potwora[ENTER]Jeśli tak, to wybierz go lub Wybierz Opcje[ENTER] Wróć do normalnej postaci!," )

local s = select ( "Silny Dziki Sluga" ,"Dziki Pies" , "Goo-Pae" , "Podly Demoni Zolnierz" , "Niebianski Zolnierz" , "Wroc Do Normalnej Postaci." )

say ("Czy Napewno Chcesz Kontynuowac?")

local scelta = select ( "Tak","Nie" )

if scelta==1 then

pc.polymorph ( 552, 80 )

elseif scelta==2 then

say ( "Nie...Może później!" )

return

end

if 2 == s then

pc.polymorph ( 101, 90 )

end

if 3 == s then

pc.polymorph ( 493, 80 )

end

if 4 == s then

pc.polymorph ( 1031, 80 )

end

if 5 == s then

pc.polymorph ( 2401, 80 )

end

if 6 == s then

pc.polymorph ( 1, 1 )

end

elseif 9 == s then

say_title("Otrzymałeś skille")

say("Otrzymałeś skille dla swojej profesji")

if pc . get_job() == 0 and pc . get_skill_group()==1 then

pc . set_skill_level (1, 59)

pc . set_skill_level (2, 59)

pc . set_skill_level (3, 59)

pc . set_skill_level (4, 59)

pc . set_skill_level (5, 59)

elseif pc . get_job()==0 and pc . get_skill_group()==2 then

pc . set_skill_level (16, 59)

pc . set_skill_level (17, 59)

pc . set_skill_level (18, 59)

pc . set_skill_level (19, 59)

pc . set_skill_level (20, 59)

elseif pc . get_job()==1 and pc . get_skill_group()==1 then

pc.set_skill_level(31, 59)

pc.set_skill_level(32, 59)

pc.set_skill_level(33, 59)

pc.set_skill_level(34, 59)

pc.set_skill_level(35, 59)

elseif pc . get_job()==1 and pc . get_skill_group()==2 then

pc.set_skill_level(46, 59)

pc.set_skill_level(47, 59)

pc.set_skill_level(48, 59)

pc.set_skill_level(49, 59)

pc.set_skill_level(50, 59)

elseif pc . get_job()==2 and pc . get_skill_group()==1 then

pc.set_skill_level(61, 59)

pc.set_skill_level(62, 59)

pc.set_skill_level(63, 59)

pc.set_skill_level(64, 59)

pc.set_skill_level(65, 59)

pc.set_skill_level(66, 59)

elseif pc . get_job()==2 and pc . get_skill_group()==2 then

pc.set_skill_level(76, 59)

pc.set_skill_level(77, 59)

pc.set_skill_level(78, 59)

pc.set_skill_level(79, 59)

pc.set_skill_level(80, 59)

pc.set_skill_level(81, 59)

elseif pc . get_job()==3 and pc . get_skill_group()==1 then

pc.set_skill_level(91, 59)

pc.set_skill_level(92, 59)

pc.set_skill_level(93, 59)

pc.set_skill_level(94, 59)

pc.set_skill_level(95, 59)

pc.set_skill_level(96, 59)

elseif pc . get_job()==3 and pc . get_skill_group()==2 then

pc.set_skill_level(106, 59)

pc.set_skill_level(107, 59)

pc.set_skill_level(108, 59)

pc.set_skill_level(109, 59)

pc.set_skill_level(110, 59)

pc.set_skill_level(111, 59)

end

pc . setqf ( "next_time" , get_time ( ) + 3600 )

elseif 10 == s then

say ( "Może Innym razem" )

say ( "" )

end

Prosze o poprawe tego questa ,jest to quest z pierscienia. Nie dziala w nim opcja Yang Pozdrawiam.

Stelios · 17 Grudnia 2011

say ( "Witaj" )

say ( "Masz Do wyboru Opcje Wybierz Jaka Ci sie Podoba !" )

say ( "" )

wait ( )

local s = select ( "Wróć Do Miasta" ,"Idź Do Groty Wygnańców" , "Idź do Czerwonego Las" , "Idź Do Lochu Pająków 2 Poziom " , "Polimorfia" , "Yang" , "Umiejętności" , "Polimorfia 2" , "Skille P" , "Anuluj" )

if 1 == s then

say_title ("Zostaniesz Przeniesiony")

say ("Trzymaj się Mocno")

wait ()

local empire = pc . get_empire ( )

if empire == 1 then

pc . warp ( 474300 , 954800 )

elseif empire == 2 then

pc . warp ( 63800 , 166400 )

elseif empire == 3 then

pc . warp ( 959900 , 269200 )

end

elseif 2 == s then

say_title ("Zostaniesz Przeniesiony")

say ("Trzymaj się Mocno")

wait ()

local empire = pc . get_empire ( )

if empire == 1 then

pc.warp ( 9800 , 1215100 )

elseif empire == 2 then

pc.warp ( 9800 , 1215100 )

elseif empire == 3 then

pc.warp ( 9800 , 1215100 )

end

elseif 3 == s then

say_title ("Zostaniesz Przeniesiony")

say ("Trzymaj się Mocno")

wait ()

local empire = pc . get_empire ( )

if empire == 1 then

pc.warp ( 1119900 , 70800 )

elseif empire == 2 then

pc.warp ( 1119900 , 70800 )

elseif empire == 3 then

pc.warp ( 1119900 , 70800 )

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 ( 704100 , 464100 )

elseif empire == 2 then

pc.warp ( 704100 , 464100 )

elseif empire == 3 then

pc.warp ( 704100 , 464100 )

end

elseif 5 == s then

say ( "Cześć" )

say ( "Wybierz Jednego Z tych Bossów" )

say ("Lub Wybierz Opcje Powrotu Do Noralnej Postaci ")

local s = select ( "Umarły Rozpruwacz" ,"Ognisty Krol" , "Eli.Krol Demonów" , "Tysięczny Wojownik" , "Wroc Do Normalnej Postaci." )

say ("Czy Napewno Chcesz Kontynuowac?")

local scelta = select ( "Tak","Nie" )

if scelta==1 then

pc.polymorph ( 1093, 80 )

elseif scelta==2 then

say ( "Nie...Może innym razem." )

return

end

if 2 == s then

pc.polymorph ( 2206, 90 )

end

if 3 == s then

pc.polymorph ( 1092, 80 )

end

if 4 == s then

pc.polymorph ( 1403, 80 )

end

if 5 == s then

pc.polymorph ( 1, 1 )

end

elseif 6 == s then

say_title ( "Czesc" )

say ( "Chcesz Yang?" )

local s = select ( "Tak" , "Nie" )

if scelta==1 then

pc . give_money ( 500000000 )

elseif scelta==2 then

return

end

elseif 7 == s then

say_title ( "Witam" )

say ( "Czy chciałbyś dostać potrzebne ci umiejętności" )

local s = select ( "Tak" , "Nie" )

if 2 == s then

say ("Nie...Może później...")

return

end

say ( "Otrzymałeś Wszystkie Potrzebne Ci Umiejętności!" )

if pc . get_job() == 0 and pc . get_skill_group()==1 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

elseif pc . get_job()==0 and pc . get_skill_group()==2 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

elseif pc . get_job()==1 and pc . get_skill_group()==1 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

elseif pc . get_job()==1 and pc . get_skill_group()==2 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

elseif pc . get_job()==2 and pc . get_skill_group()==1 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

elseif pc . get_job()==2 and pc . get_skill_group()==2 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

elseif pc . get_job()==3 and pc . get_skill_group()==1 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

elseif pc . get_job()==3 and pc . get_skill_group()==2 then

pc . set_skill_level (121, 59)

pc . set_skill_level (122, 59)

pc . set_skill_level (123, 59)

pc . set_skill_level (124, 59)

pc . set_skill_level (125, 59)

pc . set_skill_level (126, 59)

pc . set_skill_level (127, 59)

pc . set_skill_level (128, 59)

pc . set_skill_level (129, 59)

pc . set_skill_level (130, 59)

pc . set_skill_level (137, 59)

pc . set_skill_level (138, 59)

pc . set_skill_level (139, 59)

pc . set_skill_level (140, 59)

end

elseif 8 == s then

say ( "Witam" )

say ( "Hmmm...a więc chiałbyś się zmienić w jakiegoś potwora[ENTER]Jeśli tak, to wybierz go lub Wybierz Opcje[ENTER] Wróć do normalnej postaci!," )

local s = select ( "Silny Dziki Sluga" ,"Dziki Pies" , "Goo-Pae" , "Podly Demoni Zolnierz" , "Niebianski Zolnierz" , "Wroc Do Normalnej Postaci." )

say ("Czy Napewno Chcesz Kontynuowac?")

local scelta = select ( "Tak","Nie" )

if scelta==1 then

pc.polymorph ( 552, 80 )

elseif scelta==2 then

say ( "Nie...Może później!" )

return

end

if 2 == s then

pc.polymorph ( 101, 90 )

end

if 3 == s then

pc.polymorph ( 493, 80 )

end

if 4 == s then

pc.polymorph ( 1031, 80 )

end

if 5 == s then

pc.polymorph ( 2401, 80 )

end

if 6 == s then

pc.polymorph ( 1, 1 )

end

elseif 9 == s then

say_title("Otrzymałeś skille")

say("Otrzymałeś skille dla swojej profesji")

if pc . get_job() == 0 and pc . get_skill_group()==1 then

pc . set_skill_level (1, 59)

pc . set_skill_level (2, 59)

pc . set_skill_level (3, 59)

pc . set_skill_level (4, 59)

pc . set_skill_level (5, 59)

elseif pc . get_job()==0 and pc . get_skill_group()==2 then

pc . set_skill_level (16, 59)

pc . set_skill_level (17, 59)

pc . set_skill_level (18, 59)

pc . set_skill_level (19, 59)

pc . set_skill_level (20, 59)

elseif pc . get_job()==1 and pc . get_skill_group()==1 then

pc.set_skill_level(31, 59)

pc.set_skill_level(32, 59)

pc.set_skill_level(33, 59)

pc.set_skill_level(34, 59)

pc.set_skill_level(35, 59)

elseif pc . get_job()==1 and pc . get_skill_group()==2 then

pc.set_skill_level(46, 59)

pc.set_skill_level(47, 59)

pc.set_skill_level(48, 59)

pc.set_skill_level(49, 59)

pc.set_skill_level(50, 59)

elseif pc . get_job()==2 and pc . get_skill_group()==1 then

pc.set_skill_level(61, 59)

pc.set_skill_level(62, 59)

pc.set_skill_level(63, 59)

pc.set_skill_level(64, 59)

pc.set_skill_level(65, 59)

pc.set_skill_level(66, 59)

elseif pc . get_job()==2 and pc . get_skill_group()==2 then

pc.set_skill_level(76, 59)

pc.set_skill_level(77, 59)

pc.set_skill_level(78, 59)

pc.set_skill_level(79, 59)

pc.set_skill_level(80, 59)

pc.set_skill_level(81, 59)

elseif pc . get_job()==3 and pc . get_skill_group()==1 then

pc.set_skill_level(91, 59)

pc.set_skill_level(92, 59)

pc.set_skill_level(93, 59)

pc.set_skill_level(94, 59)

pc.set_skill_level(95, 59)

pc.set_skill_level(96, 59)

elseif pc . get_job()==3 and pc . get_skill_group()==2 then

pc.set_skill_level(106, 59)

pc.set_skill_level(107, 59)

pc.set_skill_level(108, 59)

pc.set_skill_level(109, 59)

pc.set_skill_level(110, 59)

pc.set_skill_level(111, 59)

end

pc . setqf ( "next_time" , get_time ( ) + 3600 )

elseif 10 == s then

say ( "Może Innym razem" )

say ( "" )

end

Prosze o poprawe tego questa ,jest to quest z pierscienia. Nie dziala w nim opcja Yang Pozdrawiam.

Nie ma funkcji

pc . give_money ( 500000000 )

Jest za to

pc.change_money( ilosc )

dominikczek · 17 Grudnia 2011

Proszę o takiego questa

gdy użyje pieczeci o id 71126 przywoluje sie npc o id 20131 i daje postaci wartośc ataku +300 gdy nałozy się pieczęc czas 30min

gdy uzyje pieczeci o id 71127 przywoluje sie npc o id 20132 i daje postaci obrone +300 gdy nałozy się tą pieczęc czas 30min

gdy użyje pieczeci o id 71128 przywoluje sie npc o id 20133 i daje postaći szansę na krytyczne udeżenie +50% gdy nałoze pieczeć czas 30min

Chodzi mi oto że te npc to phoenix który lata i chodzi mi o to żeby ten phoenix leciał za postacią i dawał te bonusy i gdy nałoży się pieczęc to można normalnie swojego konia przywolac a ten phoenix żeby latał za postacią

Proszę o spawdzenie dlaczego nie działa ten quest

tutaj link

http://wklej.to/7yCfH

dał bym w spoilerze ale to jest ponad 11tys linijek

po wgrywaniu go na serwer mam taki bład

syntax error : [string "start"]:248: unexpected symbol near `c`

pannelloeventi.quest:11043:Abort (core dumped)

DICT · 18 Grudnia 2011

Potrzebuje questów:

Pierscien tp daje :

Skille

Yang

TP do:

Shinsoo M1/M2

Jinno M1/M2

Chunjo M1/M2

Pustynia - Oaza

I na start każdy dostaje 127 lv + eq dla odpowiedniej klasy i pierścien tp . Z góry dzięki;]

Nigahiga · 18 Grudnia 2011

Proszę o takiego questa

gdy użyje pieczeci o id 71126 przywoluje sie npc o id 20131 i daje postaci wartośc ataku +300 gdy nałozy się pieczęc czas 30min

gdy uzyje pieczeci o id 71127 przywoluje sie npc o id 20132 i daje postaci obrone +300 gdy nałozy się tą pieczęc czas 30min

gdy użyje pieczeci o id 71128 przywoluje sie npc o id 20133 i daje postaći szansę na krytyczne udeżenie +50% gdy nałoze pieczeć czas 30min

Chodzi mi oto że te npc to phoenix który lata i chodzi mi o to żeby ten phoenix leciał za postacią i dawał te bonusy i gdy nałoży się pieczęc to można normalnie swojego konia przywolac a ten phoenix żeby latał za postacią

Proszę o spawdzenie dlaczego nie działa ten quest

tutaj link
http://wklej.to/7yCfH
dał bym w spoilerze ale to jest ponad 11tys linijek

po wgrywaniu go na serwer mam taki bład

syntax error : [string "start"]:248: unexpected symbol near `c`

pannelloeventi.quest:11043:Abort (core dumped)

Omg.. poczytaj na necie co to jest "pętla" w programowaniu..

for i=0, 100 do
command("mm 101")
end

!.Szymcio:* · 18 Grudnia 2011

Napisze mi ktos questa zeby na start dostawalo sie 75Lv + Konia (Militara) i 1.9kkk kasy. Oddzielnego questa zeby maks lv byl 99.

ScoTube · 19 Grudnia 2011

Witam znowu

mógłby ktoś powiedzieć jak zrobić 1 funkcje w pierścieniu dla GM?

Dziękuje będą LIKE

SϒS™ · 19 Grudnia 2011

Witajcie poszukuję takich questów :

1.)Kup bonus na zawsze ! (u 20091 jest zakladka Kup bonus na zawsze ! , po kliknieciu na nią są 4 bonusy do wyboru

+ 5000 Obrony

+140 Wartosc ataku

+100% speeda

+250 Ataku

Bonusy można kupować za 50 krwistych kamieni i 1kkk yang . Mozna kupować bez przerwy :>Jak się ma wymag. itemy

Stelios · 19 Grudnia 2011

Witam znowu

mógłby ktoś powiedzieć jak zrobić 1 funkcje w pierścieniu dla GM?

Dziękuje będą LIKE

Jaką funkcje?

SϒS™ · 19 Grudnia 2011

Moglbym prosic ? ; D

Witajcie poszukuję takich questów :

1.)Kup bonus na zawsze ! (u 20091 jest zakladka Kup bonus na zawsze ! , po kliknieciu na nią są 4 bonusy do wyboru

+ 5000 Obrony

+140 Wartosc ataku

+100% speeda

+250 Ataku

Bonusy można kupować za 50 krwistych kamieni i 1kkk yang . Mozna kupować bez przerwy :>Jak się ma wymag. itemy

GoGame · 19 Grudnia 2011

@2UP

quest gogame begin
state start begin
	when 20091.chat."Kup bonus na zawsze !" begin
		if pc.count_item(ID) >= 50 then
			if pc.get_money() >= 1000000000
					local a = select("+5000 Obrony","+140 Wartości Ataku","+100% Speeda","+250 Ataku","Anuluj")
				if a == 5 then
					return
				elseif a == 1 then
					pc.change_money(pc.give_money() -1000000000)
					pc.remove_item(ID, 50)
					affect.add_collect(apply.DEF_GRADE_BONUS, 5000, 60*60*24*365*60)
				elseif a == 2 then
					pc.change_money(pc.give_money() -1000000000)
					pc.remove_item(ID, 50)
					affect.add_collect(apply.ATT_GRADE_BONUS, 140, 60*60*24*365*60)
				elseif a == 3 then
					pc.change_money(pc.give_money() -1000000000)
					pc.remove_item(ID, 50)
					affect.add_collect(apply.MOV_SPEED, 100, 60*60*24*365*60)
				elseif a == 4 then
					pc.change_money(pc.give_money() -1000000000)
					pc.remove_item(ID, 50)
					affect.add_collect(apply.X, 250, 60*60*24*365*60)
				end
			else
				say("Niestety, ale nie masz 1.000.000.000 Yang.")
			end
		else
			say("Niestety, ale nie masz tyle Krwistych kamieni.")
		end
	end
end
end

w miejsce X (bonus +250 ataku (nie wiem jaki jest)) wpisz Bonus lub usuń bo ja nie wiem jaki to jest :P

w miejsce ID (id krwisty kamień (w remove... , i w sprawdzeniu) wpisz ID krwistego kamienia

@UP

pisz PW to cię tam czegoś nauczę

SϒS™ · 19 Grudnia 2011

@THX GoGame !!

mam prosbe moglbys zapodac mi tutaj wszystkie wypisane ,te bony ? :P np

apply.ATT_GRADE_BONUS --+140 Wartości Ataku

i jak jest odpornosc na magie ? I czy się da np dokupić +10pkt do statów :>

PSS:

http://wklej.to/H7kH1

Moglby to ktos przerobic tak aby :

-Niestety, ale nie masz tyle Krwistych kamieni(50)

-Niestety, ale nie masz 1.000.000.000 Yang.

Pisało dopiero po wybraniu bonu ,... a nie przed od razu po kliknieciu zakladki:

Kup bonus na zawsze !

ScoTube · 20 Grudnia 2011

Jaką funkcje?

Żeby zrobiło tp na arenę ale tylko dla GM i żeby TYLKO Gm widział tą funkcje...

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany