[TuT] Questy Moje Własne Za Free Na Mpc Forum

[mariusz12]

Witam

Mam kilka questów których nie używam na serwerze ponieważ sa zbędne ale myślę ze przydadzą się wam questy sa pod serwer Hard jak i pod Łaty Serwer Oto Kilka z Nich

 

1:

quest free_ticket  begin
       state start  begin
               when login or levelup with pc.get_level() >= 50  begin
                       set_state(yuhwan)
               end
       end
       state yuhwan  begin
               when 20017.chat."Darmowa Przepustka"  begin
                       if pc.getqf("free_ticket") <= 299  then
                               say_title("Yu-Hwan:")
                               say("Witaj Przyjacielu!")
                               say("Aby dostac Darmowa Przepustke na")
                               say("2 Poziom Lochu Pajakow, musisz")
                               say("tylko zabic 300 Pajakow.")
                               say("")
                               say("Musisz zabic jeszcze "..300-pc.getqf("free_ticket").." Pajakow!")
                               say("")
                       elseif pc.getqf("free_ticket") >= 300  then
                               say_title("Yu-Hwan:")
                               say("Prosze, oto Twoja Przepustka!")
                               say("")
                               say_item_vnum(71095)
                               say("")
                               pc.setqf("free_ticket", 0)
                               pc.give_item2(71095, 1)
                       end
               end
               when 2001.kill or
                        2002.kill or
                        2003.kill or
                        2004.kill or
                        2005.kill or
                        2031.kill or
                        2032.kill or
                        2033.kill or
                        2034.kill or
                        2035.kill or
                        2036.kill or
                        2061.kill or
                        2062.kill or
                        2063.kill or
                        2064.kill or
                        2065.kill or
                        2051.kill or
                        2052.kill or
                        2053.kill or
                        2054.kill or
                        2055.kill or
                        2071.kill or
                        2072.kill or
                        2073.kill or
                        2074.kill or
                        2075.kill or
                        2076.kill or
                        2091.kill or
                        2092.kill or
                        2093.kill  begin
                       pc.setqf("free_ticket", pc.getqf("free_ticket")+1)
               end
       end
end

 

HeroMetin2

2:

quest grotka begin
       state start begin
                       when login or levelup with pc.level >= 55 begin
                               set_state(grotka)
                       end
       end

       state grotka begin
               when letter begin
                       local v = find_npc_by_vnum(20093)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Koe-Pung")
                       end
                       send_letter("Idź do Koe-Pung")
               end

               when button or info begin
                       say_title("Udaj się do Koe-Pung")
                       say("Musisz udać się do Koe-Pung,")
                       say("Ma ci on coś do powiedzenia.")
                       say("Jakaś Grota Wygnańców.")
                       say_reward("Ruszaj!") 
               end

               when __TARGET__.target.click or 
                       20093.chat."Grota Wygnancow" begin
                       target.delete("__TARGET__")
                               say_title("Hmm, to ty jestes tym nowym Wojownikiem?")
                               say("Aby dowiedziec się co to Grota, musisz sam to przezyc.")
                               say("Ale żeby tam wejść musisz zabić potwora.")
                               say("Posiada on Kamień...")
                               set_state(gleba2)
               end
end

               state gleba2 begin
                               when letter begin
                               send_letter("Zabij Smoka")
                       end
                       when button or info begin
                                       say_title("Zabij Smoka")
                                       say("Musisz go pokonać")
                                       say("żeby zdobyć od niego")
                                       say("Legendarny Kamień")

                                       when 2291.kill with pc.countitem(30190)==0 begin
                               local random = math.random(1)
                               if random == 1 then
                               pc.give_item2(30190, 1)
                               chat("Udało ci się")
                               chat("Zabiłeś tą bestię i otrzymałeś Kamień!")  
                       end
                       local v = find_npc_by_vnum(20093)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Koe-Pung")
                       end
                               end

                               when 20093.chat."Grota Wygnańców" with pc.countitem(30190)>0 begin
                                       target.delete("__TARGET__")
                                               say_title("Udało się")
                                               say("Możesz teraz wejść do Groty")
                                               say_reward("Powodzenia!")
                                               set_state(__COMPLETE__)
                                               end
                                       end
                               end
       state __COMPLETE__  begin
       end

 

3:

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

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

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

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

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

               set_state(key_item)

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

                       set_state(__complete)
               end

       end
