[SERVICE] Die Questkontrolle

Page 68 of 845 « First 18586667 68 697078118168568 Last »
12/07/2010 19:00 derkiler#1006
Quote:
Originally Posted by »Xc3llênT View Post
Soweit ich es verstehe will er das man als Player ohne GM rechte die Möglichkeit hat sich zu einem anderen Player zu teleportieren...

Bei command-Befehlen ist es doch nur als GameMaster möglich. Oder irre ich mich?

P.S.: Schau mal in: [Only registered and activated users can see links. Click Here To Register...] nach ob du einen Befehl findest. Werde ich auch mal tun...


#Edit.
Kaum was gefunden. Was ich gefunden habe müsst ihr leider ausprobieren ( Nicht zuhause). Also ich habe gerade nicht die Möglichkeit einen Server hoch zu fahren...
Probier es mal damit:

pc.teleport()

also:
quest warpring begin
state start begin
when 70007.use begin
say_title("Teleportring:")
say("Hallo ich kann dich teleportieren")
say("Wohin möchtest du teleportiert werden?")
say("Bitte gib hier den Namen des Spielers ein,")
say("zu dem du dich teleportieren willst!")
local player= input()
pc.teleport("player")
end
end
say("Der Spieler ist nicht online!")
end


Dann mal viel Glück (:

Habs mal so versucht

quest warpring begin
state start begin
when 70007.use begin
say_title("Teleportring:")
say("Hallo ich kann dich teleportieren")
say("Wohin möchtest du teleportiert werden?")
say("Bitte gib hier den Namen des Spielers ein,")
say("zu dem du dich teleportieren willst!")
local player= input()
pc.teleport("player")
end
end
say("Der Spieler ist nicht online!")
end

quest öffnet sich man kann auch namen eingeben aber es zeigt an spieler ist nicht online kann es sein das hier der name player gewählt wird -> pc.teleport("player") ??
12/07/2010 19:34 derkiler#1007
wie mach ich jetzt das ich zum input geportet werde und nicht player, da er in --> pc.teleport("player") <-steht
12/07/2010 20:43 CoreDump#1008
ein command befehl ist eig für alle.
alles wofür steht: pc.is_gm kann nur ein gm machen.
aber solange das nicht steht kann für alles ein command verwendet werden.
habs bei einem reichsteleport verwendet. ging!

macht euch doch nicht alles so schwer xD

o.o EDIT!!!!
command(warp "..player..")
so gings bei meinem reichteleporter.
(wer auf nummer sicher gehen will)
12/07/2010 23:11 lfcmaus#1009
PHP Code:
quest pruefung begin
    state start begin
        when 40003.use then begin
        
            if pc.countitem("40003")>=1 then
                pc.removeitem("40003", 1)
            end
            
            say_title("Kaiser:")
            say("Wie Ich sehe hast du dich zur")
            say("Pruefung Ehrenhafte-Krieger-Alleria's")
            say("bereit erklärt.Dann bestehe")
            say("die folgenden Aufgaben.")
            say("Solltest du jedoch zu schwach sein,")
            say("wirst du nicht in die Liste:")
            say("Alleria's tapfere Ehrenhafte Krieger")
            say("aufgenommen...")
            wait()
            say("Wenn du bereit bist,stelle")
            say("dich in die mitte des Raum's")
            say("un Opfere dem Drachengott sein")
            say("Lieblingsessen und die Pruefung beginnt!")    
            say("")    
            say("Viel Erfolg ...")
            say("")
            say("Moechtest du nun beginnen?")
            
            local s == select("Beginnen","Noch kurz Warten")
    
            if s == 1 then
                pc.give_item2(30002)
            end
            
            if s == 2 then
                reutrn
            end
        end
    end
end 
mein bisheriges quest ergebnis nur im vpc sagt er mir

when doesn`t have begin-end clause. (then)
pruefung.quest:3:Abort trap (core dump)

soll glaube soviel heißen wie wenn begin keine end clause hat dann abruch der quest und core dump?
12/07/2010 23:46 CoreDump#1010
local s == select("Beginnen","Noch kurz Warten")
reutrn

local s select wird mit nur einem = geschrieben.
return ist falsch
12/08/2010 00:35 lfcmaus#1011
ah thx das muss ich gleich mal testen :)

edit: getest nach dem ichs geändert habe und immernoch fehler
genau der gleiche
12/08/2010 00:43 CoreDump#1012
hab wiedermal die schnauze voll von der questkontrolle und werde eine pause einlegen!
when 40003.use then begin
hallo mitgedacht?
nichtmal die ersten 3 zeilen von quests bekommt er hin -.-
schlecht.


nichtmal thx´ bekommt man hier richtig. hauptsache die leute haben ihre ausgebesserten vervollständigten quests. IHR KÖNNT ES JA AUCH LERNEN???
hätte ich keine arbeit. wär mir im moment sogar viel lieber.
ich mach vllt ein thread für anfänger, damit sies lernen. den rest kann sich dann jeder selbst beibrigen.
ich habs genauso gemacht. nur von anfang an alleine.

also von mir bekommt ihr in nächster zeit NIX.
12/08/2010 00:45 lfcmaus#1013
was willst du den nur spamen?nicht so aggressiv

Quote:
edit: getest nach dem ichs geändert habe und immernoch fehler
genau der gleiche
nr 2
Quote:
when doesn`t have begin-end clause. (then)
pruefung.quest:3:Abort trap (core dump)
genau der selbe fehler obwohl ichs geändert hab

________________________

sry das es leute gibt die das nicht perfekt können
dachte dafür ist der thread da um leuten ihre fehler zu zeigen und zuerklären was sie falsch gemacht haben damit sies lernen und beim nächsten mal besser machen können

_________________________

nun komm doch mal bitte wieder runter
ich bin dir sehr dankbar das du hier überhaupt schreibst
den ja die meisten sind so haupt sache sie haben ihren scheiß

ich weiß wovon du redest ich habs selber mal mit 40 gemoddeten rüstungen gehabt innerhalb von 30min warens 65 downloads und 2 thx

und durch dein dickes then haste mich stutzig gemahct und ich hab nochmal überlegt und da fiel mir ein du hats ja ne andere quest wo man auch nen item benutzt die hab ich mir angeschaut und des then raus gemacht und nur ein begin dahinter und siehe da es geht

ohn dein dickes then wär ich nicht drauf gekommen ich danke dir viel mals :)
12/08/2010 02:18 lfcmaus#1014
hallü ich mal wieder ^^
ja nacht schreib ich fleißig questes bzw versuchs >.<
ich weiß ich bin mies dadrinnen
aber dennoch amchts irgendwo spaß wenns am ende mit eurer hilfe doch immer geklappt hat :) und man dann das endprodukt sieht

deswegen möcht ich mich hier nochmal bei allen helfern bedanken

und auch glewich mit dem nächsten problem ankommen :P

