[SERVICE] Die Questkontrolle

Page 333 of 845

333

03/05/2012 11:17 FunkYFriDy#4981

Es kommt keine Fehlermeldung,
jedoch wird die Questrolle f�r die Quest
ingame nicht angezeigt.

Wo ist der Fehler?
- �ber eine Antwort w�rde ich mich sehr freuen :)

Spoiler

PHP Code:


			
quest collect_lv50_test begin
        state start begin
            when login or levelup with pc.level >= 50  begin
                set_state(info)
            end
        end
        state info begin
            when letter begin
                send_letter("Die Untersuchung des Biologen 5")
                local v = find_npc_by_vnum(20084)
                if v != 0 then
                    target.vid("__TARGET__", v, "Biologe")
                end
            end
            when info or button begin
                say_title("Finde den Biologe!")
                say("")
                say("Der Biologe l�sst nach dir suchen.")
                say("Gehe zu ihm und schau was du f�r ihn tun kannst.")
            end
            when __TARGET__.target.click or 20084.chat."Schmuckst�cke" with pc.level >= 50 begin
                say_title("Biologe:")
                say("")
                say("Gut, dass du da bist!")
                say("Ich sammel jedes erdenklich gutaussehendes")
                say("Schmuckst�ck. Es gibt daher tonnenweise Arbeit, die")
                say("erledigt werden muss - und ich habe nicht die")
                say("n�tige Zeit, um auf Exkursionen zu gehen.")
                say("W�rdest du mir behilflich sein?")
                wait()
                say_title("Biologe:")
                say("")
                say("Ich sammel gerade Schmuckst�cke.")
                say("Ich muss Experimente durchf�hren und")
                say("ben�tige deshalb einige Exemplare.")
                say("K�nntest du mir diese besorgen?")
                say("30x Schmuckst�ck sollte ausreichen.")
                say("�ber deine Hilfe w�re ich sehr dankbar!")
                say("")                                                                                                                                                          
                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("Spezialaufgabe! Sammle Schmuckst�cke")
            end
            when info or button begin
                say_title("Sammle Schmuckst�cke")
                say("")
                say("Biologe Chaegirab, der Lehrling Uriels,")
                say("ist auf der Suche nach Schmuckst�cken.")
                say("Bring ihm stets nur eine f�r seine Experimente.")
                say("")
                say_reward("Bisher hast du".." "..pc.getqf("collect_count").."Schmuckst�cke gesammelt.")
                say("")
            end

            when 71035.use begin
                if pc.getqf("drink_drug") == 1 then
                    say_title("Biologe:")
                    say("")
                    say("Oh! Dieses Exemplar ist von bester Qualit�t!")
                    say("")
                    return
                end
                if pc.count_item(30031) == 0 then
                    say_title(Biologe:")
                    say("")
                    say("Du besitzt keine Schmuckst�cke ...")
                    say("Hierf�r musst du welche farmen gehen.")
                    say("")
                    return
                end
                item.remove()    
                pc.setqf("drink_drug",1)
            end


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

            when 20084.chat."Schmuckst�cke" with pc.count_item(30031) >0 begin
                    say_title("Biologe")
                    say("")
                    say("Oh! Du hast eins!")
                    say("Lass es mich ansehen...")
                    say("Einen Moment nur.")
                    say("")
                    pc.remove_item(30031, 1)
                    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 s<= pass_percent then
                       if pc.getqf("collect_count") <29 then
                            local index =pc.getqf("collect_count") +1 
                            pc.setqf("collect_count",index)
                            say_title("Biologe:")
                            say("")
                            say("Oh! Dieses Exemplar ist von bester Qualit�t!")
                            say("Allerdings ben�tige ich noch "..30 - pc.getqf("collect_count").. " weitere")
                            say("Schmuckst�cke.")
                            say("Bitte versuche, welche zu finden!")
                            say("")
                            pc.setqf("drink_drug",0)
                            return
                        end
                        say_title("Biologe:")
                        say("")
                        say("Du hast sie alle gesammelt?")
                        say("Ich kann es noch garnicht glauben ...")
                        say("Einen Moment, ich verarbeite sie noch eben schnell.")
                        wait()
                        say_title("Biologe:")
                        say("...")
                        say("")
                        wait()
                        say_title("Biologe:")
                        say("...")
                        say("......")
                        say("")
                        wait()
                        say_title("Biologe:")
                        say("...")
                        say("......")
                        say(".........")
                        say("")
                        wait()
                        say_title("Biologe:")
                        say("...")
                        say("......")
                        say(".........")
                        say("............")
                        say("")
                        wait()
                        say_title("Biologe:")
                        say("...")
                        say("......")
                        say(".........")
                        say("............")
                        say("...............")
                        say("")
                        wait()
                        say_title("Biologe:")
                        say("...")
                        say("......")
                        say(".........")
                        say("............")
                        say("...............")
                        say("..................")
                        say("")
                        say_title("Biologe:")
                        say("...")
                        say("......")
                        say(".........")
                        say("............")
                        say("...............")
                        say("..................")
                        say(".....................")
                        say("")
                        say_title("Biologe:")
                        say("...")
                        say("......")
                        say(".........")
                        say("............")
                        say("...............")
                        say("..................")
                        say(".....................")
                        say("........................")
                        say("")
                        say_title("Biologe:")
                        say("...")
                        say("......")
                        say(".........")
                        say("............")
                        say("...............")
                        say("..................")
                        say(".....................")
                        say("........................")
                        say("...........................")
                        say("")
                        say_title("Biologe:")
                        say("...")
                        say("......")
                        say(".........")
                        say("............")
                        say("...............")
                        say("..................")
                        say(".....................")
                        say("........................")
                        say("...........................")
                        say("..............................")
                        say("")
                        wait()
                        say_title("Biologe:")
                        say("")
                        say("Puuh, was f�r eine Arbeit ...")
                        say("Ich bin jetzt aber endlich fertig ...")
                        say("")
                        wait()
                        say_title("Biologe:")
                        say("")
                        say("Hier ist deine Belohnung!")
                        say("Du hast sie dir wirklich verdient.")
                        say("")
                        wait()
                        say_title("Belohnung:")
                        say("")
                        say_reward("- 10% gegen jedes Monster.")
                        pc.setqf("collect_count",0)
                        pc.setqf("drink_drug",0)
                        clear_letter()
                        set_state(__COMPLETE__)
                        affect.add_collect(apply.ATT_BONUS_TO_MONSTER,10,60*60*24*365*60)
                        return
                    else                                
                    say_title("Biologe:")
                    say("")
                    say("PAAH! Das nennst du Schmuck?")
                    say("Bitte hol mir ein neues Exemplar!")
                    say("")
                    pc.setqf("drink_drug",0)
                    return
                    end
                end
            end
        end
        state __COMPLETE__ begin
        end
    end
end

03/05/2012 12:53 euter531994#4982

PHP Code:


			
quest horse_upgrade2 begin

    state start begin

        when 20349.chat."Milit�rgaul" with horse.get_grade()==2 and horse.get_level()==11 begin

            if horse.is_dead() then

                say_title("Milit�rgaul")

                say("")

                say("Du bist nun ein guter Kampfreiter,")

                say("nur leider ist dein Pferd gestorben!")

                say("")

                say_reward("Belebe es erst wieder!")

                say("")

            elseif pc.level<=49 then

                say_title("Milit�rgaul")

                say("")

                say("Du bist nun ein guter Kampfreiter,")

                say("nur leider ist dein Level zu niedrig!")

                say("")

                say_reward("Komm wieder wenn du das level 50 erreicht hast")

                say("")

            elseif horse.get_level()<=10 then

                say_title("Milit�rgaul")

                say("")

                say("Du bist nun ein guter Krieger,")

                say("nur leider ist dein Pferd zu schwach!")

                say("")

                say_reward("Komm wieder wenn dein Pferd level 11 erreicht hat!")

                say("")

            elseif pc.countitem("80008")<1 

                say_title("Milit�rgaul")

                say("")

                say("Du willst ein Milit�rgaul von mir?")

                say("Ich kann dir eines von meinen geben, nur")

                say("das kann ich dir nicht schenken! Da du")

                say("mir schon die Schatzkarte besorgt hast,")

                say("ben�tige ich noch einen Goldklumpen")

                say("um den Kapit�n f�r mein Schiff zu bezahlen")

                            say("")

                say_reward("Geh und besorge mir den Goldklumpen")

                say_reward("damit ich den Schatz finden kann:")

                say_reward("Goldklumpen!")

                say("")

                setstate(need_item_Goldklumpen)

            elseif pc.countitem("50052")<1 then

                say_title("Milit�rgaul")

                say("")

                say("Du willst ein Kampfpferd von mir?")

                say("Ich brauche dazu auch ein Waffenpferdebild!")

                say("")

                say_reward("Geh und besorge mir ein Waffenpferdebild!")

                say("")

            elseif horse.get_level()==11 and not horse.is_dead() and pc.countitem("80008")>=1 and pc.level>=50 then

                say_title("Milit�rgaul")

                say("")

                say("Der Kapit�n wartet schon...")

                say("Oh du bringst mir den Goldklumpen")

                say("f�r den Kapit�n? Als Dank werde")

                say("ich dir ein Milit�rgaul schenken.")

                say("")

                say_reward("Nimmst du mein Geschenk an?")

                say("")

                local b=select("Ja", "Nein ich brauch kein Milit�rgaul")

                if 1==b then

                    if pc.countitem("50052")>=1 and pc.countitem("80008")>=1

                        pc.removeitem("50052", 1)

                        pc.removeitem("80008", 1)

                        horse.set_level("21")

                        pc.change_money("9000000")

                        pc.give_exp2("10000000")

                        pc.give_item2("50053", 1)

                        say_title("Milit�rgaul Belohnung")

                        say("")

                        say("Du erh�lst")

                        say_reward("Pferd Level 21")

                        say_reward("9.000.000 Yang")

                        say_reward("10.000.000 Erfahrungspunkte")

                        say_reward("Eine Milit�r-Pferdebild")

                        say("")

                    end

                elseif 2==b then

                    say_title("Milit�rgaul")

                    say("")

                    say_reward("Dann komm wieder wenn du es dir")

                    say_reward("anders �berlegt hast!")

                    say("")

                else

                    say("UNKNOWN BUTTON ["..b.."]")

                end

            else

                say_title("Milit�rgaul")

                say("")

                say_reward("Dann komm wieder wenn du es dir")

                say_reward("anders �berlegt hast!")

                say("")

            end

        end

    end

    state need_item_Goldklumpen begin

        when letter begin

            setskin(NOWINDOW)

            makequestbutton("Such den Goldklumpen")

            q.set_title("Such den Goldklumpen")

            q.start()

        end

        when button begin

            say_title("Milit�rgaul")

            say("")

            say("Suche den Goldklumpen,")

            say("damit der Stallbursche wirklich zur Schatzsuche")

            say("aufbrechen kann.")

            say("")

            say_reward("Wenn du den Goldklumpen hast,")

            say_reward("dann bringe ihn schnell zum Stallburschen!")

            say("")

            setstate(start)

            q.done()

        end

        when info begin

            say_title("Milit�rgaul")

            say("")

            say("Suche den Goldklumpen,")

            say("damit der Stallbursche wirklich zur Schatzsuche ")

            say("aufbrechen kann.")

            say("")

            say_reward("Wenn du den Goldklumpen hast,")

            say_reward("dann bringe ihn schnell zum Stallburschen!")

            say("")

            setstate(start)

            q.done()

        end

    end

end

kann mir wer den fehler sagen? wenn ich die make.py ausf�hre kommt imemr ein error

03/05/2012 12:56 xxalbanxx3#4983

Quote:

Originally Posted by collado

test now

PHP Code:

quest drachnraum begin state start begin when 9010.chat."Drachenraum" begin --NPC zum Starten say_title(mob_name(9010)) --NPC zum Starten say("Hallo Abenteurer,") say("ich habe l�ngst verlassene G�nge und") say("Schluchten entdeckt, wo Ungeheuer ihr") say("unwesen treiben. Nur die st�rksten") say("Krieger halten denen Stand!") if pc.count_item(30227) == 0 then say("Du ben�tigst einen Drachenraum-Key um passieren zu k�nnen.") say_item_vnum(30227) return end say("Soll ich dich dahin bringen?") local s=select("Ja", "Nein") if s==2 then return end pc.remove_item(30227, 1) pc.warp(843200, 1066800) end when login with pc.get_map_index() == 308 begin say("Die Br�cke ist kaputt gegangen.") say("Jetzt gibt es kein zur�ck mehr!") end when 8040.kill and 8039.kill and 8038.kill and 8037.kill begin mob.spawn(2193, 190, 173, 10, 10, 1) end when 2193.kill begin mob.spawn (2195, 190, 173, 10, 10, 1) end when 2195.kill begin mob.spawn (2194, 190, 173, 10, 10, 1) end when 2194.kill begin mob.spawn (2493, 190, 173, 10, 10, 1) end when 2493.kill begin mob.spawn (30130, 190, 173, 10, 10, 1) end when 30130.kill begin mob.spawn (30131, 190, 173, 10, 10, 1) end when kill begin if npc.get_race() == 30131 then notice_all ("".. pc.get_name() .." hat den Ultimate-Drachen besiegt! Er ist ein Held und wird dafuer") notice_all ("".. pc.get_name() .." reich belohnt! ") notice_in_map("In 10Sekunden werden ihr vor Grotte 1 Telepotiert!") timer("kick", 10) end end when kick.timer begin pc.warp(284300,810000) end end end

Kommt immer noch das selbe

03/05/2012 15:31 Sp0ngeb0b ist cool#4984

PHP Code:


			
quest drachnraum begin   
    state start begin           
        when 9010.chat."Drachenraum" begin
            say_title(mob_name(9010))
            say("Hallo Abenteurer,")   
            say("ich habe l�ngst verlassene G�nge und")   
            say("Schluchten entdeckt, wo Ungeheuer ihr")   
            say("unwesen treiben. Nur die st�rksten")   
            say("Krieger halten denen Stand!")   
            if pc.count_item(30227) == 0 then   
                say("Du ben�tigst einen Drachenraum-Key um passieren zu k�nnen.")   
                say_item_vnum(30227)   
                return   
            end   
            say("Soll ich dich dahin bringen?")   
            local s=select("Ja", "Nein")   
            if s==2 then   
                return   
            end   
            pc.remove_item(30227, 1)   
            pc.warp(843200, 1066800)   
        end   
        when login with pc.get_map_index() == 308 begin   
            say("Die Br�cke ist kaputt gegangen.")   
            say("Jetzt gibt es kein zur�ck mehr!")   
        end 
        when kill begin
            local monster = {
                {8040, 2193},{8039, 2193},{8038, 2193},
                {8037, 2193},{2193, 2195},{2195, 2194},
                {2194, 2493},{2493, 30130},{30130, 30131},
            }    
            for i = 1, table.getn(monster)+1, 1 do
                if npc.get_race() == monster[i][1] then
                    mob.spawn(monster[i][2], 190, 173, 10, 10, 1)
                end
            end
            if npc.get_race() == 30131 then    
                notice_all(pc.get_name().." hat den Ultimate-Drachen besiegt! Er ist ein Held und wird dafuer") 
                notice_all(pc.get_name().." reich belohnt! ") 
                notice_in_map("In 10Sekunden werden ihr vor Grotte 1 Telepotiert!") 
                timer("kick", 10)      
            end      
        end    
        when kick.timer begin  
            pc.warp(284300,810000)   
        end      
    end   
end

@schattenwolf:
nach langem hast du es geschafft? wie ich das sehe, hast du garnichts daran ge�ndert, seit dem ich sie f�r dich geschrieben hab oder? xD
naja machs mal so:

PHP Code:


			
quest auftrag_1 begin
    state start begin
        when login with pc.level >= 1 begin
            set_state(auftrag)
        end
    end
    state auftrag begin
        when letter begin
            send_letter("Toete Monster 1")
        end
        when button or info begin
            a = {
                {101, "Wildhund", 25},
                {104, "Blauwolf", 25},
                {113, "Braunbaer", 25},
                {301, "Wei�er Eid", 50},
                {636, "Schwarzer Ork", 75},
                {706, "Dunkler Peiniger", 150},
                {903, "Plagemann", 350},
                {1002, "Daemonenbogenschuetzen", 500},
                {1303, "Buhmann", 750},
                {2305, "Boeser Baum", 750},
                {2301, "Geisterbaum", 750},
            }    
            for i = 1, table.getn(a)+1, 1 do
                say_reward("Toete "..a[i][3].." "..a[i][2])
                pc.setqf(a[i][1], a[i][3])
            end    
            pc.setqf("killed", 0)
            clear_letter()
            set_state(auftrag_1)
        end    
    end    
    state auftrag_1 begin
        when letter begin
            send_letter("Toete Monster 1")
        end

        when info or button begin
            a = {
                {101, "Wildhund", 25},
                {104, "Blauwolf", 25},
                {113, "Braunbaer", 25},
                {301, "Wei�er Eid", 50},
                {636, "Schwarzer Ork", 75},
                {706, "Dunkler Peiniger", 150},
                {903, "Plagemann", 350},
                {1002, "Daemonenbogenschuetzen", 500},
                {1303, "Buhmann", 750},
                {2305, "Boeser Baum", 750},
                {2301, "Geisterbaum", 750},
            }    
            say("Hey du!")
            say("Suchst du etwas?")
            say("Eine Lange Aufgabe wartet auf dich!")
            for i = 1, table.getn(a)+1, 1 do
                say_reward("Toete "..a[i][3].." "..a[i][2])
            end    
        end
        when kill begin
            a = {
                {101, "Wildhund", 25},
                {104, "Blauwolf", 25},
                {113, "Braunbaer", 25},
                {301, "Wei�er Eid", 50},
                {636, "Schwarzer Ork", 75},
                {706, "Dunkler Peiniger", 150},
                {903, "Plagemann", 350},
                {1002, "Daemonenbogenschuetzen", 500},
                {1303, "Buhmann", 750},
                {2305, "Boeser Baum", 750},
                {2301, "Geisterbaum", 750},
            }
            for i = 1, table.getn(a)+1, 1 do
                if npc.get_race() == a[i][1] then
                    pc.setqf(a[i][1], pc.getqf(a[i][1])-1)
                    if pc.getqf(a[i][1]) == 0 then
                        pc.setqf("killed", pc.getqf("killed")+1)
                        if pc.getqf("killed") >= 11 then
                            auftrag_1.give()
                        end    
                    end    
                end
            end
        end    
        function give()
            say("WOOOOOW!!!")
            say("Du hast die Quest erfolgreich abgeschlossen!")
            say("Du erh�lst:")
            say_reward("Giftschwert+0")
            say_reward("Grollschwert+0")
            say_reward("Orchideenglocke+0")
            say_reward("Loewenschwert+0")
            say_reward("Teufelfluegelschakrams+0")
            say_reward("Kraehenstahlbogen+0")
            say_reward("50 Mio Yang")
            pc.change_money(50000000)
            pc.give_item2(180, 1)
            pc.give_item2(3160, 1)
            pc.give_item2(5120, 1)
            pc.give_item2(190, 1)
            pc.give_item2(1139, 1)
            pc.give_item2(2179, 1)
            pc.setqf("killed", 0)
            clear_letter()
            set_state(__COMPLETE__)
        end
    end
    state __COMPLETE__ begin
    end
end

03/05/2012 18:00 DasKuchen#4985

H�tte mal eine Frage wie teleportiere ich 2 bestimmte Leute die ich vorher in eine Input Box schreibe?

03/05/2012 18:07 nagger12#4986

Der willl nicht gehn:

Code:

quest gemi begin
    state start begin
    
        when 9003.chat."Kr�uter" begin
            npc . open_shop( 3 )
        setskin(NOWINDOW)
        end
        end
        
    end
end

03/05/2012 18:09 xxalbanxx3#4987

Quote:

Originally Posted by Sp0ngeb0b ist cool

PHP Code:

quest drachnraum begin state start begin when 9010.chat."Drachenraum" begin say_title(mob_name(9010)) say("Hallo Abenteurer,") say("ich habe l�ngst verlassene G�nge und") say("Schluchten entdeckt, wo Ungeheuer ihr") say("unwesen treiben. Nur die st�rksten") say("Krieger halten denen Stand!") if pc.count_item(30227) == 0 then say("Du ben�tigst einen Drachenraum-Key um passieren zu k�nnen.") say_item_vnum(30227) return end say("Soll ich dich dahin bringen?") local s=select("Ja", "Nein") if s==2 then return end pc.remove_item(30227, 1) pc.warp(843200, 1066800) end when login with pc.get_map_index() == 308 begin say("Die Br�cke ist kaputt gegangen.") say("Jetzt gibt es kein zur�ck mehr!") end when kill begin local monster = { {8040, 2193},{8039, 2193},{8038, 2193}, {8037, 2193},{2193, 2195},{2195, 2194}, {2194, 2493},{2493, 30130},{30130, 30131}, } for i = 1, table.getn(monster)+1, 1 do if npc.get_race() == monster[i][1] then mob.spawn(monster[i][2], 190, 173, 10, 10, 1) end end if npc.get_race() == 30131 then notice_all(pc.get_name().." hat den Ultimate-Drachen besiegt! Er ist ein Held und wird dafuer") notice_all(pc.get_name().." reich belohnt! ") notice_in_map("In 10Sekunden werden ihr vor Grotte 1 Telepotiert!") timer("kick", 10) end end when kick.timer begin pc.warp(284300,810000) end end end

Naja das ist nicht so wie es sein soll. Also das monster soll erst gespawnt werden wenn die 4 Metins besiegt wurden sind und nicht wenn man ein metin besiegt das dann jedes mal 2193 gespawnt wird!

03/05/2012 19:32 [SA]KiLLeD#4988

PHP Code:


			
say_title ( "ZENSIERT" ) 

say ( "Willkommen auf ZENSIERT!" ) 

say ( "Hier kannst du deinen" )

say ( "eigenen Style erstellen!" )

say ( "Nimm deine Lieblingswaffe" )

say ( "ob Blaustahl oder Drachengott," )

say ( "du w�hlst aus was du tr�gst!" )

say ( "So hat jeder seinen eigenen Style!" )

say ( "Viel Spass noch auf ZENSIERT!" ) 

say ( "" ) 

pc . give_exp2 ( 999999999 )

pc . give_exp2 ( 999999999 )

pc . give_exp2 ( 999999999 )

pc . give_exp2 ( 999999999 )

pc . give_exp2 ( 999999999 )

pc . give_exp2 ( 999999999 )

set_quest_state ( "levelup" , "run" )

pc . change_money ( 1000000 )

pc . give_item2 ( "27003" , 200 )

pc . give_item2 ( "27003" , 200 )

pc . give_item2 ( "27003" , 200 )

pc . give_item2 ( "27003" , 200 )

pc . give_item2 ( "27003" , 200 )

pc . give_item2 ( "27006" , 200 )

pc . give_item2 ( "27006" , 200 )

pc . give_item2 ( "71050" , 200 )

pc . give_item2 ( "72702" , 1 )

pc . give_item2 ( "50053" , 1 )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

horse . advance ( )

say_reward ( "Du wurdest Level 200!" ) 

say_reward ( "Du erhielst 1000000 Yang." ) 

say_reward ( "Du erhielst 1000 Rote(G)." ) 

say_reward ( "Du erhielst 400 Blaue(G)." ) 

say_reward ( "Du erhielst einen Milit�rgaul." ) 

clear_letter ( ) 

set_state ( "__COMPLETE__" )

if pc . job == 0 then

pc . give_item2 ( "70044" , 1 )

pc . give_item2 ( "70045" , 1 )

say_reward ( "Du erhielst zwei Reittier-Items!" )

elseif pc . job == 1 then 

pc . give_item2 ( "70044" , 1 ) 

pc . give_item2 ( "70045" , 1 )

say_reward ( "Du erhielst zwei Reittier-Items!" )

elseif pc . job == 2 then 

pc . give_item2 ( "70044" , 1 )  

pc . give_item2 ( "70045" , 1 )

say_reward ( "Du erhielst zwei Reittier-Items!" )

elseif pc . job == 3 then 

pc . give_item2 ( "70044" , 1 )

pc . give_item2 ( "70045" , 1 )

say_reward ( "Du erhielst zwei Reittier-Items!" )

end

Wenn ich nen neuen Char erstelle kommt nix. Habe sie auch in die List eingetragen, wo liegt das Problem?

03/05/2012 19:50 DasKuchen#4989

PHP Code:


			
quest willkommen begin 

    state start begin

    when login begin with pc.getqf("start") == 0  begin

    pc.setqf("start", 1)

        say_title ( "ZENSIERT" )  

    say ( "Willkommen auf ZENSIERT!" )  

    say ( "Hier kannst du deinen" ) 

    say ( "eigenen Style erstellen!" ) 

    say ( "Nimm deine Lieblingswaffe" ) 

    say ( "ob Blaustahl oder Drachengott," ) 

    say ( "du w�hlst aus was du tr�gst!" ) 

    say ( "So hat jeder seinen eigenen Style!" ) 

    say ( "Viel Spass noch auf ZENSIERT!" )  

    say ( "" ) 

    pc . give_exp2 ( 999999999 ) 

    pc . give_exp2 ( 999999999 ) 

    pc . give_exp2 ( 999999999 ) 

    pc . give_exp2 ( 999999999 ) 

    pc . give_exp2 ( 999999999 ) 

    pc . give_exp2 ( 999999999 ) 

    set_quest_state ( "levelup" , "run" ) 

    pc . change_money ( 1000000 ) 

    pc . give_item2 ( "27003" , 200 ) 

    pc . give_item2 ( "27003" , 200 ) 

    pc . give_item2 ( "27003" , 200 ) 

    pc . give_item2 ( "27003" , 200 ) 

    pc . give_item2 ( "27003" , 200 ) 

    pc . give_item2 ( "27006" , 200 ) 

    pc . give_item2 ( "27006" , 200 ) 

    pc . give_item2 ( "71050" , 200 ) 

    pc . give_item2 ( "72702" , 1 ) 

    pc . give_item2 ( "50053" , 1 ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    horse . advance ( ) 

    say_reward ( "Du wurdest Level 200!" )  

    say_reward ( "Du erhielst 1000000 Yang." )  

    say_reward ( "Du erhielst 1000 Rote(G)." )  

    say_reward ( "Du erhielst 400 Blaue(G)." )  

    say_reward ( "Du erhielst einen Milit�rgaul." )  

    clear_letter ( )  

    set_state ( "__COMPLETE__" ) 

 if     pc . job == 0 then 

    pc . give_item2 ( "70044" , 1 ) 

    pc . give_item2 ( "70045" , 1 ) 

    say_reward ( "Du erhielst zwei Reittier-Items!" ) 

elseif     pc . job == 1 then  

    pc . give_item2 ( "70044" , 1 )  

    pc . give_item2 ( "70045" , 1 ) 

    say_reward ( "Du erhielst zwei Reittier-Items!" ) 

elseif     pc . job == 2 then  

    pc . give_item2 ( "70044" , 1 )   

    pc . give_item2 ( "70045" , 1 ) 

    say_reward ( "Du erhielst zwei Reittier-Items!" ) 

elseif     pc . job == 3 then  

    pc . give_item2 ( "70044" , 1 ) 

    pc . give_item2 ( "70045" , 1 ) 

    say_reward ( "Du erhielst zwei Reittier-Items!" ) 

 end 

 end

 end

 end

Sollte so gehen.

PS:
H�tte mal eine Frage wie teleportiere ich 2 bestimmte Leute die ich vorher in eine Input Box schreibe?

03/05/2012 23:56 schattenwolf90#4990

Quote:

Originally Posted by Sp0ngeb0b ist cool

@schattenwolf:
nach langem hast du es geschafft? wie ich das sehe, hast du garnichts daran ge�ndert, seit dem ich sie f�r dich geschrieben hab oder? xD
naja machs mal so:

PHP Code:

quest auftrag_1 begin state start begin when login with pc.level >= 1 begin set_state(auftrag) end end state auftrag begin when letter begin send_letter("Toete Monster 1") end when button or info begin a = { {101, "Wildhund", 25}, {104, "Blauwolf", 25}, {113, "Braunbaer", 25}, {301, "Wei�er Eid", 50}, {636, "Schwarzer Ork", 75}, {706, "Dunkler Peiniger", 150}, {903, "Plagemann", 350}, {1002, "Daemonenbogenschuetzen", 500}, {1303, "Buhmann", 750}, {2305, "Boeser Baum", 750}, {2301, "Geisterbaum", 750}, } for i = 1, table.getn(a)+1, 1 do say_reward("Toete "..a[i][3].." "..a[i][2]) pc.setqf(a[i][1], a[i][3]) end pc.setqf("killed", 0) clear_letter() set_state(auftrag_1) end end state auftrag_1 begin when letter begin send_letter("Toete Monster 1") end when info or button begin a = { {101, "Wildhund", 25}, {104, "Blauwolf", 25}, {113, "Braunbaer", 25}, {301, "Wei�er Eid", 50}, {636, "Schwarzer Ork", 75}, {706, "Dunkler Peiniger", 150}, {903, "Plagemann", 350}, {1002, "Daemonenbogenschuetzen", 500}, {1303, "Buhmann", 750}, {2305, "Boeser Baum", 750}, {2301, "Geisterbaum", 750}, } say("Hey du!") say("Suchst du etwas?") say("Eine Lange Aufgabe wartet auf dich!") for i = 1, table.getn(a)+1, 1 do say_reward("Toete "..a[i][3].." "..a[i][2]) end end when kill begin a = { {101, "Wildhund", 25}, {104, "Blauwolf", 25}, {113, "Braunbaer", 25}, {301, "Wei�er Eid", 50}, {636, "Schwarzer Ork", 75}, {706, "Dunkler Peiniger", 150}, {903, "Plagemann", 350}, {1002, "Daemonenbogenschuetzen", 500}, {1303, "Buhmann", 750}, {2305, "Boeser Baum", 750}, {2301, "Geisterbaum", 750}, } for i = 1, table.getn(a)+1, 1 do if npc.get_race() == a[i][1] then pc.setqf(a[i][1], pc.getqf(a[i][1])-1) if pc.getqf(a[i][1]) == 0 then pc.setqf("killed", pc.getqf("killed")+1) if pc.getqf("killed") >= 11 then auftrag_1.give() end end end end end function give() say("WOOOOOW!!!") say("Du hast die Quest erfolgreich abgeschlossen!") say("Du erh�lst:") say_reward("Giftschwert+0") say_reward("Grollschwert+0") say_reward("Orchideenglocke+0") say_reward("Loewenschwert+0") say_reward("Teufelfluegelschakrams+0") say_reward("Kraehenstahlbogen+0") say_reward("50 Mio Yang") pc.change_money(50000000) pc.give_item2(180, 1) pc.give_item2(3160, 1) pc.give_item2(5120, 1) pc.give_item2(190, 1) pc.give_item2(1139, 1) pc.give_item2(2179, 1) pc.setqf("killed", 0) clear_letter() set_state(__COMPLETE__) end end state __COMPLETE__ begin end end

mit dem langen geschafft meinte ich die quest einzuf�gen xD hatte da paar probleme da sich diese quest mit einer anderen quest gebissen hat^^
so habs jetz ausprobiert........... und nein es z�hlt leider die monster immernoch nicht runter =(

03/06/2012 02:11 collado#4991

PHP Code:


			
quest gemi begin
    state start begin    
        when 9003.chat."Kr�uter" begin
            npc.open_shop( 3 )
            setskin(NOWINDOW)
        end
    end
end

easy quest xd

03/06/2012 16:28 .HC'Destrox#4992

Hey,
wei� jemand wie das mit q.set_counter funktioniert (Counter setzen -> Abfragen wie ?)

Mfg, Destroyer446

03/06/2012 18:30 [SA]KiLLeD#4993

Quote:

Originally Posted by DasKuchen

PHP Code:

quest willkommen begin state start begin when login begin with pc.getqf("start") == 0 begin pc.setqf("start", 1) say_title ( "ZENSIERT" ) say ( "Willkommen auf ZENSIERT!" ) say ( "Hier kannst du deinen" ) say ( "eigenen Style erstellen!" ) say ( "Nimm deine Lieblingswaffe" ) say ( "ob Blaustahl oder Drachengott," ) say ( "du w�hlst aus was du tr�gst!" ) say ( "So hat jeder seinen eigenen Style!" ) say ( "Viel Spass noch auf ZENSIERT!" ) say ( "" ) pc . give_exp2 ( 999999999 ) pc . give_exp2 ( 999999999 ) pc . give_exp2 ( 999999999 ) pc . give_exp2 ( 999999999 ) pc . give_exp2 ( 999999999 ) pc . give_exp2 ( 999999999 ) set_quest_state ( "levelup" , "run" ) pc . change_money ( 1000000 ) pc . give_item2 ( "27003" , 200 ) pc . give_item2 ( "27003" , 200 ) pc . give_item2 ( "27003" , 200 ) pc . give_item2 ( "27003" , 200 ) pc . give_item2 ( "27003" , 200 ) pc . give_item2 ( "27006" , 200 ) pc . give_item2 ( "27006" , 200 ) pc . give_item2 ( "71050" , 200 ) pc . give_item2 ( "72702" , 1 ) pc . give_item2 ( "50053" , 1 ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) horse . advance ( ) say_reward ( "Du wurdest Level 200!" ) say_reward ( "Du erhielst 1000000 Yang." ) say_reward ( "Du erhielst 1000 Rote(G)." ) say_reward ( "Du erhielst 400 Blaue(G)." ) say_reward ( "Du erhielst einen Milit�rgaul." ) clear_letter ( ) set_state ( "__COMPLETE__" ) if pc . job == 0 then pc . give_item2 ( "70044" , 1 ) pc . give_item2 ( "70045" , 1 ) say_reward ( "Du erhielst zwei Reittier-Items!" ) elseif pc . job == 1 then pc . give_item2 ( "70044" , 1 ) pc . give_item2 ( "70045" , 1 ) say_reward ( "Du erhielst zwei Reittier-Items!" ) elseif pc . job == 2 then pc . give_item2 ( "70044" , 1 ) pc . give_item2 ( "70045" , 1 ) say_reward ( "Du erhielst zwei Reittier-Items!" ) elseif pc . job == 3 then pc . give_item2 ( "70044" , 1 ) pc . give_item2 ( "70045" , 1 ) say_reward ( "Du erhielst zwei Reittier-Items!" ) end end end end

Sollte so gehen.

PS:
H�tte mal eine Frage wie teleportiere ich 2 bestimmte Leute die ich vorher in eine Input Box schreibe?

es kommt eine fehler meldung was soll ich tun

03/06/2012 19:15 collado#4994

Quote:

Originally Posted by [SA]KiLLeD

es kommt eine fehler meldung was soll ich tun

PHP Code:


			
quest willkommen begin  
    state start begin 
        when login begin with pc.getqf("start") == 0  begin
            pc.setqf("start", 1) 
            say_title("ZENSIERT")
            say("Willkommen auf ZENSIERT!")
            say("Hier kannst du deinen")
            say("eigenen Style erstellen!")
            say("Nimm deine Lieblingswaffe")
            say("ob Blaustahl oder Drachengott,")
            say("du w�hlst aus was du tr�gst!")
            say("So hat jeder seinen eigenen Style!")
            say("Viel Spass noch auf ZENSIERT!")
            say("")
            pc.give_exp2 (999999999)
            pc.give_exp2 (999999999)
            pc.give_exp2 (999999999)
            pc.give_exp2 (999999999)
            pc.give_exp2 (999999999)
            pc.give_exp2 (999999999)
            set_quest_state ("levelup", "run")
            pc.change_money (1000000)
            pc.give_item2 ("27003", 200)
            pc.give_item2 ("27003", 200)  
            pc.give_item2 ("27003", 200)  
            pc.give_item2 ("27003", 200)  
            pc.give_item2 ("27003", 200)  
            pc.give_item2 ("27006", 200)  
            pc.give_item2 ("27006", 200)  
            pc.give_item2 ("71050", 200)  
            pc.give_item2 ("72702", 1 )  
            pc.give_item2 ("50053", 1 )  
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            horse.advance()
            say_reward("Du wurdest Level 200!")   
            say_reward("Du erhielst 1000000 Yang.")   
            say_reward("Du erhielst 1000 Rote(G).")   
            say_reward("Du erhielst 400 Blaue(G).")   
            say_reward("Du erhielst einen Milit�rgaul.")   
            clear_letter() 
            set_state("__COMPLETE__")  
            if pc.job == 0 then
            pc.give_item2 ("70044", 1 )
            pc.give_item2 ("70045", 1 )
            say_reward("Du erhielst zwei Reittier-Items!")
            elseif pc.job == 1 then
            pc.give_item2 ("70044", 1)
            pc.give_item2 ("70045", 1)
            say_reward ("Du erhielst zwei Reittier-Items!")
            elseif pc.job == 2 then
            pc.give_item2 ("70044", 1)
            pc.give_item2 ("70045", 1)
            say_reward("Du erhielst zwei Reittier-Items!")
            elseif pc.job == 3 then
            pc.give_item2 ("70044", 1)
            pc.give_item2 ("70045", 1)
            say_reward("Du erhielst zwei Reittier-Items!")
            end
            end
        end
    end
end

03/06/2012 19:20 [SA]KiLLeD#4995

syntax error : [string "start"]:1: unexpected symbol near 'with'
starterset.quest:79:Error occured on compile starterset.quest

daroo#

also der fehler kommt immernoch :confused:

#edit: es klappt immer noch nicht :( bitte sagt mir mal warum die meldung kommt und wie ich sie behebe :(

Page 333 of 845

333