end

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

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

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

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

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

       end

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

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

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

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



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


                       clear_letter()
                       set_state(__complete)
               end

       end
end

 

4:

quest mirine begin
state pierwszy begin
when login with pc.get_level() >= 75 begin
                       local a = find_npc_by_vnum(20006)
                       if a != 0 then
                               target.vid("__TARGET__", v, "Mirine")
                               set_state(start)
                       end
               end
       end
       state start begin
               when 20006.chat."Skradziony Diament!" with pc.get_level()>=94 begin
target.delete("__TARGET__")
                       say_title("Mirine:")
                       say("Hej! Nie widziales mojego diamentu?")
                       say("Zgubilam go i nie wiem gdzie on jest")
                       say("jakbys go znalazl to bylabym bardzo ci wdzieczna!")
                       say("Prosze znajdz go!")
                       local s=select("Tak ,postaram sie","Nie mam czasu")
                               if s==1 then
                               say("Swietnie!")
                               set_state(accept)
                               elseif s==2 then
                               say("Szkoda")
                       end
               end
       end
       state accept begin
               when letter begin
                       send_letter("Pierscien kowala")
               end
               when button or info begin
                       say("Znajdz diament Mirine!")
                       say("Bedzie gdzies w miescie!")
                       say("Moze handlarka go ma?")
               end
               when 9003.chat."Ozdobny diament" with pc.level() >= 94 begin
                       say("Witaj! Co chcesz kupic?")
                       say("Och, ten piekny kamien?")
                       say("Znalazlam go jakis czas temu")
                       say("moge ci go odsprzedac za")
                       say("niewielka sumke")
                       say("Co ty na to?")
                       say("Bedzie cie to kosztowac 200.000")
                       pc.changegold(-200000)
                       pc.give_item2(30141)
                               set_state(mam)
                       end
               end
       state mam begin
               when letter begin
                       send_letter("Odnalazles Diament")
               end
               when button or info begin
                       say("Biegnij do Mirine z dobra nowina!")
               end
               when 20006.chat."Znalazlem diament" with pc.countitem(30141)>0 begin
                       say("O jej! Znalazles moj diament!")
                       say("Co ja bym bez Ciebie zrobila!")
                       say("Otrzymasz jakies perly, ktore")
                       say("nikomu sie nie podobaja i sie")
                       say("nie przydadza! Trzymaj!")
                       pc.remove_item(30141)
                       say_reward("Otrzymales Perly, doswiadczenie i yang!")
                       pc.give_item2(27992)
                       pc.give_item2(27993)
                       pc.give_item2(27994)
                       pc.changegold(20000000)
               end
       end
end

 

5:

quest  smok begin
       state start begin
               when login or levelup with pc.level == 91 begin
                       set_state(zlo1)
               end
       end

       state zlo1 begin
               when letter begin
                       local v = find_npc_by_vnum(20016)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Zloto")
                       end
                       send_letter("Tajemnicza zbroja")
               end

               when button or info begin
say("Kowal pracuje nad nowa bronia!")
say("Moze przeszedlbys sie i zaoferowal swoja pomoc?")
               end

               when __TARGET__.target.click or
                       20016.chat."Zbroja" begin
                       target.delete("__TARGET__")
                       say_title("Kowal:")
say("Witaj! Ahh dawno Cie nie widzialem")
say("Mam dla ciebie bardzo wazna misje!")
say("Lodowy Smok Z Tajemniczej Groty ukradl mi")
say("plany mojej nowej zbroi! Pomoz mi!")
say("Nie bedzie latwo!")
say("Musisz zabic smoka z Atlantydy!")
                       local s=select("Spoko", "Sam se zabijj")
                       if 1==s then
                               say_title("Kowal:")
                               say("")
                               say("Swietnie!")
                               say("Czekam na zbroje!")
                               set_state(zlo2)
                       elseif 2==s then
                               say_title("Kowal:")
                               say("")
                               say("NIE POKAZUJ MI SIE TU WIECEJ!")
                               say("TCHORZ!")
                       end
               end
               end
               state zlo2 begin
               when letter begin
                       send_letter("Zbroja dla Straznika")
               end
               when button or info begin
say("Zabij Lodowego Smoka I Zabierz Mu Zbroje Hwang!")  
say("Lodowy Smok Znajduje Sie W Tajemniczej Grocie!")
set_state(zlo3)
               end
               end

       state zlo3 begin
               when 2493.kill with pc.countitem(50903)==0 begin
                       pc.give_item2(30205, 1)
                       say_reward("Odnalazles rysunki!")
