[SERVICE] Die Questkontrolle

Page 516 of 845

516

03/17/2013 12:46 christoph0#7726

Hey die quest wir einfach ingame nich angezeit
vpc sagt kein fehler

<?php
quest event begin
state start begin
when 9003.chat."Event" begin
say("Hir kannst du ein Event Starten")
local g = select ("Ja" , "Nein")
if g == 1 then
regen_in_map(63,"data/Event/"wueste_regen.txt")
say("das Event wurde gestartet")
notice_all("Mob Event W�ste Oase")
return
end
if g == 2 then
return
end
end
end
end
end
end
?>

03/17/2013 12:55 dstyl#7727

Hey Community,

ich habe ein Petsystem eingebaut jedoch funktioniert dieses nicht. Um genau zu sein, man sieht das Pet nicht.
Beim compilen zeigt er keine Fehler an jedoch spuckt die Syserr was aus.
Vlt. kann mir ja einer von euch dabei weiterhelfen:

Syserr:

PHP Code:


			
SYSERR: Mar 17 13:51:06 :: RunState: LUA_ERROR: locale/germany/quest/questlib.lua:2776: attempt to perform arithmetic on field `?' (a boolean value)

SYSERR: Mar 17 13:51:06 :: WriteRunningStateToSyserr: LUA_ERROR: quest horse_summon.start letter

Questlib.lua Zeile 2771 - 2778

Spoiler

hose_summon.quest

Spoiler

PHP Code:


			
quest horse_summon begin

    state start begin

        function get_horse_summon_prob_pct() 

            local prob = {10,15,20,30,40,50,60,70,80,90,100}

            local skill_level = pc.get_skill_level(131) + 1

            return prob[skill_level]

        end



        when 20349.chat."Pferdebild verloren" with horse.get_grade()==1 and pc.countitem("50051")<1 begin

            say("Du bist nicht sehr vorsichtig...")

            say("Du solltest dein Pferdebild nicht zu oft verlieren!")

            say("")

            say_reward("M�chtest du f�r 100.000 Yang ein")

            say_reward("neues Pferdebild kaufen?")

            local b=select("Kaufen", "Nicht Kaufen")

            if 1==b then

                if pc.money>=10000 then

                    pc.changemoney(-10000)

                    say("Hier bitte.")

                    say("Verliere es so schnell nicht wieder!")

                    pc.give_item2("50051", 1)

                else

                    say("Du hast nicht genug Yang...")

                end

            elseif 2==b then

            else

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

            end

        end

        when 20349.chat."Waffen-Pferdebuch verloren" with horse.get_grade()==2 and pc.countitem("50052")<1 begin

            say("Du bist nicht sehr vorsichtig...")

            say("Du solltest dein Waffen-Pferdebuch nicht zu oft verlieren!")

            say("")

            say_reward("M�chtest du f�r 500.000 Yang ein")

            say_reward("neues Waffen-Pferdebuch kaufen?")

            local b=select("Kaufen", "Nicht Kaufen")

            if 1==b then

                if pc.money>=50000 then

                    pc.changemoney(-50000)

                    say("Hier bitte.")

                    say("Verliere es so schnell nicht wieder!")

                    pc.give_item2("50052", 1)

                else

                    say("Du hast nicht genug Yang...")

                end

            elseif 2==b then

            else

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

            end

        end

        when 20349.chat."Millit�r-Pferdebuch verloren" with horse.get_grade()==3 and pc.countitem("50053")<1 begin

            say("Du bist nicht sehr vorsichtig...")

            say("Ein neues Millit�r-Pferdebuch ist teuer")

            say("und nicht leicht zu bekommen!")

            say("")

            say_reward("M�chtest du f�r 10.000.000 Yang ein")

            say_reward("neues Waffen-Pferdebuch kaufen?")

            local b=select("Kaufen", "Nicht Kaufen")

            if 1==b then

                if pc.money>=10000 then

                    pc.changemoney(-10000)

                    say("Hier bitte.")

                    say("Verliere es so schnell nicht wieder!")

                    pc.give_item2("50053", 1)

                else

                    say("Du hast nicht genug Yang...")

                end

            elseif 2==b then

            else

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

            end

        end

        when 50051.use with horse.get_grade()==0 begin

            say("Du musst zuerst die Qualifikationspr�fung")

            say("f�r Reiter bestehen, um dein Pferd zu rufen!")

        end

        when 50051.use with horse.get_grade()==1 begin

        if PetSystem.IsPetLevel(horse.get_level()) then

                say("Vous avez fait n'importe quoi avec les")

                say("commande GM. Mettez le niveau du cheval")

                say("puis essayez � nouveau.[ENTER]")                

                return                    

            end    

            if pc.getsp()>=100 then

                if number(1, 100)<=horse_summon.get_horse_summon_prob_pct() then

                    say_title("Information:")

                    say_reward("Das Pferd f�r Anf�nger wurde gerufen.")

                    horse.summon()

                else

                    say_title("Information:")

                    say_reward("Es hat nicht funktioniert, das")

                    say_reward("Anf�ngerpferd zu rufen.")

                    say_reward("Du kannst deine Chancen, das Pferd erfolgreich")

                    say_reward("zu rufen, verbessern, indem du deine Pferderuf-")

                    say_reward("Fertigkeit �bst.")

                end

                pc.change_sp(-100)

            else

                say_title("Information:")

                say_reward("Deine mentale Kraft reicht nicht aus, um ein")

                say_reward("Pferd f�r forgeschrittene Reiter herbeizurufen.")

                say_reward("Du ben�tigst dazu mindestens 100 Manapunkte.")

            end

        end

        when 50051.use with horse.get_grade()==2 begin

            say("Um dein Pferd zu rufen ben�tigst du")

            say("die richtige Lizenz!")

        end

        when 50051.use with horse.get_grade()==3 begin

            say("Um dein Pferd zu rufen ben�tigst du")

            say("die richtige Lizenz!")

        end

        when 50052.use with horse.get_grade()==0 begin

            say("Um dein Pferd zu rufen ben�tigst du")

            say("die richtige Lizenz!")

        end

        when 50052.use with horse.get_grade()==1 begin

            say("Um dein Pferd zu rufen ben�tigst du")

            say("die richtige Lizenz!")

        end

        when 50052.use with horse.get_grade()==2 begin

        if PetSystem.IsPetLevel(horse.get_level()) then

                say("Vous avez fait n'importe quoi avec les")

                say("commande GM. Mettez le niveau du cheval")

                say("puis essayez � nouveau.[ENTER]")                

                return                    

            end    

            if pc.getsp()>=200 then

                if number(1, 100)<=horse_summon.get_horse_summon_prob_pct() then

                    say_title("Information:")

                    say_reward("Das Pferd f�r Reiter fortgeschrittenen K�nnens")

                    say_reward("wurde gerufen.")

                    horse.summon()

                else

                    say_title("Information:")

                    say_reward("Es hat nicht funktioniert, ein Pferd f�r")

                    say_reward("fortgeschrittene Reiter zu rufen.")

                    say_reward("Du kannst deine Chancen, das Pferd erfolgreich")

                    say_reward("zu rufen, verbessern, indem du deine Pferderuf-")

                    say_reward("Fertigkeit �bst.")

                end

                pc.change_sp(-200)

            else

                say_title("Information:")

                say_reward("Deine mentale Kraft reicht nicht aus, um ein")

                say_reward("Pferd f�r forgeschrittene Reiter herbeizurufen.")

                say_reward("Du ben�tigst dazu mindestens 200 Manapunkte.")

            end

        end

        when 50052.use with horse.get_grade()==3 begin

            say("Um dein Pferd zu rufen ben�tigst du")

            say("die richtige Lizenz!")

        end

        when 50053.use with horse.get_grade()==0 begin

            say("Um dein Pferd zu rufen ben�tigst du")

            say("die richtige Lizenz!")

        end

        when 50053.use with horse.get_grade()==1 begin

            say("Um dein Pferd zu rufen ben�tigst du")

            say("die richtige Lizenz!")

        end

        when 50053.use with horse.get_grade()==2 begin

            say("Um dein Pferd zu rufen ben�tigst du")

            say("die richtige Lizenz!")

        end

        when 50053.use with horse.get_grade()==3 begin

        if PetSystem.IsPetLevel(horse.get_level()) then

                say("Vous avez fait n'importe quoi avec les")

                say("commande GM. Mettez le niveau du cheval")

                say("puis essayez � nouveau.[ENTER]")                

                return                    

            end    

            if pc.getsp()>=300 then

                if number(1, 100)<=horse_summon.get_horse_summon_prob_pct() then

                    say_title("Informacja:")

                    say_reward("Ko� zosta� przywo�any.")

                    say("")

                    horse.summon()

                else

                    say_title("Informacja:")

                    say_reward("Przywo�anie Konia nie powiod�o si�. ")

                    say_reward("Mo�esz zwi�kszy� szans� na pomy�lne ")

                    say_reward("przywo�anie poprzez trening swoich umiej�tno�ci. ")

                    say("")

                end

                pc.change_sp(-300)

            else

                say_title("Informacja:")

                say_reward("Masz za ma�o Punkt�w Energii. Aby przywo�a� ")

                say_reward("Konia, potrzebujesz ich co najmniej 300. ")

                say("")

            end

        end

    

        -----***** Richiamo Pet

        when 53001.use or 53002.use or 53003.use or 53005.use or 53006.use or 53007.use or 53008.use or 53009.use begin

            if not PetSystem.IsActive() then

                local PetNumber = {[53001]=1,[53002]=2,[53003]=3,[53005]=4,[53006]=5,[53007]=6,[53008]=7,[53009]=8}

                local petIndex = PetNumber[item.get_vnum()]

                if horse.is_dead() then

                    say_title("Information:")

                    say("Sie k�nnen ihr Haustier nicht rufen")

                    say("wenn ihr Pferd tot ist.[ENTER]")

                    return

                end            

                local horse_lev = horse.get_level()

                local horse_name = horse.get_name()

                PetSystem.SetActivePet(petIndex)

                PetSystem.AddBonus(petIndex)

                PetSystem.SetHorseData(PetSystem[petIndex].Level, "Lv"..PetSystem.GetLevel(petIndex).." "..PetSystem[petIndex].Name)

                pet.summon()

                PetSystem.SetHorseData(horse_lev, horse_name)

                cleartimer("give_exp")

                loop_timer("give_exp", PetSystem.UpdateFrequency)

                chat(""..PetSystem[petIndex].Name.." wurde gerufen.")

            else

                PetSystem.PetBack()                 

            end

        end

        

        -----*****

        -----***** Roba varia per Pet

        -----*****

        

        when 30130.use begin

            if not PetSystem.IsActive() then

                chat("Sie m�ssen zuerst ihr Haustier rufen.")

                return

            end

            local PetHasGotExp = PetSystem.GiveExp(PetSystem.GetActivePet(), PetSystem.ItemExp)

            if not PetHasGotExp then

                chat("Dein Haustier hat bereits maximale EXP.")

            else

                chat("Dein Haustier hat"..PetSystem.ItemExp.." Punkte Erfahrung erhalten.")

                pc.remove_item(item.get_vnum(), 1)

            end

        end

        

        when login begin

            if PetSystem.IsActive() then

                if pc.count_item(PetSystem[PetSystem.GetActivePet()].Item) != 0 and not horse.is_dead() then

                    local horse_lev = horse.get_level()

                    local horse_name = horse.get_name()        

                    local PetIndex = PetSystem.GetActivePet()                

                    PetSystem.SetHorseData(PetSystem[PetIndex].Level, "Lv"..PetSystem.GetLevel(PetIndex).." "..PetSystem[PetIndex].Name)

                    pet.summon()

                    PetSystem.SetHorseData(horse_lev, horse_name)

                    loop_timer("give_exp", PetSystem.UpdateFrequency)

                else

                    PetSystem.SetInactive()

                    timer("remove_bonus", 2)

                end                

            end            

            pc.setqf("current_exp", pc.get_exp())

        end

        

        when remove_bonus.timer begin

            PetSystem.RemoveBonus()

        end    

        

        when give_exp.timer begin

            if PetSystem.IsActive() and not PetSystem.IsExpBlocked() then

                local gained_exp = pc.get_exp()-pc.getqf("current_exp")

                if gained_exp < 0 then

                    pc.setqf("current_exp", pc.get_exp())

                    return

                end

                local pet_exp = math.floor(gained_exp*3/100)

                if pet_exp != 0 then

                    local PetHasGotExp = PetSystem.GiveExp(PetSystem.GetActivePet(), pet_exp)

                    if PetHasGotExp then

                        pc.give_exp2(-pet_exp)

                        pc.setqf("current_exp", pc.get_exp())

                    end                    

                end

            end

        end

        when button or info begin

            say_title("Haustier Features")

            say("Dein Haustier hat neue F�higkeiten")

            say("entfesselt, welche du im Fertigkeiten")

            say("Men� abrufen kannst.[ENTER]")

            q.done()

        end



          -----***** Menu Pet

  when 20120.click begin PetSystem.ShowMenu(1) end

  when 20121.click begin PetSystem.ShowMenu(1) end

  when 20122.click begin PetSystem.ShowMenu(1) end

  when 20123.click begin PetSystem.ShowMenu(2) end

  when 20124.click begin PetSystem.ShowMenu(2) end

  when 20125.click begin PetSystem.ShowMenu(2) end

  when 20126.click begin PetSystem.ShowMenu(3) end

  when 20127.click begin PetSystem.ShowMenu(3) end

  when 20128.click begin PetSystem.ShowMenu(3) end

  when 20129.click begin PetSystem.ShowMenu(4) end

  when 20130.click begin PetSystem.ShowMenu(4) end

  when 20131.click begin PetSystem.ShowMenu(4) end

  when 20132.click begin PetSystem.ShowMenu(5) end

  when 20133.click begin PetSystem.ShowMenu(5) end

  when 20134.click begin PetSystem.ShowMenu(5) end

  when 20135.click begin PetSystem.ShowMenu(6) end

  when 20136.click begin PetSystem.ShowMenu(6) end

  when 20137.click begin PetSystem.ShowMenu(6) end

  when 20138.click begin PetSystem.ShowMenu(7) end

  when 20139.click begin PetSystem.ShowMenu(7) end

  when 20140.click begin PetSystem.ShowMenu(7) end

  when 20141.click begin PetSystem.ShowMenu(8) end

  when 20142.click begin PetSystem.ShowMenu(8) end

  when 20143.click begin PetSystem.ShowMenu(8) end

end

end

Ich hoffe ihr k�nnt mir weiterhelfen. Danke.

03/17/2013 18:48 moehasflow#7728

Code:

quest gm_online begin
    state start begin
			when 20006.chat."Team" begin
			say("Lejamo4 Team Online Liste")
			say("-")
			if game.get_event_flag("[SA]Feno")== 1 then
				say_reward("SA Feno ist zurzeit online")
			else
				say("SA Feno ist zurzeit offline")
			end
			if game.get_event_flag("[SA]Machi")== 1 then
				say_reward("SA Machi ist zurzeit online")
			else
				say("SA Machi ist zurzeit offline")
			end
			if game.get_event_flag("[SA]Joker")== 1 then
				say_reward("SA Joker ist zurzeit online")
			else
				say("SA Joker ist zurzeit offline")
			end
			if game.get_event_flag("[GM]")== 1 then
				say_reward("GM ist zurzeit online")
			else
				say("GM ist zurzeit offline")
			end
			if game.get_event_flag("[GM]")== 1 then
				say_reward("GM                   online")
			else
				say("GM ist zurzeit offline")
			end
			if game.get_event_flag("[GM]")== 1 then
				say_reward("GM                   online")
			else
				say("GM ist zurzeit offline")
			end
		end
	end 
end

Problem : Es wird nicht angezeigt ob GM/SA online ist...

03/18/2013 00:52 TheMad#7729

Joa, kp XD

Nach dem benutzen vom Item "90002" soll man geportet werden, damit die map als dungeon gilt und ich die regen.txt und die dungeon-questbefehle nuzen kann... geht aber nicht....

PHP Code:


			
quest wüste begin
    state start begin
        when 90002.use begin
            if game.get_event_flag("nevias_rache")>= 1 then
                set_state(nevias_rache_beginn)
            else
                say_title("Nevias Rache")
                say("Du bist noch nicht so weit, um Acnologia")
                say("gegen�ber zu treten. Sprich mit Nevia und")
                say("lass dich auf den Kampf gegen den Drachen")
                say("vorbereiten, sonst w�re es dein Ende.")
                return
            end
        end
    end
        
    state nevias_rache_beginn begin
        when 90002.use begin
            if pc.get_map_index() == 115 then
                game.set_event_flag("nevias_rache",2)
                say_title("Nevias Rache")
                say("Nun ist es soweit, endlich kannst du f�r Nevia")
                say("Rache an dem Monster nehmen, das ihre Familie")
                say("ermordet und ihre Heimat zerst�rt hat.")
                say("Wenn du es schaffst, das Monster zu besiegen,")
                say("dann ist dir Nevias dank gewiss....")
                say("Also, gebe dein bestes und erf�lle ihren Wunsch auf rache !")
                say("")
            else
                say_title("Nevias Rache")
                say("Du bist hier nicht am Richtigen Ort")
                say("Falls du dir nicht sicher bist wo du hin gehen")
                say(" musst frag Nevia lieber nochmal. Sicher ist sicher !")
                return
            end
        end
        when 90002.use begin
            if game.get_event_flag("nevias_rache")>= 2 then
                d.new_jump_all(115, 305, 305)
                say("LOS GEHTS")
                d.regen_file("data/dungeon/nevia.txt")
                d.notice("Der Drache ist bei den Oasen, du kannst ihn nicht �bersehen")
                d.notice("Aber pass auf, er ist nicht alleine.....")
            end
        end
        when 9031.kill with pc.get_map_index()>= 115 and pc.get_map_index() < 115 begin
            notice_all(" "..pc.get_name().." ist es gelungen, den Drachen Acnologia")
            notice_all("zu bezwingen.... zumindest f�r den Moment, Doch der Ruhm von")
            notice_all(" "..pc.get_name().." �ber den Sieg des Drachens soll niemals")
            notice_all("vergessen sein und f�r immer in unserer Erinnerung bleiben.")
            say("Du hast es geschaft, unglaublich, aber DU HAST ES GESCHAFT")
            say("")
            say("Geh zu Nevia, sie wird auser sich vor freude sein")
            say("Auserdem wird sie sich bei bedanken wollen")
            pc.give_item2(12209, 1)
            pc.remove_item(90002, 1)
        end
    end
end

danke f�rs nachshauen

03/19/2013 13:59 Caash#7730

PHP Code:


			
quest shops begin
    state start begin
        when 20094.chat."Die Waren" begin
            say_title("Herzlich Willkommen!")
            say("Hier bekommst du alles, was mit Schmuck zu tun hat!")
            local kategorie = select("Armb�nder", "Ketten", "Ohrringe", "Schuhe", "Abbrechen")
            if kategorie == 1 then
                say_title("Viel Spass")
                say("")
                say("Viel Spass beim einkaufen!")
                say("")
                wait()
                    npc.open_shop(1015)
            elseif kategorie == 2 then
                say_title("Viel Spass")
                say("")
                say("Viel Spass beim einkaufen!")
                say("")
                wait()
                    npc.open_shop(1016)
            elseif kategorie == 3 then
                say_title("Viel Spass")
                say("")
                say("Viel Spass beim einkaufen!")
                say("")
                wait()
                    npc.open_shop(1017)
            elseif kategorie == 4 then
                say_title("Viel Spass")
                say("")
                say("Viel Spass beim einkaufen!")
                say("")
                wait()
                    npc.open_shop(1018)
            elseif kategorie == 5 then
                return
            end
        end
    end
end

Fehler werden keine angezeigt, jedoch �ffnet sich das Quest nicht. Habe on_click auf 2 und habe auch make.sh ausgef�hrt und /reload q :/. Die L�den existieren in Navicat auch

03/19/2013 17:16 Invoice�#7731

PHP Code:


			
quest shops begin

    state start begin

        when 20094.click or 20094.chat."Die Waren" begin

            say_title("Herzlich Willkommen!")

            say("Hier bekommst du alles, was mit Schmuck zu tun hat!")

            local kategorie = select("Armb�nder", "Ketten", "Ohrringe", "Schuhe", "Abbrechen")

            if kategorie == 1 then

                say_title("Viel Spass")

                say("")

                say("Viel Spass beim einkaufen!")

                say("")

                wait()

                    npc.open_shop(1015)

            elseif kategorie == 2 then

                say_title("Viel Spass")

                say("")

                say("Viel Spass beim einkaufen!")

                say("")

                wait()

                    npc.open_shop(1016)

            elseif kategorie == 3 then

                say_title("Viel Spass")

                say("")

                say("Viel Spass beim einkaufen!")

                say("")

                wait()

                    npc.open_shop(1017)

            elseif kategorie == 4 then

                say_title("Viel Spass")

                say("")

                say("Viel Spass beim einkaufen!")

                say("")

                wait()

                    npc.open_shop(1018)

            elseif kategorie == 5 then

                return

            end

        end

    end

end

03/19/2013 17:26 suragott#7732

@Caash

Spoiler

03/19/2013 17:37 Caash#7733

Hmm.. geht immernoch nicht, ist hier zwar Questkontrolle, aber wei� jemand woran es noch liegen k�nnte? Trotz on_click auf 2 �ffnet sich das Quest nicht. Trotzdem schonmal Danke f�r die Antworten. Jedoch beim R�ssi und Waffenh�ndler gehts

03/19/2013 17:47 suragott#7734

on_click muss auf 1 ^.^

03/19/2013 17:50 Caash#7735

Hab ich auch schon getestet, Problem ist nur dann, dass sich nur ein Shop �ffnet, jedoch will ich ja, dass sich das Quest �ffnet.. :/

Gemischtwaren geht auch nicht :/ Also wenn ich der ein Quest gebe :/

Hat sich erledigt.

03/19/2013 23:05 .Survivor#7736

Hier die Quest die funktioniert im Spiel irgendwie nicht:

Quest:

PHP Code:


			
quest pvpbattle begin
    state start begin 
        when 20090.chat."PvP Battle" begin
            say("Hallo "..pc.get_name() .."")
            say("")
            say("Du wurdest eingeladen um an unserem")

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

EDIT: Einige Quest funktionieren bei mir nicht so wie ich es will.
Wenn mir jemand evtl. bei Quests richtig helfen w�re super.
Gibt dann auch im Team einen Platz als Quester.
(Bitte nur Leute die Ahnung von dem haben was sie machen!)
Melden per Skype (in EPVP hinterlegt) oder private Nachricht.

♥x

03/20/2013 01:15 TheMad#7737

Quote:

Hier die Quest die funktioniert im Spiel irgendwie nicht:

Quest:

PHP Code:

quest pvpbattle begin state start begin when 20090.chat."PvP Battle" begin say("Hallo "..pc.get_name() .."") say("") say("Du wurdest eingeladen um an unserem")

wenn das schon alles von der quest war, wird die auch nicht gehen.... fehlt da irgendwie der rest??

03/20/2013 09:41 LikeCranK�#7738

Quote:

Originally Posted by .Survivor

Hier die Quest die funktioniert im Spiel irgendwie nicht:

Quest:

PHP Code:

quest pvpbattle begin state start begin when 20090.chat."PvP Battle" begin say("Hallo "..pc.get_name() .."") say("") say("Du wurdest eingeladen um an unserem")

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

EDIT: Einige Quest funktionieren bei mir nicht so wie ich es will.
Wenn mir jemand evtl. bei Quests richtig helfen w�re super.
Gibt dann auch im Team einen Platz als Quester.
(Bitte nur Leute die Ahnung von dem haben was sie machen!)
Melden per Skype (in EPVP hinterlegt) oder private Nachricht.

♥x

Da Fehlt aber die H�lfte.. poste mal bitte die ganze Quest nur dann k�nnen
wir dir auch helfen, dazu passt deine "Fehlermeldung" nicht denn es ist keine.

Quote:

Originally Posted by Caash

Hab ich auch schon getestet, Problem ist nur dann, dass sich nur ein Shop �ffnet, jedoch will ich ja, dass sich das Quest �ffnet.. :/

Gemischtwaren geht auch nicht :/ Also wenn ich der ein Quest gebe :/

Hat sich erledigt.

@Sura on_click "muss" nur auf 1 wenn du direkt den Shop aufmachen willst,
da es bei der Quest nicht so ist ist es ja egal

@Caash:

Spoiler

Quote:

Originally Posted by christoph0

Hey die quest wir einfach ingame nich angezeit
vpc sagt kein fehler

<?php
quest event begin
state start begin
when 9003.chat."Event" begin
say("Hir kannst du ein Event Starten")
local g = select ("Ja" , "Nein")
if g == 1 then
regen_in_map(63,"data/Event/"wueste_regen.txt")
say("das Event wurde gestartet")
notice_all("Mob Event W�ste Oase")
return
end
if g == 2 then
return
end
end
end
end
end
end
?>

Versuchs mal so ->

Spoiler

03/20/2013 21:14 TommyH99#7739

die quest geht auf mit den buttons aber wenn ich draufklicke passiert nichts bekomm keinen rang und das Gl�ckwunsch, Ihr Rang wurde erfolgreich ge�ndert kommt garnicht

Code:

quest notiz_des_weisen begin
    state start begin
        when 70028.use begin
            say("Bitte w�hle deinen gew�nschen Rang")
            local s = select("Ritterlich", "Edel", "Gut", "Freundlich", "Aggressiv", "Arglistig", "B�sartig", "Grausam", "Abbrechen")
            if s == 1 then
                pc.change_aligment(20000)
                pc.remove_item(70028, 1)
                say("Gl�ckwunsch, Ihr Rang wurde erfolgreich ge�ndert")
            elseif s == 2 then
                pc.change_aligment(11500)
                pc.remove_item(70028, 1)
                say("Gl�ckwunsch, Ihr Rang wurde erfolgreich ge�ndert")
            elseif s == 3 then
                pc.change_aligment(7500)
                pc.remove_item(70028, 1)
                say("Gl�ckwunsch, Ihr Rang wurde erfolgreich ge�ndert")
            elseif s == 4 then
                pc.change_aligment(3500)
                pc.remove_item(70028, 1)
                say("Gl�ckwunsch, Ihr Rang wurde erfolgreich ge�ndert")
            elseif s == 5 then
                pc.change_aligment(-3000)
                pc.remove_item(70028, 1)
                say("Gl�ckwunsch, Ihr Rang wurde erfolgreich ge�ndert")
            elseif s == 6 then
                pc.change_aligment(-7000)
                pc.remove_item(70028, 1)
                say("Gl�ckwunsch, Ihr Rang wurde erfolgreich ge�ndert")
            elseif s == 7 then
                pc.change_aligment(-11000)
                pc.remove_item(70028, 1)
                say("Gl�ckwunsch, Ihr Rang wurde erfolgreich ge�ndert")
            elseif s == 8 then
                pc.change_aligment(-20000)
                pc.remove_item(70028, 1)
                say("Gl�ckwunsch, Ihr Rang wurde erfolgreich ge�ndert")
            end
        end
    end
end

03/20/2013 21:34 <Raptor>#7740

Quote:

Originally Posted by .Survivor

Hier die Quest die funktioniert im Spiel irgendwie nicht:

Quest:

PHP Code:

quest pvpbattle begin state start begin when 20090.chat."PvP Battle" begin say("Hallo "..pc.get_name() .."") say("") say("Du wurdest eingeladen um an unserem")

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

Fehlt da nicht was ? :D So wird das nichts.

Page 516 of 845

516