[SERVICE] Die Questkontrolle

Page 11 of 845 « First 910 11 12132161111511 Last »
08/20/2010 13:39 .Hass#151
hiho

also hab hier ne quest die etwas buggy is

also manchmal zählt er die kills runter und manchmal nicht

hab jetzt schon 2 tage an der rumbgebastelt aber wird nicht besser

kann mir da vielleicht jemand weiter helfen? naja hier mal die quest
PHP Code:
quest bosse begin
    state start begin
        when login begin
            set_state(information)
        end
    end

    state information begin
        when letter begin
            send_letter("Verteidigung der Dörfer!")
        end

        when info or button begin
        say_title("Verteidigung der Dörfer!")
        say("Hallo!")
        say("Die monster greifen die Dörfer")
        say("an.Kannst du uns helfen?")
        say("Wir nehmen jede hilfe die wir bekommen an.")
        wait()
        say("Ich werde dich auch gut belohnen wen du uns hilfst!")
        say("Kannst du uns helfen?")
        local s = select("Ja","Nein..hab angst")
        if s == 2 then
                    say("Hmm schade")
                    clear_letter()
                    set_state (aufgeben)
        else
            say("Okay los gehts!")
            say_reward("Töte 100 x Wildhunde")
            say_reward("Töte 50 x Wüstenfüchse")
            say_reward("Töte 25 x Blauwolf")
            say_reward("Töte 15 x Keiler")
            say_reward("Töte 2 x Metin der Schlacht")
            say_reward("Töte 2 x Metin der Gier")
            say_reward("Töte 2 x Metin der Schwärze")
            say_reward("Töte 2 x Metin der Dunkelheit")
            say_reward("Töte 2 x Metin der Eifersucht")
            pc.setqf("state1", 0)
            q.set_counter("Wildhunde", 100)
            pc.setqf("state2", 0)
            q.set_counter("Wüstenfüchse", 50)
            pc.setqf("state3", 0)
            q.set_counter("Blauwolf", 25)
            pc.setqf("state4", 0)
            q.set_counter("Keiler", 15)
            pc.setqf("state5", 0)
            q.set_counter("Metin der Schlacht", 2)
            pc.setqf("state6", 0)
            q.set_counter("Metin der Gier", 2)
            pc.setqf("state7", 0)
            q.set_counter("Metin der Schwärze", 2)
            pc.setqf("state8", 0)
            q.set_counter("Metin der Dunkelheit", 2)
            pc.setqf("state9", 0)
            q.set_counter("Metin der Eifersucht", 2)
            set_state(kill)
            end
        end
    end
    
    state kill begin
        when letter begin
            send_letter("Verteidigung der Dörfer")
        end
    
        when info or button begin
            say_title("Verteidigung der Dörfer")
            say("Staus:")
            say_reward("Du hast schon "..pc.getqf("state1").." von 100 x Wildhunde getötet")
            say_reward("Du hast schon "..pc.getqf("state2").." von 50 x Wüstenfüchse getötet")
            say_reward("Du hast schon "..pc.getqf("state3").." von 25 x Blauwolf getötet")
            say_reward("Du hast schon "..pc.getqf("state4").." von 15 x Keiler getötet")
            say_reward("Du hast schon "..pc.getqf("state5").." von 2 x Metin der Schlacht")
            say_reward("Du hast schon "..pc.getqf("state6").." von 2 x Metin der Gier")
            say_reward("Du hast schon "..pc.getqf("state7").." von 2 x Metin der Schwärze")
            say_reward("Du hast schon "..pc.getqf("state8").." von 2 x Metin der Dunkelheit")
            say_reward("Du hast schon "..pc.getqf("state9").." von 2 x Metin der Eifersucht")
        end
        
        when 101.kill begin
            local count1 = pc.getqf("state1") + 1
            if count1 <= 100 then
                pc.setqf("state1", count1)
                q.set_counter("Wildhunde", 100 - count1)
            end
            if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= 2 and pc.getqf("state6") >= 2 and pc.getqf("state7") >= 2 and pc.getqf("state8") >= 2 and pc.getqf("state9") >= 2 then
                    set_state(fertig)
            end
        end
        
        when 2101.kill begin
            local count2 = pc.getqf("state2") + 1
            if count2 <= 50 then
                pc.setqf("state2", count2)
                q.set_counter("Wüstenfuchs", 50 - count2)
            end
            if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= 2 and pc.getqf("state6") >= 2 and pc.getqf("state7") >= 2 and pc.getqf("state8") >= 2 and pc.getqf("state9") >= 2 then
                    set_state(fertig)
            end
        end
        
        when 104.kill begin
            local count3 = pc.getqf("state3") + 1
            if count3 <= 25 then
                pc.setqf("state3", count3)
                q.set_counter("Blauwolf", 25 - count3)
            end
            if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= 2 and pc.getqf("state6") >= 2 and pc.getqf("state7") >= 2 and pc.getqf("state8") >= 2 and pc.getqf("state9") >= 2 then
                    set_state(fertig)
            end
        end
        
        when 108.kill begin
            local count4 = pc.getqf("state4") + 1
            if count4 <= 15 then
                pc.setqf("state4", count4)
                q.set_counter("Keiler", 15 - count4)
            end
            if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= 2 and pc.getqf("state6") >= 2 and pc.getqf("state7") >= 2 and pc.getqf("state8") >= 2 and pc.getqf("state9") >= 2 then
                    set_state(fertig)
            end
        end

        when 8003.kill begin
            local count5 = pc.getqf("state5") + 1
            if count5 <= 2 then
                pc.setqf("state5", count5)
                q.set_counter("Metin der Schlacht", 2 - count5)
            end
            if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= 2 and pc.getqf("state6") >= 2 and pc.getqf("state7") >= 2 and pc.getqf("state8") >= 2 and pc.getqf("state9") >= 2 then
                    set_state(fertig)
            end
        end
        
        when 8004.kill begin
            local count6 = pc.getqf("state6") + 1
            if count6 <= 2 then
                pc.setqf("state6", count6)
                q.set_counter("Metin der Gier", 2 - count6)
            end
            if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= 2 and pc.getqf("state6") >= 2 and pc.getqf("state7") >= 2 and pc.getqf("state8") >= 2 and pc.getqf("state9") >= 2 then
                    set_state(fertig)
            end
        end
        
        when 8005.kill begin
            local count7 = pc.getqf("state7") + 1
            if count7 <= 2 then
                pc.setqf("state7", count7)
                q.set_counter("Metin der Schwärze", 2 - count7)
            end
            if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= 2 and pc.getqf("state6") >= 2 and pc.getqf("state7") >= 2 and pc.getqf("state8") >= 2 and pc.getqf("state9") >= 2 then
                    set_state(fertig)
            end
        end
        
        when 8006.kill begin
            local count8 = pc.getqf("state8") + 1
            if count8 <= 2 then
                pc.setqf("state8", count8)
                q.set_counter("Metin der Dunkelheit", 2 - count8)
            end
            if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= 2 and pc.getqf("state6") >= 2 and pc.getqf("state7") >= 2 and pc.getqf("state8") >= 2 and pc.getqf("state9") >= 2 then
                    set_state(fertig)
            end
        end
        
        when 8007.kill begin
            local count9 = pc.getqf("state9") + 1
            if count9 <= 2 then
                pc.setqf("state9", count9)
                q.set_counter("Metin der Eifersucht", 2 - count9)
            end
            if pc.getqf("state1") >= 100 and pc.getqf("state2") >= 50 and pc.getqf("state3") >= 25 and pc.getqf("state4") >= 15 and pc.getqf("state5") >= 2 and pc.getqf("state6") >= 2 and pc.getqf("state7") >= 2 and pc.getqf("state8") >= 2 and pc.getqf("state9") >= 2 then
            set_state(fertig)
            end
        end
    end
            
    state fertig begin
        when letter begin
            send_letter("Aufgabe abgeschlossen!")
        end
        
        when info or button begin
            say_title("Aufgabe abgeschlossen!")
            say("Du hast es geschaft")
            say("Ich dachte schon du schafst es nicht")
            say("Du hast die Reiche Beschützt.")
            wait()
            say("Natürlich willst du deine Belohnung oder?")
            local s=select("Aufjedenfall","Nein behalt sie")
            if s== 2 then
                clear_letter()
                set_state(aufgeben)
            else
                say_reward("10.000.000 Yang")
                say_reward("1 x Fünfeckschild+9")
                say_reward("1 x Silerarmband+9")
                say_reward("Stein gegen Krieger +3")
                say_reward("Stein gegen Ninja +3")
                say_reward("Stein gegen Sura +3")
                say_reward("Stein gegen Schamanen +3")
                pc.change_money(10000000)
                pc.give_item2(13029, 1)
                pc.give_item2(14049, 1)
                pc.give_item2(28333, 1)
                pc.give_item2(28334, 1)
                pc.give_item2(28335, 1)
                pc.give_item2(28336, 1)
                clear_letter()
                set_state(ende)
            end
        end
    end

    state aufgeben begin
    end
    
    state ende begin
    end