say("Udaj sie szybko do Kowala aby otrzymac nagrode!")
                       local v = find_npc_by_vnum(20016)
                       if v != 0 then
                               target.vid("__TARGET__", v, "kowal")
                       end
               end
               when 20023.chat."Jestem jak zloto!" with pc.countitem(50903)>0 begin
                       target.delete("__TARGET__")
                       say_title("Kowal:")
                       say("Nie masz planu? Co za pech!")
                       say("Co? Jednak masz? Swietnie! Czeka cie nagroda")
                       say_reward("Trzask mlotkiem!")
                       say("Prosze! O to nowa zbroja!")
                       pc.changegold(1000000)
                       pc.give_exp(2000000)
                       if pc . job == 0 then
                       pc.give_item2(11971)
                       elseif pc . job == 1 then
                       pc.give_item2(11972)
                       elseif pc . job == 2 then
                       pc.give_item2(11973)
                       elseif pc . job == 3 then
                       pc.give_item2(11974)
                       set_state(ending)

               end
               end
       end
state ending begin
end
end

 

6:

quest online begin
       state start begin
               when login begin
                       if pc.getqf("zliczony")==0 then
                               game.set_event_flag("online", game.get_event_flag("online")+1)
                               pc.setqf("zliczony", 1)
                       end
               end
               when logout begin
                       if pc.getqf("zliczony")==1 then
                               game.set_event_flag("online", game.get_event_flag("online")-1)
                               pc.setqf("zliczony", 0)
                       end
               end
               when 20016.chat."Gracze on-line" begin
                       say("Na serverze mamy teraz "..game.get_event_flag("online").." graczy on-line")
               end
       end
end

 

7:

quest ripper begin
       state start begin
               when login  or levelup with pc.level == 80 begin
                       set_state(bambus3k)
               end
       end

       state bambus3k begin
               when letter begin

                       local v = find_npc_by_vnum(20011)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Uriel")
                       end

               end                             

               when __TARGET__.target.click or
                       20011.chat."Skradziona Książka " begin
                       target.delete("__TARGET__")

                       say("Uriel:")
                       say("Witaj!")
                       say("Właśnie Cię szukałem.")
                       say("Mam do Ciebie prośbę  ")
                       say("Umarły Rozpruwacz zaatakował naszą wioskę,  ")
                       say("w nocy i ukradł mi moje książki!")
                       say("przetrzymuje je w sekretnych szkatułkach.")
                       say("proszę pomóż mi!")
                       say_reward("Wybór tak nie..?")  

                       local s=select("Tak","Nie")
                       if 2==s then
                               say("Czy jesteś pewien że nie wybór to nie?")
                               local a=select("Nie pomogę!","Postaram się pomóc")
                               if  2==a then
                                       say("Uriel:")
                                       say("Dobrze, że zmieniłeś zdanie")
                                       say("Czekam na Twój powrót.")
                                       say("")
                                       return
                               end             
                               say("Uriel:")
                               say("Misja została anulowana..")
                               say("Szkoda, do widzenia!")
                               say("Pozdro, poćwicz Wtf?")
                               say("")
                               set_state(__GIVEUP__)
                               return
                       end
                       say("Uriel:")
                       say("Dziękuję, dam Ci wskazówki.")
                       say("Umarły Rozpruwacz znajduję się na samym")
                       say("szczycie wieży demonów- DT.")
                       say_reward("Powodzenia!")
                       say("")
                       set_state(go_to_ripper) 
               end     

       end

       state go_to_ripper begin
               when letter begin
                       send_letter("Zabij Umarłego Rozpruwacza!")

                       if pc.count_item(50082)>0 then  
                               local v = find_npc_by_vnum(20084)
                               if v != 0 then
                                       target.vid("__TARGET__", v, "ripper")
                               end
                       end

               end
               when button or info begin
                       if pc.count_item(50082) >0 then
                               say_title("Zdobyłeś Skrzynie!")
                               say("")
                               ---                                                   l
                               say("Zdobyłeś Skrzynie Umarłego Rozpruwacza!")
                               say("Wróć szybko do Uriela.")
                               say("")
                               return
                       end

                       say_title("Zabij Rippera!")
                       say("")
                       ---                                                   l
                       say("Masz pomóc Urielowi i zabić ")
                       say("Umarłego Rozpruwacza.")
                       say_item_vnum(50082)---------- szkata rippera
               end


               when 1093.kill begin 
                       local s = number(1, 1)
                       if s == 1 and pc.count_item(50082)==0 then
                               pc.give_item2(50082, 1)
                               send_letter("Szkata Rippera!")          
                       end     
               end



               when __TARGET__.target.click  or
                       20084.chat."Odzyskałem Szkate" with pc.count_item(50082) > 0  begin
                   target.delete("__TARGET__")
                       say("Uriel:")
                       say("OH!! Zdobyłeś To! ")
                       say("Bardzo Ci dziękuje")
                       say("Za to zadanie otrzymujesz")
                       say("10.000.000 punktów doświadczenia")
                       say("i 5.000.000 yang.")
                       say("")
                       say_reward("Otrzymano: 10.000.000 PD")
                       say_reward("Otrzymano: 5.000.000 Yang")
                       pc.remove_item(50082,1)
                       pc.change_money(5000000)
                       pc.give_exp2(10000000)
                       clear_letter()
                       set_state(__THEEND__)



       end
