[SERVICE] Die Questkontrolle

Page 671 of 845 « First 171571621661669670 671 672673681721771 Last »
04/20/2014 14:55 .Delta#10051
soweit ich mich erinnere, hat bei dem event login nur ein fenster geklappt ( nach einer Auswahl = 2.)

probiers mal z.B. so
PHP Code:
quest nation begin 
    state start begin 
        when login begin
            timer("test", 1)
        end
        when test.timer begin
            say_title("teste mich") 
            local nationen = select("Nation1","Nation2","Nation3") 
            if 1==nationen then 
                pc.warp(987600, 987600) 
            elseif 2==nationen then 
                pc.warp(9876500, 9876500) 
            elseif 3==nationen then 
                pc.warp(98765400, 98765400) 
            else 
                return 
            end 
        end 
    end 
end 
04/20/2014 17:35 Dr.Sonii##10052
Quote:
Originally Posted by .Delta View Post
soweit ich mich erinnere, hat bei dem event login nur ein fenster geklappt ( nach einer Auswahl = 2.)

probiers mal z.B. so
PHP Code:
quest nation begin 
    state start begin 
        when login begin
            timer("test", 1)
        end
        when test.timer begin
            say_title("teste mich") 
            local nationen = select("Nation1","Nation2","Nation3") 
            if 1==nationen then 
                pc.warp(987600, 987600) 
            elseif 2==nationen then 
                pc.warp(9876500, 9876500) 
            elseif 3==nationen then 
                pc.warp(98765400, 98765400) 
            else 
                return 
            end 
        end 
    end 
end 
Hat funktioniert. :)
04/20/2014 19:35 LanQeWeilex3#10053
FOLGENDES PROBLEM!
WENN ICH DIE MONSTER KILLE UND DIE MOBS GEKILLT HABE ZÄHLT ER TROTZDEM WEITER, ALSO WENN ICH SCHON 25 BÄREN GETÖTET HABE ZÄHLT ER IN DEN MINUS BEREICH ALSO -1,-2 USW!! BITTE HILFT MIR!!

