Register for your free account! | Forgot your password?

Go Back   elitepvpers > Popular Games > Metin2 > Metin2 Private Server
You last visited: Today at 01:32

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

Advertisement



[SERVICE] Die Questkontrolle

Discussion on [SERVICE] Die Questkontrolle within the Metin2 Private Server forum part of the Metin2 category.

Reply
 
Old 04/28/2011, 18:41   #2161
 
elite*gold: 0
Join Date: Feb 2011
Posts: 54
Received Thanks: 9
HI hier meine verbuggte quest es kommen schon fehler bei vpc also mus ziemlich viel falsch sein :S
PHP Code:

quest schmied2 begin
 state start begin
     when login 
or levelup with pc.get_level() >= 99 begin
         set_state
(information)
     
end
 end

 state information begin
     when letter begin
         local v 
find_npc_by_vnum(20016)
         if 
!= 0 then
             target
.vid("__TARGET__"v"Quest")
         
end
         send_letter
("Götterwaffen")
     
end

     when button 
or info begin
         say_title
("GötterWaffen")
         
say("")
         
say("Bitte gehe zum schmied!")
         
say("Er will dir unbedingt etwas sagen.")
         
say("Bringe viel Gedult mit.")
     
end

     when __TARGET__
.target.click or
         
20016.chat."schmied2" begin
         target
.delete("__TARGET__")
         
say("Hey,ho! Lieber Krieger")
         
say("da du nun level 99 bist")
         
say("wird es zeit dir eine Götterwaffe")
         
say("zu schmieden!")
         
say("Ich brauche dazu aber 10 rote Monokel.")
         
set_state(go_to_disciple)
         
pc.setqf("collect_count",0)
         
