[Help]Biologen.quest

lfcmaus · 02/01/2011, 01:45

Hallü ich komm mal wieder nicht weiter
ich hab momentan das ziel questes in den biomann rein zuhauen
so die erste klappt wunderbar das wäre die:

PHP Code:


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

    state information begin
        when letter begin
            local v = find_npc_by_vnum(20084)
            if v != 0 then
                target.vid("__TARGET__", v, "Quest")
            end
            send_letter("Ein Brief vom Professor")
        end

        when button or info begin
            say_title("Schriftrolleninhalt:")
            say("")
            say("Hallo ich bin Prof. Hattric,")
            say("ich bin Forscher für Planzen")
            say("und Tiere.Ich bin der Nachfolger")
            say("vom Biologen Chaegirab,der")
            say("bei seiner letzten Reise leider")
            say("in den Tod gestürzt ist.")
            wait()
            say("Da die Regierung")
            say("nun befürchtet das mir soetwas")
            say("auch zustoßen könnte.Muss ich mir")
            say("Helfer suchen,die für mich")
            say("Pflanzen und andere Sachen besorgen.")
            say("")
            say("Komm doch bitte zu mir,dann erkläre")
            say("Ich dir alles weitere.")
            say("")
            say("gez. Professor Hattric")
        end

        when __TARGET__.target.click or
            20084.chat."Ich habe Ein Brief von Dir!" begin
            target.delete("__TARGET__")
            say_title("Prof. Hattric:")
            ---                                                   l
            say("")
            say("Schön dich zusehen,also hast")
            say("Du meinen Brief bekommen.")
            say("")
            say("Das bedeutet euer Postamt leistet")
            say("gute Arbeit das wird meiner Familie")
            say("in der Heimat aber gefallen.")
            say("")
            wait()
            say("Als erste möchte Ich eure Pflanzenwelt")
            say("untersuchen,die übrigens sehr Fazinierend ist.")
            say("Ich habe auf den Weg hierher,zu meinem Lager.solch")
            say("einen komischen braunen Samen gefunden.")
            say("Laut Chaegirab's Aufzeichnungen ist es ein")
            say("Pfirsichsamen sein,besorg mir doch noch 10")
            say("weitere davon,damit ich Setzlinge")
            say("daraus ziehen kann.")
            wait()
            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("Auftrag von Prof. Hattric")

        end
        when button or info begin
            say_title("Sammle Pfirsichsamen")
            ---                                                   l
            say_title("Information:")
            say("Pfirsichsamen sind die Kerne von der Frucht")
            say("die Pfirsich genannt wird.Es gibt 2 Arten")
            say("von Pfirsichen,welche mit glatter Schale")
            say("und welche mit einer samtig weichen Schale.")
            say("")
            say_gold("Gedanken des Charakters:")
            say_white("Toll...woher weiß ich welcher Samen von")
            say("welcher Frucht ist!?Das fängt ja gut an...")
            wait()
            say_title("Prof. Hattric")
            say("Besorge mir bitte 10 mal")
            say_item_vnum(30020)
            say_reward("   Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
            say("")
        end

        when 71035.use begin --°g´bÃÄ¤ô
            if pc.getqf("drink_drug")==1 then
                say("")
                say("Bessere Droppchance!")
                say("")

                return
            end
            if pc.count_item(30020)==0 then
                say("")
                say("Du hast doch keinen Samen")
                say("Lauf los und besorg mir welche!")
                say("")
                return
            end
            item.remove()    
            pc.setqf("drink_drug",1)
        end


        when 101.kill begin
            if pc.count_item(30020)<10-pc.getqf("collect_count") then
                pc.give_item2(30020, 1)
            end
        end

        when 20084.chat."Wegen den Pfirsichsamen" with pc.count_item(30020) >0   begin
                say("Einen Moment!")
                ---                                                   l
                say("Ich werde den Samen")
                say("schnell mal überprüfen.")
                say("Hoffentlich ist er noch zu gebrauchen")
                say("")
                pc.remove_item(30020, 1)
                wait()

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

                local s= number(1,100)
            if s<= pass_percent  then
               if pc.getqf("collect_count")< 9 then     --5*Ó¥H¤U 
                        local index =pc.getqf("collect_count")+1 
                        pc.setqf("collect_count",index)     --¨ú±o¤@*Ó®É +1
                        say_title("Prof. Hattric:")
                        say("Perfekt!Der Samen ist in bester Qualität.")
                        say("Er wird sicher zu einem schönen Setzling.")
                        say("Jetzt fehlen ja nurnoch".." "..10-pc.getqf("collect_count").. " von den Samen.")
                        say("Bring mir bitte noch die Restlichen!")
                        say("")
                        pc.setqf("drink_drug",0)     --ÃÄ¤ôªì©l¤Æ
                        return
                    end
                    say_title("Prof. Hattric:")
                    say("Yuhu!Du hast es endlich geschafft")
                    say("und mir alle 10 Samen gebracht.")
                    say("Nun können sie Keimen und zu Setzlingen")
                    say("heranwachsen.Für deine Arbeit werde Ich")
                    say("dir Natürlich eine Kleinigkeit geben.")
                    say("")
                    say_reward("Du bekommst 1.000.000 Yang!")
                    say_reward("Außerdem erhälst du noch ein paar Tränke.")
                    pc.setqf("collect_count",0)
                    pc.setqf("drink_drug",0)
                    clear_letter()
                    set_state(__complete)


                    pc.give_item2(27003, 200)
                    pc.change_money(1000000)
                    set_quest_state("levelup","run")


                    return
                else                                
                say_title("Prof. Hattric:")
                say("Dieser Samen ist von schlechter Qualität!")
                say("Daraus kann kein Setzling wachsen,")
                say("besorge mir doch bitte einen anderen Samen.")
                say("")
                pc.setqf("drink_drug",0)     --ÃÄ¤ôªì©l¤Æ
                return
                end
    end
end


        
    state __complete begin
    end
end

die zweite wäre das die klappt nicht sieht einer den fehler?

PHP Code:


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

    state information begin
        when letter begin
            local v = find_npc_by_vnum(20084)
            if v != 0 then
                target.vid("__TARGET__", v, "Quest")
            end
            send_letter("Ein weiterer Brief vom Professor")
        end

        when button or info begin
            say_title("Schriftrolleninhalt:")
            say("")
            say("Hallo fleißiger Helfer,")
            say("ich bin es wieder der Professor.")
            say("Ich danke dir nochmal,das du mir letztens")
            say("bei den Pfirsichsamen geholfen hast.")
            say("Kannst du dich noch an die Samen erinnern?")
            say("Sie sind zu wunder schönen kleinen Bäumchen")
            say("herrangewachsen und haben vor kurzem erst geblüht")
            say("Es sah so Zauberhaft aus ich wünschte du hättest")
            say("gesehen.Nun ist es aber soweit das ich dich wieder")
            say("um deine Hilfe bitten muss.Komm doch einfach mal")
            say("bei mir vorbei.")
            say("")
            say("gez. Professor Hattric")
        end

        when __TARGET__.target.click or
            20084.chat."Da bin ich wieder" begin
            target.delete("__TARGET__")
            say_title("Prof. Hattric:")
            ---                                                   l
            say("")
            say_tilte("Prof. Hattric:")
            say("")
            say("Hallo mein neuer Freund,Ich freue mich sehr")
            say("dich wieder zusehen,wie Ich sehe hast du einige")
            say("Fortschritte in deiner Kampfkunst gemacht.")
            say("Dank deiner Hilfe bei den Samen,konnte Ich")
            say("die Aufzeichnungen von Chaegirab vervollständigen.")
            say("")
            say("Ich habe dir ja geschrieben das die Samen zu kleinen")
            say("Bäumen herrangewachsen sind,die vor einigen Tagen")
            say("geblüht haben.So schusselig wie man sein kann,habe")
            say("Ich vergessen die Töpfe ins Zelt zustellen.")
            wait()
            say("Nun sind die ganzen Blüten vom Wind verweht, nur gut")
            say("das Ich sie vorher schon bestäubt hatte.Die")
            say("wilden Tiere hier in der Umgebung haben die Blüten")
            say("durch den Nektar nun an Ihrem Fell kleben.Ich selber")
            say("habe keine Kampferfahrung und hoffe du kannst mir einige")
            say("Blüten für die Unterlagen zurückholen.")
            say("")
            say("Soweit ich sehen konnte ist das Fell der Blauwölfe")
            say("besonders mit Blüten bestückt.")
            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("Auftrag von Prof. Hattric")

        end
        when button or info begin
            say_title("Sammle Pfirsichblüten")
            ---                                                   l
            say_title("Information:")
            say("Pfirsichblüten sind leicht Rosafarbend.Wenn sie bestäubt werden,")
            say("können daraus Pfirsiche werden,diese sind ein beliebtes Obst")
            say("bei den Kindern von Alleria.")
            say("")
            say_gold("Gedanken des Charakters:")
            say_white("Ein ziemlichliches Schusselchen")
            say("dieser Biologe,dem werd Ich sicher noch öfters")
            say("helfen müssen...Naja solange es der forschung dient....")
            wait()
            say_title("Prof. Hattric")
            say("Besorge mir bitte 10 mal")
            say_item_vnum(50701)
            say_reward("   Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
            say("")
        end

        when 71035.use begin --°g´bÃÄ¤ô
            if pc.getqf("drink_drug")==1 then
                say("")
                say("Bessere Droppchance!")
                say("")

                return
            end
            if pc.count_item(50701)==0 then
                say("")
                say("Du hast doch keine Blüten")
                say("Lauf los und besorg mir welche!")
                say("")
                return
            end
            item.remove()    
            pc.setqf("drink_drug",1)
        end


        when 104.kill begin
            if pc.count_item(50701)<10-pc.getqf("collect_count") then
                pc.give_item2(50701, 1)
            end
        end

        when 20084.chat."Wegen den Pfirsichblüten" with pc.count_item(50701) >0   begin
                say("Einen Moment!")
                ---                                                   l
                say("Ich werde die Blüte")
                say("schnell mal überprüfen.")
                say("Hoffentlich ist sie nirgends eingerissen.")
                say("")
                pc.remove_item(50701, 1)
                wait()

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

                local s= number(1,100)
            if s<= pass_percent  then
               if pc.getqf("collect_count")< 9 then     --5*Ó¥H¤U 
                        local index =pc.getqf("collect_count")+1 
                        pc.setqf("collect_count",index)     --¨ú±o¤@*Ó®É +1
                        say_title("Prof. Hattric:")
                        say("Perfekt!Die Blüte ist in bester Qualität.")
                        say("Sie wird ein gutes Forschungsobjekt sein.")
                        say("Jetzt fehlen ja nurnoch".." "..10-pc.getqf("collect_count").. " von den Blüten.")
                        say("Bring mir bitte noch die Restlichen!")
                        say("")
                        pc.setqf("drink_drug",0)     --ÃÄ¤ôªì©l¤Æ
                        return
                    end
                    say_title("Prof. Hattric:")
                    say("Yuhu!Du hast es endlich geschafft")
                    say("und mir alle 10 Blüten gebracht.")
                    say("Nun kann ich sie genauer Erforschen.")
                    say("Ich gebe dir Natürlich wieder eine kleine Belohnung!")
                    say("")
                    say_reward("Ich gebe dir ein paar Falschen Pfirsichwein und")
                    say_reward("Pfirsichsaft,Ich habe ihn aus der Heimat mitgebracht!")
                    pc.setqf("collect_count",0)
                    pc.setqf("drink_drug",0)
                    clear_letter()
                    set_state(__complete)


                    pc.give_item2(70020, 200)
                    pc.give_item2(50801, 200)                    
                    pc.change_money(1000000)
                    set_quest_state("levelup","run")


                    return
                else                                
                say_title("Prof. Hattric:")
                say("Diese Blüte ist von schlechter Qualität!")
                say("Daraus kann Ich kein Forschungsobjekt machen,")
                say("besorge mir doch Bitte eine andere Blüte.")
                say("")
                pc.setqf("drink_drug",0)     --ÃÄ¤ôªì©l¤Æ
                return
                end
    end
end


        
    state __complete begin
    end
end