Register for your free account! | Forgot your password?

Go Back   elitepvpers > Popular Games > Metin2 > Metin2 Private Server > Metin2 PServer Guides & Strategies
You last visited: Today at 03:21

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



[Release] Instance2 Automaitsche Bio-Quest

Discussion on [Release] Instance2 Automaitsche Bio-Quest within the Metin2 PServer Guides & Strategies forum part of the Metin2 Private Server category.

Reply
 
Old   #1
 
elite*gold: 147
Join Date: Jun 2012
Posts: 1,940
Received Thanks: 256
[Release] Instance2 Automaitsche Bio-Quest

Nabend EPvPler ,

Da der Server Instance von mir langsam sehr viel von Ex-SA Claude und NM-Shine gehatet wird , habe ich mit meinem Team das Konzept geändert und Release jetzt die Automatische Bio-Quest !

Quest
PHP Code:
quest biologe_30 begin
    state start begin
        when login 
or levelup with pc.get_level()>= 30 and pc.get_level()<= 94 begin
            set_state
(information)
        
end
    end
    
    state information begin
        when letter begin
            send_letter
("Forschung des Biologen")
            
            
local v=find_npc_by_vnum(20084)
            if 
v!=0 then
                target
.vid("__TARGET__"v"Biologe")
            
end
        end
    
        when info 
or button begin
            say
("Forschung des Biologen")
            
say("")
            
say("Die Biologe sucht dich!")
            
say("Sie hat eine Aufgabe für dich.")
            
say("")
        
end
        
        when __TARGET__
.target.click or 20084.chat."Forschung des Biologen" begin
            target
.delete("__TARGET__")
            
say("Biologe:")
            
say("Oh!!! Du hilfst mir?")
            
say("Gut ...")
            
say("Ich bin übrigens die Biologe")
            
say("ich studiere zahlreiches aus der Pflanzenwelt.")
            
say("Wenn du mir bei meinen Forschungen hilfst,")
            
say("werde ich dich Reich Belohnen")
            
say("")
            
wait()
            
say("Biologe:")
            
say("Ich habe vor kurzem wieder angefangen ...")
            
say("Ich Forsche an einer Legende...")
            
say("Ich habe derzeit viel zu tun,")
            
say("es währe also nett wenn du mir hilfst...")
            
say("")
            
say("")
            
say("")
            
say("")
            
wait()
            
say("Biologe:")
            
say("Ich brauche 10 Orkzähne für meine")
            
say("Forschungen ...")
            
say("Aber Orkzähne sind sehr zerbrechlich")
            
say("es kann also sein das ein paar bei")
            
say("meinen Untersuchungen kaputt gehen.")
            
say("Bitte verstehen sie das ich alle 10")
            
say("brauche,ich muss wissen was hinter der")
            
say("Legende steckt...")
            
say("")
            
set_state(hunting)
        
end
    end
    
    state hunting begin
        when letter begin
            send_letter
("Orkzähne")
        
end
        
        when button 
or info begin
            say
("Orkzähne")
            
say("Hole aus dem Orktal 10 Orkzähne")
            
say("")
            
say_item_vnum(30006)
            
say("")
            
say_reward("Du hast "..pc.getqf("collect_30_bio").." abgegeben")
            
say("")
        
end
        
        when 635.kill 
or 636.kill or 637.kill or 655.kill or 656.kill or 657.kill begin
            local s
=number(150)
            if 
s<=3 then
                pc
.give_item2(30006,1)
            
end    
        end
        
        
        when 20084.chat