PHP Code:
quest monarchfight begin
    state start begin    
        when 30002.use begin
        
            say_title("Prüfungsleiter:")
            say("")
            say("Möchtest du das Essen opfern?")
            say("")
            local a = select("Opfern","Das behalt Ich!")
                if s == 1 then
                    d.spawn_mob(101)
                end
                if s == 2 then
                    pc.removeitem(30002)
                    pc.warp(210900,210900) 
                end
            end
        end
    end 
das ist die quest sie geht auch zeigt keinf ehle ran beim einfügen nur
der mob spawnd nicht
ich hab es mit diesen befehl versucht:

d.spawn_mob(101)
mit dem mob.spawn(101)
nen anderen kenn cih leider nciht noch nicht
12/08/2010 04:16 vinni03#1015
Help pls :D

PHP Code:
-- ????? -> ?? 
-- ???+4 -> ??????? 
-- ????? -> ????? 
quest stash begin 
    state start begin -- ???? ??? ?? 
    when 9005.click begin 
        local l = game.get_safebox_level() 
        --syschat(l) -- for debug 

        if l == 0 then 
            say("Haruko:") 
            say("Ah, du bist bestimmt der Neue!") 
            say("Bist anscheinend an meine großen") 
            say("Lager interessiert!") 
            say("") 
            say("Haha, aber nicht zu voreilig!") 
            say("Eine kleine Spende verlange ich immerhin.") 
            say("Zwar ist es nicht viel, aber damit kann") 
            say("ich leben!") 
            say("") 
            say_reward("Es kostet 500 Yang!") 

            if pc.gold < 500 then 
                say("Haruko:") 
                say("Ja, nun werd mir aber nicht frech!") 
                say("Du wirst bestimmt diese kleine") 
                say("Anzahl an Yang irgendwo anscheffeln") 
                say("können. Woher ist mir egal!") 
                say("") 
                say_reward("Es kostet 500 Yang!") 
            else 
                local s = select("Erstellen", "Doch noch nicht") 
                if s == 1 then 
                --stash.setlevel(1) 
                pc.changegold(-500) 
                game.set_safebox_level(1) 
                say("Haruko:") 
                say("Ah, geht doch. Danke für das Yang.") 
                say("Dein Lager hab ich nun zurecht gelegt.") 
                say("Du kannst es erreichen, indem du mich") 
                say("anklickst und auf "Lager öffnen" gehst.") 
                say("Dein Startpasswort lautet 00000. Dieses") 
                say("kannst du aber ändern.") 
                else 
                say("Naja, dann viel Spaß damit!") 
                end 
            end 
        elseif l == 1 then  
            say("Herzlich Willkommen!") 
            say("Anscheinend wieder viel gearbeitet") 
            say("und hast viel zum Lagern nun dabei.") 
            say("") 
            say("Naja, sag wieso du hier bist...") 

            if pc.getqf("open_count") < 3 then 
                pc.setqf("open_count",pc.getqf("open_count")+1) 
            end 

            local s = select("Lager öffnen", "Itemshop-Lager öffnen", "Schließen") 

            if s == 1 then 
                game.open_safebox() 
            elseif s == 2 then 
                -- ?? ?? ??? ?? ??,?? ???? 
                if pc.getqf("gold_bar_say_count") < 3 then 
                pc.setqf("gold_bar_say_count",pc.getqf("gold_bar_say_count")+1) 
                wait() 
                end 
                npc.open_shop() 
                say("Hmmm....") 
                say("Unsere Goldvorräte sind sehr knapp...") 
                say("Doch trotzdem biete ich sie dir zu einem fairen Preis an!") 
                say("Ich hoffe das du auch mein Angebot nutzen wirst!!") 
                say("Nun gut...sieh dich um in meinem Laden!") 
                say("") 
                q.done() 
            elseif s == 3 then 
                game.open_mall() 
            end 
        elseif l == 2 then 
            say("Herzlich Willkommen [3]") 

            local f = pc.getqf("recommendation") 
            local s = 0 

            if f <= 1 then 
                s = select("Test", "Lager", "Itemshop Lager", "Schließen") 
            elseif f == 2 then 
                s = select("Nicht Bezahlen!", "Lager", "Itemshop Lager", "Schließen") 
            elseif f == 3 then 
                s = select("Bezahlen", "Lager", "Itemshop Lager", "Schließen") 
            end 

            if s == 1 then 
                if f == 1 then 
                    say("AGAIN") 
                    q.set_title(locale.stash.enlarge_2_title) 
                    if pc.countitem(locale.stash.enlarge_2_item) < 1 then 
                        pc.give_item2(locale.stash.enlarge_2_item) 
                    end 
                elseif f == 2 then 
                    say("KEIN GELD") 
                    pc.setqf("recommendation", 0) 
                    q.done() 
                elseif f == 3 then 
                    -- ??? ??? ?? ?? 
                    if pc.countitem(locale.stash.enlarge_2_mark_item) == 0 then 
                        say("SIE HABEN YANG! 2") 
                        q.set_title(locale.stash.enlarge_2_title) 
                        q.start() 
                        pc.setqf("recommendation", 1) 
                    else 
                        say("SIE HABEN YANG! 3") 
                        game.set_safebox_level(3) 
                        pc.removeitem(locale.stash.enlarge_2_mark_item) 
                        q.done() 
                    end 
                else 
                    say(locale.stash.enlarge_2_msg1,pc.name,math.mod(pc.job,2)==0 and locale.man_postfix or locale.woman_postfix,locale.stash.enlarge_2_msg2) 
                    if pc.countitem(locale.stash.enlarge_2_item)<1 then 
                        pc.give_item2(locale.stash.enlarge_2_item) 
                    end 
                    pc.setqf("recommendation",1) 
                    q.set_title(locale.stash.enlarge_2_title) 
                    q.start() 
                end 
            elseif s == 2 then 
                game.open_safebox() 
            elseif s == 3 then 
                --npc.open_shop() 
                -- ?? ??? ?? ?? ?? 
                say("Haruko:") 
                say("Hmm...") 
                say("Du hast das Itemshop-Lager geöffnet...") 
                say("Wenn du hier was auffinden willst, musst") 
                say("du natürlich zuerst was im Itemshop gekauft") 
                say("haben!") 
                say("") 
                q.done() 
            elseif s == 4 then 
                game.open_mall() 
            end 
        elseif l == 3 then 
            say("Herzlich Willkommen!") 
            local s = select("Lager", "Itemshop Lager", "Schließen") 

            if s == 1 then 
                game.open_safebox() 
            elseif s == 2 then 
                npc.open_shop() 
                -- ?? ??? ?? ?? ?? 
                say("Haruko:") 
                say("Hmm...") 
                say("Du hast das Itemshop-Lager geöffnet...") 
                say("Wenn du hier was auffinden willst, musst") 
                say("du natürlich zuerst was im Itemshop gekauft") 
                say("haben!") 
                say("") 
                q.done() 
            elseif s == 3 then 
                game.open_mall() 
            end 
        --local s = select("TEST ENTLARGE 3", "Lager", "Itemshop Lager", "Schließen") 
        --if s == 1 then 
        --    say("Herein Spaziert in die gute Stube!") 

        --    local s = select("Ja", "Nein") 
        --    if s == 1 then 
        --    say(locale.stash.enlarge_try_ok_answer) 
        --    setstate("enlarge_3") 
        --    pc.setqf("3_left_time", 30*60) 
        --    loop_timer("enlarge_3_kill_esoteric",3) 
        --    pc.setqf("3_left_count",100) 
        --    q.set_title(locale.stash.enlarge_3_title) 
        --    q.set_counter_name(locale.stash.enlarge_3_counter) 
        --    q.set_counter_value(100) 
        --    q.set_clock_name(locale.stash.enlarge_3_timer) 
        --    q.set_clock_value(30 * 60) 
        --    q.start() 
        --    else 
        --    say("Kein Gebrauch!") 
        --    end 
        --elseif s == 2 then 
        --    game.open_safebox() 
        --end 
        elseif l >= 3 then 
            say("Herzlich Willkommen") 

            local s = select("Lager", "Barren", "Itemshop Lager", "Schließen") 

            if s == 1 then 
                game.open_safebox() 
            elseif s == 2 then 
                npc.open_shop() 
                -- ?? ??? ?? ?? ?? 
                say("Haruko:") 
                say("Hmm...") 
                say("Du hast das Itemshop-Lager geöffnet...") 
                say("Wenn du hier was auffinden willst, musst") 
                say("du natürlich zuerst was im Itemshop gekauft") 
                say("haben!") 
                say("") 
                q.done() 
            elseif s == 3 then 
                game.open_mall() 
            end 
        end 
    end 

    when oldwoman.chat.locale.stash.enlarge_2_recommendation with pc.getf("stash","recommendation") == 1 begin 
        say(locale.stash.enlarge_2_oldwoman_greet) 
        say(delay(400), ". . . [/DELAY]") 

        if pc.level < 25 then 
        -- ??? 25?? ??? ?????? ?? ???. 
        say(locale.stash.enlarge_2_oldwoman_reject) 
        pc.setqf("recommendation", 2) 
        q.set_title(locale.stash.enlarge_2_oldwoman_title1) 
        else 
        -- ?????? ??.. ?????? ??? ?? ?. 
        say(locale.stash.enlarge_2_oldwoman_accept) 
        pc.setqf("recommendation", 3) 
        pc.give_item2(locale.stash.enlarge_2_mark_item) 
        q.set_title(locale.stash.enlarge_2_oldwoman_title2) 
        end 

        pc.removeitem(locale.stash.enlarge_2_item) 
    end  
    end 

    state enlarge_stash1 begin 
    when info begin 
        setskin(SCROLL) 
        setbgimage("level_bg.tga") 
        addimage(20,12,special.levelup_quest[8][4]) 
        setcolor(0,0,0) 
        say(locale.stash.enlarge_1_info1,item_name(pc.job<3 and locale.stash.enlarge_item1 or locale.stash.enlarge_item2),locale.stash.enlarge_1_info2) 
        if pc.get_map_index() > 0 and pc.get_map_index() <= table.getn(special.lvq_map) then 
        for j,i in {8,9,10,11,17} begin 
            table.foreachi( 
            special.lvq_map[pc.get_map_index()][i],  
            function (n,p) addmapsignal(p[1]*100, p[2]*100) end 
            ) 
        end 
        setmapcenterposition(200, 0) 
        end 
        select(locale.confirm) 
        clearmapsignal() 
        setskin(NOWINDOW) 
    end 

    when warehouse_keeper.click begin 
        say("Herzlich Willkommen bei mir!") 
        local s = select(locale.stash.enlarge_1_take_bear,"Lager", "Itemshop Lager", "Schließen"); 
        if s == 1 then 
        -- ????? ???? ?? 
        if pc.countitem(locale.stash.enlarge_1_item)>=30 then 
            say(locale.stash.enlarge_1_success) 
            pc.removeitem(locale.stash.enlarge_1_item,30) 
            game.set_safebox_level(2) 
            setstate(start) 
            q.done() 
            cleartimer("enlarge_1_kill_bear") 
        else 
            say(locale.stash.enlarge_1_notyet) 
        end 
        elseif s == 2 then 
        game.open_safebox() 
        elseif s == 3 then 
        game.open_mall() 
        end 
    end 

    when kill begin 
        if npc.race >= 112 and npc.race <= 116 and -- ????? 
        (pc.weapon == 50 or pc.weapon == 5030) then 
        if math.random(5) == 1 then 
            -- ?? ??! 
            syschat(locale.stash.enlarge_1_getone) 
            pc.give_item2(locale.stash.enlarge_1_item) 
            if pc.countitem(locale.stash.enlarge_1_item) == 30 then 
            q.set_counter_value(0) 
            chat(pc.name,locale.stash.enlarge_1_complete) 
            elseif pc.countitem(locale.stash.enlarge_1_item) < 30 then 
            q.set_counter_value(30 - pc.countitem(locale.stash.enlarge_1_item)) 
            end 
        end 
        end 
    end 

    when enlarge_1_kill_bear.timer begin 
        setstate(enlarge_1_fail) 
    end 

    when login begin 
        if game.get_safebox_level() == 1 then 
        setstate(enlarge_1_fail) 
        else 
        setstate(start) 
        end 
    end 
    end 

    state enlarge_1_fail begin 
    when info begin 
        say(locale.stash.enlarge_1_fail_info) 
    end 

    when warehouse_keeper.click begin 
        say(locale.stash.enlarge_1_fail_ms) 
        q.done() 
        setstate("start") 
    end 
    end 

    state enlarge_3 begin 
    when info begin 
    end 

    when warehouse_keeper.click begin 
        say("Herzlich Willkommen, Abenteurer!") 
        local s = select(locale.stash.enlarge_3_complete, "Lager", "Itemshop Lager", "Schließen") 
        if s == 1 then 
        -- ????? ???? ?? 
        if pc.getqf("3_left_count")<=0 then 
            say(locale.stash.enlarge_3_success) 
            game.set_safebox_level(4) 
            setstate(start) 
            q.done() 
            cleartimer("enlarge_3_kill_esoteric") 
        else 
            say(locale.stash.enlarge_3_notyet) 
        end 
        elseif s == 2 then 
        game.open_safebox() 
        elseif s == 3 then 
        game.open_mall() 
        end 
    end 

    when kill begin 
        if npc.race >= 601 and npc.race <= 609 then-- ?????? 
        local n = pc.getqf("3_left_count")-1 
        pc.setqf("3_left_count",n) 
        q.set_counter_name(locale.stash.enlarge_3_counter) 
        q.set_counter_value(n) 
        end 
    end 

    when enlarge_3_kill_esoteric.timer begin 
        local t = pc.getqf("3_left_time") 
        if t <= 0 then 
        setstate(enlarge_3_fail) 
        cleartimer("enlarge_3_kill_esoteric") 
        else 
        pc.setqf("3_left_time",t-3); 
        end 
    end 

    when login begin 
        local t = pc.getqf("3_left_time") 
        if t <= 0 then 
        setstate(enlarge_3_fail) 
        else 
        loop_timer("enlarge_3_kill_esoteric",3) 

        q.set_counter_name(locale.stash.enlarge_3_counter) 
        q.set_counter_value(pc.getqf("3_left_count")) 
        q.set_clock_name(locale.stash.enlarge_3_timer) 
        q.set_clock_value(t) 
        q.start() 
        end 
    end 
    end 

    state enlarge_3_fail begin 
    when warehouse_keeper.click begin 
        say(locale.stash.enlarge_1_fail_msg) 
        q.done() 
        setstate("start") 
    end 
    end 
