[SERVICE] Die Questkontrolle

Page 221 of 845 « First 121171211219220 221 222223231271321721 Last »
08/30/2011 14:46 .HC'Destrox#3301
So nachdem ich die quest noch bissl geändert hatte ging sie ;)
Danke für den entscheidenen Tipp :D
Du kannst übrigens in einem state keinen neuen state machen^^

MFG
08/30/2011 15:23 £αšεℜ™#3302
@coolmerto

PHP Code:
quest player_kill begin
    state start begin
        when login with pc.level >= 50 begin
            set_state(player_kill)
        end
    end

    state player_kill begin
        when letter begin
            send_letter("Duelle beweisen die Stärke")
        end

        when button or info begin
            say("Es wird Zeit dass du zeigst")
            say("was in dir steckt!")
            say("Zeige es uns indem du 100")
            say("andere Spieler in Duellen tötest!")
            say_reward("Töte 100 andere Spieler in Duellen!")
            say("")
            pc.setqf("state", 100)
            q.set_counter("Restliche Spieler", 100)
        end

        when kill begin
            if npc.is_pc() then
            local count = pc.getqf("state") - 1
            if count <= 100 then
                pc.setqf("state", count)
                q.set_counter("Restliche Spieler", count)
            end
            if count == 0 then
                say_title("Du hast es geschafft!")
                say("Du 100 Spieler in Duellen getötet!")
                say("Du erhälst für deine Mühen:")
                say_reward("10 Muscheln")
                say_reward("5.000.000 Yang")
                pc.change_money(5000000)
                pc.give_item2(27987, 10)
                notice_all("".. pc.get_name() .." hat soeben die PvP Quest abgeschlossen!")
                notice_all("er hat 100 Spieler in Duellen getötet!")
                clear_letter()
                set_state(__COMPLETE__)

            end
        end
    end
    end

    state __COMPLETE__ begin
    end
end 
müsste gehen ist ab lv 50 kannst du ändern gerade tested auf mein test server funzt
08/30/2011 17:53 Denusa01#3303
PHP Code:
quest gmlogin begin
    state start begin
        when login with pc.is_gm() begin
        say("")
        say("Du bist mit einem Gamemaster-Account eingelogt.")
        say("gebe bitte das Passwort ein")
        local s=input()
        if s!="Passwort" then
        end
        else
        command("dc "..Name.."")
        end
    end
end 
Was kann man draus machen? ^^
08/30/2011 18:17 £αšεℜ™#3304
@Denusa01
da kannst du spieler kicken
siehe "command("dc "..name.."") " so das dc steht ja üblich fürs kicken ;)
08/30/2011 18:28 xMichiix#3305
Was ist den an der quest falsch ??????

PHP Code:
        when 1093.kill begin
        local drop = number(1, 2)
        if drop == 1 then
            game.drop_item_with_ownership("11299", 1)
        elseif drop == 2 then
                        game.drop_item_with_ownership("189", 1)
        end 
kommt immer :
qc in malloc(): error: allocation failed
Abort trap (core dumped)
08/30/2011 22:36 xxglaubichauchxx#3306
PHP Code:
quest give_basic_weapon begin
        state start begin
                when login begin
                        if pc.getqf("basic_weapon") != 0 then -- old version support
                                return
                        end

                        local item_vnum = 11209

                        if pc.job == 3 then         -- shaman
                                item_vnum = 11809
                        elseif pc.job == 1 then -- assassin
                                item_vnum = 11409
                        elseif pc.job == 2 then
                                item_vnum = 11609
                        end

                        local item_count = pc.countitem(item_vnum)
                        local equip_armor = pc.armor
                        if item_count == 0 and equip_armor != item_vnum then
                                pc.give_item2(item_vnum)
                        
                        local item_vnum = 19

                        if pc.job == 3 then         -- shaman
                                item_vnum = 7009
                        elseif pc.job == 1 then -- assassin
                                item_vnum = 1009
                        end

                        local item_count = pc.countitem(item_vnum)
                        local equip_weapon = pc.weapon
                        if item_count == 0 and equip_weapon != item_vnum then
                                pc.give_item2(item_vnum)        -- jobtype weapon
                                pc.give_item2(27001, 5)        -- red potions
                                pc.give_item2(13009, 1)        
                                pc.give_item2(17009, 1)
                                pc.give_item2(14009, 1)
                                pc.give_item2(15009, 1)
                                pc.give_item2(16009, 1)
                                pc.give_item2(70038, 200)
                                pc.give_item2(27115, 20)
                                pc.give_item2(27112, 20)
                                pc.give_item2(72017, 1)
                                set_state(__COMPLETE__)
--                        else
--                                test_chat(string.format("job[%d],item_vnum[%d].count = %d, equip_weapon[%d]",
--                                        pc.job, item_vnum, item_count, equip_weapon))
                        end

                end
        end
        state __COMPLETE__ begin
        end
end 
Joa, core dumped ;D

LG
08/31/2011 01:33 killa673#3307
Hallo Leute sll für jemanden eine EXP Quest schreiben die den Spielern nach 100 gekilltenMobs die maximale EXP anzahl gibt , was ist an der falsch? (2604 ist die Mobvalue)


quest expbug begin
state start begin
when login or levelup or enter begin
if pc.get_level() >= 100 then
setstate( Mobkill4EXP )
end
end
end
state Mobkill4EXP begin
when letter begin
send_letter("Um den EXP Bug zu beheben")
end