."Orkzähne" with pc.count_item(30006) >=1 begin
        
            
if get_time() > pc.getqf("30_bio_timer"then
            
                say
("Biologe:")
                
say("Ich werde deine Zähne jetzt untersuchen.")
                
say("")
                
say("")
                
wait()                                                --Weiter-Button
                
                local stueckzahl
=pc.count_item(30006)
                
local x=0                                    --Pausen/Gefahr auf Endlos-Schleife
                
                
for i0stueckzahl do
                    
x=x+1
                    
if x==11 then
                        say
("Du hast noch "..pc.count_item(30006).." Orkzähne.")
                        
say("")
                        
wait()
                        
say("Biologe:")
                        
say("Bring mir morgen 10 weitere Orkzähne.")
                        
say("")
                        
say("")
                        
pc.setqf("30_bio_timer",get_time()+60*60*1)
                        return
                    else
                        if 
pc.count_item(30006)>=1 then                --ZusätzlItemkontrolle
                            local s
number(1,100)
                            if 
s<= 50 then
                                
if pc.getqf("collect_30_bio")< 9 then
                                    say_grun
("Dieser Orkzahn ist in gutem Zustand.")
                                    
local index=pc.getqf("collect_30_bio")+
                                    pc
.setqf("collect_30_bio",index)
                                    
pc.remove_item(30006,1)
                                else
                                    
say("Fertig!!!")
                                    
say("")
                                    
wait()
                                    
say("Biologe:")
                                    
say("Du hast alle abgegeben!")
                                    
say("")
                                    
say("")
                                    
set_state(key_item)                --Abgabe beendet
                                    
return
                                
end
                            
else
                                
say_rot("Dieser Orkzahn ist unbrauchbar.")
                                
pc.remove_item(30006,1)
                            
end
                        
else
                            
say("Du hast keine weiteren Zähne.")
                            
say("")
                            return
                        
end
                    end
                end
            
else
                
say("Biologe:")
                
say("Du hast letztens schon 10 Orkzähne")
                
say("abgegeben. Ich bin meiner Untersuchung")
                
say("noch nicht fertig. Komm später wieder!")
                
say("")
                return
            
end
        end
    end

    
    state key_item begin
        when letter begin
            send_letter
("Forschung des Biologen")
            
            if 
pc.count_item(30220)>0 then
                local v 
find_npc_by_vnum(20084)
                if 
!= 0 then
                    target
.vid("__TARGET__"v"Bioquest")
                
end
            end
        end
        
        when button 
or info begin
            
if pc.count_item(30220) >=1 then
                say
("Jinunggyis Seelenstein")
                
say("")
                
say("Du hast Jinunggyis Seelenstein schon?")
                
say("Kehre zur Biologe zurück.")
                
say("")
            else
                
say("Jinunggyis Seelenstein")
                
say("")
                
say("Nun, da du mir alle meine 10 Orkzähne geholt")
                
say("hast, benötige ich nurnoch Jinunggyis Seelenstein.")
                
say("Dieser ist ebenfalls im Orktal zu finden.")
                
say("")
                
say_item_vnum(30220)
                
say("")
            
end
        end
        
        
        when 635.kill 
or 636.kill or 637.kill or 655.kill or 656.kill or 657.kill begin
            local z
=number(1220)
            if 
z<=1 then
                
if pc.count_item(30220)==0 then
                    pc
.give_item2(302201)
                    
send_letter("Jinunggyis Seelenstein")
                
end
            end
        end
        
        
        when __TARGET__
.target.click or 20084.chat."Jinunggyis Seelenstein" with pc.count_item(30220)>0 begin
            target
.delete("__TARGET__")
            
say("Biologe:")
            
say("Jaa. Du bringst mir den Jinunggyis Seelenstein.")
            
say("Damit sind die Untersuchungen abgeschlossen.")
            
say("")
            
say("Für deine Mühe bekommst du:")
            
say_rot("+10% Bewegungsgeschwindigkeit")
            
say_rot("und einen Roten Ebenholzkasten")
            
            
say("")
            
            
pc.remove_item(30220,1)
            
affect.add_collect(apply.MOV_SPEED1060*60*24*365*60) --10 Bewegung    
            pc
.give_item2(50109,1)
            
pc.setqf("bios",1)
            
            
clear_letter()
            
set_quest_state("biologe_40""run")
            
set_state(__complete)
        
end
            
    end

    
    state __giveup__ begin
    end
    state __complete begin
    end
end 
Das ist nur die 30ger Bio-Quests wer alle Quests haben möchte kann mich gerne PN
Ich kann euch auch alle Quests zur Verfügung stellen

#edit: Weitere Releases folgen

Mfg
αωєsome is offline  
Thanks
11 Users
Old 11/01/2012, 17:30   #2
 
elite*gold: 0
Join Date: May 2012
Posts: 1,810
Received Thanks: 1,112
-.- Gestern noch selbst rumgearbeitet -.-"

Danke ^^
_Layesd is offline  
Thanks
1 User
Old 11/01/2012, 17:32   #3
 
elite*gold: 147
Join Date: Jun 2012
Posts: 1,940
Received Thanks: 256
Kein Problem (:
αωєsome is offline  
Old 11/01/2012, 20:13   #4
 
elite*gold: 2
Join Date: Nov 2008
Posts: 628
Received Thanks: 1,633
Finde die Simple Quest die ich unter Kleinere Releases gefunden habe zwar einfacher , simpler und besser. Aber thx haste trz.
xSanii is offline  
Old 11/01/2012, 20:15   #5
 
xCPx's Avatar
 
elite*gold: 20
Join Date: Jun 2011
Posts: 2,897
Received Thanks: 3,336
hmpf die SG quests sind auch garnicht public oder oO?
xCPx is offline  
Thanks
1 User
Old 11/01/2012, 20:42   #6



 
elite*gold: 0
The Black Market: 264/0/0
Join Date: Jul 2012
Posts: 24,494
Received Thanks: 3,215
Also kann man uns schon denken das dein Server nicht mehr on kommt

Drotzdem danke, dein Größer Feind wirds auch einbauen x3
Sintiax is offline  
Old 11/01/2012, 20:48   #7
 
elite*gold: 147
Join Date: Jun 2012
Posts: 1,940
Received Thanks: 256
Die 40ger , 50ger , 60ger , 70ger , 80ger , 85ger , 90ger , 92ger und 94ger Bio Quests bekommt ihr auch via PN habe schon einige verschickt !

Mfg
αωєsome is offline  
Old 11/02/2012, 02:11   #8
 
elite*gold: 0
Join Date: Jan 2009
Posts: 184
Received Thanks: 44
Die Biologe? Dein Ernst?
Sonst gut, was ist jetzt der Unterschied zu den normalen Bio-Quests, habe gerade keine Zeit sie mir näher anzuschauen.
Blacky33 is offline  
Old 11/02/2012, 04:00   #9
 
.Aza''s Avatar
 
elite*gold: 0
The Black Market: 110/0/3
Join Date: Jan 2012
Posts: 7,868
Received Thanks: 7,712
Also iwie war von Instance2 bis jetzt noch nix dabei was wirklich baba war....

...finde daran nix besonders...
.Aza' is offline  
Old 11/02/2012, 17:51   #10
 
elite*gold: 0
Join Date: Nov 2010
Posts: 23
Received Thanks: 6
hcuh meine schönen quests egal wayne =D
FlyHighx3333 is offline  
Old 11/02/2012, 20:30   #11


 
elite*gold: 0
Join Date: Feb 2010
Posts: 7,221
Received Thanks: 6,758
Ist das nicht eine von den Quests, wo Stück für Stück die Zähne untersucht werden? Bin mir gerade nicht sicher und keine Lust das ganze anzuschauen.
#SoNiice is offline  
Old 11/02/2012, 20:49   #12
 
elite*gold: 147
Join Date: Jun 2012
Posts: 1,940
Received Thanks: 256
Ja da werden 10 Zähne gleichzeitig untersucht !

Mfg
αωєsome is offline  
Old 11/05/2012, 21:27   #13
 
.PolluX's Avatar
 
elite*gold: 81
Join Date: Nov 2012
Posts: 975
Received Thanks: 531
Danke, selber hätt ich dafür jahre gebraucht, so hast du mir ne Menge arbeit abgenommen
.PolluX is offline  
Old 11/06/2012, 10:58   #14
 
.Despero™'s Avatar
 
elite*gold: 75
Join Date: Mar 2012
Posts: 2,655
Received Thanks: 742
Wann folgt weitere Releases ?
.Despero™ is offline  
Reply


Similar Threads Similar Threads
[Release] Lager quest + gm item quest
06/13/2012 - Metin2 PServer Guides & Strategies - 12 Replies
Hey Com, Ich will hier mal 2 Sachen Releasen:D https://www.virustotal.com/file/e9323b9289988d9e4 65e418600bd6179bb5a3a245630cab937c46f076618476b/an alysis/1339426405/ Thx wäre nett Entpack PW: epvp
[Release]Besserer OX-Manage quest mit OX-Verlassen quest usw.
05/08/2012 - Metin2 PServer Guides & Strategies - 27 Replies
Da mich es immer aufregt, dass mann beim OX immer erst die Blume rufen muss und dann drauf klicken, habe ich mal eine quest für eine oxerleicterung geschrieben. (© by BestKilla && Der quest darf nur unter genehmigung geändert werden.) (Sollte diese Quest fiels als eure ausgegeben werden, wird sofort der quest rausgenommen.) OX STARTEN: Ihr müsst euch mit '/go ox' erst nach ox porten, dann mit quest ox starten. Die Queste: +Diese Quest ermölichen eine OX-Wettbewerb ohne die Umständlige...
[Release]Upp-Stuff Quest + Neue Bio Quest ->Testlauf
06/08/2010 - Metin2 PServer Guides & Strategies - 13 Replies
Hey und guten Morgen, Ich hatte grade bissl langeweile und hab mir gedacht man könnte doch seine Waffen auch mit 100% Uppchance gg bessere Waffen tauschen oder? Das heißt: Die Quest sieht so aus: Ihr geht zu Baek-Go. Wenn ihr jetzt zum Beispiel einen Krähenstahlbogen+9 und 2x Gegenangriffstrategien habt könnt ihr Ihn gg einen Geisterbogen+0 eintauschen! Die Quest funktioniert wunderbar und wurde auch schon getestet.



All times are GMT +1. The time now is 03:21.


Powered by vBulletin®
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2024 elitepvpers All Rights Reserved.