end 
12/08/2010 09:15 lfcmaus#1016
hai schau mal soweit ich gestern abend gelernt habe darf dort an der stelle:

local "variable" == "zahlwort" then <<<<< nur ein = sein unten machst es ja auch nur mit einen

dann bin ich mir nicht sicher aba des php zeigts auch komisch an mach mal die die " " bei lager weg also dort >>> say("anklickst und auf "Lager öffnen" gehst.")
ich glaub das er dir dort die aussage beendet weil ja " " dazu genutzt werden mit den klammern etwas aus zu geben probiers mal mit * oder ' für die " an der stelle vllt gehts ja
mhm und probiers mal mit überall mal drüber gehen und wo du

PHP Code:
            if f <= 1 then 
                s = select("Test", "Lager", "Itemshop Lager", "Schließen") 
            elseif f == 2 then 
                s = select("Nicht Bezahlen!", "Lager", "Itemshop Lager", "Schließen") 
            elseif f == 3 then 
                s = select("Bezahlen", "Lager", "Itemshop Lager", "Schließen") 
            end 

            if s == 1 then 
                if f == 1 then 
                    say("AGAIN") 
                    q.set_title(locale.stash.enlarge_2_title) 
                    if pc.countitem(locale.stash.enlarge_2_item) < 1 then 
                        pc.give_item2(locale.stash.enlarge_2_item) 
                    end 
                elseif f == 2 then 
                    say("KEIN GELD") 
                    pc.setqf("recommendation", 0) 
                    q.done() 
                elseif f == 3 then 
                    -- ??? ??? ?? ?? 
                    if pc.countitem(locale.stash.enlarge_2_mark_item) == 0 then 
                        say("SIE HABEN YANG! 2") 
                        q.set_title(locale.stash.enlarge_2_title) 
                        q.start() 
                        pc.setqf("recommendation", 1) 
                    else 
                        say("SIE HABEN YANG! 3") 
                        game.set_safebox_level(3) 
                        pc.removeitem(locale.stash.enlarge_2_mark_item) 
                        q.done() 
                    end 
