doktryna.quest

[Dr Moondo]

Podrzucam wam kolejnego questa. Sprawny w 100%. Nic nie stuka itp...

Można go wykorzystać u siebie na serwerze.

###################
#Aduś aka. Cannzas#
###################
quest swiatynia begin
        state start begin
                when login or levelup with pc.level >= 53 begin
                        set_state(pierwszy)
                end
        end     
        
        state pierwszy begin
                        when letter begin
                                local v = find_npc_by_vnum(30008)
                                if v != 0 then
                                        target.vid("__TARGET__", v, "Historyk")
                                end
                                send_letter("Świątynna Doktryna")
                        end
                
                when button or info begin
					setbgimage("ung_inf.tga")
						say_orange("List od Posłańca: ")
						say("")
                        say("Historyk Cię szukał... ")
                        say("Powinieneś do niego pójść i zapytać ")
						say("o co chodzi. ")
						say("")
                end
                
                when __TARGET__.target.click or
                        33002.chat."Szukałeś mnie? " begin
                        target.delete("__TARGET__")
						setbgimage("ung_inf.tga")
                        say_orange("Historyk: ")
						say("")
                        say("Tak, tak! Świetnie, że się zjawiłeś. ")
                        say("Słyszałem pogłoski o legendarnej księdze, ")
                        say("która ponoć nosi tytuł Świątynnej Doktryny! ")
                        say("Według starych zapisków, które wyczytałem")
                        say("w pradawnych kronikach przechowuje ją ")
						say("jeden z mieszkańców Świątyni Hwang. ")
						say("Mógłbyś się tam udać i zdobyć ją dla mnie? ")
						say("")
                        
                        local s=select("Tak" , "Nie chce mi się... ")
                        if s==1 then
								setbgimage("ung_inf.tga")
								say_orange("Historyk: ")
								say("")
                                say("Wspaniale! ")
                                say("Resztę informacji znajdziesz w liście ode mnie. ")
								say("")
                                set_state(accept)
                        elseif 2==s then
								setbgimage("ung_inf.tga")
								say_orange("Historyk: ")
								say("")
                                say("Pff... nie to nie. ")
								say("Żegnam. ")
								say("")
                                set_state(complete)
                        end
                end
        end
                
                state accept begin
					when letter begin
                        send_letter("Świątynia")
					end
					
					when button or info begin
						setbgimage("ung_inf.tga")
						say_orange("List od Historyka: ")
						say("")
                        say("Poprosiłem Cię o pomoc w zdobyciu")
                        say("Świątynnej Doktryny. Idź do Świątyni Hwang")
                        say("i zdobądź księgę od tamtejszych tubylców! ")
                        say("To nie powinno być trudne... ")
						say("")
						say_reward("Doktrynę mają Elit. Ezot. Egzekutorzy! ")
						say("")
                end
        
                when kill with npc.get_race() == 735 and pc.countitem(30147)==0 begin
                                local random = math.random(150)
                                if random == 92 then
                        pc.give_item2(30147, 1)
                        chat("Znalazłeś Świątynną Doktrynę! ")
                        chat("Dostarcz ją jak najszybciej do Historyka. ")
                                                set_state(koniec)
                        local v = find_npc_by_vnum(30008)
                        if v != 0 then
                                target.vid("__TARGET__", v, "Historyk")
                        end

                                                end
                end
        end
                
                state koniec begin
                when 33002.chat."Oto Doktryna. " with pc.countitem(30147)>0 begin
						setbgimage("ung_inf.tga")
                        say_orange("Historyk: ")
						say("")
                        say("O tak! Jesteś cudowny! ")
                        say("Nie wiem jak Ci dziękować... ")
						say("Ta księga jest dla mnie bezcenna! ")
						say("")
						say_title("Przyjmij tę oto skromną nagrodę: ")
                        say("     - Kamień Duchowy x1, ")
                       	say("     - Chińska Ognista Petarda x10, ")
						say("     - Medal Szczęścia x1. ")
						say("")
							pc.give_item2(50513, 1)
							pc.give_item2(50107, 10)
							pc.give_item2(71017, 1)
                                                pc.remove_item(30147, 1)
                                                set_state(complete)
                end
        end
                
                state complete begin
                end
end

[BinLaden.]

Nic ciekawego, ale komus sie moze przydac. Chociazby do edycji pod cos. 

[Dr Moondo]

odświeżam.

[Dr Moondo]

odświeżam.