end 
schaut einfachmal ob ihr dann nen fehler findet =)
08/20/2010 21:06 PainFire24#152
quest horse_guard begin
state start begin
when 20349.chat."Pferd steigern" begin
say_title("Stallbursche:")
say("")
say("Hallo!")
say("Bei mir kannst du dein Pferd steigern.")
say("Das Pferd zu steigern kostet dich 1kk pro Level.")
say("")
say_reward("Möchtest du dein Pferd steigern?")
say("")

local s = select("Ja", "Nein")

if s == 1 then
say_title("Stallbursche:")
say("")
if pc.money>=1000000 then
pc.changemoney("-1000000")
horse.unride()
horse.advance()
horse.ride()
say("Dein Pferd hat nun Level "..(horse.get_level()).." erreicht.")
say("")
elseif horse.get_level()>=30 then
say("Dein Pferd hat Level 30 erreicht.")
say("Du kannst es nicht mehr steigern.")
say("")
elseif pc.money<1000000 then
say("Du hast nicht genug Yang um dein Pferd zu steigern.")
say("")
end
elseif s == 2 then
return
end
end
when 20349.chat."Reitshop" begin
npc.open_shop( 12 )
say("Hier findest du alle Items für ein Pferd.")
end
when 20349.chat."Information" begin
local s=number(1, 7)
if 1>=s then -- 14.29% (1/7)
say("Füttere dein Pferd")
say("regelmässig sonst")
say("stirbt es.")
elseif 2>=s then -- 14.29% (1/7)
say("Das Anfängerpferd")
say("ist sehr schnell erschöpft.")
say("Bleibe nicht auf seinem Rücken stehen.")
elseif 3>=s then -- 14.29% (1/7)
say("Um dein Pferd zu verbessern")
say("benötigst du 1kk Yang.")
say("Bringe das Yang zu mir")
say("und ich werde dein Pferd steigern.")
elseif 4>=s then -- 14.29% (1/7)
say("Wenn dein Pferd gestorben")
say("ist gibt es mehrere")
say("Kräuter von den")
say("Affenkönigen um")
say("sie Wiederzubeleben.")
elseif 5>=s then -- 14.29% (1/7)
say("Es gibt 9 verschiedene")
say("Pferde Aussehen.")
say("Ohne Gilde, mit Gilde und als Leader.")
elseif 6>=s then -- 14.29% (1/7)
say("Das Anfängerpferd")
say("isst gerne Heu.")
say("Das Kampfpferd")
say("isst gerne Karotten.")
say("Das Militärpferd")
say("isst gerne Roten Ginseng.")
elseif 7>=s then -- 14.29% (1/7)
say("Lese Handbuch Pferde Zähmen")
say("um dein Pferd schneller zu rufen.")
end
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end