bist du sicher das es so aussehen muss sowas hab ich noch net gesehn in ner qest bisher
wo hats du das her
ich kann des nicht nachvollziehen

also wenn mans liest gibst du 3 verschieden auswahlmöglichkeiten an und beendest das dasnn und nachem beenden gibst du an was passiert wenn man in einer der auswahlmöglichkeiten etwas klickt

so würd ichs lesen jetzt
kann auch falsch gelesen sein von mir oder oben der tipp mit dem = und "
würd ich mal testen

und edit doch vllt mal dein fehler drunter damit die anderen wissen warum überhaupt help ^^


_______________________

ich verweise außerdem die anderen leser nochmals auf meinen post oben mit dem titel :

er will einfach nicht spawnen
12/08/2010 15:16 Lowwer#1017
Quote:
Originally Posted by vinni03 View Post
Help pls :D

PHP Code:
-- ????? -> ?? 
-- ???+4 -> ??????? 
-- ????? -> ????? 
quest stash begin 
    state start begin -- ???? ??? ?? 
    when 9005.click begin 
        local l = game.get_safebox_level() 
        --syschat(l) -- for debug 

        if l == 0 then 
            say("Haruko:") 
            say("Ah, du bist bestimmt der Neue!") 
            say("Bist anscheinend an meine großen") 
            say("Lager interessiert!") 
            say("") 
            say("Haha, aber nicht zu voreilig!") 
            say("Eine kleine Spende verlange ich immerhin.") 
            say("Zwar ist es nicht viel, aber damit kann") 
            say("ich leben!") 
            say("") 
            say_reward("Es kostet 500 Yang!") 

            if pc.gold < 500 then 
                say("Haruko:") 
                say("Ja, nun werd mir aber nicht frech!") 
                say("Du wirst bestimmt diese kleine") 
                say("Anzahl an Yang irgendwo anscheffeln") 
                say("können. Woher ist mir egal!") 
                say("") 
                say_reward("Es kostet 500 Yang!") 
            else 
                local s = select("Erstellen", "Doch noch nicht") 
                if s == 1 then 
                --stash.setlevel(1) 
                pc.changegold(-500) 
                game.set_safebox_level(1) 
                say("Haruko:") 
                say("Ah, geht doch. Danke für das Yang.") 
                say("Dein Lager hab ich nun zurecht gelegt.") 
                say("Du kannst es erreichen, indem du mich") 
                say("anklickst und auf "Lager öffnen" gehst.") 
                say("Dein Startpasswort lautet 00000. Dieses") 
                say("kannst du aber ändern.") 
                else 
                say("Naja, dann viel Spaß damit!") 
                end 
            end 
        elseif l == 1 then  
            say("Herzlich Willkommen!") 
            say("Anscheinend wieder viel gearbeitet") 
            say("und hast viel zum Lagern nun dabei.") 
            say("") 
            say("Naja, sag wieso du hier bist...") 

            if pc.getqf("open_count") < 3 then 
                pc.setqf("open_count",pc.getqf("open_count")+1) 
            end 

            local s = select("Lager öffnen", "Itemshop-Lager öffnen", "Schließen") 

            if s == 1 then 
                game.open_safebox() 
            elseif s == 2 then 
                -- ?? ?? ??? ?? ??,?? ???? 
                if pc.getqf("gold_bar_say_count") < 3 then 
                pc.setqf("gold_bar_say_count",pc.getqf("gold_bar_say_count")+1) 
                wait() 
                end 
                npc.open_shop() 
                say("Hmmm....") 
                say("Unsere Goldvorräte sind sehr knapp...") 
                say("Doch trotzdem biete ich sie dir zu einem fairen Preis an!") 
                say("Ich hoffe das du auch mein Angebot nutzen wirst!!") 
                say("Nun gut...sieh dich um in meinem Laden!") 
                say("") 
                q.done() 
            elseif s == 3 then 
                game.open_mall() 
            end 
        elseif l == 2 then 
            say("Herzlich Willkommen [3]") 

            local f = pc.getqf("recommendation") 
            local s = 0 

            if f <= 1 then 
                s = select("Test", "Lager", "Itemshop Lager", "Schließen") 
            elseif f == 2 then 
                s = select("Nicht Bezahlen!", "Lager", "Itemshop Lager", "Schließen") 
            elseif f == 3 then 
                s = select("Bezahlen", "Lager", "Itemshop Lager", "Schließen") 
            end 

            if s == 1 then 
                if f == 1 then 
                    say("AGAIN") 
                    q.set_title(locale.stash.enlarge_2_title) 
                    if pc.countitem(locale.stash.enlarge_2_item) < 1 then 
                        pc.give_item2(locale.stash.enlarge_2_item) 
                    end 
                elseif f == 2 then 
                    say("KEIN GELD") 
                    pc.setqf("recommendation", 0) 
                    q.done() 
                elseif f == 3 then 
                    -- ??? ??? ?? ?? 
                    if pc.countitem(locale.stash.enlarge_2_mark_item) == 0 then 
                        say("SIE HABEN YANG! 2") 
                        q.set_title(locale.stash.enlarge_2_title) 
                        q.start() 
                        pc.setqf("recommendation", 1) 
                    else 
                        say("SIE HABEN YANG! 3") 
                        game.set_safebox_level(3) 
                        pc.removeitem(locale.stash.enlarge_2_mark_item) 
                        q.done() 
                    end 
                else 
                    say(locale.stash.enlarge_2_msg1,pc.name,math.mod(pc.job,2)==0 and locale.man_postfix or locale.woman_postfix,locale.stash.enlarge_2_msg2) 
                    if pc.countitem(locale.stash.enlarge_2_item)<1 then 
                        pc.give_item2(locale.stash.enlarge_2_item) 
                    end 
                    pc.setqf("recommendation",1) 
                    q.set_title(locale.stash.enlarge_2_title) 
                    q.start() 
                end 
            elseif s == 2 then 
                game.open_safebox() 
            elseif s == 3 then 
                --npc.open_shop() 
                -- ?? ??? ?? ?? ?? 
                say("Haruko:") 
                say("Hmm...") 
                say("Du hast das Itemshop-Lager geöffnet...") 
                say("Wenn du hier was auffinden willst, musst") 
                say("du natürlich zuerst was im Itemshop gekauft") 
                say("haben!") 
                say("") 
                q.done() 
            elseif s == 4 then 
                game.open_mall() 
            end 
        elseif l == 3 then 
            say("Herzlich Willkommen!") 
            local s = select("Lager", "Itemshop Lager", "Schließen") 

            if s == 1 then 
                game.open_safebox() 
            elseif s == 2 then 
                npc.open_shop() 
                -- ?? ??? ?? ?? ?? 
                say("Haruko:") 
                say("Hmm...") 
                say("Du hast das Itemshop-Lager geöffnet...") 
                say("Wenn du hier was auffinden willst, musst") 
                say("du natürlich zuerst was im Itemshop gekauft") 
                say("haben!") 
                say("") 
                q.done() 
            elseif s == 3 then 
                game.open_mall() 
            end 
        --local s = select("TEST ENTLARGE 3", "Lager", "Itemshop Lager", "Schließen") 
        --if s == 1 then 
        --    say("Herein Spaziert in die gute Stube!") 

        --    local s = select("Ja", "Nein") 
        --    if s == 1 then 
        --    say(locale.stash.enlarge_try_ok_answer) 
        --    setstate("enlarge_3") 
        --    pc.setqf("3_left_time", 30*60) 
        --    loop_timer("enlarge_3_kill_esoteric",3) 
        --    pc.setqf("3_left_count",100) 
        --    q.set_title(locale.stash.enlarge_3_title) 
        --    q.set_counter_name(locale.stash.enlarge_3_counter) 
        --    q.set_counter_value(100) 
        --    q.set_clock_name(locale.stash.enlarge_3_timer) 
        --    q.set_clock_value(30 * 60) 
        --    q.start() 
        --    else 
        --    say("Kein Gebrauch!") 
        --    end 
        --elseif s == 2 then 
        --    game.open_safebox() 
        --end 
        elseif l >= 3 then 
            say("Herzlich Willkommen") 

            local s = select("Lager", "Barren", "Itemshop Lager", "Schließen") 

            if s == 1 then 
                game.open_safebox() 
            elseif s == 2 then 
                npc.open_shop() 
                -- ?? ??? ?? ?? ?? 
                say("Haruko:") 
                say("Hmm...") 
                say("Du hast das Itemshop-Lager geöffnet...") 
                say("Wenn du hier was auffinden willst, musst") 
                say("du natürlich zuerst was im Itemshop gekauft") 
                say("haben!") 
                say("") 
                q.done() 
            elseif s == 3 then 
                game.open_mall() 
            end 
        end 
    end 

    when oldwoman.chat.locale.stash.enlarge_2_recommendation with pc.getf("stash","recommendation") == 1 begin 
        say(locale.stash.enlarge_2_oldwoman_greet) 
        say(delay(400), ". . . [/DELAY]") 

        if pc.level < 25 then 
        -- ??? 25?? ??? ?????? ?? ???. 
        say(locale.stash.enlarge_2_oldwoman_reject) 
        pc.setqf("recommendation", 2) 
        q.set_title(locale.stash.enlarge_2_oldwoman_title1) 
        else 
        -- ?????? ??.. ?????? ??? ?? ?. 
        say(locale.stash.enlarge_2_oldwoman_accept) 
        pc.setqf("recommendation", 3) 
        pc.give_item2(locale.stash.enlarge_2_mark_item) 
        q.set_title(locale.stash.enlarge_2_oldwoman_title2) 
        end 

        pc.removeitem(locale.stash.enlarge_2_item) 
    end  
    end 

    state enlarge_stash1 begin 
    when info begin 
        setskin(SCROLL) 
        setbgimage("level_bg.tga") 
        addimage(20,12,special.levelup_quest[8][4]) 
        setcolor(0,0,0) 
        say(locale.stash.enlarge_1_info1,item_name(pc.job<3 and locale.stash.enlarge_item1 or locale.stash.enlarge_item2),locale.stash.enlarge_1_info2) 
        if pc.get_map_index() > 0 and pc.get_map_index() <= table.getn(special.lvq_map) then 
        for j,i in {8,9,10,11,17} begin 
            table.foreachi( 
            special.lvq_map[pc.get_map_index()][i],  
            function (n,p) addmapsignal(p[1]*100, p[2]*100) end 
            ) 
        end 
        setmapcenterposition(200, 0) 
        end 
        select(locale.confirm) 
        clearmapsignal() 
        setskin(NOWINDOW) 
    end 

    when warehouse_keeper.click begin 
        say("Herzlich Willkommen bei mir!") 
        local s = select(locale.stash.enlarge_1_take_bear,"Lager", "Itemshop Lager", "Schließen"); 
        if s == 1 then 
        -- ????? ???? ?? 
        if pc.countitem(locale.stash.enlarge_1_item)>=30 then 
            say(locale.stash.enlarge_1_success) 
            pc.removeitem(locale.stash.enlarge_1_item,30) 
            game.set_safebox_level(2) 
            setstate(start) 
            q.done() 
            cleartimer("enlarge_1_kill_bear") 
        else 
            say(locale.stash.enlarge_1_notyet) 
        end 
        elseif s == 2 then 
        game.open_safebox() 
        elseif s == 3 then 
        game.open_mall() 
        end 
    end 

    when kill begin 
        if npc.race >= 112 and npc.race <= 116 and -- ????? 
        (pc.weapon == 50 or pc.weapon == 5030) then 
        if math.random(5) == 1 then 
            -- ?? ??! 
            syschat(locale.stash.enlarge_1_getone) 
            pc.give_item2(locale.stash.enlarge_1_item) 
            if pc.countitem(locale.stash.enlarge_1_item) == 30 then 
            q.set_counter_value(0) 
            chat(pc.name,locale.stash.enlarge_1_complete) 
            elseif pc.countitem(locale.stash.enlarge_1_item) < 30 then 
            q.set_counter_value(30 - pc.countitem(locale.stash.enlarge_1_item)) 
            end 
        end 
        end 
    end 

    when enlarge_1_kill_bear.timer begin 
        setstate(enlarge_1_fail) 
    end 

    when login begin 
        if game.get_safebox_level() == 1 then 
        setstate(enlarge_1_fail) 
        else 
        setstate(start) 
        end 
    end 
    end 

    state enlarge_1_fail begin 
    when info begin 
        say(locale.stash.enlarge_1_fail_info) 
    end 

    when warehouse_keeper.click begin 
        say(locale.stash.enlarge_1_fail_ms) 
        q.done() 
        setstate("start") 
    end 
    end 

    state enlarge_3 begin 
    when info begin 
    end 

    when warehouse_keeper.click begin 
        say("Herzlich Willkommen, Abenteurer!") 
        local s = select(locale.stash.enlarge_3_complete, "Lager", "Itemshop Lager", "Schließen") 
        if s == 1 then 
        -- ????? ???? ?? 
        if pc.getqf("3_left_count")<=0 then 
            say(locale.stash.enlarge_3_success) 
            game.set_safebox_level(4) 
            setstate(start) 
            q.done() 
            cleartimer("enlarge_3_kill_esoteric") 
        else 
            say(locale.stash.enlarge_3_notyet) 
        end 
        elseif s == 2 then 
        game.open_safebox() 
        elseif s == 3 then 
        game.open_mall() 
        end 
    end 

    when kill begin 
        if npc.race >= 601 and npc.race <= 609 then-- ?????? 
        local n = pc.getqf("3_left_count")-1 
        pc.setqf("3_left_count",n) 
        q.set_counter_name(locale.stash.enlarge_3_counter) 
        q.set_counter_value(n) 
        end 
    end 

    when enlarge_3_kill_esoteric.timer begin 
        local t = pc.getqf("3_left_time") 
        if t <= 0 then 
        setstate(enlarge_3_fail) 
        cleartimer("enlarge_3_kill_esoteric") 
        else 
        pc.setqf("3_left_time",t-3); 
        end 
    end 

    when login begin 
        local t = pc.getqf("3_left_time") 
        if t <= 0 then 
        setstate(enlarge_3_fail) 
        else 
        loop_timer("enlarge_3_kill_esoteric",3) 

        q.set_counter_name(locale.stash.enlarge_3_counter) 
        q.set_counter_value(pc.getqf("3_left_count")) 
        q.set_clock_name(locale.stash.enlarge_3_timer) 
        q.set_clock_value(t) 
        q.start() 
        end 
    end 
    end 

    state enlarge_3_fail begin 
    when warehouse_keeper.click begin 
        say(locale.stash.enlarge_1_fail_msg) 
        q.done() 
        setstate("start") 
    end 
    end 