pc.setqf("drink_drug",0
     
end
 end

 state go_to_disciple begin
     when letter begin
         send_letter
("schmied2")
     
end

     when button 
or info begin
         say_title
("Götterwaffen")
         
say("")
         
say("Du hast den Auftrag bekommen")
         
say("10 Rotes Monokel zu sammeln")
         
say("Das Item bekommt ihr von Den Eisgolems der Grotte!")
         
say("Viel Glück!")
         
say("")
         
say_item_vnum(10)
         
say_reward("Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
     
end

     when 71035.
use begin
         
if pc.getqf("drink_drug")==1 then
             say
("")
             
say("Bessere Droppchange!")
             return
         
end
         
if pc.count_item(70030)==0 then
             say
("Du hast bisher noch keine")
             
say("Lauf los und besorg mir welche")
             return
         
end
         item
.remove()
         
pc.setqf("drink_drug",1)
     
end

     when 10.kill begin
         
if pc.count_item(70030) < 10-pc.getqf("collect_count"then
             pc
.give_item2(700301)
         
end
     end

     when 20016.chat
."schmied2" with pc.count_item(70030) > 0 begin
             say
("Ich werde das Item")
             
say("schnell überprüfen.")
             
pc.remove_item(700301)
             
wait()

             
local pass_percent
             
if pc.getqf("drink_drug" == 0 then
                 pass_percent
=50
             
else
                 
pass_percent=50
             end

             local s
number(1,100)
         if 
<= pass_percent then
             
if pc.getqf("collect_count") < 11 then
                     local index 
=pc.getqf("collect_count")+1
                     pc
.setqf("collect_count",index)
                     
say("Perfekt! Das Item ist in Ordnung")
                     
say("Du hast bis jetzt ".." "..10-pc.getqf("collect_count").. " abgegeben!")
                     
say("Bring mir die restlichen!")
                     
pc.setqf("drink_drug",0)
                     return
                 
end
                 say
("Glückwunsch!")
                 
say("Die Waffe konnte")
                 
say("erfolgreich geschmiedet ")
                 
say("werden! Bitte melde dich bei")
                 
say("einem [GM] und sag schmied2!")
                 
pc.setqf("collect_count"0)
                 
pc.setqf("drink_drug"0)
                 
clear_letter()
                 
set_state(__complete)
                 
say_reward("Suche dir EINE Waffe aus:")
                    
local bselect("Demoncial-Bogen""Sonnenstrahlenmesser""Blaudrachentöter""Mondschwert")
                    if 
b==1 then
                        say_title
("Schmied:")
                        
say("")
                        
say("Du hast eine Levis Rüstung erhalten.")
                        
say("")
                        
say_reward("Viel Spaß!")
                        
pc.give_item2(410101)
                        
clear_letter()
                        
set_state(__COMPLETE__)
                    elseif 
b==2 then
                        say_title
("Schmied:")
                        
say("")
                        
say("Du hast eine Thors Rüstung erhalten.")
                        
say("")
                        
say_reward("Viel Spaß!")
                        
pc.give_item2(410201)
                        
clear_letter()
                        
set_state(__COMPLETE__)
                    elseif 
b==3 then
                        say_title
("Schmied:")
                        
say("")
                        
say("Du hast eine Thugis Rüstung erhalten.")
                        
say("")
                        
say_reward("Viel Spaß!")
                        
pc.give_item2(410301)
                        
clear_letter()
                        
set_state(__COMPLETE__)
                    elseif 
b==4 then
                        say_title
("Schmied:")
                        
say("")
                        
say("Du hast eine Saghys Rüstung erhalten.")
                        
say("")
                        
say_reward("Viel Spaß!")
                        
pc.give_item2(410401)
                        
clear_letter()
                 
set_quest_state("levelup","run")
                 return
             else

             
say"Dieses Item ist von schlechter Qualität!")
             
say"Es kann nicht verwendet werden.")
             
say"Hole mir bitte ein neues!")
             
pc.setqf("drink_drug",0)
             return
             
end

     end
 end 
die texte und die vnums stimmen nicht ganz da ich aus 2 quest alles zusammengebsatelt habe ein thx an den der die korrigiert ;D
Unstopable499 is offline  
Old 04/28/2011, 19:10   #2162
 
elite*gold: 32
Join Date: Dec 2010
Posts: 1,294
Received Thanks: 862
PHP Code:
quest schmied2 begin
    state start begin
        when login 
or levelup with pc.get_level() >= 99 begin
            set_state
(information)
        
end
    end

    state information begin
        when letter begin
            local v 
find_npc_by_vnum(20016)
            if 
!= 0 then
                target
.vid("__TARGET__"v"Quest")
            
end
            send_letter
("Götterwaffen")
        
end

        when button 
or info begin
            say_title
("GötterWaffen")
            
say("")
            
say("Bitte gehe zum schmied!")
            
say("Er will dir unbedingt etwas sagen.")
            
say("Bringe viel Gedult mit.")
        
end

        when __TARGET__
.target.click or
            
20016.chat."schmied2" begin
            target
.delete("__TARGET__")
            
say("Hey,ho! Lieber Krieger")
            
say("da du nun level 99 bist")
            
say("wird es zeit dir eine Götterwaffe")
            
say("zu schmieden!")
            
say("Ich brauche dazu aber 10 rote Monokel.")
            
set_state(go_to_disciple)
            
pc.setqf("collect_count",0)
            
pc.setqf("drink_drug",0
        
end
    end

    state go_to_disciple begin
        when letter begin
            send_letter
("schmied2")
        
end

        when button 
or info begin
            say_title
("Götterwaffen")
            
say("")
            
say("Du hast den Auftrag bekommen")
            
say("10 Rotes Monokel zu sammeln")
            
say("Das Item bekommt ihr von Den Eisgolems der Grotte!")
            
say("Viel Glück!")
            
say("")
            
say_item_vnum(10) --würde ein Schwert+0 erscheinen im Fenster!
            
say_reward("Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
        
end

        when 71035.
use begin
            
if pc.getqf("drink_drug")==1 then
                say
("")
                
say("Bessere Droppchange!")
                return
            
end
            
if pc.count_item(70030)==0 then
                say
("Du hast bisher noch keine")
                
say("Lauf los und besorg mir welche")
                return
            
end
            item
.remove()
            
pc.setqf("drink_drug",1)
        
end
        when 10.kill begin 
--keine MobID!
            if 
pc.count_item(70030) < 10-pc.getqf("collect_count"then
                pc
.give_item2(700301)
            
end
        end

        when 20016.chat
."schmied2" with pc.count_item(70030) > 0 begin
             say
("Ich werde das Item")
             
say("schnell überprüfen.")
             
pc.remove_item(700301)
             
wait()

             
local pass_percent
             
if pc.getqf("drink_drug") == 0 then --Fehler!
                 
pass_percent=50
             
else
                 
pass_percent=50
             end

             local s
number(1,100)
         if 
<= pass_percent then
             
if pc.getqf("collect_count") < 11 then
                     local index 
=pc.getqf("collect_count")+1
                     pc
.setqf("collect_count",index)
                     
say("Perfekt! Das Item ist in Ordnung")
                     
say("Du hast bis jetzt ".." "..10-pc.getqf("collect_count").. " abgegeben!")
                     
say("Bring mir die restlichen!")
                     
pc.setqf("drink_drug",0)
                     return
                 
end
                 say
("Glückwunsch!")
                 
say("Die Waffe konnte")
                 
say("erfolgreich geschmiedet ")
                 
say("werden! Bitte melde dich bei")
                 
say("einem [GM] und sag schmied2!") --eckige Klammern werden nicht sichtbar sein!
                 
pc.setqf("collect_count"0)
                 
pc.setqf("drink_drug"0)
                 
clear_letter()
                 
set_state(__complete)
                 
say_reward("Suche dir EINE Waffe aus:")
                    
local bselect("Demoncial-Bogen""Sonnenstrahlenmesser""Blaudrachentöter""Mondschwert")
                    if 
b==1 then
                        say_title
("Schmied:")
                        
say("")
                        
say("Du hast eine Levis Rüstung erhalten.")
                        
say("")
                        
say_reward("Viel Spaß!")
                        
pc.give_item2(410101)
                        
clear_letter()
                        
set_state(__COMPLETE__)
                    elseif 
b==2 then
                        say_title
("Schmied:")
                        
say("")
                        
say("Du hast eine Thors Rüstung erhalten.")
                        
say("")
                        
say_reward("Viel Spaß!")
                        
pc.give_item2(410201)
                        
clear_letter()
                        
set_state(__COMPLETE__)
                    elseif 
b==3 then
                        say_title
("Schmied:")
                        
say("")
                        
say("Du hast eine Thugis Rüstung erhalten.")
                        
say("")
                        
say_reward("Viel Spaß!")
                        
pc.give_item2(410301)
                        
clear_letter()
                        
set_state(__COMPLETE__)
                    elseif 
b==4 then
                        say_title
("Schmied:")
                        
say("")
                        
say("Du hast eine Saghys Rüstung erhalten.")
                        
say("")
                        
say_reward("Viel Spaß!")
                        
pc.give_item2(410401)
                        
clear_letter()
                     
end
                 set_quest_state
("levelup","run")
                 return
             else

             
say"Dieses Item ist von schlechter Qualität!")
             
say"Es kann nicht verwendet werden.")
             
say"Hole mir bitte ein neues!")
             
pc.setqf("drink_drug",0)
             return
             
end
         end
     end
 end 
Die Stellen wo "--" steht solltest du dir mal angucken!
√π. is offline  
Old 04/28/2011, 19:37   #2163
 
elite*gold: 0
Join Date: Feb 2011
Posts: 54
Received Thanks: 9
^^

ne frage kansu mir sagen was der 1te fehler ist ich hab das mit nem questwriter gemacht soll das raus oder so? ich bin kein questwriter... pls hlp :S
hast aber ein thx für die überprüfung ;D
Unstopable499 is offline  
Old 04/28/2011, 20:27   #2164
 
elite*gold: 32
Join Date: Dec 2010
Posts: 1,294
Received Thanks: 862
Da wo Fehler steht hast du ne Klammer vergessen gehabt
√π. is offline  
Thanks
1 User
Old 04/28/2011, 20:42   #2165
 
elite*gold: 0
Join Date: Jul 2009
Posts: 428
Received Thanks: 38
Die gehen immer noch nicht jetzt kann ich die items net mehr anklicken =( .
PHP Code:
quest seelengrotte_quest begin
    state start begin
        when 30168.
use begin
            say_title
("Notiz der Anführer:")
            
say("Wir haben alte Schriften gefunden")
            
say("die uns das Porten in die Grotte ermöglichen!")
            
say("Aber sei gewarnt.. Die Kreaturen sind sehr Stark")
            
say("Wenn du hinein gehen solltest, dann bring so viele")
            
say("wie möglich um von dieser Ausgeburt des Bösen!")
            
local s select("Seelengrotte Ebene 1""Seelengrotte Ebene 2""Drachenraum""abbrechen")
            if 
== 1 then
                pc
.warp(10000,1214200)
            elseif 
== 2 then
                pc
.warp(241700,1274900)
            elseif 
== 3 then
                pc
.warp(171900,1221300)
            elseif 
== 4 then
                say
("Kluge entscheidung, vielleicht das nächste mal!")
                return
            
end
        end
    end
end 



PHP Code:
quest gmhelpitem begin 
    state start begin
      when 30163.
use with pc.is_gm() begin    
          
             say_title
("GM Helfer")
             
say("Ist ausschließlich für das Team")
             
say("Das Item erleichtet den Job des Teams.")
             
say("")
             
say("Bitte wähle eine der folgenden Optionen aus!")
                         
             
local main_set select("Info Ansagen""Charakter""Event Management""Skills""Abbrechen")
             if 
main_set == 5 then
                
return
             
end
             
if main_set == 1 then    
             local g 
select ("Support" "GM Offline" "Server Reboot" "Link" "Relog" "Id u. PW""Abbrechen")
             if 
== 1 then
             notice_all 
("~ ~ ~")
                 
notice_all(""..pc.get_name() .." steht euch für Fragen und Probleme zur Verfügung!")
                 
notice_all ("Play Fair - Dont Hack!")
                 
notice_all ("~ ~ ~")
                 return
             
end     
             
if == 2 then
                  notice_all 
("~ ~ ~")
                 
notice_all("".. pc.get_name() .." geht erstmal Offline und wünscht euch allen noch viel Spaß!")
                 
notice_all ("~ ~ ~")
                 return
             
end      
            
if == 3 then
            notice_all 
("*!*!*!*")
            
notice_all ("Bitte Ausloggen - Server reboot!")
                 
notice_all ("Please Logout - Server reboot!")
                 
notice_all ("*!*!*!*")
                           return
             
end
             
if == 4 then
             notice_all 
("*!*!*!*")
                 
notice_all ("Homepage, News, Payment ||>*Der Link*")
                 
notice_all ("Forum ||> *Der Link*")
                 
notice_all ("*!*!*!*")
                 return
             
end
             
if == 5 then
             notice_all 
("*!*!*!*")
                 
notice_all ("Bitte alle reloggen!")
                 
notice_all ("Please relog all!")
                 
notice_all ("*!*!*!*")
                 return
             
end
             
         
if == 6 then
         notice_all 
("*!*!*!*")
                  
notice_all ("GMs fragen niemals nach euerer ID und eurem PW!")
                 
notice_all ("Gibt diese auch nicht an dritte Personen weiter!")
                 
notice_all ("*!*!*!*")
                 return
             
end
             
if == 7 then
                 
return
             
end
          end        
          
        
if main_set == 2 then
        say
("")
        
say("Hier sind einige Sachen für dein GM Charakter:")
        
say("")
                
local g select("Ritterlich""Sub-Skills","Pferdlevel 21""Standart EQ""GMs" "Abbrechen")
                
                if 
== 1 then             
                 command
("set "..pc.get_name() .." align 9999999")
                 return
             
end     
             
if == 2 then
                 command
("setsk 122 2")
                
command("setsk 121 59")
                
command("setsk 124 59")
                
command("setsk 125 59")
                
command("setsk 126 59")
                
command("setsk 127 59")
                
command("setsk 128 59")
                
command("setsk 129 59")
                
command("setsk 130 59")
                
command("setsk 131 59")
                 return
             
end          
            
if == 3 then
                command
("horse_level "..pc.get_name() .." 21")
                
command("i 50053")
                return
             
end
              
if == 4 then
                command
("i 90021")
                
command("i 90022")
                
command("i 71050 200")
                
command("i 72701")
                
command("i 72048 200")
                
command("i 72042 200")
                
command("i 72039 200")
                
command("i 72036 200")
                
command("i 72033 200")
                
command("i 72027 200")
                
command("i 71033")
                
command("i 13169")
                
command("i 13149")
                
command("i 17329")
                
command("i 13189")
                
command("i 15449")
                
command("i 16329")
                
command("i 14329")
                
command("i 12949")
                return
             
end
                     
if == 5 then
             notice_all 
("*!*!*!*")
                 
notice_all ("Alle GMs!")
                 
notice_all ("Marcel,")
                 
notice_all ("PvPIFreak,")
                                 
notice_all ("Holger.")
                 
notice_all ("Wenn jemand")
                 
notice_all ("anderes")
                 
notice_all ("sagt er ist")
                 
notice_all ("GM sagt")
                 
notice_all ("es uns .")
                 return
             
end
             
             
            
if == 6 then
            
return
            
end
            end
            
                
if main_set == 4 then
    say
("")
    
say("Bitte waehle deine Charakter Klasse:")
    
say("")
            
local i select ("Krieger""Sura""Ninja""Schamane""Abbrechen")
                    if 
== 1 then
                        command
("setsk 1 59")
                        
command("setsk 2 59")
                        
command("setsk 3 59")
                        
command("setsk 4 59")
                        
command("setsk 5 59")                                
                        
command("setsk 16 59")
                        
command("setsk 17 59")
                        
command("setsk 18 59")
                        
command("setsk 19 59")
                        
command("setsk 20 59")
                        return
                        
end
                    
if == 2 then
                        command
("setsk 61 59")
                        
command("setsk 62 59")
                        
command("setsk 63 59")
                        
command("setsk 64 59")
                        
command("setsk 65 59")
                        
command("setsk 66 59")
                        
command("setsk 76 59")
                        
command("setsk 77 59")
                        
command("setsk 78 59")
                        
command("setsk 79 59")
                        
command("setsk 80 59")
                        
command("setsk 81 59")
                        return
                        
end
                    
if == 3 then
                        command
("setsk 31 59")
                        
command("setsk 32 59")
                        
command("setsk 33 59")
                        
command("setsk 34 59")
                        
command("setsk 34 59")
                        
command("setsk 35 59")
                        
command("setsk 46 59")
                        
command("setsk 47 59")
                        
command("setsk 48 59")
                        
command("setsk 49 59")
                        
command("setsk 50 59")
                        return
                        
end
                    
if == 4 then
                        command
("setsk 91 59")
                        
command("setsk 92 59")
                        
command("setsk 93 59")
                        
command("setsk 94 59")
                        
command("setsk 95 59")
                        
command("setsk 96 59")
                        
command("setsk 106 59")
                        
command("setsk 107 59")
                        
command("setsk 108 59")
                        
command("setsk 109 59")
                        
command("setsk 110 59")
                        
command("setsk 111 59")
                        return
                        
end
                        end                    

    
            
if main_set == 3 then    
            
            say_title
("GM Helfer")
            
say("")
            
say("Hiermitkannst du saemtliche Events starten.")
            
say(" ")
            
say_title("Waehle nun aus folgenden Optionen aus:")
            
say("")
            
            
local e select("OX Vorbereitung Info" "Tag / Nacht""Weihnachts Events""Rates einstellen""Abbrechen")
                if 
== 1 then
                 notice_all 
("*!*!*!*")
                 
notice_all ("Ein OX Event ist damnächst vom Team geplant!")
                 
notice_all ("Bitte haltet euch bereit auf schnellst möglichen Wege zu Uriel zu kommen,")
                 
notice_all ("damit jeder am Event dran teilnehmen kann!")
                 
notice_all ("*!*!*!*")
                 return
                 
end
                
if == 2 then
                    say_title
("GM Helfer:")
                    
say("")
                    
say("Du moechtest also zwischen Tag und")
                    
say("Nacht wechseln ?")
                    
                        
local f select ("Tag" "Nacht""Abbrechen")
                            if 
== 1 then
                                command 
("x 2")
                            elseif 
== 2 then
                                command 
("x 1")
                            elseif 
== 3 then
                                
return
                        
end                                    
                        
                
elseif == 3 then
                    say_title
("GM Helfer:")
                    
say("")
                    
say("Du moechtest also die Weihnachts Events Starten?")
                            
                        
local f select ("Weihnachtsbaum""Schnee""Weihnachtsmusik""Weihnachtsevent starten (Alles)""Weihnachtsevent stoppen (Alles)""Abbrechen")
                        
                        
                        if 
== 1 then
                        
                            local g 
select ("Weihnachtsbaum aufstellen" "Weihnachtsbaum wegraeumen""Abbrechen")
                                    if 
== 1 then
                                        command 
("e xmas_tree 1")
                                        
notice_all ("Bei Weihnachtlicher Stimmung darf")
                                        
notice_all ("ein Weihnachtsbaum nicht fehlen!")
                                        
notice_all ("Das FireMt2 Team hat diesen geschmueckt")
                                        
notice_all ("und in der Mitte Berg Sohans aufgestellt!")
                                        
notice_all ("Frohes Fest!")
                                        
                                        
say_title("GM Helfer:")
                                        
say("")
                                        
say("Es ist geschafft!")
                                        
say("Der Weihnachtsbaum steht!")
                                        
say("")
                                    elseif 
== 2 then
                                        command 
("e xmas_tree 0")
                                        
notice_all ("Weihnachten neigt sich langsam")
                                        
notice_all ("dem Ende! Der Weihnachtsbaum wird")
                                        
notice_all ("nun nichtmehr benoetigt")
                                        
notice_all ("und wir haben ihn deshalb abgebaut.")
                                        
                                        
say_title("Seon-Hae:")
                                        
say("")
                                        
say("Es ist geschafft!")
                                        
say("Der Weihnachtsbaum ist weg!")
                                        
say("")
                                                                        
                                    elseif 
== 3 then
                                        
return
                                    
end
                            
                        
elseif == 2 then
                            local h 
select ("Schnee an" "Schnee aus""Abbrechen")
                                    if 
== 1 then
                                        command
("e xmas_snow 1")
                                    elseif 
== 2 then
                                        command 
("e xmas_snow 0")
                                    elseif 
== 3 then
                                        
return
                                    
end
                                    
                        
elseif == 3 then
                            local i 
select ("Musik abspielen""Musik stoppen""Abbrechen")
                                    if 
== 1 then
                                        command
("e xmas_song 1")
                                    elseif 
== 2 then
                                        command
("e xmas_song 0")
                                    elseif 
== 3 then
                                        
return
                                    
end
                        
elseif == 4 then
                            say
("Willst du wirklich alles aktivieren?")
                            
say("Also Nachtmodus, den Weihnachtsbaum,")
                            
say("Schnee und die Weihnachtsmusik?")
                            
say("")
                            
local g_sub select ("Ja""Nein")
                                if 
g_sub == 1 then
                                    command
("e xmas_tree 1")
                                    
command("e xmas_song 1")
                                    
command("e xmas_boom 1")
                                    
command("e xmas_snow 1")
                                    
say("Alles aktiviert!")
                                elseif 
g_sub == 2 then
                                    
return
                                
end
                        
elseif == 5 then
                                say
("Willst du wirklich alles deaktivieren?")
                                
say("Also Nachtmodus, den Weihnachtsbaum,")
                                
say("Schnee und die Weihnachtsmusik?")
                                
say("")
                        
local g_desub select ("Ja""Nein")
                            if 
g_desub == 1 then
                                command
("e xmas_tree 0")
                                
command("e xmas_song 0")
                                
command("e xmas_boom 0")
                                
command("e xmas_snow 0")
                                
say("Alles deaktiviert!")
                            elseif 
g_desub == 2 then
                                
return
                        
end
                                    
                        
elseif == 6 then
                            
return
                        
end
                                    
                
elseif == 4 then
                    say_title
("GM Helfer:")
                    
say("")
                    
say("Du moechtest also die Rates einstellen??")
                    
say("")
                    
say_title("Wähle die zu einstellende Rate")
                        
local rateset select ("EXP","Yang","Max-Yang","Gegenstaende","Abbrechen")
                        if 
rateset == 1 then
                            say_title
("Seon-Hae:")
                            
say("")
                            
say("Wie hoch soll die EXP-Rate werden?")
                                
local w =select ("150","250","500","1000","Abbrechen"
                                    if 
== 1 then
                                        command
("priv_empire 0 4:exp 150 9999")
                                    elseif 
== 2 then
                                        command
("priv_empire 0 4:exp 250 9999")
                                    elseif 
== 3 then
                                        command
("priv_empire 0 4:exp 500 9999")
                                    elseif 
== 4 then
                                        command
("priv_empire 0 4:exp 1000 9999")
                                    elseif 
== 5 then
                                        
return
                                    
end
                            
                        
elseif rateset == 2 then
                            say_title
("GM Helfer:")
                            
say("")
                            
say("Wie hoch soll die Yangdrop-Rate werden?")
                                
local x =select ("100","200","500","1000","Abbrechen"
                                    if 
== 1 then
                                        command
("priv_empire 0 2:gold_drop 100 9999")
                                    elseif 
== 2 then
                                        command
("priv_empire 0 2:gold_drop 200 9999")
                                    elseif 
== 3 then
                                        command
("priv_empire 0 2:gold_drop 500 9999")
                                    elseif 
== 4 then
                                        command
("priv_empire 0 2:gold_drop 1000 9999")
                                    elseif 
== 5 then
                                        
return
                                    
end
                        
elseif rateset == 3 then
                            say_title
("GM Helfer:")
                            
say("")
                            
say("Wie hoch soll die MaxYang-Drop-Rate werden?")
                                
local y =select ("100","200","500","1000","Abbrechen"
                                    if 
== 1 then
                                        command
("priv_empire 0 3:gold10_drop 100 9999")
                                    elseif 
== 2 then
                                        command
("priv_empire 0 3:gold10_drop 200 9999")
                                    elseif 
== 3 then
                                        command
("priv_empire 0 3:gold10_drop 500 9999")
                                    elseif 
== 4 then
                                        command
("priv_empire 0 3:gold10_drop 1000 9999")
                                    elseif 
== 5 then
                                        
return
                                    
end
                        
elseif rateset == 4 then
                            say_title
("GM Helfer:")
                            
say("")
                            
say("Wie hoch soll die Gegenstandsdrop-Rate werden?")
                            
local z =select ("100","200","500","1000","Abbrechen"
                                    if 
== 1 then
                                        command
("priv_empire 0 1:item_drop 100 9999")
                                    elseif 
== 2 then
                                        command
("priv_empire 0 1:item_drop 200 9999")
                                    elseif 
== 3 then
                                        command
("priv_empire 0 1:item_drop 500 9999")
                                    elseif 
== 4 then
                                        command
("priv_empire 0 1:item_drop 1000 9999")
                                    elseif 
== 5 then
                                        
return
                                    
end
                        
elseif rateset == 5 then
                            
return
                        
end
                    
                
elseif == 4 then
                    
return                
                
        
end
        end
    end    
    

end
end 
marcelo199531 is offline  
Old 04/28/2011, 20:51   #2166
 
elite*gold: 32
Join Date: Dec 2010
Posts: 1,294
Received Thanks: 862
Erste sollte eigentlich gehen, die zweite guck ich mir nicht an weil ich bei den falsch eingerückten 412 Zeilen kein Überblick habe...
√π. is offline  
Old 04/28/2011, 20:56   #2167
 
elite*gold: 0
Join Date: Jul 2009
Posts: 428
Received Thanks: 38
712 Zeilen ?
marcelo199531 is offline  
Old 04/28/2011, 23:58   #2168
 
Syrael van G's Avatar
 
elite*gold: 0
Join Date: May 2008
Posts: 390
Received Thanks: 168
@marcelo199531

Ich hab diese Quest erstellt ... Ich weiß kein Meisterwerk aber damals sehr hilfreich da viel verbuggte Portale hatten!

PHP Code:
quest seelengrotte_quest begin
    state start begin
        when 30168.
use begin
                say_title
("Notiz der Anführer:")
                
say("Wir haben alte Schriften gefunden")
                
say("die uns das Porten in die Grotte ermöglichen!")
                
say("Aber sei gewarnt.. Die Kreaturen sind sehr Stark")
                
say("Wenn du hinein gehen solltest, dann bring so viele")
                
say("wie möglich um von dieser Ausgeburt des Bösen!")
                
local s select("Seelengrotte Ebene 1","Seelengrotte Ebene 2","Drachenraum","abbrechen")
            if 
== 1 then
                pc
.warp(10000,1214200)
                
                
chat("Viel Glück")
            
end
            
if == 2 then
                pc
.warp(241700,1274900)
                
                
chat("Viel Glück")
            
end 
            
if == 3 then
                pc
.warp(171900,1221300)
                
                
chat("Viel Glück")
            
end 
            
if == 4 then
                chat
("Kluge entscheidung, vielleicht das nächste mal!")
            
end
        end
    end
end 
Verwende sie selbst und Funktioniert wunderbar! Probier mal ein anderes Item... in der Quest nur die Vnum anpassen und typ 18 nicht vergessen!
Sollte der Server laufen /reload p in chat tippen!

Vergewissere dich auch ob du die Quest in der Hongkong.list geschrieben hast!
Syrael van G is offline  
Old 04/29/2011, 11:21   #2169
 
elite*gold: 0
Join Date: Jul 2009
Posts: 428
Received Thanks: 38
Quote:
Originally Posted by Syrael van G View Post
@marcelo199531

Ich hab diese Quest erstellt ... Ich weiß kein Meisterwerk aber damals sehr hilfreich da viel verbuggte Portale hatten!

PHP Code:
quest seelengrotte_quest begin
    state start begin
        when 30168.
use begin
                say_title
("Notiz der Anführer:")
                
say("Wir haben alte Schriften gefunden")
                
say("die uns das Porten in die Grotte ermöglichen!")
                
say("Aber sei gewarnt.. Die Kreaturen sind sehr Stark")
                
say("Wenn du hinein gehen solltest, dann bring so viele")
                
say("wie möglich um von dieser Ausgeburt des Bösen!")
                
local s select("Seelengrotte Ebene 1","Seelengrotte Ebene 2","Drachenraum","abbrechen")
            if 
== 1 then
                pc
.warp(10000,1214200)
                
                
chat("Viel Glück")
            
end
            
if == 2 then
                pc
.warp(241700,1274900)
                
                
chat("Viel Glück")
            
end 
            
if == 3 then
                pc
.warp(171900,1221300)
                
                
chat("Viel Glück")
            
end 
            
if == 4 then
                chat
("Kluge entscheidung, vielleicht das nächste mal!")
            
end
        end
    end
end 
Verwende sie selbst und Funktioniert wunderbar! Probier mal ein anderes Item... in der Quest nur die Vnum anpassen und typ 18 nicht vergessen!
Sollte der Server laufen /reload p in chat tippen!

Vergewissere dich auch ob du die Quest in der Hongkong.list geschrieben hast!
Ok ich verusche es mal .
Und die andere Quest ?

Bei der zweiten Quest kommt wenn ich in VPC sh make.sh eingebe :

when : 20092.take
quest : gmhelpitem
state : start
when name must be given
gmhelpitem.quest:3:Abort trap (core dumped)
Segmentation fault (core dumped)
marcelo199531 is offline  
Old 04/29/2011, 14:27   #2170
 
.Delta's Avatar
 
elite*gold: 26
Join Date: Mar 2010
Posts: 3,765
Received Thanks: 2,661
Quote:
Originally Posted by Dupl3xx View Post
hello, i have question ... i can write script and I need



but pc.level < npc.get_level not work ...
how is correct this code ?

I need it in player kill quest
PS: SF 2010
thxx
try it with
npc.get_level()
.Delta is offline  
Thanks
1 User
Old 04/29/2011, 14:56   #2171
 
elite*gold: 0
Join Date: Jul 2009
Posts: 428
Received Thanks: 38
Was bedeutet
PHP Code:
Ok ich verusche es mal .
Und die andere Quest ?

Bei der zweiten Quest kommt wenn ich in VPC sh make.sh eingebe :

when 20092.take
quest 
gmhelpitem
state 
start
when name must be given
gmhelpitem
.quest:3:Abort trap (core dumped)
Segmentation fault (core dumped
marcelo199531 is offline  
Old 04/29/2011, 15:00   #2172
 
.Delta's Avatar
 
elite*gold: 26
Join Date: Mar 2010
Posts: 3,765
Received Thanks: 2,661
when name must be given

du hast wohl irgendwo bei einem when keinen weiteren namen angegeben
.Delta is offline  
Thanks
1 User
Old 04/29/2011, 15:02   #2173
 
elite*gold: 0
Join Date: Jul 2009
Posts: 428
Received Thanks: 38
Quote:
Originally Posted by .Delta View Post
when name must be given

du hast wohl irgendwo bei einem when keinen weiteren namen angegeben
Also in der gmhelpitemquest ?

Ich finde da aber kein fehler :

PHP Code:
quest gmhelpitem begin 
    state start begin
      when 30163.
use with pc.is_gm() begin    
          
             say_title
("GM Helfer")
             
say("Ist ausschließlich für das Team")
             
say("Das Item erleichtet den Job des Teams.")
             
say("")
             
say("Bitte wähle eine der folgenden Optionen aus!")
                         
             
local main_set select("Info Ansagen""Charakter""Event Management""Skills""Abbrechen")
             if 
main_set == 5 then
                
return
             
end
             
if main_set == 1 then    
             local g 
select ("Support" "GM Offline" "Server Reboot" "Link" "Relog" "Id u. PW""Abbrechen")
             if 
== 1 then
             notice_all 
("~ ~ ~")
                 
command ("n "..pc.get_name() .." steht euch für Fragen und Probleme zur Verfügung!")
                 
notice_all ("Play Fair - Dont Hack!")
                 
notice_all ("~ ~ ~")
                 return
             
end     
             
if == 2 then
                  notice_all 
("~ ~ ~")
                 
command ("n ".. pc.get_name() .." geht erstmal Offline und wünscht euch allen noch viel Spaß!")
                 
notice_all ("~ ~ ~")
                 return
             
end          
            
if == 3 then
            notice_all 
("*!*!*!*")
            
notice_all ("Bitte Ausloggen - Server reboot!")
                 
notice_all ("Please Logout - Server reboot!")
                 
notice_all ("*!*!*!*")
                           return
             
end
             
if == 4 then
             notice_all 
("*!*!*!*")
                 
notice_all ("Homepage, News, Payment ||>*Der Link*")
                 
notice_all ("Forum ||> *Der Link*")
                 
notice_all ("*!*!*!*")
                 return
             
end
             
if == 5 then
             notice_all 
("*!*!*!*")
                 
notice_all ("Bitte alle reloggen!")
                 
notice_all ("Please relog all!")
                 
notice_all ("*!*!*!*")
                 return
             
end
             
         
if == 6 then
         notice_all 
("*!*!*!*")
                  
notice_all ("GMs fragen niemals nach euerer ID und eurem PW!")
                 
notice_all ("Gibt diese auch nicht an dritte Personen weiter!")
                 
notice_all ("*!*!*!*")
                 return
             
end
             
if == 7 then
                 
return
             
end
          end        
          
        
if main_set == 2 then
        say
("")
        
say("Hier sind einige Sachen für dein GM Charakter:")
        
say("")
                
local g select("Ritterlich""Sub-Skills","Pferdlevel 21""Standart EQ""GMs""Abbrechen")
                
                if 
== 1 then             
                 command
("set "..pc.get_name() .." align 9999999")
                 return
             
end     
             
if == 2 then
                 command
("setsk 122 2")
                
command("setsk 121 59")
                
command("setsk 124 59")
                
command("setsk 125 59")
                
command("setsk 126 59")
                
command("setsk 127 59")
                
command("setsk 128 59")
                
command("setsk 129 59")
                
command("setsk 130 59")
                
command("setsk 131 59")
                 return
             
end          
            
if == 3 then
                command
("horse_level "..pc.get_name() .." 21")
                
command("i 50053")
                return
             
end
             
if == 4 then
                command
("i 90021")
                
command("i 90022")
                
command("i 71050 200")
                
command("i 72701")
                
command("i 72048 200")
                
command("i 72042 200")
                
command("i 72039 200")
                
command("i 72036 200")
                
command("i 72033 200")
                
command("i 72027 200")
                
command("i 71033")
                
command("i 13169")
                
command("i 13149")
                
command("i 17329")
                
command("i 13189")
                
command("i 15449")
                
command("i 16329")
                
command("i 14329")
                
command("i 12949")
                return
             
end
             
             
if == 5 then
                 notice_all 
("*!*!*!*")
                 
notice_all ("Alle GMs!")
                 
notice_all ("Marcel,")
                 
notice_all ("PvPIFreak,")
                 
notice_all ("Holger.")
                 
notice_all ("Wenn jemand")
                 
notice_all ("anderes")
                 
notice_all ("sagt er ist")
                 
notice_all ("GM sagt")
                 
notice_all ("es uns .")
                 return
             
end
            
if == 6 then
            
return
            
end
            end
            
                
if main_set == 4 then
    say
("")
    
say("Bitte waehle deine Charakter Klasse:")
    
say("")
            
local i select ("Krieger""Sura""Ninja""Schamane""Abbrechen")
                    if 
== 1 then
                        command
("setsk 1 59")
                        
command("setsk 2 59")
                        
command("setsk 3 59")
                        
command("setsk 4 59")
                        
command("setsk 5 59")                                
                        
command("setsk 16 59")
                        
command("setsk 17 59")
                        
command("setsk 18 59")
                        
command("setsk 19 59")
                        
command("setsk 20 59")
                        return
                        
end
                    
if == 2 then
                        command
("setsk 61 59")
                        
command("setsk 62 59")
                        
command("setsk 63 59")
                        
command("setsk 64 59")
                        
command("setsk 65 59")
                        
command("setsk 66 59")
                        
command("setsk 76 59")
                        
command("setsk 77 59")
                        
command("setsk 78 59")
                        
command("setsk 79 59")
                        
command("setsk 80 59")
                        
command("setsk 81 59")
                        return
                        
end
                    
if == 3 then
                        command
("setsk 31 59")
                        
command("setsk 32 59")
                        
command("setsk 33 59")
                        
command("setsk 34 59")
                        
command("setsk 34 59")
                        
command("setsk 35 59")
                        
command("setsk 46 59")
                        
command("setsk 47 59")
                        
command("setsk 48 59")
                        
command("setsk 49 59")
                        
command("setsk 50 59")
                        return
                        
end
                    
if == 4 then
                        command
("setsk 91 59")
                        
command("setsk 92 59")
                        
command("setsk 93 59")
                        
command("setsk 94 59")
                        
command("setsk 95 59")
                        
command("setsk 96 59")
                        
command("setsk 106 59")
                        
command("setsk 107 59")
                        
command("setsk 108 59")
                        
command("setsk 109 59")
                        
command("setsk 110 59")
                        
command("setsk 111 59")
                        return
                        
end
                        end                    

    
            
if main_set == 3 then    
            
            say_title
("GM Helfer")
            
say("")
            
say("Hiermitkannst du saemtliche Events starten.")
            
say(" ")
            
say_title("Waehle nun aus folgenden Optionen aus:")
            
say("")
            
            
local e select("OX Vorbereitung Info" "Tag / Nacht""Weihnachts Events""Rates einstellen""Abbrechen")
                if 
== 1 then
                 notice_all 
("*!*!*!*")
                 
notice_all ("Ein OX Event ist damnächst vom Team geplant!")
                 
notice_all ("Bitte haltet euch bereit auf schnellst möglichen Wege zu Uriel zu kommen,")
                 
notice_all ("damit jeder am Event dran teilnehmen kann!")
                 
notice_all ("*!*!*!*")
                 return
                 
end
                
if == 2 then
                    say_title
("GM Helfer:")
                    
say("")
                    
say("Du moechtest also zwischen Tag und")
                    
say("Nacht wechseln ?")
                    
                        
local f select ("Tag" "Nacht""Abbrechen")
                            if 
== 1 then
                                command 
("x 2")
                            elseif 
== 2 then
                                command 
("x 1")
                            elseif 
== 3 then
                                
return
                        
end                                    
                        
                
elseif == 3 then
                    say_title
("GM Helfer:")
                    
say("")
                    
say("Du moechtest also die Weihnachts Events Starten?")
                            
                        
local f select ("Weihnachtsbaum""Schnee""Weihnachtsmusik""Weihnachtsevent starten (Alles)""Weihnachtsevent stoppen (Alles)""Abbrechen")
                        
                        
                        if 
== 1 then
                        
                            local g 
select ("Weihnachtsbaum aufstellen" "Weihnachtsbaum wegraeumen""Abbrechen")
                                    if 
== 1 then
                                        command 
("e xmas_tree 1")
                                        
notice_all ("Bei Weihnachtlicher Stimmung darf")
                                        
notice_all ("ein Weihnachtsbaum nicht fehlen!")
                                        
notice_all ("Das FireMt2 Team hat diesen geschmueckt")
                                        
notice_all ("und in der Mitte Berg Sohans aufgestellt!")
                                        
notice_all ("Frohes Fest!")
                                        
                                        
say_title("GM Helfer:")
                                        
say("")
                                        
say("Es ist geschafft!")
                                        
say("Der Weihnachtsbaum steht!")
                                        
say("")
                                    elseif 
== 2 then
                                        command 
("e xmas_tree 0")
                                        
notice_all ("Weihnachten neigt sich langsam")
                                        
notice_all ("dem Ende! Der Weihnachtsbaum wird")
                                        
notice_all ("nun nichtmehr benoetigt")
                                        
notice_all ("und wir haben ihn deshalb abgebaut.")
                                        
                                        
say_title("Seon-Hae:")
                                        
say("")
                                        
say("Es ist geschafft!")
                                        
say("Der Weihnachtsbaum ist weg!")
                                        
say("")
                                                                        
                                    elseif 
== 3 then
                                        
return
                                    
end
                            
                        
elseif == 2 then
                            local h 
select ("Schnee an" "Schnee aus""Abbrechen")
                                    if 
== 1 then
                                        command
("e xmas_snow 1")
                                    elseif 
== 2 then
                                        command 
("e xmas_snow 0")
                                    elseif 
== 3 then
                                        
return
                                    
end
                                    
                        
elseif == 3 then
                            local i 
select ("Musik abspielen""Musik stoppen""Abbrechen")
                                    if 
== 1 then
                                        command
("e xmas_song 1")
                                    elseif 
== 2 then
                                        command
("e xmas_song 0")
                                    elseif 
== 3 then
                                        
return
                                    
end
                        
elseif == 4 then
                            say
("Willst du wirklich alles aktivieren?")
                            
say("Also Nachtmodus, den Weihnachtsbaum,")
                            
say("Schnee und die Weihnachtsmusik?")
                            
say("")
                            
local g_sub select ("Ja""Nein")
                                if 
g_sub == 1 then
                                    command
("e xmas_tree 1")
                                    
command("e xmas_song 1")
                                    
command("e xmas_boom 1")
                                    
command("e xmas_snow 1")
                                    
say("Alles aktiviert!")
                                elseif 
g_sub == 2 then
                                    
return
                                
end
                        
elseif == 5 then
                                say
("Willst du wirklich alles deaktivieren?")
                                
say("Also Nachtmodus, den Weihnachtsbaum,")
                                
say("Schnee und die Weihnachtsmusik?")
                                
say("")
                        
local g_desub select ("Ja""Nein")
                            if 
g_desub == 1 then
                                command
("e xmas_tree 0")
                                
command("e xmas_song 0")
                                
command("e xmas_boom 0")
                                
command("e xmas_snow 0")
                                
say("Alles deaktiviert!")
                            elseif 
g_desub == 2 then
                                
return
                        
end
                                    
                        
elseif == 6 then
                            
return
                        
end
                                    
                
elseif == 4 then
                    say_title
("GM Helfer:")
                    
say("")
                    
say("Du moechtest also die Rates einstellen??")
                    
say("")
                    
say_title("Wähle die zu einstellende Rate")
                        
local rateset select ("EXP","Yang","Max-Yang","Gegenstaende","Abbrechen")
                        if 
rateset == 1 then
                            say_title
("Seon-Hae:")
                            
say("")
                            
say("Wie hoch soll die EXP-Rate werden?")
                                
local w =select ("150","250","500","1000","Abbrechen"
                                    if 
== 1 then
                                        command
("priv_empire 0 4:exp 150 9999")
                                    elseif 
== 2 then
                                        command
("priv_empire 0 4:exp 250 9999")
                                    elseif 
== 3 then
                                        command
("priv_empire 0 4:exp 500 9999")
                                    elseif 
== 4 then
                                        command
("priv_empire 0 4:exp 1000 9999")
                                    elseif 
== 5 then
                                        
return
                                    
end
                            
                        
elseif rateset == 2 then
                            say_title
("GM Helfer:")
                            
say("")
                            
say("Wie hoch soll die Yangdrop-Rate werden?")
                                
local x =select ("100","200","500","1000","Abbrechen"
                                    if 
== 1 then
                                        command
("priv_empire 0 2:gold_drop 100 9999")
                                    elseif 
== 2 then
                                        command
("priv_empire 0 2:gold_drop 200 9999")
                                    elseif 
== 3 then
                                        command
("priv_empire 0 2:gold_drop 500 9999")
                                    elseif 
== 4 then
                                        command
("priv_empire 0 2:gold_drop 1000 9999")
                                    elseif 
== 5 then
                                        
return
                                    
end
                        
elseif rateset == 3 then
                            say_title
("GM Helfer:")
                            
say("")
                            
say("Wie hoch soll die MaxYang-Drop-Rate werden?")
                                
local y =select ("100","200","500","1000","Abbrechen"
                                    if 
== 1 then
                                        command
("priv_empire 0 3:gold10_drop 100 9999")
                                    elseif 
== 2 then
                                        command
("priv_empire 0 3:gold10_drop 200 9999")
                                    elseif 
== 3 then
                                        command
("priv_empire 0 3:gold10_drop 500 9999")
                                    elseif 
== 4 then
                                        command
("priv_empire 0 3:gold10_drop 1000 9999")
                                    elseif 
== 5 then
                                        
return
                                    
end
                        
elseif rateset == 4 then
                            say_title
("GM Helfer:")
                            
say("")
                            
say("Wie hoch soll die Gegenstandsdrop-Rate werden?")
                            
local z =select ("100","200","500","1000","Abbrechen"
                                    if 
== 1 then
                                        command
("priv_empire 0 1:item_drop 100 9999")
                                    elseif 
== 2 then
                                        command
("priv_empire 0 1:item_drop 200 9999")
                                    elseif 
== 3 then
                                        command
("priv_empire 0 1:item_drop 500 9999")
                                    elseif 
== 4 then
                                        command
("priv_empire 0 1:item_drop 1000 9999")
                                    elseif 
== 5 then
                                        
return
                                    
end
                        
elseif rateset == 5 then
                            
return
                        
end
                    
                
elseif == 4 then
                    
return                
                
        
end
        end
    end    
    

end
end 
marcelo199531 is offline  
Old 04/29/2011, 17:26   #2174
 
elite*gold: 32
Join Date: Dec 2010
Posts: 1,294
Received Thanks: 862
3. Zeile:
PHP Code:
when 30163.use with pc.is_gm()==1 begin 
So sollts klappen
√π. is offline  
Old 04/30/2011, 02:38   #2175
 
.Risan.'s Avatar
 
elite*gold: 30
Join Date: Jul 2010
Posts: 1,627
Received Thanks: 1,450
Quote:
Originally Posted by Googler77 View Post
3. Zeile:
PHP Code:
when 30163.use with pc.is_gm()==1 begin 
So sollts klappen
PHP Code:
when 30163.use with pc.is_gm() begin 
reicht vollkommen aus..
.Risan. is offline  
Thanks
1 User
Reply




All times are GMT +1. The time now is 01:34.


Powered by vBulletin®
Copyright ©2000 - 2025, 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 ©2025 elitepvpers All Rights Reserved.