Ps: is leider bissle verschoben sry
hab des eingefügt als quest datei hochgeladne aber geht irgendwie nich
08/20/2010 23:06 havmonster#153
hier der shop öffnet sich nicht ;(
PHP Code:
quest potshop begin
state start begin
when 30201.use begin 
say("Mit diesem Item kannst du dir Tränke")
say("kaufen ohne das du zur Gemi laufen musst")
say("")
say("Hier kannst du blaue und Rote Tränke kaufen")
say("")
say_reward("Was willst du tun?")
local main_set = select("PotsKaufen","Abbrechen")
if main_set == 2 then
return
end
if main_set == 1 then
npc.open_shop(87) 
end
end
end
end 
08/21/2010 00:01 Androx«#154
bitte löschen
08/21/2010 11:35 havmonster#155
Quote:
Originally Posted by Androx« View Post
bitte löschen
?
08/21/2010 13:21 Ep!cFail#156
Quote:
Originally Posted by havmonster View Post
hier der shop öffnet sich nicht ;(
PHP Code:
quest potshop begin
state start begin
when 30201.use begin 
say("Mit diesem Item kannst du dir Tränke")
say("kaufen ohne das du zur Gemi laufen musst")
say("")
say("Hier kannst du blaue und Rote Tränke kaufen")
say("")
say_reward("Was willst du tun?")
local main_set = select("PotsKaufen","Abbrechen")
if main_set == 2 then
return
end
if main_set == 1 then
npc.open_shop(87) 
end
end
end
end 

Probier mal die hier:


Greetins
08/21/2010 14:00 havmonster#157
Quote:
Originally Posted by Ep!cFail View Post
Probier mal die hier:


Greetins
geht net es kommt sogar Core dumped -.-^^
08/21/2010 14:06 1337SBird#158
Okay, ich habe mich auch mal am Quest schreiben versucht, mein erster Versuch wäre folgender, es werden bei make.sh auch keine Fehler angezeigt, aber es passiert nichts(weder unter lvl 50 noch über lvl 50):

PHP Code:
quest item_Horn_des_dunklen_Fürsten begin
    state start begin
    when 70044.use begin
        if pc.getlevel() < 50
        say_title("Horn des dunklen F\195\188rsten")
        say("Du hast nich das benötigte Level")
        say("Du musst Level 50 sein!")
        say("")
        return;
        else
        pc.warp(38300,64000)
        end
    end
    end
end 
Hilfe wäre nett :)

lg
08/21/2010 14:13 havmonster#159
Quote:
Originally Posted by 1337SBird View Post
Okay, ich habe mich auch mal am Quest schreiben versucht, mein erster Versuch wäre folgender, es werden bei make.sh auch keine Fehler angezeigt, aber es passiert nichts(weder unter lvl 50 noch über lvl 50):

PHP Code:
quest item_Horn_des_dunklen_Fürsten begin
    state start begin
    when 70044.use begin
        if pc.getlevel() < 50
        say_title("Horn des dunklen F\195\188rsten")
        say("Du hast nich das benötigte Level")
        say("Du musst Level 50 sein!")
        say("")
        return;
        else
        pc.warp(38300,64000)
        end
    end
    end
end 
Hilfe wäre nett :)

