[SERVICE] Die Questkontrolle

Page 56 of 845

11/04/2010 17:23 TobiRockZzz#826

hal�le,
komme einfach nicht weiter...
Bin irgendwie voll am ende mit der quest:rtfm:

PHP Code:


			

quest new_2 begin
    state start begin
        when 40003.use begin
        
            say_title( "Gilden Boni verteilen" )
            say( "Hier kannst du einer Gilde verschiedene" )
            say("Bonis wie z.B. mehr EXP geben.")
            wait()
            say("")
            say("Gib den Gildennamen ein")

            local g_name = input()
            local g_id = __get_guildid_byname( g_name )
            if 0 == g_id then
            say("Du musst einen Namen eingeben!")
            return
            end

        -- ��ܤ��|type
        say_title( "Gilden Boni verteilen" )
        say("Current parameter:")
        say( __get_guild_priv_string( g_id ) )
        say("W�hle den zu verteilenden Boni")
        local t = select(locale.item_drop_pct, locale.gold_drop_pct, locale.exp_pct, "Abbrechen")
        if t == 4 then
            return
            end
        end

        if t == 1 then    
            local g = select ("1-Stunde und 75% h�here Droppchance", "2-Stunden und 50% h�here Droppchance", "3-Stunden und 25% h�here Droppchance", "Abbrechen")
            
            if g == 4 then
            return
            end
            
            if g == 1 then
            say("Die Gilde hat ihren Bonus erhalten")
            say("Sie erh�lt zus�tzlich:")
            say("75% h�here Droppchance von Items f�r eine Stunde!")
            __give_guild_priv(g_id, 1, 75, 1*60*60)
            pc.removeitem("40003", 1)
            return
            end 
        
            if g == 2 then
            say("Die Gilde hat ihren Bonus erhalten")
            say("Sie erh�lt zus�tzlich:")
            say("50% h�here Droppchance von Items f�r zwei Stunden!")
            __give_guild_priv(g_id, 1, 50, 2*60*60)
            pc.removeitem("40003", 1)
            return
            end 
            
            if g == 3 then
            say("Die Gilde hat ihren Bonus erhalten")
            say("Sie erh�lt zus�tzlich:")
            say("25% h�here Droppchance von Items f�r drei Stunden!")
            __give_guild_priv(g_id, 1, 25, 3*60*60)
            pc.removeitem("40003", 1)
            return
             end
        end
        
        if t == 2 then    
            local g = select ("1-Stunde und 75% mehr Yang", "2-Stunden und 50% mehr Yang", "3-Stunden und 25% mehr Yang", "Abbrechen")
            
            if g == 4 then
            return
            end
            
            if g == 1 then
            say("Die Gilde hat ihren Bonus erhalten")
            say("Sie erh�lt zus�tzlich:")
            say("75% mehr Yang f�r eine Stunde!")
            __give_guild_priv(g_id, 2, 75, 1*60*60)
            pc.removeitem("40003", 1)
            return
            end 
        
            if g == 2 then
            say("Die Gilde hat ihren Bonus erhalten")
            say("Sie erh�lt zus�tzlich:")
            say("50% mehr Yang f�r zwei Stunden!")
            __give_guild_priv(g_id, 2, 50, 2*60*60)
            pc.removeitem("40003", 1)
            return
            end 
            
            if g == 3 then
            say("Die Gilde hat ihren Bonus erhalten")
            say("Sie erh�lt zus�tzlich:")
            say("25% mehr Yang f�r drei Stunden!")
            __give_guild_priv(g_id, 2, 25, 3*60*60)
            pc.removeitem("40003", 1)
            return
            end
        end
        
        if t == 3 then    
            local g = select ("1-Stunde und 75% mehr EXP", "2-Stunden und 50% mehr EXP", "3-Stunden und 25% mehr EXP", "Abbrechen")
            
            if g == 4 then
            return
            end
            
            if g == 1 then
            say("Die Gilde hat ihren Bonus erhalten")
            say("Sie erh�lt zus�tzlich:")
            say("75% mehr EXP f�r eine Stunde!")
            __give_guild_priv(g_id, 3, 75, 1*60*60)
            pc.removeitem("40003", 1)
            return
            end 
        
            if g == 2 then
            say("Die Gilde hat ihren Bonus erhalten")
            say("Sie erh�lt zus�tzlich:")
            say("50% mehr EXP f�r zwei Stunden!")
            __give_guild_priv(g_id, 3, 50, 2*60*60)
            pc.removeitem("40003", 1)
            return
            end 
            
            if g == 3 then
            say("Die Gilde hat ihren Bonus erhalten")
            say("Sie erh�lt zus�tzlich:")
            say("25% mehr EXP f�r drei Stunde!")
            __give_guild_priv(g_id, 3, 25, 3*60*60)
            pc.removeitem("40003", 1)
            return
            end
        end
        
    end
    
end

11/04/2010 18:37 'Freddy#827

Leute bitte die quests in [php] Quest [/php ] schreiben