PHP Code:
quest Beweise_dich3    begin  
    state start begin  
        when login or levelup with pc.level >= 10 begin  
            set_state(information)  
        end  
    end  
    state information begin  
        when letter begin  
            send_letter("Wie stark bist du?")  
        end  
        when info or button begin  
            say_title("DerStarke?")  
            say("") 
            say("")  
            say("") 
            say("") 
            say("") 
            say("") 
            say("") 
            say("") 
            say("") 
            say("")  
            wait() 
            say_title("") 
            say("") 
            say("") 
            say("") 
            say_title("") 
            say_reward("") 
            say_reward("Zerstöre 5 Metin des Kummers") 
            say_reward("Zerstöre 5 Metin des Kampfes") 
            say_reward("Zerstöre 5 Metin der Schlacht") 
            say_reward("Töte 50 Keiler") 
            say_reward("Töte 25 Bären") 
            say_reward("") 
            say_reward("Du findest sie auf Map1.")              
            say_reward("Deine Belohung erhälst du am Ende!")  
            say_title("Viel Glück "..pc.get_name().."!")  
            pc.setqf("state1", 5)  
            q.set_counter("Metin des Kummers", 5)  
            pc.setqf("state2", 5) 
            q.set_counter("Metin des Kampfes", 5) 
            pc.setqf("state3", 5) 
            q.set_counter("Metin der Schlacht", 5) 
            pc.setqf("state4", 50) 
            q.set_counter("Keiler", 50) 
            pc.setqf("state5", 25) 
            q.set_counter("Bär", 25) 
            set_state(kills) 
        end 
    end 
         
    state kills begin 
        when letter begin  
            send_letter("Kämpfe du tapferer Kämpfer")  
        end  
        when info or button begin  
            say_title("Dein Kampf - Er geht noch weiter!") 
            say("") 
            say("") 
            say("") 
            say("") 
            say("") 
            say("")  
            say("") 
            say("") 
            if pc.getqf("state1") == 0 and pc.getqf("state1") == 0 and pc.getqf("state1") == 0 and pc.getqf("state1") == 0 and pc.getqf("state1") == 0 then 
                set_state(finish) 
            else 
                say_title("Dein aktueller Stand") 
                say("")  
                say_reward("Du musst noch "..pc.getqf("state1").." Metin des Kummers töten") 
                say_reward("Du musst noch "..pc.getqf("state2").." Metin des Kampfes töten") 
                say_reward("Du musst noch "..pc.getqf("state3").." Metin der Schlacht töten") 
                say_reward("Du musst noch "..pc.getqf("state4").." Keiler töten") 
                say_reward("Du musst noch "..pc.getqf("state5").." Bären töten") 
                say_reward("") 
                say_reward("Um deinen Auftrag beenden zu können!") 
                say_reward("Bald hast du es geschafft!") 
                say("") 
            end 
        end 
        when kill with npc.get_race() == 8001 begin  
            local count = pc.getqf("state1")-1  
            q.set_counter("Anzahl der verbl", count)  
            pc.setqf("state1", pc.getqf("state1")-1)  
            if pc.getqf("state1") <= 0 then  
             
            end 
        end 
        when kill with npc.get_race() == 8002 begin  
            local count = pc.getqf("state2")-1  
            q.set_counter("Anzahl der verbl", count)  
            pc.setqf("state2", pc.getqf("state2")-1)  
            if pc.getqf("state2") <= 0 then  
             
            end 
        end 
        when kill with npc.get_race() == 8003 begin  
            local count = pc.getqf("state3")-1  
            q.set_counter("Anzahl der verbl", count)  
            pc.setqf("state3", pc.getqf("state3")-1)  
            if pc.getqf("state3") <= 0 then  
             
            end 
        end 
        when kill with npc.get_race() == 108 begin  
            local count = pc.getqf("state4")-1  
            q.set_counter("Anzahl der verbl", count)  
            pc.setqf("state4", pc.getqf("state4")-1)  
            if pc.getqf("state4") <= 0 then  
             
            end 
        end 
        when kill with npc.get_race() == 110 begin  
            local count = pc.getqf("state5")-1  
            q.set_counter("Anzahl der verbl", count)  
            pc.setqf("state5", pc.getqf("state5")-1)  
            if pc.getqf("state5") <= 0 then  
             
            end  
        end  
    end  
         
    state finish begin 
        when letter begin 
            send_letter("Du hast es geschafft!") 
        end 
        when button or info begin 
        say_title("Glückwunsch - Du bist ein wahrer Held") 
            say("") 
            say_title("Du hast den Auftrag erfolgreich abgeschlossen!") 
            say("") 
            say("") 
            say("") 
            say("") 
            say_title("Deine Belohung")             
            say("")  
            say("") 
            say("") 
            say_title("Hier deine Belohnung")  
            say_reward("Du erhälst ein Mobiles Lager, einen Anti-Erfahrungsring") 
            say_reward("25/50/10 Gegenstand Verzaubern/Verstärken/Segenskugeln") 
            if pc.get_job() == 0 then                 
                pc.give_item2(90013, 1) 
                pc.give_item2(70024, 10) 
                pc.give_item2(71084, 25) 
                pc.give_item2(71085, 50) 
            elseif pc.get_job() == 1 then 
                pc.give_item2(90013, 1) 
                pc.give_item2(70024, 10) 
                pc.give_item2(71084, 25) 
                pc.give_item2(71085, 50) 
            elseif pc.get_job() == 2 then                 
                pc.give_item2(90013, 1) 
                pc.give_item2(70024, 10) 
                pc.give_item2(71084, 25) 
                pc.give_item2(71085, 50) 
            elseif pc.get_job() == 3 then 
                pc.give_item2(90013, 1) 
                pc.give_item2(70024, 10) 
                pc.give_item2(71084, 25) 
                pc.give_item2(71085, 50) 
            end 
            clear_letter() 
            set_state(__COMPLETE__)  
        end  
    end 
     
    state __COMPLETE__ begin  
    end 