end
       state __GIVEUP__ begin
       end
       state __THEEND__ begin
       end
end

 

8:

 

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

       state info begin
               when letter begin
                       local v = find_npc_by_vnum(20091)
                       if v != 0 then
                               target.vid ("__TARGET__", v, "Seon-Pyeong" )
                       end
                       send_letter ("Zgubiona Butelka")             
               end

               when button or info begin 
                       say_title ("Butelka")
                       say("")
                       say("Idz do Seon-Pyeong, musisz")
                       say("dla niego cos zrobic!")
               end

               when __TARGET__target.click or
                       20091.chat."Zgubiona Butelka" begin
                       say_title("Seon-Pyeong:")
                               target.delete("__TARGET__")
                               say("Wreszcie jestes! Sluchaj. Musisz mi pomóc!")
                               say("")
                               say("Musze sie najesc!")
                               say("Mam ochote na Pieczona Kielbasa")
                               say("")
                               say("A wiec potrzebuje jej by sie najesc")
                               say("Lecz nie jestem pewien kto ja moze miec")
                               say("Mam tu SMS od Kowala pisze ,ze")
                               say("pieczona kielbase ma Niebianski Kleryk. Idz i zabij")
                               say("go. Zabij Niebianski Kleryk")
                               set_state(niebanski kleryk)
               end
       end

       state niebianski_kleryk begin
               when letter begin
                       send_letter("Pieczona Kielbasa")
               end

               when button or info begin
                       say_title("Pieczona Kielbasa")                                                                                                 
                       say("Seon-Pyeong chce ,abys zdobyl dla niego")
                       say("Pieczona Kielbase".Gdyz chce sie najesc")
                       say("Zabij Niebianski Kleryk aby ja zdobyc")
               end

               when 2403.kill with pc.countitem(30002)==0 begin
                       local random = math.random(3)
                       if random == 1 then
                       pc.give_item2(30002, 1)
                       say("Dobrze zdobyles pieczona kielbase")
                       say("Wroc do Seon-Pyeong")
                       local v = find_npc_by_vnum(20091)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Seon-Pyeong"
                       end
                       end
               end

               when 20091.chat."Seon-Pyeong!" with pc.countitem(30002)>0 begin
                       say_title("Seon-Pyeong:")
                               target.delete("__TARGET__")
                               say("Swietnie! Masz jedzenie daj mi.")
                               say("A wiec Kowal mial racje")
                               say("Bardzo Ci dziekuje za pomoc")
                               say_reward("Mistyczne Ziolo!")
                               pc.removeitem(3003, 1)
                               pc.give_item2(30002)
                               set_state(__complete__)
                               end
               end
               state __complete__ begin
               end
end															

 

9:

quest zniszcz_wszystkie_metiny begin
       state start begin
                       when login or levelup with pc.get_level() >= 75 begin
                                       set_state(pierwszy)
                               end
               end

               state pierwszy begin
                       when letter begin
                                       send_letter("Zabij Metiny")
                               end

                               when button or info begin
                                       say_title("Zabij Metiny")
                                               --
                                               --
                                               say("Musisz zabić:")
                                               say("20 Metinów To-Young")
                               end

                               when 8026.kill begin
                                       local count = pc.setqf("ilosc")+20

                                               if count < 20 then
                                               pc.getqf("ilosc", count)

                                               if count == 20 then
                                               say("Zabiłeś 20 Metinów")
                                               say("To-Young.")
                                               say_reward("Otzymałeś 10.000.000 Yang.")
                                               say_reward("Otrzymałeś rangę: Rycerski.")
                                               set_state(__complete__)
                                               pc.change_money(10000000)
                                               pc.change_alignment(400000)
                                               end
                                               end
                               end
               end
               state __complete__ begin
               end
end 

 

10:

 

quest notatki begin
state asd1 begin
when login or levelup with pc.level >= 65 begin
set_state(info)
end
end
state info begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET__", v, "Uriel")
end
send_letter("Badania Uriela ")
end
when button or info begin
say_title("Uriel")
say("Najwyzszy uczony w naszym swiecie")
say("Poprosil Ciebie o pomoc")
say("To Wielki zaszczyt, nieprawdaz? Skocz do nieg, to dostaniesz nagrode ")
end
when __TARGET__.target.click or
20011.chat."Krol Plagi" begin
target.delete("__TARGET__")
say("Uriel:")
say("Witaj, graczu.")
say("Dzis przybiegl do Mnie jeden z moich szpiegow.")
say("Oznajmil, ze widzial, jak sam Krol Plagi uciekl ze swojego wiezienia.")
say("Z tego co Mi wiadomo, dal swojemu najwierniejszemu sludze")
say("Czyli Umarlemu Rozpruwaczowi swoje notatki.")
say("W nich jest data ataku Krola Plagi na nasze panstwo.")
say("Spiesz sie.")
wait()
say("Wszystkie potrzebne informacje beda w liscie.")
say("Powodzenia, mezny wojowniku")
set_state(notatka)
end
end
state notatka begin
when letter begin
send_letter("Informacje od Uriela")
end
when button or info begin
say_title("Uriel:")
say("Potrzebuje Notatki Krola Plagi")
say_item_vnum(30168)
say("Zdobedziesz ja zabijajac Umarlego Rozpruwacza")
end
when 1093.kill with pc.countitem(30168)==0 begin
local random = math.random(3)
if random == 1 then
pc.give_item2(30168, 1)
chat("Zdobyles Notatke!")
chat("Wroc do Uriela")
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET__", v, "Uriel")
end
end
end
when 20011.chat."Mam notatke!" with pc.countitem(30168)>0 begin
target.delete("__TARGET__")
say_title("Uriel:")
say("Swietnie! Masz Notatke!")
say("Hmmm...")
wait()
say("Teraz juz wiem kiedy nastapi atak.")
say("Przekaze Informacje Imperatorowi.")
say_reward("Otrzymujesz 100kk Yang")
say_reward("Oraz 100kk expa.")
say("")
pc.remove_item(30168, 1)
pc.give_exp2(100000000)
pc.changegold(100000000)
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end 

 

11:

 

--Wódz Orków By Sonic
-------------------------------------
quest ostrze_wodza begin
       state start begin
               when login or levelup with pc.level >= 61 begin
                       set_state(informacja)
               end
       end

       state informacja begin --9001
               when letter begin
                       local v = find_npc_by_vnum(9001)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Handlarz Bronią ")
                       end
                       send_letter("Ostrze Wodza")
               end

               when button or info begin
                   say_title("Ostrze Wodza")
                   say("")
                                       say("Przejdź się po głównym placu...")
                   say("I zbierz informacje na temat Ostrzy Wodza.")
                                       say("")
               end

               when 9001.chat."Ostrze Wodza Orków" begin
                       target.delete("__TARGET__")
                       say_title("Handlarz Bronią:")
                                               say("Witaj! Młody wojowniku!")
                                               say("Ostatnio w trudnej bitwie z Przywódcą Orków,")
                                               say("w Dolinie Smoka straciłem mój miecz..")
                                               say("a, że byłem pokaleczony i ledwie uciekłem,")
                                               say("to zapomniałem zabrać swój miecz..")
                                               say("Proszę odzyskaj go, a nagroda cię nie ominie.")
                                               say("")
                                               say_reward("Akceptować misję?")
                                                               local s = select("Tak!..", "Nie..")

                                                                       if s == 2 then
                                                                               say_title("Handlarz Bronią:")
                                                                               say("Przykro, że mi nie chcesz pomóc..")
                                                                               say("Misja została anulowana!")
                                                                               say_reward("Żegnam!")
                                                                               set_state(__PODDANIE__)
                                                                       end

                                                                       if s == 1 then
                                                                               say_title("Handlarz Bronią:")
                                                                               say("Śwetnie!")
                                                                               say("Oto ten miecz..")
                                                                               say_item("Miecz Handlarza", 147, "")
                                                                               say_reward("Zdobądź Go !")
                                                                               set_state(__DALEJ__)
                                                                       end
               end
       end
       state __DALEJ__ begin
               when letter begin
                       send_letter("Ostrze Wodza")
               end

               when button or info begin
               say_title("Ostrze Wodza")
               say("Pokonuj Wodzów Orków by odzyskać,")
               say("zagubiony miecz Handlarza Bronią.")
               end

               when 691.kill begin 
                       local s = number(1, 5)
                       if s == 1 and pc.getqf("ostrze_wodza") == 0 then
                               pc.setqf("ostrze_wodza", 1)
                               pc.give_item2(147, 1)
                               say_reward("Zdobyłeś Miecz Handlarza Zbroją!")
                               say_reward("Idź mu go teraz oddaj a otrzymasz,")
                               say_reward("ogromną nagrodę!!")
                               set_state(__NAGRODA__)
                       end     
               end
       end

       state __NAGRODA__ begin
               when letter begin
                       local v = find_npc_by_vnum(9001)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Handlarz Bronią ")
                       end
                       send_letter("Ostrze Wodza")
               end

               when button or info begin
                   say_title("Ostrze Wodza")
                   say("")
                                       say("Zdobyłeś juz miecz Handlarza..")
                   say("Oddaj mu go i zgarnij całą nagrodę!")
                                       say("")
               end

               when 9001.chat."Zdobyłem Twój Miecz!" begin
                       target.delete("__TARGET__")
                       say_title("Handlarz Bronią:")
                                               say("Och... Świtnie!")
                                               say("Pokaż mi go..!")
                                               pc.remove_item(147, 1)
                                               wait()
                                               say_title("Handlarz Bronią:")
                                               say("Tak, to na pewno ten miecz!")
                                               say("W zamian za Twoje męstwo Ci go oddam.")
                                               say("I weź ten skromny podarunek..")
                                               say_reward("Otrzymano: Polksiezycowy Miecz +7")
                                               say_reward("Otrzymano: Krwawa Perła")
                                               say_reward("Otrzymano: Niebieska Perła")
                                               say_reward("Otrzymano: Zwój Bogosławieństwa")
                                               pc.give_item2(25040, 1)
                                               pc.give_item2(25040, 1)
                                               pc.give_item2(25040, 1)
                                               pc.give_item2(137, 1)
                                               pc.give_item2(27993, 1)
                                               pc.give_item2(27993, 1)
                                               pc.give_exp2(100000000)
                                               set_state(__ZROBIONE__)
               end
       end
       state __PODDANIE__ begin
       end
       state __ZROBIONE__ begin
       end
end

 

12:

 

quest ziomek_quest begin
               state start begin
                               when login or levelup with pc.get_level > 70 begin
                                       set_state(info)
                               end
               end
state info begin
                               when letter begin
                                               local v = find_npc_by_vnum(20091)
                                               if v != 0 then
                                                               target.vid("__TARGET__", v, "Sein-Pyeong")
                                               end
                                               send_letter("Pomocy!!!!!")*
when button or info begin
                                               say_title("Sein-Pyeing Szuka twojej pomocy Ponieważ Produkuje Nieznana mi Zbroje")
                                               say("Potrzebuje Twojej pomocy w Wyszukaniu Paru przedmiotów dla niego")
                                               say("Pomóż mu a nie pozałujesz Tego")
                                               say("Nagroda Jest Spora")
                                               say_reward("Powodzenia")* 
                               end
when __TARGET__.target.click or 
                                               20091.chat."Pomocy!!!!!" begin
                                               target.delete("__TARGET__")
                                               say_title("Zgubiłem Pare Przedmiotów Gdy Uciekałem przed Wiedzmą")
                                               say("Prosze Pomóż mi je odnaleź")
                                               set_state(kill)
                                               end
                               end
state kill begin
                               when letter begin
                                       send_letter("Zabij Lodowy Golem")
                       end
                       when button or info begin
                                       say("Lodowy Golem")
                       end

                     when 1107.kill with pc.countitem(90007)==0 begin
                          local random = math.random(5)
                          if random == 1 then
                          pc.give_item2(90007, 1)
                          say("Znalazłes Minerał zanieś go Sein-Pyeong ")
                          say("
                       local v = find_npc_by_vnum(20091)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Sein-Pyeong")
                       end
               end
       end*
when 20091.chat."Udaj Sie Do Sein-Peyong" with pc.countitem(90007)>0 begin
                               target.delete("__TARGET__")
                               say_title("Witam Cię!!")
                               say("Znalazłeś mój minerał który potrzebuje do Nieznanej Zbroi?")
                               say_reward("Znakomicie:)")
                       pc.remove_item(90007, 1)
                       pc.give_item2(28642)
                                               set_state(__COMPLETE__)
                                               end
                               end*
end
       state __COMPLETE__  begin
       end
end

 

I to na Tyle Myślę ze sie spodoba

 

Pozdrawiam

MMA

[WhazUp!]

Twoje własne na bank idz spać z pisu są wszytkie sciemniać np quest 11 to bambus3k albo 1 to jest quest GracjaPa

[mariusz12]

Moze i ale reszta mojea:)

[HeroMetin2]

Z grotą jest moje, napisz to

[mariusz12]

No nie wiem czy twoje:)