11/05/2010 20:26 CoreDump#828

Ich hab bei dem Thread einmal �rger bekommen weil einer in einer quest von einem idioten nur "hurensohn" aberall drin stand, darum wird das jetzt mein letzter beitrag hier als kontroll�r.
ich hab es schon tausend mal gesagt, aber es liest einfach keiner etwas.
die h�ufigsten fehler die mir auffallen sind die killquests.
und ich sehe alle fehler bei deiner quest Kai78939.
aber es bringt sowiso nix hier zu helfen. hier gibts nix ausser spam.

ich h�re auf in dem thread weil ich keinen nutzen daraus ziehe.
meine quests funktionieren, darum tu ich mir den ganzen spam hier nicht an.

Das wars f�r mich.

11/06/2010 19:36 Drache1234#829

Hab mal ein prob^^

Habe diese Quest hier aus einen Thema halt kopiert und bei mir eingef�gt

PHP Code:


			
quest Toete_Schmied begin

state start begin

when 20016.chat."Stirb!!!" begin

            say("Schmied:")

            say("")

            say("Du willst mich also toeten?")

            say("deswegen kann ich f�r euch Gegenst�nde herstellen.")

            local a = select("Stirb!!!","Verschonen!")

if a == 2 then

return

end

if a == 1 then

npc.kill(20016)

end

end

:

Habe diese Quest auch in Hongkonglist gesetzt^^

Dann in VPC

cd /usr/rain/channel/share_data/locale/hongkong/quest
chmod u+x make.sh
sh make.sh

Und dann kommt das:

[Only registered and activated users can see links. Click Here To Register...]

Hilfe bitte^^

PS: Die quest Datei hei�t Toete_Schmied.quest

11/06/2010 20:15 .Nguyen#830

In Zeile 17 der Quest ist ein Fehler glaub ich.
Bzw da du nur eine if-abfrage hast fehlt das else

11/06/2010 20:25 Drache1234#831

Also so:

PHP Code:


			
quest Toete_Schmied begin

state start begin

when 20016.chat."Stirb!!!" begin

            say("Schmied")

            say("")

            say("Du willst mich also toeten?")

            say("deswegen kann ich f�r euch Gegenst�nde herstellen.")

            local a = select("Stirb!!!","Verschonen!")

if a == 2 then

return

end

elseif a == 1 then

npc.kill(20016)

end

end

11/06/2010 21:10 'Freddy#832

genau so und in hongkonglist halt machen

11/06/2010 21:18 Drache1234#833

Geht nicht :S

[Only registered and activated users can see links. Click Here To Register...]

11/06/2010 21:19 .Delta#834

also ich w�rd sagen du hast 1 oder 2 "end" zu wenig untendran

sry wenns falsch is^^

11/06/2010 21:22 Drache1234#835

Hab schon probier^^

Einmal mit 2 einmal mit 3 und einmal mit 4 ends <.< auch mit 1^^

11/06/2010 21:32 CoreDump#836

hab den fehler

PHP Code:


			
quest Toete_Schmied begin

state start begin

when 20016.chat."Stirb!!!" begin

            say("Schmied")

            say("")

            say("Du willst mich also toeten?")

            say("deswegen kann ich f�r euch Gegenst�nde herstellen.")

            local a = select("Stirb!!!","Verschonen!")

if a == 1 then

   npc.kill(20016)

else

   return

end

end

end

end

gib das end am schluss f�r if

11/06/2010 21:33 .Delta#837

PHP Code:


			
quest Toete_Schmied begin
state start begin
when 20016.chat."Stirb!!!" begin
            say_title("Schmied")
            say("")
            say("Du willst mich also toeten?")
            say("deswegen kann ich f�r euch Gegenst�nde herstellen.")
            local a = select("Stirb!!!","Verschonen!")
            if a == 1 then
            npc.kill(20016)
            elseif a == 2 then
                return
            end
            end
end
end

so funkts bei mir

€CoreDump war schneller :D

11/06/2010 21:37 Drache1234#838

Danke werds testen wenn mein Versuch jetzt nicht klappt^^

Hiermit gings jetzt :S

PHP Code:


			
quest Toete_Schmied begin
    state start begin
        when 20016.chat."Stirb!!!" begin
                say_title("Schmied")
                say("Pah du willst mich t�ten?")
                say("Ich fass es nicht! Ich habe soviel f�r dich getan...")
                local s = select("Killen","Verschonen")
            if s == 2 then
            return
            end
            if s == 1 then
            npc.kill(20016)
            end
        end
    end
end

11/07/2010 12:01 Eliminator8391#839

muss man das eig so verschieben? oder ist das egal?

11/07/2010 12:23 .ŋight#840

PHP Code:


			
quest level100 begin

      state start begin

      when levelup with pc.get_level() = 100 begin

      notice_all(""..pc.get_name().." hat Level 100 erreicht!")

      notice_all("Herzlichen Gluekwunsch!")

      end

   end

end

Page 56 of 845