end  quest Beweise_dich_2    begin  
    state start begin  
        when login or levelup with pc.level >= 10 begin  
            set_state(information)  
        end  
    end  
    state information begin  
        when letter begin  
            send_letter("Wie stark bist du?")  
        end  
        when info or button begin  
            say_title("Wie stark bist du?")  
            say("") 
            say("")  
            say("") 
            say("") 
            say("") 
            say("") 
            say("") 
            say("") 
            say("") 
            say("")  
            wait() 
            say_title("") 
            say("") 
            say("") 
            say("") 
            say_title("") 
            say_reward("") 
            say_reward("Zerstöre 5 Metin des Kummers") 
            say_reward("Zerstöre 5 Metin des Kampfes") 
            say_reward("Zerstöre 5 Metin der Schlacht") 
            say_reward("Töte 50 Keiler") 
            say_reward("Töte 25 Bären") 
            say_reward("") 
            say_reward("Du findest sie auf Map1.")              
            say_reward("Deine Belohung erhälst du am Ende!")  
            say_title("Viel Glück "..pc.get_name().."!")  
            pc.setqf("state1", 5)  
            q.set_counter("Metin des Kummers", 5)  
            pc.setqf("state2", 5) 
            q.set_counter("Metin des Kampfes", 5) 
            pc.setqf("state3", 5) 
            q.set_counter("Metin der Schlacht", 5) 
            pc.setqf("state4", 50) 
            q.set_counter("Keiler", 50) 
            pc.setqf("state5", 25) 
            q.set_counter("Bär", 25) 
            set_state(kills) 
        end 
    end 
         
    state kills begin 
        when letter begin  
            send_letter("Kämpfe du tapferer Kämpfer")  
        end  
        when info or button begin  
            say_title("Dein Kampf - Er geht noch weiter!") 
            say("") 
            say("") 
            say("") 
            say("") 
            say("") 
            say("")  
            say("") 
            say("") 
            if pc.getqf("state1") == 0 and pc.getqf("state1") == 0 and pc.getqf("state1") == 0 and pc.getqf("state1") == 0 and pc.getqf("state1") == 0 then 
                set_state(finish) 
            else 
                say_title("Dein aktueller Stand") 
                say("")  
                say_reward("Du musst noch "..pc.getqf("state1").." Metin des Kummers töten") 
                say_reward("Du musst noch "..pc.getqf("state2").." Metin des Kampfes töten") 
                say_reward("Du musst noch "..pc.getqf("state3").." Metin der Schlacht töten") 
                say_reward("Du musst noch "..pc.getqf("state4").." Keiler töten") 
                say_reward("Du musst noch "..pc.getqf("state5").." Bären töten") 
                say_reward("") 
                say_reward("Um deinen Auftrag beenden zu können!") 
                say_reward("Bald hast du es geschafft!") 
                say("") 
            end 
        end 
        when kill with npc.get_race() == 8001 begin  
            local count = pc.getqf("state1")-1  
            q.set_counter("Anzahl der verbl", count)  
            pc.setqf("state1", pc.getqf("state1")-1)  
            if pc.getqf("state1") <= 0 then  
             
            end 
        end 
        when kill with npc.get_race() == 8002 begin  
            local count = pc.getqf("state2")-1  
            q.set_counter("Anzahl der verbl", count)  
            pc.setqf("state2", pc.getqf("state2")-1)  
            if pc.getqf("state2") <= 0 then  
             
            end 
        end 
        when kill with npc.get_race() == 8003 begin  
            local count = pc.getqf("state3")-1  
            q.set_counter("Anzahl der verbl", count)  
            pc.setqf("state3", pc.getqf("state3")-1)  
            if pc.getqf("state3") <= 0 then  
             
            end 
        end 
        when kill with npc.get_race() == 108 begin  
            local count = pc.getqf("state4")-1  
            q.set_counter("Anzahl der verbl", count)  
            pc.setqf("state4", pc.getqf("state4")-1)  
            if pc.getqf("state4") <= 0 then  
             
            end 
        end 
        when kill with npc.get_race() == 110 begin  
            local count = pc.getqf("state5")-1  
            q.set_counter("Anzahl der verbl", count)  
            pc.setqf("state5", pc.getqf("state5")-1)  
            if pc.getqf("state5") <= 0 then  
             
            end  
        end  
    end  
         
    state finish begin 
        when letter begin 
            send_letter("Du hast es geschafft!") 
        end 
        when button or info begin 
        say_title("Glückwunsch - Du bist ein wahrer Held") 
            say("") 
            say_title("Du hast den Auftrag erfolgreich abgeschlossen!") 
            say("") 
            say("") 
            say("") 
            say("") 
            say_title("Deine Belohung")             
            say("")  
            say("") 
            say("") 
            say_title("Hier deine Belohnung")  
            say_reward("Du erhälst ein Mobiles Lager, einen Anti-Erfahrungsring") 
            say_reward("25/50/10 Gegenstand Verzaubern/Verstärken/Segenskugeln") 
            if pc.get_job() == 0 then                 
                pc.give_item2(90013, 1) 
                pc.give_item2(70024, 10) 
                pc.give_item2(71084, 25) 
                pc.give_item2(71085, 50) 
            elseif pc.get_job() == 1 then 
                pc.give_item2(90013, 1) 
                pc.give_item2(70024, 10) 
                pc.give_item2(71084, 25) 
                pc.give_item2(71085, 50) 
            elseif pc.get_job() == 2 then                 
                pc.give_item2(90013, 1) 
                pc.give_item2(70024, 10) 
                pc.give_item2(71084, 25) 
                pc.give_item2(71085, 50) 
            elseif pc.get_job() == 3 then 
                pc.give_item2(90013, 1) 
                pc.give_item2(70024, 10) 
                pc.give_item2(71084, 25) 
                pc.give_item2(71085, 50) 
            end 
            clear_letter() 
            set_state(__COMPLETE__)  
        end  
    end 
     
    state __COMPLETE__ begin  
    end 