[HeroMetin2]

MOJE! Zaraz ci link dam

http://www.mpcforum.pl/topic/223876-innepisanie-questow-na-zamowienie/

[mariusz12]

Spoko

[Brzydal007]

Jest błąd w trzecim Soon to chłopak <_<

[mariusz12]

Mi na serwerze działa poprawnie

[WhazUp!]

ale tempy jestes jak nie twoje all to po co nazwa to Moje Własne Questy za free ale neo

[raquo]

w quescie 8 popraw state niebianski kleryk na niebianski_kleryk

tak to wszystko gra i dzieki ;]

[mariusz12]

po 1 Nie jestem Neo Po 2 bo są moje:)3 sa tylko nie moje reszta sa moje:)

[mariusz12]

Napisałem Kolejny Quest numer 12

[WhazUp!]

12 quest chyba twoj alle reszta nie !

[mariusz12]

Nie kłuć sie nie sa moje tylko te 3 a reszta jest MOJA!!!!!!!!

[mariusz12]

Zaraz Bede Pisał kolejne jak macie jakiś pomysł na questy Pisać!

[Brzydal007]

Jest błąd w trzecim Soon to chłopak <_<

Mi na serwerze działa poprawnie

OMG chodzi o to że pisze quescie że soon to baba ale to chłopak ...

