[SERVICE] Die Questkontrolle

Page 566 of 845

566

07/07/2013 11:00 aziz381997#8476

Hei wo kann ich das SD und Grotte raus machen bei Warping quest

quest warpring begin
state start begin
when 70007.use begin
say_title("Warpring")
say("Wohin m�chtest du Teleportiert werden?")
local empire = pc.get_empire()
local selectmap = select("Map1","Map2","Orktal","W�ste","Eisland","F euerland","Weiter","Abbrechen")
if selectmap == 8 then
return
elseif selectmap == 7 then
say_title("Warpring")
say("Wohin m�chtest du Teleportiert werden?")
local selectmap2 = select("D�monenturm","Geisterwald","Roter Wald","Spinnendungeon","Grotte der Verbannung","Land der Riesen","Abbrechen")
if selectmap2 == 7 then
return
elseif selectmap2 == 1 then
say_title("Warpring")
say("Wohin m�chtest du Teleportiert werden?")
pc.warp(590500,110800)
elseif selectmap2 == 2 then
say_title("Warpring")
say("Wohin m�chtest du Teleportiert werden?")
local geisterselect = select("Anfang","Ende","Abbrechen")
if geisterselect == 3 then
return
elseif geisterselect == 1 then
pc.warp(290500,5700)
elseif geisterselect == 2 then
pc.warp(286400,44200)
end
elseif selectmap2 == 3 then
say_title("Warpring")
say("Wohin m�chtest du Teleportiert werden?")
local roterselect = select("Anfang","Ende","Abbrechen")
if roterselect == 3 then
return
elseif roterselect == 1 then
pc.warp(1119900,70800)
elseif geisterselect == 2 then
pc.warp(1119100,7700)
end
elseif selectmap2 == 4 then
say_title("Warpring")
say("Wohin m�chtest du Teleportiert werden?")
pc.warp(91700, 525300)
elseif selectmap2 == 5 then
say_title("Warpring")
say("Wohin m�chtest du Teleportiert werden?")
pc.warp(27600, 142700)
elseif selectmap2 == 6 then
say_title("Warpring")
say("Wohin m�chtest du Teleportiert werden?")
pc.warp(819200, 716800)
end
elseif selectmap == 1 then
say_title("Warpring")
say("Wohin m�chtest du Teleportiert werden?")
local map1select = select("Rotes Reich","Gelbes Reich","Blaues Reich","Abbrechen")
if map1select == 4 then
return
elseif map1select == 1 then
pc.warp(474300, 954800)
elseif map1select == 2 then
pc.warp(63800, 166400)
elseif map1select == 3 then
pc.warp(959900, 269200)
end
elseif selectmap == 2 then
say_title("Warpring")
say("Wohin m�chtest du Teleportiert werden?")
local map2select = select("Rotes Reich","Gelbes Reich","Blaues Reich","Abbrechen")
if map2select == 4 then
return
elseif map2select == 1 then
pc.warp(353100, 882900)
elseif map2select == 2 then
pc.warp(145500, 240000)
elseif map2select == 3 then
pc.warp(863900, 246000)
end
elseif selectmap == 3 then
say_title("Warpring")
say("Wohin m�chtest du Teleportiert werden?")
local otselect = select("Anfang","Mitte","Abbrechen")
if otselect == 3 then
return
elseif otselect == 1 then
if empire == 1 then
pc.warp(402100, 673900)
elseif empire == 2 then
pc.warp(270400, 739900)
elseif empire == 3 then
pc.warp(321300, 808000)
end
elseif otselect == 2 then
pc.warp(332800, 745600)
end
elseif selectmap == 4 then
say_title("Warpring")
say("Wohin m�chtest du Teleportiert werden?")
local wuesteselect = select("Anfang","Mitte","Abbrechen")
if wuesteselect == 3 then
return
elseif wuesteselect == 1 then
if empire == 1 then
pc.warp(217800, 627200)
elseif empire == 2 then
pc.warp(221900, 502700)
elseif empire == 3 then
pc.warp(344000, 502500)
end
elseif wuesteselect == 2 then
pc.warp(296800, 547100)
end
elseif selectmap == 5 then
say_title("Warpring")
say("Wohin m�chtest du Teleportiert werden?")
local eisselect = select("Anfang","Mitte","Abbrechen")
if eisselect == 3 then
return
elseif eisselect == 1 then
if empire == 1 then
pc.warp(434200, 290600)
elseif empire == 2 then
pc.warp(375200, 174900)
elseif empire == 3 then
pc.warp(491800, 173600)
end
elseif eisselect == 2 then
pc.warp(436500, 215400)
end
elseif selectmap == 6 then
say_title("Warpring")
say("Wohin m�chtest du Teleportiert werden?")
local feuerselect = select("Anfang","Mitte","Abbrechen")
if feuerselect == 3 then
return
elseif feuerselect == 1 then
if empire == 1 then
pc.warp(599400, 756300)
elseif empire == 2 then
pc.warp(597800, 622200)
elseif empire == 3 then
pc.warp(730700, 689800)
end
elseif feuerselect == 2 then
pc.warp(600800, 687100)
end
end
end
end
end