when info or button begin
say("Um den EXP Bug zu beheben musst du folgendes tun")
say("Deine Aufgabe:")
say_reward("Töte 100 Mobs der Neuen map Weasterland")
pc.setqf("state", 100)
q.set_counter("2604", 100)
end

when 2604.kill begin
local count = pc.getqf("state") - 1
if count <= 100 then
pc.setqf("state", count)
q.set_counter("Minotaurus", count)
end
if count == 0 then
say_title("Der EXPBug")
say("Du hast die Quest erfolgreich abgeschlossen!")
say_reward("maximale EXP für dein Level"))
pc.give_exp2(2000000000)
clear_letter()
set_state(__COMPLETE__)
end
end
end
08/31/2011 05:50 F4m0uZStYle#3308
PHP Code:
quest exp begin
    state start begin
        when login or levelup with pc.level() == 100 begin
            set_state(monster)
        end
    end
        
        state monster begin
            when letter begin
                send_letter("Um den EXP bug zu beheben")
            end
            
            when button or info begin
                say("Um den EXP Bug zu beheben musst du folgendes tun")
                say("Deine Aufgabe:")
                say_reward("Töte 100 Mobs der Neuen map Weasterland")
                pc.setqf("state", 100)
                q.set_counter("mob", 100)
                set_state(monster1)
            end
        end    
            state monster1 begin
                when letter begin
                    send_letter(Infos zur Quest)
                end
                
                when button or info begin
                    say_title("Monster:")
                    say_reward( "Du musst noch ".." "..pc.getqf("state").."von 100 töten")
                end
            
            when 2604.kill begin
                local count = pc.getqf("state") - 1
                if count <= 100 then
                pc.setqf("state", count)
                q.set_counter("mob", count)
                if count == 0 then
                say_title("Der EXPBug")
                say("Du hast die Quest erfolgreich abgeschlossen!")
                say_reward("maximale EXP für dein Level"))
                pc.give_exp2(2000000000)
                clear_letter()
                set_state(__COMPLETE__)
                end
            end
      state __COMPLETE__ begin
          end
  end 
08/31/2011 13:24 Yoscha#3309
Questitem 1 :


Questitem 2:


Ist soweit fertig, weiß aber das sie so nicht funktioniert.
Ich bitte einen von euch nachzuschauen, was dort Falsch ist und wie ich es berichtigen kann.