end 
04/20/2014 20:02 SkyWodka#10054
Hey,

zunächst einmal die Quest...

PHP Code:
quest verwarnung begin
    state start begin
        when 70030.use with pc.is_gm() begin
            say("Wähle eine Aktion aus")
            local w = select("Verwarnung", "Abbrechen")
            if w==1 then
            say("Hier kannst du einen User einen")
            say("Verwarnungspunkt geben")
            say("Gebe den Namen des Benutzers ein")
            say("und es geht weiter")
            local name=input()
            local meldung=""..name.."meldung"
            local meldungnow=game.get_event_flag(meldung)
            local meldungafter=game.get_event_flag(meldung)+1
            local search = find_pc_by_name(name) 
            local level=""..name.."level"
            local level=game.get_event_flag(level)
            local status=""..name.."status"
            local status=game.get_event_flag(status)
            local reich=""..name.."reich"
            local reich=game.get_event_flag(reich)
            local savename=""..name.."meldung"
            if search==0 then
                say("Du suche nach dem Charakter: "..name.."")
                say("ergab kein Ergebnis!")
                say(""..name.." ist offline oder existiert nicht!")
                say("Versuche es erneut !")
            elseif pc.getqf(savename)==1 then
                say("Sie haben den User: "..name.."")
                say("Schon einmal bewertet")
                say("Sie können ihr nich nocheinmal bewerten")
            elseif level<20 then
                say("Der User: "..name.."")
                say("ist noch unter Level 20!")
                say("Sie können ihn erst ab Level 20 bewerten")
            elseif name==eigname then
                say("Sie können sich nicht selbst bewerten!")
            elseif pc.getqf(savename)==0 then
                say("Sie wollen disen User bewerten:")
                say_reward("Name: "..name.."")
                say_reward("Level: "..level.."")
                say_reward("Verwarnungspunkte: "..meldungnow.."")
                if reich==1 then
                    say_reward("Reich: Rotes Reich")
                elseif reich==2 then
                    say_reward("Reich: Gelbes Reich")
                elseif reich==3 then
                    say_reward("Reich: Blaues Reich")
                end
                say("Ist das der Richtige User?")
                say("Klick auf weiter um ihm einen")
                say("Verwarnpunkt geben zu können")
                local s = select("Weiter", "Abbrechen")
                if s==1 then
                    game.set_event_flag(meldung, game.get_event_flag(meldung)+1)
                    say("Der Benutzer hat jetzt "..meldungafter.."")
                    say("Verwahnungspunkte")
                else
                    say("Dann halt nicht")
                end
                end
            end
        end
    end