lg
Du musst in der DB den Typ auf 18 machen
08/21/2010 14:27 1337SBird#160
Quote:
Originally Posted by havmonster View Post
Du musst in der DB den Typ auf 18 machen
Mhm thx schonmal aber welche Table wäre das? In Item_Proto habe ich die vnum nicht gefunden...

lg
08/21/2010 15:30 PangerLenis#161
hey, dieses mal hab ich ein problem :D
Code:
quest gm_status begin
    state start begin
        when 20092.chat."GM Online Status" begin
            say_title("GM Status")
            say("Name                                     Status")
            say("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~")
            if game.get_event_flag("[SGA]Metal")== 1 then
                say_reward("[SGA]Metal                               online")
            else
                say("SA 6                            offline")
            end
            if game.get_event_flag("[SGA]Shadow")== 1 then
                say_reward("[SGA]Shadow                                online")
            else
                say("[SGA]Shadow                       offline")
            end
            if game.get_event_flag("[SGA]Dark")== 1 then
                say_reward("[SGA]Dark                                online")
            else
                say("[SGA]Dark                                offline")
            end
            if game.get_event_flag("[SGA]Sexshop")== 1 then
                say_reward("[SGA]Sexshop                                online")
            else
                say("[SGA]Sexshop                               offline")
            end
            if game.get_event_flag("[GA]Nadjax3")== 1 then
                say_reward("[GA]Nadjax3                            online")
            else
                say("[GA]Nadjax3                           offline")
            end
            if game.get_event_flag("[GA]PosYdoZ")== 1 then
                say_reward("[GA]PosYdoZ                    online")
            else
                say("[GA]PosYdoZ                     offline")
            end
			if game.get_event_flag("[GA]CaLyPsE")== 1 then
                say_reward("[GA]CaLyPsE                    online")
            else
                say("[GA]CaLyPsE                    offline")
            end
			if game.get_event_flag("[TGM]Touch")== 1 then
                say_reward("[TGM]Touch                    online")
            else
                say("[TGM]Touch                    offline")
            end
			if game.get_event_flag("[GM]Slayer")== 1 then
                say_reward("[GM]Slayer                    online")
            else
                say("[GM]Slayer                    offline")
            end
        end
    end