07/07/2013 13:51 Noa_#8477

Quote:

Originally Posted by .Lowbob

deine geht bei jedem login und levelup immer jeden wert der tabelle durch meine nicht. daf�r funktioniert deine auch bei level reset bei meiner m�sste ich 1-2 zeilen einbauen.

funktioniert den meine nicht auch oder wieso versuchst du mich zu berichtigen?
oder meinst du nur weil meine ein schleife hat belastender ist als deine?
wobei lua 200000 Daten in der Sekunde kontrolliert, bezweifle ich ganz stark das deine quest i-welchen vorteil meiner gegen�ber hat.

07/07/2013 14:00 torbi17#8478

brauche hilfe von euch .. habe ein fehler beim questen neuladen beim teleporter :/

07/07/2013 14:05 Noa_#8479

Die quest soll an gegebenen uhrzeiten eine nachricht schreiben, jedoch gibt sie mir keine nachricht an, hat nur 1x funktioniert dann nicht mehr.

PHP Code:


			
HAT SICH ERLEDIGT IHR LAPPEN

07/07/2013 18:00 TheMad#8480

Hi,

Ich habe in meiner player tabelle die spalte "beruf" eingef�gt und wollte nun per quest, das man diese spalte ausliest und je nach nummer, eine andere antwort bei rauskommt, aber meine quest schenint nicht zu funktionieren, ich bekomme nur den titel gesagt, mehr nicht.

Code:

quest msg begin
	state start begin
		when 80002.use begin
			say_title("Beruf")
			
			local beruf = mysql_query("SELECT beruf from player.player WHERE name = '"..pc.get_name().."'")
			if beruf == 0 then

				say("Du hast keinen beruf")
				
			end
			if beruf == 1 then

				say("Gw, dein beruf ist kopfgeldj�ger")
				
			end
			if beruf == 2 then

				say("Gw, dein beruf ist garnix")
				
			end
		end
	end
end

07/07/2013 18:04 .Leykas#8481

Quote:

Originally Posted by LeykasRecordz

Code:

quest changename begin
    state start begin
        when 71055.use begin
            say_title("Namens�nderung:")
            say("")
            say("Mithilfe dieses Items kannst du deinen Namen")
            say("einmalig �ndern, also �berlege es dir gut, ob")
            say("du deinen Namen wirklich �ndern m�chtest!")
            say("")
            say_reward("M�chtest du deinen wirklich Namen �ndern?")
            say("")
            local change = select("Ja", "Nein")
            if change == 1 then
                say_title("Namens�nderung:")
                say("")
                say("Also du m�chtest wirklich deinen Namen �ndern!")
                say("Bevor du deinen Namen �ndern kannst, m�ssen wir")
                say("erst pr�fen ob dieser Name eigentlich noch frei")
                say("ist.")
                say("")
                say_reward("Gib deinen neuen Namen hier ein:")
                say("")
                local c_name = input()
                local c_search = find_pc_by_name(c_name)
                
                if c_search==0 then 
                    say_title("Namens�nderung:")
                    say("")
                    say("Dieser Name ist noch frei. Bist du dir sicher, dass")
                    say("du dich "..c_name.." nennen m�chtest?")
                    say("")
                    local secure = select("Ja", "Nein")
                    if secure == 1 then
                        say_title("Namens�nderung:")
                        say("")
                        say("Herzlichen Gl�ckwunsch!")
                        say("")
                        say("Deine Name wurde in "..c_name.." ge�ndert!")
                        say("")
                        say_reward("Bitte einmal relog machen, damit die �nderung")
                        say_reward("g�ltig wird!")
                        say("")
                        pc.change_name(c_name)
                        pc.remove_item(71055, 1)
                        set_state(done)
                    else
                        say_title("Namens�nderung:")
                        say("")
                        say("Schade, dass du dich doch anders entschieden hast,")
                        say("aber vielleicht m�chtest du deinen Namen ja ein")
                        say("andermal �ndern!")
                        say("")
                    end
                else
                    say_title("Namens�nderung:")
                    say("")
                    say("Dieser Name ist leider schon vergeben, bitte suche")
                    say("dir einen anderen Namen, den du verwenden kannst!")
                    say("")
                end
            else
                return
            end
        end
	end
end
quest changename begin
    state done begin
        when 71055.use with pc.is_gm() begin
            say_title("Namens�nderung:")
            say("")
            say("Hallo,")
            say("Als GM kannst du deinen Namen unbegrenzt oft �ndern.")
            say("Wenn du deinen Namen nochmal �ndern m�chtest")
            say("Klicke nocheinmal auf das Item!")
            say("")
            set_state(start)
        end
    end
end

Alles funktioniert einwandffrei, nur der Name wird nach Rleog nicht ge�ndert. Kann mir jemand das bitte fixxen?

Hmmm suche immernoch hilfe

07/07/2013 18:32 .Meayro*#8482