end 
Wieso kopierst du meine Quest ? o_O
War zwar keine große Arbeit, habe ja nur die Einleitung etc. was er sagt verbessert. Aber wieso kopiert man das dann und fragst einfach nochmal auf der übernächsten Seite was da falsch ist ? *facepalm*
Das kann ich ja wohl selbst machen.

Hm. Ich machs dann auch mal...
Also habe bei 3 Quests Problemen. Keine Fehlermeldung in VPC...
1. Quest ist Lager öffnen etc.
2. Quest ist ein Willkommensgruß wenn man zum 1. Mal auf den Server kommt
3. Quest ist eine PVP-Quest...

PHP Code:
-- ????? -> ??
-- ???+4 -> ???????
-- ????? -> ?????
quest stash begin
    state start begin -- ???? ??? ??
    when 9005.click begin
        local l = game.get_safebox_level()
        --syschat(l) -- for debug

        if l == 0 then
            say("Haruko:")
            say("Ah, du bist bestimmt der Neue!")
            say("Bist anscheinend an meine großen")
            say("Lager interessiert!")
            say("")
            say("Haha, aber nicht zu voreilig!")
            say("Eine kleine Spende verlange ich immerhin.")
            say("Zwar ist es nicht viel, aber damit kann")
            say("ich leben!")
            say("")
            say_reward("Es kostet 500 Yang!")

            if pc.gold < 500 then
                say("Haruko:")
                say("Ja, nun werd mir aber nicht frech!")
                say("Du wirst bestimmt diese kleine")
                say("Anzahl an Yang irgendwo anscheffeln")
                say("können. Woher ist mir egal!")
                say("")
                say_reward("Es kostet 500 Yang!")
            else
                local s = select("Erstellen", "Doch noch nicht")
                if s == 1 then
                --stash.setlevel(1)
                pc.changegold(-500)
                game.set_safebox_level(1)
                say("Haruko:")
                say("Ah, geht doch. Danke für das Yang.")
                say("Dein Lager hab ich nun zurecht gelegt.")
                say("Du kannst es erreichen, indem du mich")
                say("anklickst und auf "Lager öffnen" gehst.")
                say("Dein Startpasswort lautet 00000. Dieses")
                say("kannst du aber ändern.")
                else
                say("Naja, dann viel Spaß damit!")
                end
            end
        elseif l == 1 then 
            say("Herzlich Willkommen!")
            say("Anscheinend wieder viel gearbeitet")
            say("und hast viel zum Lagern nun dabei.")
            say("")
            say("Naja, sag wieso du hier bist...")

            if pc.getqf("open_count") < 3 then
                pc.setqf("open_count",pc.getqf("open_count")+1)
            end

            local s = select("Lager öffnen", "Itemshop-Lager öffnen", "Schließen")

            if s == 1 then
                game.open_safebox()
            elseif s == 2 then
                -- ?? ?? ??? ?? ??,?? ????
                if pc.getqf("gold_bar_say_count") < 3 then
                pc.setqf("gold_bar_say_count",pc.getqf("gold_bar_say_count")+1)
                wait()
                end
                npc.open_shop()
                say("Hmmm....")
                say("Unsere Goldvorräte sind sehr knapp...")
                say("Doch trotzdem biete ich sie dir zu einem fairen Preis an!")
                say("Ich hoffe das du auch mein Angebot nutzen wirst!!")
                say("Nun gut...sieh dich um in meinem Laden!")
                say("")
                q.done()
            elseif s == 3 then
                game.open_mall()
            end
        elseif l == 2 then
            say("Herzlich Willkommen [3]")

            local f = pc.getqf("recommendation")
            local s = 0

            if f <= 1 then
                s = select("Test", "Lager", "Itemshop Lager", "Schließen")
            elseif f == 2 then
                s = select("Nicht Bezahlen!", "Lager", "Itemshop Lager", "Schließen")
            elseif f == 3 then
                s = select("Bezahlen", "Lager", "Itemshop Lager", "Schließen")
            end

            if s == 1 then
                if f == 1 then
                    say("AGAIN")
                    q.set_title(locale.stash.enlarge_2_title)
                    if pc.countitem(locale.stash.enlarge_2_item) < 1 then
                        pc.give_item2(locale.stash.enlarge_2_item)
                    end
                elseif f == 2 then
                    say("KEIN GELD")
                    pc.setqf("recommendation", 0)
                    q.done()
                elseif f == 3 then
                    -- ??? ??? ?? ??
                    if pc.countitem(locale.stash.enlarge_2_mark_item) == 0 then
                        say("SIE HABEN YANG! 2")
                        q.set_title(locale.stash.enlarge_2_title)
                        q.start()
                        pc.setqf("recommendation", 1)
                    else
                        say("SIE HABEN YANG! 3")
                        game.set_safebox_level(3)
                        pc.removeitem(locale.stash.enlarge_2_mark_item)
                        q.done()
                    end
                else
                    say(locale.stash.enlarge_2_msg1,pc.name,math.mod(pc.job,2)==0 and locale.man_postfix or locale.woman_postfix,locale.stash.enlarge_2_msg2)
                    if pc.countitem(locale.stash.enlarge_2_item)<1 then
                        pc.give_item2(locale.stash.enlarge_2_item)
                    end
                    pc.setqf("recommendation",1)
                    q.set_title(locale.stash.enlarge_2_title)
                    q.start()
                end
            elseif s == 2 then
                game.open_safebox()
            elseif s == 3 then
                --npc.open_shop()
                -- ?? ??? ?? ?? ??
                say("Haruko:")
                say("Hmm...")
                say("Du hast das Itemshop-Lager geöffnet...")
                say("Wenn du hier was auffinden willst, musst")
                say("du natürlich zuerst was im Itemshop gekauft")
                say("haben!")
                say("")
                q.done()
            elseif s == 4 then
                game.open_mall()
            end
        elseif l == 3 then
            say("Herzlich Willkommen!")
            local s = select("Lager", "Itemshop Lager", "Schließen")

            if s == 1 then
                game.open_safebox()
            elseif s == 2 then
                npc.open_shop()
                -- ?? ??? ?? ?? ??
                say("Haruko:")
                say("Hmm...")
                say("Du hast das Itemshop-Lager geöffnet...")
                say("Wenn du hier was auffinden willst, musst")
                say("du natürlich zuerst was im Itemshop gekauft")
                say("haben!")
                say("")
                q.done()
            elseif s == 3 then
                game.open_mall()
            end
        --local s = select("TEST ENTLARGE 3", "Lager", "Itemshop Lager", "Schließen")
        --if s == 1 then
        --    say("Herein Spaziert in die gute Stube!")

        --    local s = select("Ja", "Nein")
        --    if s == 1 then
        --    say(locale.stash.enlarge_try_ok_answer)
        --    setstate("enlarge_3")
        --    pc.setqf("3_left_time", 30*60)
        --    loop_timer("enlarge_3_kill_esoteric",3)
        --    pc.setqf("3_left_count",100)
        --    q.set_title(locale.stash.enlarge_3_title)
        --    q.set_counter_name(locale.stash.enlarge_3_counter)
        --    q.set_counter_value(100)
        --    q.set_clock_name(locale.stash.enlarge_3_timer)
        --    q.set_clock_value(30 * 60)
        --    q.start()
        --    else
        --    say("Kein Gebrauch!")
        --    end
        --elseif s == 2 then
        --    game.open_safebox()
        --end
        elseif l >= 3 then
            say("Herzlich Willkommen")

            local s = select("Lager", "Barren", "Itemshop Lager", "Schließen")

            if s == 1 then
                game.open_safebox()
            elseif s == 2 then
                npc.open_shop()
                -- ?? ??? ?? ?? ??
                say("Haruko:")
                say("Hmm...")
                say("Du hast das Itemshop-Lager geöffnet...")
                say("Wenn du hier was auffinden willst, musst")
                say("du natürlich zuerst was im Itemshop gekauft")
                say("haben!")
                say("")
                q.done()
            elseif s == 3 then
                game.open_mall()
            end
        end
    end

    when oldwoman.chat.locale.stash.enlarge_2_recommendation with pc.getf("stash","recommendation") == 1 begin
        say(locale.stash.enlarge_2_oldwoman_greet)
        say(delay(400), ". . . [/DELAY]")

        if pc.level < 25 then
        -- ??? 25?? ??? ?????? ?? ???.
        say(locale.stash.enlarge_2_oldwoman_reject)
        pc.setqf("recommendation", 2)
        q.set_title(locale.stash.enlarge_2_oldwoman_title1)
        else
        -- ?????? ??.. ?????? ??? ?? ?.
        say(locale.stash.enlarge_2_oldwoman_accept)
        pc.setqf("recommendation", 3)
        pc.give_item2(locale.stash.enlarge_2_mark_item)
        q.set_title(locale.stash.enlarge_2_oldwoman_title2)
        end

        pc.removeitem(locale.stash.enlarge_2_item)
    end 
    end

    state enlarge_stash1 begin
    when info begin
        setskin(SCROLL)
        setbgimage("level_bg.tga")
        addimage(20,12,special.levelup_quest[8][4])
        setcolor(0,0,0)
        say(locale.stash.enlarge_1_info1,item_name(pc.job<3 and locale.stash.enlarge_item1 or locale.stash.enlarge_item2),locale.stash.enlarge_1_info2)
        if pc.get_map_index() > 0 and pc.get_map_index() <= table.getn(special.lvq_map) then
        for j,i in {8,9,10,11,17} begin
            table.foreachi(
            special.lvq_map[pc.get_map_index()][i], 
            function (n,p) addmapsignal(p[1]*100, p[2]*100) end
            )
        end
        setmapcenterposition(200, 0)
        end
        select(locale.confirm)
        clearmapsignal()
        setskin(NOWINDOW)
    end

    when warehouse_keeper.click begin
        say("Herzlich Willkommen bei mir!")
        local s = select(locale.stash.enlarge_1_take_bear,"Lager", "Itemshop Lager", "Schließen");
        if s == 1 then
        -- ????? ???? ??
        if pc.countitem(locale.stash.enlarge_1_item)>=30 then
            say(locale.stash.enlarge_1_success)
            pc.removeitem(locale.stash.enlarge_1_item,30)
            game.set_safebox_level(2)
            setstate(start)
            q.done()
            cleartimer("enlarge_1_kill_bear")
        else
            say(locale.stash.enlarge_1_notyet)
        end
        elseif s == 2 then
        game.open_safebox()
        elseif s == 3 then
        game.open_mall()
        end
    end

    when kill begin
        if npc.race >= 112 and npc.race <= 116 and -- ?????
        (pc.weapon == 50 or pc.weapon == 5030) then
        if math.random(5) == 1 then
            -- ?? ??!
            syschat(locale.stash.enlarge_1_getone)
            pc.give_item2(locale.stash.enlarge_1_item)
            if pc.countitem(locale.stash.enlarge_1_item) == 30 then
            q.set_counter_value(0)
            chat(pc.name,locale.stash.enlarge_1_complete)
            elseif pc.countitem(locale.stash.enlarge_1_item) < 30 then
            q.set_counter_value(30 - pc.countitem(locale.stash.enlarge_1_item))
            end
        end
        end
    end

    when enlarge_1_kill_bear.timer begin
        setstate(enlarge_1_fail)
    end

    when login begin
        if game.get_safebox_level() == 1 then
        setstate(enlarge_1_fail)
        else
        setstate(start)
        end
    end
    end

    state enlarge_1_fail begin
    when info begin
        say(locale.stash.enlarge_1_fail_info)
    end

    when warehouse_keeper.click begin
        say(locale.stash.enlarge_1_fail_ms)
        q.done()
        setstate("start")
    end
    end

    state enlarge_3 begin
    when info begin
    end

    when warehouse_keeper.click begin
        say("Herzlich Willkommen, Abenteurer!")
        local s = select(locale.stash.enlarge_3_complete, "Lager", "Itemshop Lager", "Schließen")
        if s == 1 then
        -- ????? ???? ??
        if pc.getqf("3_left_count")<=0 then
            say(locale.stash.enlarge_3_success)
            game.set_safebox_level(4)
            setstate(start)
            q.done()
            cleartimer("enlarge_3_kill_esoteric")
        else
            say(locale.stash.enlarge_3_notyet)
        end
        elseif s == 2 then
        game.open_safebox()
        elseif s == 3 then
        game.open_mall()
        end
    end

    when kill begin
        if npc.race >= 601 and npc.race <= 609 then-- ??????
        local n = pc.getqf("3_left_count")-1
        pc.setqf("3_left_count",n)
        q.set_counter_name(locale.stash.enlarge_3_counter)
        q.set_counter_value(n)
        end
    end

    when enlarge_3_kill_esoteric.timer begin
        local t = pc.getqf("3_left_time")
        if t <= 0 then
        setstate(enlarge_3_fail)
        cleartimer("enlarge_3_kill_esoteric")
        else
        pc.setqf("3_left_time",t-3);
        end
    end

    when login begin
        local t = pc.getqf("3_left_time")
        if t <= 0 then
        setstate(enlarge_3_fail)
        else
        loop_timer("enlarge_3_kill_esoteric",3)

        q.set_counter_name(locale.stash.enlarge_3_counter)
        q.set_counter_value(pc.getqf("3_left_count"))
        q.set_clock_name(locale.stash.enlarge_3_timer)
        q.set_clock_value(t)
        q.start()
        end
    end
    end

    state enlarge_3_fail begin
    when warehouse_keeper.click begin
        say(locale.stash.enlarge_1_fail_msg)
        q.done()
        setstate("start")
    end
    end