end
wy geht das ned?
folgendes wird dann angezeigt:
[Only registered and activated users can see links. Click Here To Register...]
(ich war mit [SGA]Shadow eingeloggt!)
08/21/2010 23:45 Ep!cFail#162
Quote:
Originally Posted by havmonster View Post
geht net es kommt sogar Core dumped -.-^^
Das war mein Fehler bin seit 40 Stunden dauert wach... Kaffe hilft langsam auch nicht mehr hier die richtige hab ausversehen nen "if" drangehängt...




Quote:
Originally Posted by PangerLenis View Post
hey, dieses mal hab ich ein problem :D
wy geht das ned?
folgendes wird dann angezeigt:
[Only registered and activated users can see links. Click Here To Register...]
(ich war mit [SGA]Shadow eingeloggt!)

Wenn man schon eine Quest übernimmt sollte man den kompletten Post des User's lesen..

Quote:
Originally Posted by sennah View Post
Special note:
You have to include the following quest data with an item or npc to change the gm status.
change into online:
PHP Code:
                local name = pc.get_name()
                game.set_event_flag(name, 1)
                setskin(NOWINDOW) 
change into offline:
PHP Code:
                local name = pc.get_name()
                game.set_event_flag(name, 0)
                setskin(NOWINDOW) 
Greetings
08/22/2010 02:40 xIvan4ikx#163
PHP Code:
quest shops_open begin
    state start begin
        when 30204.use begin
            say("Welchen Shop öffnen?")
            local s=select("Gemi", "Waffenhändler", "Rüstungshändler", "Abbrechen")
            if s==1 then
                npc.open_shop(3)
            elseif s==2 then
                npc.open_shop(4)
            elseif s==3 then
                npc.open_shop(1)
            elseif s==4 then
                --
            end
        end
    end
end 
Bei der Quest lassen sich die Shops nicht öffnen..
08/22/2010 03:15 .Hazel#164
Kenne mich nicht so gut aus, aber muss es nicht so heißen?

PHP Code:
quest shops_open begin
    state start begin
        when 30204.use begin
            say("Welchen Shop öffnen?")
            local s=select("Gemi", "Waffenhändler", "Rüstungshändler", "Abbrechen")
            if s==1 then
                npc.open_shop(9003)
            elseif s==2 then
                npc.open_shop(9001)
            elseif s==3 then
                npc.open_shop(9002)
            elseif s==4 then
                --
            end
        end
    end
end 
So dürfte es gehen, wenn ich mich nicht vertue.

Best regards,

.Hazel
08/22/2010 11:00 xIvan4ikx#165
Quote:
Originally Posted by .Hazel View Post
Kenne mich nicht so gut aus, aber muss es nicht so heißen?

PHP Code:
quest shops_open begin
    state start begin
        when 30204.use begin
            say("Welchen Shop öffnen?")
            local s=select("Gemi", "Waffenhändler", "Rüstungshändler", "Abbrechen")
            if s==1 then
                npc.open_shop(9003)<---
            elseif s==2 then
                npc.open_shop(9001)<---
            elseif s==3 then
                npc.open_shop(9002)<---
            elseif s==4 then
                --
            end
        end
    end
end 
So dürfte es gehen, wenn ich mich nicht vertue.

Best regards,

.Hazel
Da kommen die Npc Shop IDs hin nicht die Values von den Npcs..
Page 11 of 845 « First 910 11 12132161111511 Last »