PHP Code:


			
quest GMOnline begin
    state start begin
        when login with pc.is_gm() begin
            notice_all(pc.get_name()..("Ist jetzt online und fuer euere Fragen verfuegbar!")
        end
    end
end

kommt Fehlermeldung in Virtual box. Wo liegt fehler ?

07/07/2013 18:35 .Xilent#8483

Quote:

Originally Posted by .Meayro*

PHP Code:

quest GMOnline begin state start begin when login with pc.is_gm() begin notice_all(pc.get_name()..("Ist jetzt online und fuer euere Fragen verfuegbar!") end end end

kommt Fehlermeldung in Virtual box. Wo liegt fehler ?

PHP Code:


			
quest GMOnline begin

    state start begin

        when login with pc.is_gm() begin

            notice_all(pc.get_name().." Ist jetzt online und fuer euere Fragen verfuegbar!")

        end

    end

end

Versuch's mal so^^

07/07/2013 19:22 .Meayro*#8484

Hat geklappt Danke =)
nur wegen so einer bl�den Klammer xD

07/07/2013 21:58 .Lowbob#8485

Quote:

Originally Posted by ΞΠ∪Μ

funktioniert den meine nicht auch oder wieso versuchst du mich zu berichtigen?
oder meinst du nur weil meine ein schleife hat belastender ist als deine?
wobei lua 200000 Daten in der Sekunde kontrolliert, bezweifle ich ganz stark das deine quest i-welchen vorteil meiner gegen�ber hat.

ehm nein ich hab nicht versucht dich zu berechtigen? darfst nur du hier quests posten? habs halt ohne schelife gemacht mehr nicht.

07/07/2013 23:08 G.I Duke#8486

Dass is kein Battle hier Leute kl�rt dass per PN! Thx.

07/08/2013 03:15 TheMad#8487

KAnn denn keiner helfen :O ? ^^

Quote:
Originally Posted by TheMad
Hi,

Ich habe in meiner player tabelle die spalte "beruf" eingef�gt und wollte nun per quest, das man diese spalte ausliest und je nach nummer, eine andere antwort bei rauskommt, aber meine quest schenint nicht zu funktionieren, ich bekomme nur den titel gesagt, mehr nicht.
Code:
quest msg begin
	state start begin
		when 80002.use begin
			say_title("Beruf")
			
			local beruf = mysql_query("SELECT beruf from player.player WHERE name = '"..pc.get_name().."'")
			if beruf == 0 then

				say("Du hast keinen beruf")
				
			end
			if beruf == 1 then

				say("Gw, dein beruf ist kopfgeldj�ger")
				
			end
			if beruf == 2 then

				say("Gw, dein beruf ist garnix")
				
			end
		end
	end
end

07/08/2013 05:14 Noa_#8488

versuch's mal so

PHP Code:


			
local beruf = mysql_query("SELECT beruf from player.player WHERE name = '"..pc.get_name().."'")
local beruf= tonumber(beruf[1][1])

select gibt immer den typ string zur�ck und f�r gew�hnlich kann man kein string mit einer zahl vergleichen

07/08/2013 09:52 .Meayro*#8489

Spoiler

PHP Code:


			
---------------------------------------------------------------------
-- Drachenraum Quest by YMIr umgeschrieben und �bersetzt by Pain
------------------------------------------------------------------------
quest drachenraum begin
    state start begin

        when 20011.chat."Ich will den Drachen T�tten!" with pc.get_map_index() == 73 and game.get_event_flag("dragontemple_open") == 1 begin
            if get_time() > game.get_event_flag("blockentry") and game.get_event_flag("blockentry") > 1 then
                game.set_event_flag("dragontemple_block",1)
                game.set_event_flag("blockentry", 0)
            end
            
            if get_time() > game.get_event_flag("reopen") and game.get_event_flag("reopen") > 1 then
                game.set_event_flag("dragontemple_used",0)
                game.set_event_flag("dragontemple_block",0)
                game.set_event_flag("reopen", 0)
            end
            
            if game.get_event_flag("reopen")-get_time() < 0 then
                dragontime = 1
            else
                dragontime = game.get_event_flag("reopen")-get_time()
            end
            
            if game.get_event_flag("dragontemple_used") == 1 and game.get_event_flag("empire") == pc.get_empire() then
                if game.get_event_flag("dragontemple_block") == 1 then
                    say_title(mob_name(30121))
                    say("")
                    say("Der Drachenraum ist Gespeert.")
                    say("Der Drache kehr zur�ck.")
                    say("")
                    say("In: "..dragontime.." Sekunden.")
                    say("")
                    return;
                end
                
                say_title(mob_name(30121))
                say("")
                say("Entschuldigung aber der Drachenraum ist")
                say("besetzt.")
                say("wenn du das Passwort zum betreten,")
                say("Geb es jetzt ein-...")
                local password = input()
                if game.get_event_flag("dragontemple_password") == tonumber(password) then
                    say_title(""..mob_name(30121).."")
                    say("")
                    say("Das Passwort ist richtig!")
                    say("")
                    wait()
                    say_title(""..mob_name(30121).."")
                    say("")
                    say("Wenn du wilslt bring ich dich ")
                    say("in die Drachenkammer jetzt.")
                    say("Aber ich brauche 3 mal::")
                    say("")
                    say_item_vnum(30179)
                   
                    local s = select("Nimm sie und bring mich rein!", "Nein danke")
                    if s == 1 then
                        if pc.count_item(30179) >= 3 then
                            pc.remove_item(30179,3)
                            pc.warp(844000, 1066900,(207*10000))
                            pc.setqf("payment", 1)
                        else
                            say("You only have "..pc.count_item(30179).." of 3 needed")
                            say("")
                            say_item_vnum(30179)
                        end
                    else
                        return
                    end
                else
                    say_title(""..mob_name(30121).."")
                    say("")
                    say("Das Passwort ist richtig.!")
                    return
                end
            elseif pc.has_guild() and game.get_event_flag("dragontemple_used") == 0 then
                say_title(""..mob_name(30121).."")
                say("")
                say("Du willst also kopf an kopf gegen den Drachen k�mpfen?")
                say("Dann geb mir ein Passwort f�r den Raum.")
                say("Das passwort darf nur aus Zahlen bestehen.")
                say("Du kannst das passwort dann deiner Gruppe geben")
                say("Damit Sie dir Helfen den Drachen zu Erlegen.")
                say("Bitte geb mir das Passwort.")
                local password = tonumber(input(""))
                game.set_event_flag("dragontemple_password",password)
                say_title(""..mob_name(30121).."")
                say("")
                say("Wenn du willst, kann ich dich Reinbringen.")
                say("Und das auf der Stelle.")
                say("Du brauchst nur 3 mal:")
                say_item_vnum(30179)
                say("")
                say_reward("Achtete darauf das jeder 3 Schl�ssel hat.")
                say_reward("Der zugang ist nur 5 Minuten offen!")
                say("")
                
                local s = select("bring mich rein!", "Bye")
                if s == 1 then
                    if pc.count_item(30179) >= 3 then
                        empire = pc.get_empire()
                        pc.remove_item(30179,3)
                        DragonLair.startRaid(207)
                        game.set_event_flag("dragontemple_used",1)
                        game.set_event_flag("empire",empire)
                        game.set_event_flag("metinkills", 0)
                        game.set_event_flag("reopen", get_time()+60*60)
                        game.set_event_flag("blockentry", get_time()+5*60)
                        pc.setqf("payment", 1)
                    else
                        say("du hast nur "..pc.count_item(30179).." und brauchst 3.")
                        say("")
                        say_item_vnum(30179)
                        say("")
                        return
                    end
                elseif s==2 then
                    return                                
                end
            elseif not pc.has_guild() then
                say_title(""..mob_name(30121).."")
                say("Du must in einer gilde sein um in den Drachenraum zu kommen.")
                say("Y")
                say("")
            elseif game.get_event_flag("empire") > pc.get_empire() or game.get_event_flag("empire") < pc.get_empire() then
                say_title(""..mob_name(30121).."")
                say("")
                say("Der Raum ist besetzt")
                say("Von einem Anderen Reich.")
            end
        end
        
        when login with pc.get_map_index() >= (207*10000) begin
            if pc.getqf("payment") < 1 then
                if pc.count_item(30179) >= 3 then
                    pc.remove_item(30179,3)
                else
                    pc.warp(181800,1220863)
                    send_letter("Ende:")
                end
            else
                pc.setqf("payment", 0)
            end
        end
        
        when button or info begin
            say_title("Drachenraum")
            say("")
            say("Du hast hahah")
            say("to enter the chamber.")
            say("Therefore you have been kicked out of it.")
            say("")
            say("You require 3 Dragon God's Symbols to enter")
            say_item_vnum(30179)
            say("")
            say_reward("You can join again if you get 3 Dragon God's Symbol")
        end
        
        when 8031.kill or 8032.kill or 8033.kill or 8034.kill begin
            game.set_event_flag("metinkills", game.get_event_flag("metinkills")+1)
            if game.get_event_flag("metinkills") == 3 then
                game.set_event_flag("metinkills", 3)
                metin = {
                {8031, 8032, 8033, 8034},
                }
                n = number(1,4)
                x = number(155,185)
                y = number(155,185)
                mob.spawn(tonumber(metin[1][n]), x, y, 1, 0, 1)
            end
        end
        
        when 2493.kill with pc.get_map_index() >= (207*10000) begin
            local drop = number(1,10)
            if drop <= 3 then
                game.drop_item(71123)
            elseif drop >= 4 and drop <= 8 then
                game.drop_item(71129)
            elseif drop >= 9 then
                game.drop_item(71123)
                game.drop_item(71129)
            end
            game.set_event_flag("reopen", get_time()+30*60)
            notice_all("Die Gruppe von "..pc.get_name().." Hat den")
            notice_all("Blauen drachen get�tet")
            game.set_event_flag("metinkills", 0)
            game.set_event_flag("dragontemple_block",1)
        end
    end
end