[mariusz12]

hehe sory za niezrozumienie

[GracjanP]

Eeem... Pierwszy Quest

-------------------------------------
--      Quest Free MMA
--      Quest by MMA
-------------------------------------

???

 

Powinno być raczej

-------------------------------------
--      Quest Free Ticket
--      Quest by GracjanP
-------------------------------------

...

 

Rozumiem, że pojawił się na MPC, ale to jeszcze nie powód, żeby zapisać jako autora kogoś, kto raczył zmienić tylko sam nagłówek i lvl questa...

[Hack2010]

Questy bardzo fajnie!! Przydałby się, aby do jakiegoś lvl mieć misję, żeby dostać militara

 

PS. Odpisz lub wejdz na metka i wpisz /reload all !

Najlepiej Odpisz na GG

[GraczMetin2]

W kazdym takim temacie " moje questy" odrazu ktos juz ma ALE ze jest jego... jak by nie napisal ze jego to by bylo ok... thx za questy + oczywiscie

[damomo]

A ja tam widzę questa niedziałającego na metiny tu-young by PoczatKujacy

[Grzyb2p31]

co za kurwa pala to nie twoje qesty zlodzieju

[mychaPro]

Już to widze ty i własne questy..

Generator lub z tematu na zamówienia...

[rayqi94]

Mam pytanie odnosnie tego 6 quest'a. Co ile on wyswietla liczbe graczy on line i czy da sie to ustawic samemu jak tak to jak. I drugie pytanie czy masz moze quest ktory po zalogowaniu sie jakiegos gm wyswietla informacje ze [GM]xxx zalogowal sie w razie problemow pisz do nieg..