end 

könnte mir jemand die so umschreiben das man auch Spiler Verwarnen kann wenn sie Offline sind?

LG Solution
04/21/2014 12:50 Radiatos#10055
Hab ein Problem mit dieser quest:


Des is der Fehlercode:


syntax error : [string "startpc . get_level ( ) >= 100"]:2: `then' expected near `set_state'
daily_quest_over100.quest:7:Error occured on compile daily_quest_over100.quest
04/21/2014 13:51 The Cookie Monster#10056
Quote:
Originally Posted by Radiatos View Post
Hab ein Problem mit dieser quest:


Des is der Fehlercode:


syntax error : [string "startpc . get_level ( ) >= 100"]:2: `then' expected near `set_state'
daily_quest_over100.quest:7:Error occured on compile daily_quest_over100.quest
nach "state running begin"
fehlt ein "when [blablabla] begin"
also eine zeile danach fehlt ein when^^
04/21/2014 14:41 Radiatos#10057
Quote:
Originally Posted by The Cookie Monster View Post
nach "state running begin"
fehlt ein "when [blablabla] begin"
also eine zeile danach fehlt ein when^^
kannste des fixxen?
04/21/2014 16:50 Rofelmau#10058
mach einfach aus

PHP Code:
  when kill with npc.get_race() == 8001 begin  
            local count = pc.getqf("state1")-1  
            q.set_counter("Anzahl der verbl", count)  
            pc.setqf("state1", pc.getqf("state1")-1)  
            if pc.getqf("state1") <= 0 then  
             
            end 
        end 
PHP Code:
  when kill with npc.get_race() == 8001 begin    
            if pc.getqf("state1") > 0 then  
             local count = pc.getqf("state1")-1  
            q.set_counter("Anzahl der verbl", count)  
            pc.setqf("state1", pc.getqf("state1")-1)
            end 
        end 
und das bei allen
04/21/2014 19:38 HighWave#10059
Ihr könnt mir bestimmt Helfen... Ich habe eine Quest gemacht, in der die Spieler mithilfe eines Items Coins abheben können und sich das halt in Ingame-Coins verwandelt und damit gehandelt werden kann. Das klappt auch alles Super, nur ist das Problem, dass die Leute immer weiter abheben können. Wir füge ich eine Sperre ein, sodass sie keine Coins mehr abheben können, wenn die Spalte "Coins" auf 500 oder so steht, sie aber 1000 abheben wollen ?

Hier der Ausschnitt der Quest:

PHP Code:
if 2==main then
                local g = select ("100.000 Coins umwandeln" , "10.000 Coins umwandeln" , "1.000 Coins umwandeln" , "Coins-Event" , "Abbrechen")
                if g == 1 then
                local DB_USER = "root"
                local DB_PASS = "PW"
                local WERT = 100000
                local ID = pc.get_account_id()
                local QUERY = "UPDATE account.account SET coins = coins - "..WERT.." WHERE id = "..ID..";"
                os.execute("mysql --host=localhost --user="..DB_USER.." --password="..DB_PASS.." --execute='"..QUERY.."'")
                pc.give_item2(90017, 1)
            end
                if g == 2 then
                local DB_USER = "root"
                local DB_PASS = "PW"
                local WERT = 10000
                local ID = pc.get_account_id()
                local QUERY = "UPDATE account.account SET coins = coins - "..WERT.." WHERE id = "..ID..";"
                os.execute("mysql --host=localhost --user="..DB_USER.." --password="..DB_PASS.." --execute='"..QUERY.."'")
                pc.give_item2(90016, 1)
            end
                if g == 3 then
                local DB_USER = "root"
                local DB_PASS = "PW"
                local WERT = 1000
                local ID = pc.get_account_id()
                local QUERY = "UPDATE account.account SET coins = coins - "..WERT.." WHERE id = "..ID..";"
                os.execute("mysql --host=localhost --user="..DB_USER.." --password="..DB_PASS.." --execute='"..QUERY.."'")
                pc.give_item2(90015, 1)
            end
            end 