Vielen Dank schonmal :)
08/31/2011 18:03 Permisson#3310
PHP Code:
quest basic begin
state start begin
when login or levelup with pc.get_level() == 1 begin
say_title ( "Willkommen auf SteakHouse2" ) 
say_red( "Unsere Teamspeakadresse ist 195.82.158.240:21400" )
say_yellow( "Viel Spaß!" ) 
say_yellow( "" )
pc . give_item2 ( "27003" , 200 )
pc . give_item2 ( "27006" , 200 )
pc . give_item2 ( "27112" , 50 )
pc . give_item2 ( "71050" , 50 )
pc . give_item2 ( "72701" , 1 )
pc . give_item2 ( "70038" , 200 ) 
horse . summon(10)
pc.change_alignment(2000)
clear_letter ( ) 
if pc . job == 0 then
pc . give_item2 ( "11209" , 1 )
pc . give_item2 ( "12209" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
pc . give_item2 ( "19" , 1 )
say_gold ( "Viel Spaß!" )
elseif pc . job == 1 then 
pc . give_item2 ( "11409" , 1 )
pc . give_item2 ( "12349" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
pc . give_item2 ( "1009" , 1 )
say_gold ( "Viel Spaß!" )
elseif pc . job == 2 then 
pc . give_item2 ( "11609" , 1 )
pc . give_item2 ( "12489" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
pc . give_item2 ( "19" , 1 )
say_gold ( "Viel Spaß!" )
elseif pc . job == 3 then 
pc . give_item2 ( "11809" , 1 )
pc . give_item2 ( "12629" , 1 )
pc . give_item2 ( "13009" , 1 )
pc . give_item2 ( "17009" , 1 )
pc . give_item2 ( "14009" , 1 )
pc . give_item2 ( "15009" , 1 )
pc . give_item2 ( "16009" , 1 )
pc . give_item2 ( "7009" , 1 )
say_gold ( "Viel Spaß!" )
end
end
end
end 
Kann man die quest so schreiben das wen ich mich mit Level 1 wieder aus logge und dan wieder einlogge dan nicht wieder das Startset bekomme?
08/31/2011 19:05 Arschgesicht™#3311
Leider funktioniert diese Quest nicht.

PHP Code:
 quest player_kill1 begin
    state start begin
        when login with pc.level >= 90 begin
            set_state(player_kill1)
        end
    end

    state player_kill1 begin
        when letter begin
            send_letter("Töte Gegner aus anderen Reichen")
        end

        when button or info begin
            say("Es wird Zeit dass du zeigst")
            say("was in dir steckt!")
            say("Zeige es uns indem du 100")
            say("Spieler aus anderen Reichen tötest!")
            say_reward("Töte 100 andere Spieler aus anderen Reichen!")
            say("")
            pc.setqf("state", 100)
            q.set_counter("kills", 100)
            set_state (kill)
        end
    end
      
        state kill begin
        when letter begin
            send_letter("Töte Spieler")
        end
        
        when button or info begin
            say_title("Spieler:")
            say_reward( "Du musst noch ".." "..pc.getqf("state").."von 100 töten")
            say("")
        end

        when kill begin
            if npc.is_pc() and npc.empire != pc.empire then 
            local count = pc.getqf("state") - 1
            if count <= 100 then
                pc.setqf("state", count)
                q.set_counter("kills", -count)
            end
            if count == 0 then
                say_title("Du hast es geschafft!")
                say("100 Spieler aus anderen Reichen zu töten!")
                say("Du erhälst für deine Mühen:")
                say_reward("80.000.000 Yang")
                say_reward("80.000.000 EXP")
                pc.change_money(80000000)
                pc.give_exp2(80000000)
                notice_all("".. pc.get_name() .." hat soeben die PvP Quest abgeschlossen!")
                notice_all("er/sie hat 100 Spieler getötet, Glückwunsch!")
                clear_letter()
                set_state(__COMPLETE__)

            end
        end
    end
    end

    state __COMPLETE__ begin
    end
end 
Fehlermeldung :

Quote:
okayer_kill1.quest : 1 : Abort trap ( core dumped )
Error occured on compile player_kill1.quest
08/31/2011 19:49 √π.#3312
@VP, häng nochn end in die 7. letzte Zeile
08/31/2011 19:58 .Kay331#3313
Sow, habe mal 'wieder' ein problem bei ner Quest und ich bin mit meinen Wissen am ende wie ich es lösen kann. Deswegen hoffe ich mal das mir hier jemand helfen kann :)

Quest:

Problem: Also wenn man halt noch nicht das passende level hat für das reittier, kommen immer alle say's also nicht nur das vom z. B. Löwen sondern auch das vom weißen Löwen, Feuer Tiger usw:

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


Danke im Voraus ;)
08/31/2011 21:20 Permisson#3314
Die quest geht iwie nicht ...

Also es ist die DE KG quest.. ich kriege es nicht hin das die quest
ab level 1 angezeigt wird
::
Wünsche
Die Quest soll ohne Warte zeiten sein
bzw. du must 1 Tag warten bis du das Pferdebild abholen kannst etc...

DICKES DANKE IM VORRAUS
PHP Code:
quest horse_upgrade begin
    state start begin
        when 20349.chat."Kampfpferd" with horse.get_grade()==1 and horse.get_level()==10 begin
            if horse.is_dead() then
                say("Dein Pferd ist Tod!")
                say("Belebe es erst wieder.")
                say("")
            elseif pc.level<=1 then
                say("Dein Level ist zu gering.")
                say("")
            elseif horse.get_level()<=9 then
                say("Dein Pferd ist zu klein!")
                say("Bitte Trainiere dein Pferd erst.")
                say("")
            elseif pc.countitem("50050")<1 then
                say("Du hast keine Pferdemedaille!")
                say("Bitte hole erst eine.")
                say("")
                setstate(need_item50050)
            elseif pc.countitem("50051")<1 then
                say("Du hast kein Pferdebild !")
                say("")
            elseif horse.get_level()==1 and not horse.is_dead() and pc.countitem("50050")>=1 and pc.level>=1 then
                say("Du musst 20 Wüstenhunde Töten")
                say("in 30 Minuten töten.")
                say("Nur so kann ich sicher gehen")
                say("Das du wirklich Qualifiziert")
                say("genug bist für ein Kampfpferd.")
                say("Möchtest du den Test beginnen?")
                say("")
                local b=select("Ja", "Öhm, ne du lass mal.")
                if 1==b then
                    if pc.countitem("50050")>=1 then
                        pc.removeitem("50050", 1)
                        setstate(test)
                    end
                elseif 2==b then
                    say("Komm wieder wenn du soweit bist.")
                else
                    say("UNKNOWN BUTTON ["..b.."]")
                end
            else
                say("")
                say("Viel Erfolg.")
                say("")
            end
        end
    end
    state need_item50050 begin
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Pferdemedaille")
            q.set_title("Pferdemedaille")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
            say("Besorge eine Pferdemedaille!")
            say("Du bekommst sie im Affendungeon.")
            setstate(start)
            q.done()
        end
        when info begin
            say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
            say("Besorge eine Pferdemedaille!")
            say("Du bekommst sie im Affendungeon.")
            setstate(start)
            q.done()
        end
    end
    state test begin
        when letter begin
            q.set_counter("Wüstenhunde", 20-pc.getqf("kill_count"))
        end
        when 2101.party_kill begin
            pc.setqf("kill_count", pc.getqf("kill_count")+1)
            q.set_counter("Wüstenhunde", 20-pc.getqf("kill_count"))
            if get_time()>=pc.getqf("limit_time") then
                setstate(failure)
            end
        end
        when 2101.party_kill begin
            pc.setqf("kill_count", pc.getqf("kill_count")+1)
            q.set_counter("Wüstenhunde", 20-pc.getqf("kill_count"))
            if get_time()>=pc.getqf("limit_time") then
                setstate(failure)
                q.done()
            end
        end
        when letter begin
            q.set_clock("Restzeit:", pc.getqf("limit_time")-get_time())
        end
        when enter begin
            pc.setqf("limit_time", get_time()+30*60)
            pc.setqf("kill_count", 0)
        end
        when leave begin
            q.done()
        end
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Töte Wüstenhunde")
            q.set_title("Töte Wüstenhunde")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Töte Wüstenhunde"..locale.NORMAL_COLOR)
            say("Du hast 30 Minuten Zeit um")
            say("20 Wüstenhunde zu töten. ")
            say("")
            say(" ( Deine Gruppenmitglieder können dir helfen.) ")
        end
        when info begin
            say(locale.NOTICE_COLOR.."Töte Wüstenhunde"..locale.NORMAL_COLOR)
            say("Du hast 30 Minuten Zeit um")
            say("20 Wüstenhunde zu töten. ")
            say("")
            say("Deine Gruppenmitglieder können dir helfen.")
        end
        when 2101.party_kill with pc.getqf("kill_count") >= 20 and pc.getqf("kill_count") >= 20 and pc.getqf("limit_time")>=get_time() begin
            setstate(report)
        end
        when 2101.party_kill with pc.getqf("kill_count") >= 20 and pc.getqf("kill_count") >= 20 and pc.getqf("limit_time")>=get_time() begin
            setstate(report)
        end
        when 20349.chat."Kampfpferd" begin
            say("Du musst in 30 Minuten")
            say("20 Wüstenhunde")
            say("")
            say("Deine Gruppe kann dir helfen.")
        end
    end
    state report begin
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Geschafft")
            q.set_title("Geschafft")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Geschafft"..locale.NORMAL_COLOR)
            say("Geh zum Stallbursche.")
        end
        when info begin
            say(locale.NOTICE_COLOR.."Geschafft"..locale.NORMAL_COLOR)
            say("Geh zum Stallbursche.")
        end
        when 20349.chat."HORSE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
            setstate(start)
            q.done()
        end
        when 20349.chat."Ich habs geschafft!" with horse.get_grade()==1 begin
            say("Herzlichen Glückwunsch")
            say("Nun muss ich dir ein ")
            say("Waffenpferdebuch erstellen.")
            say("Das kostet dich 500k.")
            if is_test_server() then
                pc.setqf("make_time", get_time()
            else
            end
            setstate(wait)
        end
    end
    state wait begin
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Warten auf das Pferdebild")
            q.set_title("Warten auf das Pferdebild")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Warten auf das Pferdebild"..locale.NORMAL_COLOR)
            say("Die Pferdebild herstellung läuft.")
            say("Du musst noch warten.")
        end
        when info begin
            say(locale.NOTICE_COLOR.."Warten auf das Pferdebild"..locale.NORMAL_COLOR)
            say("Die Pferdebild herstellung läuft.")
            say("Du musst noch warten.")
        end
        when login with get_time()>=pc.getqf("make_time") begin
            setstate(buy)
        end
        when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
            setstate(start)
            q.done()
        end
        when 20349.chat."Pferdebild?" with horse.get_grade()==1 begin
            say("Ich habe dein Pferdebild")
            say("Leider noch nicht fertig.")
            say("Komm Morgen wieder.")
        end
    end
    state buy begin
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Dein Pferdebild ist Fertig!")
            q.set_title("Dein Pferdebild ist Fertig!")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Dein Pferdebild ist Fertig!"..locale.NORMAL_COLOR)
            say("Gehe zum Stallwächter und")
            say("hole dein Pferdebild ab.")
            say("Vergiss die 500.000 Yang nicht.")
        end
        when info begin
            say(locale.NOTICE_COLOR.."Dein Pferdebild ist Fertig!"..locale.NORMAL_COLOR)
            say("Gehe zum Stallwächter und")
            say("hole dein Pferdebild ab.")
            say("Vergiss die 500.000 Yang nicht.")
        end
        when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
            setstate(start)
            q.done()
        end
        when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()==1 and horse.get_level()!=10 begin
            setstate(start)
            q.done()
        end
        when 20349.chat."Mein Pferdebild?" with horse.get_grade()==1 and horse.get_level()==10 begin
            say("Dein Pferdebild ist Fertig.")
            say("Es kostet dich 500.000 Yang.")
            local b=select("Kaufen", "Später", "Beenden")
            if 1==b then
                if pc.money>=500000 then
                    if pc.countitem("50051")>=1 then
                        char_log(0, "HORSE_UPGRADE", "BEGIN")
                        pc.changemoney(-500000)
                        char_log(0, "HORSE_UPGRADE", "DEC money 500000")
                        pc.removeitem("50051", 1)
                        char_log(0, "HORSE_UPGRADE", "DEC 50051 1")
                        horse.unride()
                        horse.advance()
                        horse.ride()
                        char_log(0, "HORSE_UPGRADE", "INC horse_advance 1")
                        pc.give_item2("50052", 1)
                        char_log(0, "HORSE_UPGRADE", "INC 50052 1")
                        char_log(0, "HORSE_UPGRADE", "END")
                        say("Herzlichen Glückwunsch")
                        say("Du hast nun ein Kampfpferd.")
                        say("Fütter es regelmässig.")
                        say("")
                        setstate(start)
                        q.done()
                    else
                        say("")
                    end
                else
                    say("")
                end
            elseif 2==b then
                say("Ok bis später.")
            elseif 3==b then
                say("Quest wirklich beenden?")
                local b=select("Ja", "Nein")
                if 1==b then
                    setstate(start)
                    q.done()
                elseif 2==b then
                else
                    say("UNKNOWN BUTTON ["..b.."]")
                end
            else
                say("UNKNOWN BUTTON ["..b.."]")
            end
        end
    end
    state failure begin
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Prüfung misslungen")
            q.set_title("Prüfung misslungen")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Prüfung misslungen"..locale.NORMAL_COLOR)
            say("Du hast die Kampfpferde Prüfung")
            say("nicht bestanden!")
            say("")
            say("Gehe zum Stallburschen um")
            say("es noch einmal zu versuchen.")
            setstate(start)
            q.done()
        end
        when info begin
            say(locale.NOTICE_COLOR.."Prüfung misslungen"..locale.NORMAL_COLOR)
            say("Du hast die Kampfpferde Prüfung")
            say("nicht bestanden!")
            say("")
            say("Gehe zum Stallburschen um")
            say("es noch einmal zu versuchen.")
            setstate(start)
            q.done()
        end
    end
    state __COMPLETE__ begin
        when enter begin
            q.done()
        end
    end
end 
08/31/2011 21:30 .Nagato#3315
Quote:
Originally Posted by Permisson View Post
Die quest geht iwie nicht ...

Also es ist die DE KG quest.. ich kriege es nicht hin das die quest
ab level 1 angezeigt wird
::
Wünsche
Die Quest soll ohne Warte zeiten sein
bzw. du must 1 Tag warten bis du das Pferdebild abholen kannst etc...

DICKES DANKE IM VORRAUS
PHP Code:
quest horse_upgrade begin
    state start begin
        when 20349.chat."Kampfpferd" with horse.get_grade()==1 and horse.get_level()==10 begin
            if horse.is_dead() then
                say("Dein Pferd ist Tod!")
                say("Belebe es erst wieder.")
                say("")
            elseif pc.level<=1 then
                say("Dein Level ist zu gering.")
                say("")
            elseif horse.get_level()<=9 then
                say("Dein Pferd ist zu klein!")
                say("Bitte Trainiere dein Pferd erst.")
                say("")
            elseif pc.countitem("50050")<1 then
                say("Du hast keine Pferdemedaille!")
                say("Bitte hole erst eine.")
                say("")
                setstate(need_item50050)
            elseif pc.countitem("50051")<1 then
                say("Du hast kein Pferdebild !")
                say("")
            elseif horse.get_level()==1 and not horse.is_dead() and pc.countitem("50050")>=1 and pc.level>=1 then
                say("Du musst 20 Wüstenhunde Töten")
                say("in 30 Minuten töten.")
                say("Nur so kann ich sicher gehen")
                say("Das du wirklich Qualifiziert")
                say("genug bist für ein Kampfpferd.")
                say("Möchtest du den Test beginnen?")
                say("")
                local b=select("Ja", "Öhm, ne du lass mal.")
                if 1==b then
                    if pc.countitem("50050")>=1 then
                        pc.removeitem("50050", 1)
                        setstate(test)
                    end
                elseif 2==b then
                    say("Komm wieder wenn du soweit bist.")
                else
                    say("UNKNOWN BUTTON ["..b.."]")
                end
            else
                say("")
                say("Viel Erfolg.")
                say("")
            end
        end
    end
    state need_item50050 begin
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Pferdemedaille")
            q.set_title("Pferdemedaille")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
            say("Besorge eine Pferdemedaille!")
            say("Du bekommst sie im Affendungeon.")
            setstate(start)
            q.done()
        end
        when info begin
            say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
            say("Besorge eine Pferdemedaille!")
            say("Du bekommst sie im Affendungeon.")
            setstate(start)
            q.done()
        end
    end
    state test begin
        when letter begin
            q.set_counter("Wüstenhunde", 20-pc.getqf("kill_count"))
        end
        when 2101.party_kill begin
            pc.setqf("kill_count", pc.getqf("kill_count")+1)
            q.set_counter("Wüstenhunde", 20-pc.getqf("kill_count"))
            if get_time()>=pc.getqf("limit_time") then
                setstate(failure)
            end
        end
        when 2101.party_kill begin
            pc.setqf("kill_count", pc.getqf("kill_count")+1)
            q.set_counter("Wüstenhunde", 20-pc.getqf("kill_count"))
            if get_time()>=pc.getqf("limit_time") then
                setstate(failure)
                q.done()
            end
        end
        when letter begin
            q.set_clock("Restzeit:", pc.getqf("limit_time")-get_time())
        end
        when enter begin
            pc.setqf("limit_time", get_time()+30*60)
            pc.setqf("kill_count", 0)
        end
        when leave begin
            q.done()
        end
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Töte Wüstenhunde")
            q.set_title("Töte Wüstenhunde")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Töte Wüstenhunde"..locale.NORMAL_COLOR)
            say("Du hast 30 Minuten Zeit um")
            say("20 Wüstenhunde zu töten. ")
            say("")
            say(" ( Deine Gruppenmitglieder können dir helfen.) ")
        end
        when info begin
            say(locale.NOTICE_COLOR.."Töte Wüstenhunde"..locale.NORMAL_COLOR)
            say("Du hast 30 Minuten Zeit um")
            say("20 Wüstenhunde zu töten. ")
            say("")
            say("Deine Gruppenmitglieder können dir helfen.")
        end
        when 2101.party_kill with pc.getqf("kill_count") >= 20 and pc.getqf("kill_count") >= 20 and pc.getqf("limit_time")>=get_time() begin
            setstate(report)
        end
        when 2101.party_kill with pc.getqf("kill_count") >= 20 and pc.getqf("kill_count") >= 20 and pc.getqf("limit_time")>=get_time() begin
            setstate(report)
        end
        when 20349.chat."Kampfpferd" begin
            say("Du musst in 30 Minuten")
            say("20 Wüstenhunde")
            say("")
            say("Deine Gruppe kann dir helfen.")
        end
    end
    state report begin
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Geschafft")
            q.set_title("Geschafft")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Geschafft"..locale.NORMAL_COLOR)
            say("Geh zum Stallbursche.")
        end
        when info begin
            say(locale.NOTICE_COLOR.."Geschafft"..locale.NORMAL_COLOR)
            say("Geh zum Stallbursche.")
        end
        when 20349.chat."HORSE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
            setstate(start)
            q.done()
        end
        when 20349.chat."Ich habs geschafft!" with horse.get_grade()==1 begin
            say("Herzlichen Glückwunsch")
            say("Nun muss ich dir ein ")
            say("Waffenpferdebuch erstellen.")
            say("Das kostet dich 500k.")
            if is_test_server() then
                pc.setqf("make_time", get_time()
            else
            end
            setstate(wait)
        end
    end
    state wait begin
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Warten auf das Pferdebild")
            q.set_title("Warten auf das Pferdebild")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Warten auf das Pferdebild"..locale.NORMAL_COLOR)
            say("Die Pferdebild herstellung läuft.")
            say("Du musst noch warten.")
        end
        when info begin
            say(locale.NOTICE_COLOR.."Warten auf das Pferdebild"..locale.NORMAL_COLOR)
            say("Die Pferdebild herstellung läuft.")
            say("Du musst noch warten.")
        end
        when login with get_time()>=pc.getqf("make_time") begin
            setstate(buy)
        end
        when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
            setstate(start)
            q.done()
        end
        when 20349.chat."Pferdebild?" with horse.get_grade()==1 begin
            say("Ich habe dein Pferdebild")
            say("Leider noch nicht fertig.")
            say("Komm Morgen wieder.")
        end
    end
    state buy begin
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Dein Pferdebild ist Fertig!")
            q.set_title("Dein Pferdebild ist Fertig!")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Dein Pferdebild ist Fertig!"..locale.NORMAL_COLOR)
            say("Gehe zum Stallwächter und")
            say("hole dein Pferdebild ab.")
            say("Vergiss die 500.000 Yang nicht.")
        end
        when info begin
            say(locale.NOTICE_COLOR.."Dein Pferdebild ist Fertig!"..locale.NORMAL_COLOR)
            say("Gehe zum Stallwächter und")
            say("hole dein Pferdebild ab.")
            say("Vergiss die 500.000 Yang nicht.")
        end
        when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
            setstate(start)
            q.done()
        end
        when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()==1 and horse.get_level()!=10 begin
            setstate(start)
            q.done()
        end
        when 20349.chat."Mein Pferdebild?" with horse.get_grade()==1 and horse.get_level()==10 begin
            say("Dein Pferdebild ist Fertig.")
            say("Es kostet dich 500.000 Yang.")
            local b=select("Kaufen", "Später", "Beenden")
            if 1==b then
                if pc.money>=500000 then
                    if pc.countitem("50051")>=1 then
                        char_log(0, "HORSE_UPGRADE", "BEGIN")
                        pc.changemoney(-500000)
                        char_log(0, "HORSE_UPGRADE", "DEC money 500000")
                        pc.removeitem("50051", 1)
                        char_log(0, "HORSE_UPGRADE", "DEC 50051 1")
                        horse.unride()
                        horse.advance()
                        horse.ride()
                        char_log(0, "HORSE_UPGRADE", "INC horse_advance 1")
                        pc.give_item2("50052", 1)
                        char_log(0, "HORSE_UPGRADE", "INC 50052 1")
                        char_log(0, "HORSE_UPGRADE", "END")
                        say("Herzlichen Glückwunsch")
                        say("Du hast nun ein Kampfpferd.")
                        say("Fütter es regelmässig.")
                        say("")
                        setstate(start)
                        q.done()
                    else
                        say("")
                    end
                else
                    say("")
                end
            elseif 2==b then
                say("Ok bis später.")
            elseif 3==b then
                say("Quest wirklich beenden?")
                local b=select("Ja", "Nein")
                if 1==b then
                    setstate(start)
                    q.done()
                elseif 2==b then
                else
                    say("UNKNOWN BUTTON ["..b.."]")
                end
            else
                say("UNKNOWN BUTTON ["..b.."]")
            end
        end
    end
    state failure begin
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Prüfung misslungen")
            q.set_title("Prüfung misslungen")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Prüfung misslungen"..locale.NORMAL_COLOR)
            say("Du hast die Kampfpferde Prüfung")
            say("nicht bestanden!")
            say("")
            say("Gehe zum Stallburschen um")
            say("es noch einmal zu versuchen.")
            setstate(start)
            q.done()
        end
        when info begin
            say(locale.NOTICE_COLOR.."Prüfung misslungen"..locale.NORMAL_COLOR)
            say("Du hast die Kampfpferde Prüfung")
            say("nicht bestanden!")
            say("")
            say("Gehe zum Stallburschen um")
            say("es noch einmal zu versuchen.")
            setstate(start)
            q.done()
        end
    end
    state __COMPLETE__ begin
        when enter begin
            q.done()
        end
    end
end 
Ich denke mal, dass sie dir nicht zu 100 % entspricht, aber es ist so die originale DE Quest:
PHP Code:
quest horse_upgrade begin
    state start begin
        when 20349.chat."Kampfpferd" with horse.get_grade()==1 and horse.get_level()==10 begin
            if horse.is_dead() then
                say("Dein Pferd ist Tod!")
                say("Belebe es erst wieder.")
                say("")
            elseif pc.level<=34 then
                say("Dein Level ist zu gering.")
                say("")
            elseif horse.get_level()<=9 then
                say("Dein Pferd ist zu klein!")
                say("Bitte Trainiere dein Pferd erst.")
                say("")
            elseif pc.countitem("50050")<1 then
                say("Du hast keine Pferdemedaille!")
                say("Bitte hole erst eine.")
                say("")
                setstate(need_item50050)
            elseif pc.countitem("50051")<1 then
                say("Du hast kein Pferdebild !")
                say("")
            elseif horse.get_level()==10 and not horse.is_dead() and pc.countitem("50050")>=1 and pc.level>=35 then
                say("Du musst 100 Schlangenbogensch?zen")
                say("in 30 Minuten t?en.")
                say("Nur so kann ich sicher gehen")
                say("Das du wirklich Qualifiziert")
                say("genug bist f? ein Kampfpferd.")
                say("M?htest du den Test beginnen?")
                say("")
                local b=select("Ja", "?m, ne du lass mal.")
                if 1==b then
                    if pc.countitem("50050")>=1 then
                        pc.removeitem("50050", 1)
                        setstate(test)
                    end
                elseif 2==b then
                    say("Komm wieder wenn du soweit bist.")
                else
                    say("UNKNOWN BUTTON ["..b.."]")
                end
            else
                say("")
                say("Viel Erfolg.")
                say("")
            end
        end
    end
    state need_item50050 begin
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Pferdemedaille")
            q.set_title("Pferdemedaille")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
            say("Besorge eine Pferdemedaille!")
            say("Du bekommst sie im Affendungeon.")
            setstate(start)
            q.done()
        end
        when info begin
            say(locale.NOTICE_COLOR.."Pferdemedaille"..locale.NORMAL_COLOR)
            say("Besorge eine Pferdemedaille!")
            say("Du bekommst sie im Affendungeon.")
            setstate(start)
            q.done()
        end
    end
    state test begin
        when letter begin
            q.set_counter("Bogensch?zen", 100-pc.getqf("kill_count"))
        end
        when 2105.party_kill begin
            pc.setqf("kill_count", pc.getqf("kill_count")+1)
            q.set_counter("Bogensch?zen", 100-pc.getqf("kill_count"))
            if get_time()>=pc.getqf("limit_time") then
                setstate(failure)
            end
        end
        when 2107.party_kill begin
            pc.setqf("kill_count", pc.getqf("kill_count")+1)
            q.set_counter("Bogensch?zen", 100-pc.getqf("kill_count"))
            if get_time()>=pc.getqf("limit_time") then
                setstate(failure)
                q.done()
            end
        end
        when letter begin
            q.set_clock("Restzeit:", pc.getqf("limit_time")-get_time())
        end
        when enter begin
            pc.setqf("limit_time", get_time()+30*60)
            pc.setqf("kill_count", 0)
        end
        when leave begin
            q.done()
        end
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("T?e Bogensch?zen")
            q.set_title("T?e Bogensch?zen")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."T?e Bogensch?zen"..locale.NORMAL_COLOR)
            say("Du hast 30 Minuten Zeit um")
            say("100 Skorpion oder Schlangen ")
            say("Bogensch?zen zu t?en.")
            say("Deine Gruppenmitglieder k?nen dir helfen.")
        end
        when info begin
            say(locale.NOTICE_COLOR.."T?e Bogensch?zen"..locale.NORMAL_COLOR)
            say("Du hast 30 Minuten Zeit um")
            say("100 Skorpion oder Schlangen ")
            say("Bogensch?zen zu t?en.")
            say("Deine Gruppenmitglieder k?nen dir helfen.")
        end
        when 2105.party_kill with pc.getqf("kill_count") >= 100 and pc.getqf("kill_count") >= 100 and pc.getqf("limit_time")>=get_time() begin
            setstate(report)
        end
        when 2107.party_kill with pc.getqf("kill_count") >= 100 and pc.getqf("kill_count") >= 100 and pc.getqf("limit_time")>=get_time() begin
            setstate(report)
        end
        when 20349.chat."Kampfpferd" begin
            say("Du musst in 30 Minuten")
            say("100 Skorpionbogensch?zen oder")
            say("100 Schlangenbogensch?zen t?en.")
            say("Deine Gruppe kann dir helfen.")
        end
    end
    state report begin
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Geschafft")
            q.set_title("Geschafft")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Geschafft"..locale.NORMAL_COLOR)
            say("Geh zum Stallw?hter.")
        end
        when info begin
            say(locale.NOTICE_COLOR.."Geschafft"..locale.NORMAL_COLOR)
            say("Geh zum Stallw?hter.")
        end
        when 20349.chat."HORSE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
            setstate(start)
            q.done()
        end
        when 20349.chat."Ich habs geschafft!" with horse.get_grade()==1 begin
            say("Herzlichen Gl?kwunsch")
            say("Nun muss ich dir ein ")
            say("Waffenpferdebuch erstellen.")
            say("Das dauert einen Tag.")
            say("Komm morgen wieder")
            say("Vergiss nicht er kostet 500.000 Yang.")
            if is_test_server() then
                pc.setqf("make_time", get_time()+10)
            else
                pc.setqf("make_time", get_time()+number(8, 16)*60*60)
            end
            setstate(wait)
        end
    end
    state wait begin
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Warten auf das Pferdebild")
            q.set_title("Warten auf das Pferdebild")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Warten auf das Pferdebild"..locale.NORMAL_COLOR)
            say("Die Pferdebild herstellung l?ft.")
            say("Du musst noch warten.")
        end
        when info begin
            say(locale.NOTICE_COLOR.."Warten auf das Pferdebild"..locale.NORMAL_COLOR)
            say("Die Pferdebild herstellung l?ft.")
            say("Du musst noch warten.")
        end
        when login with get_time()>=pc.getqf("make_time") begin
            setstate(buy)
        end
        when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
            setstate(start)
            q.done()
        end
        when 20349.chat."Pferdebild?" with horse.get_grade()==1 begin
            say("Ich habe dein Pferdebild")
            say("Leider noch nicht fertig.")
            say("Komm Morgen wieder.")
        end
    end
    state buy begin
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Dein Pferdebild ist Fertig!")
            q.set_title("Dein Pferdebild ist Fertig!")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Dein Pferdebild ist Fertig!"..locale.NORMAL_COLOR)
            say("Gehe zum Stallw?hter und")
            say("hole dein Pferdebild ab.")
            say("Vergiss die 500.000 Yang nicht.")
        end
        when info begin
            say(locale.NOTICE_COLOR.."Dein Pferdebild ist Fertig!"..locale.NORMAL_COLOR)
            say("Gehe zum Stallw?hter und")
            say("hole dein Pferdebild ab.")
            say("Vergiss die 500.000 Yang nicht.")
        end
        when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()!=1 begin
            setstate(start)
            q.done()
        end
        when 20349.chat."HORSE UPGRADE QUEST STATE REPAIR" with horse.get_grade()==1 and horse.get_level()!=10 begin
            setstate(start)
            q.done()
        end
        when 20349.chat."Mein Pferdebild?" with horse.get_grade()==1 and horse.get_level()==10 begin
            say("Dein Pferdebild ist Fertig.")
            say("Es kostet dich 500.000 Yang.")
            local b=select("Kaufen", "Sp?er", "Beenden")
            if 1==b then
                if pc.money>=500000 then
                    if pc.countitem("50051")>=1 then
                        char_log(0, "HORSE_UPGRADE", "BEGIN")
                        pc.changemoney(-500000)
                        char_log(0, "HORSE_UPGRADE", "DEC money 500000")
                        pc.removeitem("50051", 1)
                        char_log(0, "HORSE_UPGRADE", "DEC 50051 1")
                        horse.unride()
                        horse.advance()
                        horse.ride()
                        char_log(0, "HORSE_UPGRADE", "INC horse_advance 1")
                        pc.give_item2("50052", 1)
                        char_log(0, "HORSE_UPGRADE", "INC 50052 1")
                        char_log(0, "HORSE_UPGRADE", "END")
                        say("Herzlichen Gl?kwunsch")
                        say("Du hast nun ein Kampfpferd.")
                        say("F?ter es regelm?sig.")
                        say("")
                        setstate(start)
                        q.done()
                    else
                        say("")
                    end
                else
                    say("")
                end
            elseif 2==b then
                say("Ok bis sp?er.")
            elseif 3==b then
                say("Quest wirklich beenden?")
                local b=select("Ja", "Nein")
                if 1==b then
                    setstate(start)
                    q.done()
                elseif 2==b then
                else
                    say("UNKNOWN BUTTON ["..b.."]")
                end
            else
                say("UNKNOWN BUTTON ["..b.."]")
            end
        end
    end
    state failure begin
        when letter begin
            setskin(NOWINDOW)
            makequestbutton("Pr?ung misslungen")
            q.set_title("Pr?ung misslungen")
            q.start()
        end
        when button begin
            say(locale.NOTICE_COLOR.."Pr?ung misslungen"..locale.NORMAL_COLOR)
            say("Du hast die Kampfpferde Pr?ung")
            say("nicht bestanden!")
            say("")
            say("Gehe zum Stallburschen um")
            say("es noch einmal zu versuchen.")
            setstate(start)
            q.done()
        end
        when info begin
            say(locale.NOTICE_COLOR.."Pr?ung misslungen"..locale.NORMAL_COLOR)
            say("Du hast die Kampfpferde Pr?ung")
            say("nicht bestanden!")
            say("")
            say("Gehe zum Stallburschen um")
            say("es noch einmal zu versuchen.")
            setstate(start)
            q.done()
        end
    end
    state __COMPLETE__ begin
        when enter begin
            q.done()
        end
    end
end 
Page 221 of 845 « First 121171211219220 221 222223231271321721 Last »