API tools faq
paste
Guest User

Untitled

a guest
Aug 4th, 2014
42
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 10.81 KB | None | 0 0
raw download clone embed print report
  1. quest collect_quest_lv30 begin
  2.     state start begin
  3.         when login or logout or levelup with pc.level >= 30 begin
  4.             set_state(information)
  5.         end
  6.     end
  7.     state information begin
  8.         when letter begin
  9.             local v = find_npc_by_vnum(20084)
  10.             if v != 0 then
  11.                 target.vid("__TARGET__", v, "Analiza Biologa - Zęby Orka")
  12.             end
  13.             send_letter("Analiza Biologa - Zęby Orka")
  14.         end
  15.         when button or info begin
  16.             say_title("Analiza Biologa - Zęby Orka")
  17.             say("")
  18.             say("Biolog Chaegirab, uczeń Uriela,")
  19.             say("właśnie Cie szukał. Proszę idź ")
  20.             say("do niego i zaoferuj mu swoją pomoc.")
  21.             cmdchat("biologeq Zęby_Orka_Lv.30|30006|".. pc.getqf("duration").."|"..pc.getqf("collect_count").."/10|Czarny_Ork|60%")
  22.             cmdchat("oddaj "..q.getcurrentquestindex())
  23.             say("")
  24.         end
  25.         when __TARGET__.target.click or 20084.chat."Znajdź Biologa" begin
  26.             target.delete("__TARGET__")
  27.             say("Biolog Chaegirab:")
  28.             say("Niebiosa, proszę pomóż mi... ")
  29.             say("Badam wszystkie rodzaje roślin w tym ")
  30.             say("imperium. Jest bardzo dużo rzeczy, ")
  31.             say("które muszą zostać zbadane. Nie mam ")
  32.             say("czasu abym mógł sam wybrać się na wyprawe. ")
  33.             say("Proszę,pomóż mi. ")
  34.             wait()
  35.             say("Biolog Chaegirab:")
  36.             say("Aktualnie badam Zęby Orka.")
  37.             say("Muszę przeprowadzić kilka eksperymentów,")
  38.             say("dlatego potrzebuję kilku egzemplarzy.")
  39.             say("Czy mógłbyś przynieść mi dziesięć Zębów Orka?")
  40.             say("Proszę, pomóż mi! Zawsze przynoś mi po jednym,")
  41.             say("abym miał czas na ich dokładne przebadanie!")
  42.             cmdchat("biologeq Zęby_Orka_Lv.30|30006|".. pc.getqf("duration").."|"..pc.getqf("collect_count").."/10|Czarny_Ork|60%")
  43.             say("")
  44.             set_state(oddawanie_info)
  45.             pc.setqf("duration",0)
  46.             pc.setqf("collect_count",0)
  47.             pc.setqf("drink_drug",0)
  48.         end
  49.     end
  50.     state go_to_disciple begin
  51.         when login with pc.get_level() >= 30 begin
  52.             cmdchat("biologeq Zęby_Orka_Lv.30|30006|".. pc.getqf("duration").."|"..pc.getqf("collect_count").."/10|Czarny_Ork|60%")
  53.             cmdchat("oddaj "..q.getcurrentquestindex())
  54.         end
  55.         when letter begin
  56.             send_letter("Zadanie Specjalne")
  57.         end
  58.         when button or info begin
  59.             say_title("Znajdź Zęby Orka")
  60.             say("")
  61.             say("Biolog Chaegirab, uczeń Uriela,")
  62.             say("szuka Zębów Orka.")
  63.             say("Zawsze przynoś mu po jednym, aby miał czas")
  64.             say("na ich dokładne przebadanie.")
  65.             say("Zębów szukaj u Czarnych Orków.")
  66.             say("")
  67.             say_item_vnum(30006)
  68.             say_reward("Do tej pory dostarczyłeś: "..pc.getqf("collect_count").." Zębów Orka.")
  69.             cmdchat("biologeq Zęby_Orka_Lv.30|30006|".. pc.getqf("duration").."|"..pc.getqf("collect_count").."/10|Czarny_Ork|60%")
  70.             say("")
  71.            
  72.             -- dopisek
  73.             local s = select("Oddaj przedmiot", "Anuluj")
  74.             if s == 2 then
  75.                 return
  76.             else
  77.                 if get_time() > pc.getqf("duration") then
  78.                     pc.remove_item("30006", 1)
  79.                     pc.setqf("duration",get_time()+60*1*1)
  80.                     if pc.getqf("drink_drug") == 1 then
  81.                         pc.setqf("drink_drug", 0)
  82.                         pass_percent = 90
  83.                     else
  84.                         pass_percent = 60
  85.                     end
  86.                     local s= number(1,100)
  87.                     if s<= pass_percent then
  88.                         if pc.getqf("collect_count")< 9 then
  89.                             local index = pc.getqf("collect_count")+1
  90.                             pc.setqf("collect_count", index)
  91.                             syschat("Ohh tak ten ząb jest doskonałej jakości")
  92.                             cmdchat("biologeq Zęby_Orka_Lv.30|30006|".. pc.getqf("duration").."|"..pc.getqf("collect_count").."/10|Czarny_Ork|60%")
  93.                             return
  94.                         end
  95.                         pc.setqf("collect_count",0)
  96.                         pc.setqf("drink_drug",0)
  97.                         pc.setqf("duration",0)
  98.                         set_state(key_item)
  99.                         syschat("Oddałeś wszystkie Zęby Orka.")
  100.                         cmdchat("biologeq Zęby_Orka_Lv.30|30220|".. pc.getqf("duration").."|0/1|Czarny_Ork|100%")
  101.                         syschat("Udaj się do biologa po dalsze informacje.")
  102.                         return
  103.                     else
  104.                         syschat("Ten ząb jest złej jakości.")
  105.                         pc.setqf("duration",get_time()+60*1*1)
  106.                         cmdchat("biologeq Zęby_Orka_Lv.30|30006|".. pc.getqf("duration").."|"..pc.getqf("collect_count").."/10|Czarny_Ork|60%")
  107.                         return
  108.                     end
  109.                 else
  110.                     syschat("Biolog Chaegirab jeszcze nie skończył badać ostatniego Zęba Orka !")
  111.                     return
  112.                 end
  113.             end
  114.         end
  115.         when 71035.use begin
  116.             if get_time() < pc.getqf("duration") and pc.getqf("drink_drug") < 1 then
  117.             say_reward("Eliskir Poszukiwacza:")
  118.             say("Ten magiczny przedmiot zmniejsza czas")
  119.             say("oddania następnego przedmiotu u biologa,")
  120.             say("po jego użyciu możesz natychmiast")
  121.             say("oddać przedmiot!")
  122.             say("Ponadto daję większą szansę na przyjęcie przedmiotu!")
  123.             say_reward("Czy chcesz użyć Eliksiru?")
  124.             say_reward("Zostanie on usunięty po użyciu.")
  125.             local wy = select("Użyj.", "Nie używaj.")
  126.             if wy == 2 then
  127.                 return
  128.             elseif wy == 1 then
  129.                 pc.setqf("duration", 0)
  130.                 pc.setqf("drink_drug",1)
  131.                 say("Możesz już oddać przedmiot biologowi!")
  132.                 say_reward("Eliksir Poszukiwacza zostaję usunięty!")
  133.                 cmdchat("biologeq Zęby_Orka_Lv.30|30006|".. pc.getqf("duration").."|"..pc.getqf("collect_count").."/10|Czarny_Ork|60%")
  134.                 pc.remove_item(71035, 1)
  135.             end
  136.             else
  137.             say_reward("Eliksir Poszukiwacza:")
  138.             say("Nie możesz użyć przedmiotu, ponieważ ")
  139.             say("biolog już może przyjąć przedmiot.")
  140.             cmdchat("biologeq Zęby_Orka_Lv.30|30006|".. pc.getqf("duration").."|"..pc.getqf("collect_count").."/10|Czarny_Ork|60%")
  141.             return
  142.             end
  143.         end
  144.         when 20084.chat."Zęby Orka" with pc.count_item(30006) >0 begin
  145.             local roznica = pc.getqf("duration") - get_time()
  146.             local minuty = roznica/60
  147.             local minuty2 = math.floor(minuty)
  148.             if get_time() > pc.getqf("duration") then
  149.                 say("Biolog Chaegirab:")
  150.                 say("Oh!! Znalazłeś!")
  151.                 say("Pozwól,ze rzuce okiem...")
  152.                 say("Jeszcze chwilke.")
  153.                 say("")
  154.                 pc.remove_item("30006", 1)
  155.                 cmdchat("biologeq Zęby_Orka_Lv.30|30006|".. pc.getqf("duration").."|"..pc.getqf("collect_count").."/10|Czarny_Ork|60%")
  156.                 pc.setqf("duration",get_time()+60*1*1)
  157.                 wait()
  158.                 local pass_percent
  159.                 if pc.getqf("drink_drug")==0 then
  160.                     pass_percent=60
  161.                 else
  162.                     pass_percent=90
  163.                 end
  164.                 local s= number(1,100)
  165.                 if s<= pass_percent then
  166.                     if pc.getqf("collect_count")< 9 then
  167.                         local index =pc.getqf("collect_count")+1
  168.                         pc.setqf("collect_count",index)
  169.                         say("Biolog Chaegirab:")
  170.                         say("Oh!! Ten Ząb Orka jest doskonałej jakości!")
  171.                         say("Przynieś mi jeszcze ".." "..10-pc.getqf("collect_count").. " Zębów Orka.")
  172.                         say("Proszę, spróbuj je znaleźć!")
  173.                         say("")
  174.                         cmdchat("biologeq Zęby_Orka_Lv.30|30006|".. pc.getqf("duration").."|"..pc.getqf("collect_count").."/10|Czarny_Ork|60%")
  175.                         pc.setqf("drink_drug",0)
  176.                         return
  177.                     end
  178.                     say("Biolog Chaegirab:")
  179.                     say("Oh,zebrałeś już wszystkie!")
  180.                     say("Dobra robota...")
  181.                     say("Ale poczekaj!")
  182.                     say("Aby zakonczyc swoją pracę, potrzebuje")
  183.                     say("abyś przyniusł dla mnie jeszcze jeden przedmiot.")
  184.                     say("Zrób to dla mnie...")
  185.                     say("")
  186.                     say_item("Kamień Duszy Jinunggyi", 30220, "")
  187.                     say_reward("Zabijaj Elit. Ork Generał ")
  188.                     say_reward("Czarny Ork")
  189.                     say_reward("Czarny Ork Zwiadowca")
  190.                     pc.setqf("collect_count",0)
  191.                     pc.setqf("drink_drug",0)
  192.                     pc.setqf("duration",0)
  193.                     set_state(key_item)
  194.                     return
  195.                 else
  196.                     say("Biolog Chaegirab:")
  197.                     say("Ten Ząb Orka jest złej jakości!")
  198.                     say("Spróbuj przynieść mi inny!")
  199.                     say("Proszę, pomóż mi!")
  200.                     pc.setqf("drink_drug",0)
  201.                     cmdchat("biologeq Zęby_Orka_Lv.30|30006|".. pc.getqf("duration").."|"..pc.getqf("collect_count").."/10|Czarny_Ork|60%")
  202.                     return
  203.                 end
  204.             else
  205.                 say("Biolog Chaegirab:")
  206.                 say("Jeszcze nie skończyłem badać ostatniego Zęba Orka !")
  207.                 say("Przyjdź do mnie za : "..minuty2.." minut!")
  208.                 cmdchat("biologeq Zęby_Orka_Lv.30|30006|".. pc.getqf("duration").."|"..pc.getqf("collect_count").."/10|Czarny_Ork|60%")
  209.                 say("")
  210.                 return
  211.             end
  212.         end
  213.     end
  214.     state key_item begin
  215.         when letter begin
  216.             send_letter("Znalazłeś Kamień Duszy!")
  217.             if pc.count_item(30220)>0 then
  218.             local v = find_npc_by_vnum(20084)
  219.             if v != 0 then
  220.                 target.vid("__TARGET__", v, "Analiza Biologa")
  221.             end
  222.             end
  223.         end
  224.         when button or info begin
  225.             if pc.count_item(30220) >0 then
  226.                 say_title("Znalazłeś Kamień Duszy!")
  227.                 say("")
  228.                 cmdchat("biologeq Zęby_Orka_Lv.30|30220|".. pc.getqf("duration").."|1/1|Czarny_Ork|100%")
  229.                 say("Udaj Się do Biologa, aby")
  230.                 say("odnieść mu kamień!")
  231.                 say("")
  232.                 return
  233.             end
  234.             say_title("Kamień Duszy")
  235.             say("")
  236.             say("Zebrałeś już wszystkie dziesięć Zębów Orka!")
  237.             say("Teraz, Biolog potrzebuje ostatni")
  238.             say("przedmiot, aby zakonczyc swoje badania!")
  239.             say_item_vnum(30220)
  240.             say("Możesz go znalezć zabijająć potwory")
  241.             say("w Dolinie Seungryong!")
  242.             cmdchat("biologeq Zęby_Orka_Lv.30|30220|".. pc.getqf("duration").."|0/1|Czarny_Ork|100%")
  243.             say("")
  244.         end
  245.         when 635.kill or 636.kill or 637.kill begin
  246.             local s = number(1, 50)
  247.             if s == 1 and pc.count_item(30220)==0 then
  248.                 pc.give_item2(30220, 1)
  249.                 send_letter("Udaj Się do Biologa!")
  250.                 cmdchat("biologeq Zęby_Orka_Lv.30|30220|".. pc.getqf("duration").."|1/1|Czarny_Ork|100%")
  251.             end
  252.         end
  253.         when __TARGET__.target.click or
  254.             20084.chat."Znalazłem Kamień Duszy" with pc.count_item(30220) > 0 begin
  255.             target.delete("__TARGET__")
  256.             say("Biolog Chaegirab:")
  257.             say("Oh, Znalazłeś!")
  258.             say("Bardzo Tobie dziękuje!")
  259.             say("W zamian otrzymasz nagrode!")
  260.             cmdchat("biologeq Zęby_Orka_Lv.30|0|".. pc.getqf("duration").."|1/1|Czarny_Ork|100%")
  261.             say("")
  262.             pc.remove_item(30220,1)
  263.             say("Zobaczmy, co tam mam...")
  264.             say("")
  265.             say_reward("Czerw. Ebonit. Szkatuła")
  266.             say_reward("+10 szybkości poruszania się na stałe")
  267.             affect.add_collect(apply.MOV_SPEED, 10, 60*60*24*365*60)
  268.             pc.give_item2(50109)
  269.             clear_letter()
  270.             set_quest_state("collect_quest_lv40", "run")
  271.             set_state(__complete)
  272.         end
  273.     end
  274.     state __giveup__ begin
  275.         when 20084.chat."Poddajesz sie?" begin
  276.             say("Biolog Chaegirab:")
  277.             say("Czy jestes pewien, że chcesz sie poddać!?")
  278.             say("Nie bedziesz miał szansy, aby zacząć ponownie!")
  279.             say("Ta misja Cie opuści...")
  280.         end
  281.     end
  282.     state __complete begin
  283.     end
  284.     state oddawanie_info begin
  285.         when letter begin
  286.             send_letter("Oddawanie Przedmotów - Biolog")
  287.         end
  288.         when button or info begin
  289.             say_title("Oddawanie Przedmotów")
  290.             say("")
  291.             say("Biolog Chaegirab postanowił")
  292.             say("stworzyć specjalne okno")
  293.             say("dzięki, któremu będziesz mógł wykonać")
  294.             say("szybciej jego zadanie.")
  295.             say_info("Okno biologa znajdziesz w ekwipunku.")
  296.             cmdchat("biologeq Zęby_Orka_Lv.30|30006|".. pc.getqf("duration").."|"..pc.getqf("collect_count").."/10|Czarny_Ork|60%")
  297.             say("")
  298.             clear_letter()
  299.             set_state(go_to_disciple)
  300.         end
  301.     end
  302. end
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!