04/21/2014 21:39 Rofelmau#10060
Du meinst, das sie mehr abheben als sie haben?
Musst einfach vorher die coinsmänge abfragen und sehen ob sie >= des gewünschten Betrags ist
kenne mich leider nicht mit dem mysql kram aus darum kann ich dir das nicht schreiben
aber einfach aus der DB die coinsanzahl laden die sie haben und unter einer Variable speichern und dann sehen ob diese variable >= z.B. 500 ist und wenn ja dann ausgeben wenn nicht dann eben nicht ausgeben
04/21/2014 23:55 HighWave#10061
Quote:
Originally Posted by Rofelmau View Post
Du meinst, das sie mehr abheben als sie haben?
Musst einfach vorher die coinsmänge abfragen und sehen ob sie >= des gewünschten Betrags ist
kenne mich leider nicht mit dem mysql kram aus darum kann ich dir das nicht schreiben
aber einfach aus der DB die coinsanzahl laden die sie haben und unter einer Variable speichern und dann sehen ob diese variable >= z.B. 500 ist und wenn ja dann ausgeben wenn nicht dann eben nicht ausgeben
Ja genau so meine ich das... Habs nur leider noch nicht hinbekommen...
04/21/2014 23:56 sony199#10062
Hey ich bin es nochmal, ich wollte, dass ein eventflag dem eigenen namen zugeteilt wird, aber leider wird mit dieser quest nicht dem eigenen Namen der Eventflag "1" zugeteilt, sondern komischerweise dem befehl "pc.get_name()", mit dem der Name herausgefunden werden soll.

PHP Code:
quest wish_fountain begin
    state start begin        
        when 9152.click begin
            say_title("Der Wunschbrunnen")
            say_gold("")
            say_gold("Dieser Brunnen ist sehr alt, aber voller Magie!")
            say_gold("Wen man eine Goldene Münze in den Brunnen wirft,")
            say_gold("erhälst du ein Item mit etwas Glück ist es sogar,")
            say_gold("dass Item, das du gerne hättest.")
        end
        when 9152.take with item.get_vnum() == 2531 begin
            local name = pc.get_name()
            if game.get_event_flag("name") == 0 then
                game.set_event_flag("name", 1)
                say_gold("Willst du die Goldene Münze hineinwerfen?")
                say_gold("Mit etwas Glück erhälst du sogar dein gewünschtes Item.")
                local choice = select("Ja","Nein")
                if choice == 1 then
                    pc.remove_item(2531)
                    say_gold("Du wirfst nun eine Münze hinein, drücke fest die")
                    say_gold("Daumen, damit dein Wunsch in erfüllung geht.")
                    local wunschbelohnung = number(1, 5)
                    if wunschbelohnung == 1 then
                        say_gold("Du hast Windschuhe erhalten.")
                        pc.give_item2("72702", 1)
                    elseif wunschbelohnung == 2 then
                        say_gold("Du hast ein Schwert+9 erhalten.")
                        pc.give_item2 ("19", 1)
                    elseif wunschbelohnung == 3 then
                        say_gold("Du hast Dolche+9 erhalten.")
                        pc.give_item2("1009", 1)
                    elseif wunschbelohnung == 4 then
                        say_gold("Du hast Fächer+9 erhalten.")
                        pc.give_item2("7009", 1)
                    elseif wunschbelohnung == 5 then
                        say_gold("Du hast eine Glefe+9 erhalten.")
                        pc.give_item2("3009", 1)
                elseif choice == 2 then
                    say_gold("Vielleicht beim nächsten mal.")
                    return
                end
            end
            elseif game.get_event_flag("name") == 1 then
                say_gold("Bitte warte noch "..(game.get_event_flag(warten)-get_time()).." Sekunden")
                return
            else
                say_gold("Unbekannter Fehler")
                return
            end
        end
        when warten.server_timer begin
            local name = pc.get_name()
            game.set_event_flag(name, 0)
            return
        end
    end