end 
PHP Code:
quest map3 begin
    state start begin
        when login begin
            if pc.getqf("basic_weapon") == 0 then
                pc.setqf("basic_weapon", 1)
                    
                    if pc.get_level() == 1 then
                    say_title("Willkommensgruß")
                    say("")
                    say("Hallo Neuling!")
                    say("Viele spannende Abenteuer und starke")
                    say("Monster werden dich hier in der Welt")
                    say("von Phorio erwarten. Hier wirst du")
                    say("in einer angenehmen Atmosphäre spielen")
                    say("können und Spaß haben. Am Besten")
                    say("beginnst du deine Reise sofort, und suchst")
                    say("Herausforderungen. Zum Start haben wir dir")
                    say("ein kleines Starterpaket gegeben.")

                end            
            end
        end
    end
end 
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 Mitspieler")
        end

        when button or info begin
            say("Es wird Zeit, dass du zeigst wie stark du bist!")
            say("")
            say("Hier haben wir fnr dich eine passende Aufgabe.")
            say("")
            say("Töte 100 Mitspieler. Das Reich ist dabei egal.")
            say("Du wirst eine Belohnung erhalten, wenn du diese")
            say("Mission erfolgreich abschliesen wirst.")
            say("")
            say_reward("Töte 100 Mitspieler.")
            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 deine Mitspieler")
        end
        
        when button or info begin
            say_title("Info:")
            say_reward( "Du musst noch ".." "..pc.getqf("state").." Mitspieler 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("Du hast 100 Mitspieler getötet.")
                say("Wie versprochen hier deine Belohnung:")
                say_reward("Militärpferd")
                say_reward("Militär-Pferdebuch")
                say_reward("Roter Ginseng x200")
                say_reward("Kraut des schweren Affen")
                horse.set_level("21")
                pc.give_item2(50053, 1)
                pc.give_item2(50056, 200)
                pc.give_item2(50059, 1)
                clear_letter()
                set_state(__COMPLETE__)

            end
        end
    end
    end

    state __COMPLETE__ begin
    end
end 
12/08/2010 16:46 derkiler#1018
Quote:
Originally Posted by CoreDump View Post
ein command befehl ist eig für alle.
alles wofür steht: pc.is_gm kann nur ein gm machen.
aber solange das nicht steht kann für alles ein command verwendet werden.
habs bei einem reichsteleport verwendet. ging!

macht euch doch nicht alles so schwer xD

o.o EDIT!!!!
command(warp "..player..")
so gings bei meinem reichteleporter.
(wer auf nummer sicher gehen will)
Bist du dir sicher das ->..player..
mit den .. der input (das was man eingibt) gemeint ist?
12/08/2010 17:11 CoreDump#1019
ich habs noch nicht ausprobiert.
also bin ich mir nicht sicher.
12/08/2010 17:34 derkiler#1020
Quote:
Originally Posted by CoreDump View Post
ich habs noch nicht ausprobiert.
also bin ich mir nicht sicher.
Also ich hab jetzt schon versch. Varianten ausprobiert z.B.

quest warpring begin
state start begin
when 70007.use begin
say_title("Teleportring:")
say("Hallo ich kann dich teleportieren")
say("Wohin möchtest du teleportiert werden?")
say("Bitte gib hier den Namen des Spielers ein,")
say("zu dem du dich teleportieren willst!")
local player = input()
pc.teleport("player")
end
end
end

wenn jetzt ein spieler player heißt geht das, aber ich will ja den input verwenden habs auch schon anstatt pc.teleport mit pc.warp versuch allerdings gehts damit ned.
Wenn ich pc.teleport("") schreibe -> also nichts reinschreibe gehts ebenfals nicht =(:mad::mad: pc.teleport("input") hab ich auch versucht :mad:hat wer ned idee?

ok hat sich erledigt habs hinbekommen :D endlich
Page 68 of 845 « First 18586667 68 697078118168568 Last »