end 
04/22/2014 01:15 Rofelmau#10063
Quote:
Originally Posted by sony199 View Post
Hey ich bin es nochmal, ich wollte, dass ein eventflag dem eigenen namen zugeteilt wird, aber leider wird mit dieser quest nicht dem eigenen Namen der Eventflag "1" zugeteilt, sondern komischerweise dem befehl "pc.get_name()", mit dem der Name herausgefunden werden soll.

PHP Code:
quest wish_fountain begin
    state start begin        
        when 9152.click begin
            say_title("Der Wunschbrunnen")
            say_gold("")
            say_gold("Dieser Brunnen ist sehr alt, aber voller Magie!")
            say_gold("Wen man eine Goldene Münze in den Brunnen wirft,")
            say_gold("erhälst du ein Item mit etwas Glück ist es sogar,")
            say_gold("dass Item, das du gerne hättest.")
        end
        when 9152.take with item.get_vnum() == 2531 begin
            local name = pc.get_name()
            if game.get_event_flag("name") == 0 then
                game.set_event_flag("name", 1)
                say_gold("Willst du die Goldene Münze hineinwerfen?")
                say_gold("Mit etwas Glück erhälst du sogar dein gewünschtes Item.")
                local choice = select("Ja","Nein")
                if choice == 1 then
                    pc.remove_item(2531)
                    say_gold("Du wirfst nun eine Münze hinein, drücke fest die")
                    say_gold("Daumen, damit dein Wunsch in erfüllung geht.")
                    local wunschbelohnung = number(1, 5)
                    if wunschbelohnung == 1 then
                        say_gold("Du hast Windschuhe erhalten.")
                        pc.give_item2("72702", 1)
                    elseif wunschbelohnung == 2 then
                        say_gold("Du hast ein Schwert+9 erhalten.")
                        pc.give_item2 ("19", 1)
                    elseif wunschbelohnung == 3 then
                        say_gold("Du hast Dolche+9 erhalten.")
                        pc.give_item2("1009", 1)
                    elseif wunschbelohnung == 4 then
                        say_gold("Du hast Fächer+9 erhalten.")
                        pc.give_item2("7009", 1)
                    elseif wunschbelohnung == 5 then
                        say_gold("Du hast eine Glefe+9 erhalten.")
                        pc.give_item2("3009", 1)
                elseif choice == 2 then
                    say_gold("Vielleicht beim nächsten mal.")
                    return
                end
            end
            elseif game.get_event_flag("name") == 1 then
                say_gold("Bitte warte noch "..(game.get_event_flag(warten)-get_time()).." Sekunden")
                return
            else
                say_gold("Unbekannter Fehler")
                return
            end
        end
        when warten.server_timer begin
            local name = pc.get_name()
            game.set_event_flag(name, 0)
            return
        end
    end
end 
Warum machst du das mit event flags
kannst doch auch ganz normale pc qf's nehmen
dann ist es dem charnamen zu geordnet so oder so
04/22/2014 18:47 ExoBiTe™#10064
Hey jo ich brauche hilfe bei dieser Quest:
PHP Code:
--pc.getweapon()
--pc.getarmor()
quest waffenupgrade begin
    state start begin
        when kill with not npc.is_pc() begin
            local WaffePvM = pc.getqf("pc.getweapon()")
            pc.setqf("PvM_"..pc.getweapon().."", WaffePvM +1 )
            pc.setqf("PvMSchwert", 1)
        end
        
        when kill with npc.is_pc() begin
            local WaffePvP = pc.getqf("pc.getweapon()")
            pc.setqf("PvP_"..pc.getweapon().."", WaffePvP +1 )
            pc.setqf("PvPSchwert", 1)
        end
    
        when kill with not npc.is_pc() begin
            local RüstungPvM = pc.getqf("pc.getarmor()")
            pc.setqf("PvM_"..pc.getarmor().."", RüstungPvM +1 )
            pc.setqf("PvMRüssi", 1)
        end
        
        when kill with npc.is_pc() begin
            local RüstungPvP = pc.getqf("pc.getarmor()")
            pc.setqf("PvP_"..pc.getarmor().."", RüstungPvP +1 )
            pc.setqf("PvPRüssi", 1)
        end
        
--        when login with pc.getqf("PvPRüssi") == 1 and pc.getqf("PvMRüssi") == 1 and pc.getqf("PvPSchwert") == 1 and pc.getqf("PvMSchwert") == 1 begin
        
        when 20011.chat."Statistiken" begin
            say_title(""..mob_name(20011)..":")
            say("Hallo, "..pc.get_name.."")
            say("Mit der Waffe die du gerade trägst,")
            say("hast du bereits "..WaffePvM.." PvM Kills gemacht,")
            say("und "..WaffePvP.." PvP Kills gemacht.")
            say("")
            say("Während du die Rüstung die du gerade trägst,")
            say("anhattest, hast du "..RüstungPvM.." PvM Kills gemacht,")
            say("und "..RüstungPvP.." PvP Kills gemacht.")
            say("")
        end
    end
end 
Beim Compilen sagt er mir keinen Error, aber wenn ich nun Ingame Uriel anspreche, und auf Statistiken klicke, kommt nur
Uriel:
Also praktisch nur das say_title(""..mob_name(20011)..":") .
Sonst kommt nichts mher, und leider kann ich so auch nicht überprüfen, ob er die sachen oben countet. :/
Mfg
04/22/2014 20:56 SkyWodka#10065
Quote:
Hey,

zunächst einmal die Quest...

PHP Code:
quest verwarnung begin
    state start begin
        when 70030.use with pc.is_gm() begin
            say("Wähle eine Aktion aus")
            local w = select("Verwarnung", "Abbrechen")
            if w==1 then
            say("Hier kannst du einen User einen")
            say("Verwarnungspunkt geben")
            say("Gebe den Namen des Benutzers ein")
            say("und es geht weiter")
            local name=input()
            local meldung=""..name.."meldung"
            local meldungnow=game.get_event_flag(meldung)
            local meldungafter=game.get_event_flag(meldung)+1
            local search = find_pc_by_name(name) 
            local level=""..name.."level"
            local level=game.get_event_flag(level)
            local status=""..name.."status"
            local status=game.get_event_flag(status)
            local reich=""..name.."reich"
            local reich=game.get_event_flag(reich)
            local savename=""..name.."meldung"
            if search==0 then
                say("Du suche nach dem Charakter: "..name.."")
                say("ergab kein Ergebnis!")
                say(""..name.." ist offline oder existiert nicht!")
                say("Versuche es erneut !")
            elseif pc.getqf(savename)==1 then
                say("Sie haben den User: "..name.."")
                say("Schon einmal bewertet")
                say("Sie können ihr nich nocheinmal bewerten")
            elseif level<20 then
                say("Der User: "..name.."")
                say("ist noch unter Level 20!")
                say("Sie können ihn erst ab Level 20 bewerten")
            elseif name==eigname then
                say("Sie können sich nicht selbst bewerten!")
            elseif pc.getqf(savename)==0 then
                say("Sie wollen disen User bewerten:")
                say_reward("Name: "..name.."")
                say_reward("Level: "..level.."")
                say_reward("Verwarnungspunkte: "..meldungnow.."")
                if reich==1 then
                    say_reward("Reich: Rotes Reich")
                elseif reich==2 then
                    say_reward("Reich: Gelbes Reich")
                elseif reich==3 then
                    say_reward("Reich: Blaues Reich")
                end
                say("Ist das der Richtige User?")
                say("Klick auf weiter um ihm einen")
                say("Verwarnpunkt geben zu können")
                local s = select("Weiter", "Abbrechen")
                if s==1 then
                    game.set_event_flag(meldung, game.get_event_flag(meldung)+1)
                    say("Der Benutzer hat jetzt "..meldungafter.."")
                    say("Verwahnungspunkte")
                else
                    say("Dann halt nicht")
                end
                end
            end
        end
    end
end 
könnte mir jemand die so umschreiben das man auch Spiler Verwarnen kann wenn sie Offline sind?

LG Solution
#Push #kann mir jemand bitte Behilflich sein?
Page 671 of 845 « First 171571621661669670 671 672673681721771 Last »