[SERVICE] Die Questkontrolle

Page 788 of 845

788

07/29/2015 02:37 Niklas18#11806

Hallo,

ich habe ein Problem mit dieser Quest.
Sie startet sich immer wieder von neu.....Also abschlie�en kann ich sie aber nach einem Relog oder wenn ich mich teleportiere, kommt sie immer wieder.
Welchen Befehl brauche ich daf�r und wo muss ich ihn einsetzen, damit die Quest eben "einmalig" bleibt.
Danke im Voraus!
Ps: Bin Neuling, daher brauche ich eine L�sung um daraus zu lernen.
Mit Erkl�rung bitte :)

PHP Code:


			
quest jagdaufgabe begin   



    ----------------------------------   

    -- LvL 10 /   Erste Seite 

    ----------------------------------   

    state start begin   

        when login or levelup with pc.level>9 begin   

            set_state(talk_to_disciple_lv10)   

        end       

    end   

    state talk_to_disciple_lv10 begin   

        when letter begin   

            local v = find_npc_by_vnum(20011)   

            if v != 0 then target.vid("__TARGET__", v, "Uriel")   

            end   

            send_letter("Das Buch des Drachengottes")   

        end   

        when button or info begin   

            say_title("Das Buch des Drachengottes")   

            say("")   

            say("Uriel sucht nach dir.")   

            say("Sprich mit ihm.")   

            say("")   

            say_reward("Sprich mit Uriel")   

            say("")   

        end   

        when __TARGET__.target.click or 20011.chat."Drachengott" begin   

            target.delete("__TARGET__")   

            say("Uriel:")   

            say("")   

            say("Wer bist du denn?")   

            say("Oh, du scheinst neu hier zu sein.")   

            say("Ich bin �brigens Uriel. Mir wird nachgesagt,")   

            say("ich sei besessen auf Mythen.")   

            say("In gewisser Weise schon, denn ich lasse mich") 

            say("davon gerne fesseln. Ich br�uchte deine Hilfe.") 

            say("Es geht um ein altes Buch welches ich gefunden")  

            say("habe, doch es fehlen einige Seiten.") 

            wait() 

            say("Die ersten Seiten besagen folgendes:") 

            say("Vor vielen Jahren, als die drei Kaiserreiche im") 

            say("friedlichen Einklang miteinander lebten, fielen") 

            say("abertausende Steine vom Himmel. Diese Steine") 

            say("hatten starke, magnetische Wellen ausgesendet, die") 

            say("lebten, fielen abertausende Steine vom Himmel.") 

            say("Diese Steine, die die Tiere in freier Wildbahn") 

            say("zu Monstern, sogenannte MOBS, werden liesen.") 

            wait() 

            say("Uriel:") 

            say("Das ist total spannend, doch es geht weiter:") 

            say("Das Unheimliche daran war, dass,nachdem diese") 

            say("Steine das Land erreicht hatten, seltsame") 

            say("Kreaturen auftauchten und sich vermehrt �berallhin ") 

            say("verteilten. Nirgends waren wir vor ihnen sicher.") 

            say("Wir mussten st�ndig damit rechnen, dass wir") 

            say("angegriffen werden.") 

            wait() 

            say("Wir wappneten uns mit starken Armeen und dann kam") 

            say("der Tag an dem sich die Klingen der Monster mit") 

            say("unseren kreuzten. Wir hatten diese Schlacht") 

            say("gewonnen, aber nicht den Krieg!Wir dachten wir") 

            say("h�tten das Schlimmste �berstanden, doch wie aus") 

            say("heiterem Himmel kam ein gigantischer Drache mit") 

            say("�bergro�en, m�chtigen Kriegern daher um uns das") 

            say("F�rchten zu lehren.") 

            wait() 

            say("Viele unserer Krieger starben") 

            say("an Ort und Stelle und die Schlacht sowie der Krieg") 

            say("schien verloren, doch vier Fremde mit") 

            say("�bermenschlichen Kr�ften gaben Widerstand und") 

            say("durch sie gewannen wir den Krieg.") 

            wait() 

            say("Gott selbst schicktediese vier Fremde zu uns und") 

            say("wir ehrten sie mit einem gro�en Fest. Seitdem ist") 

            say("es Tradition junge Krieger ab einer bestimmten") 

            say("Grenze diese Fertigkeiten zu lehren, um das Dorf") 

            say("vor weiteren Angriffen zu sch�tzen.") 

            say("Die heutigen Rassen:") 

            say("Krieger, Schamane, Sura und Ninja!") 

            wait() 

            say("Uriel") 

            say("Hier endet die Geschichte.") 

            say("Doch leider zerstritten sich die drei Kaiserreiche.") 

            say("Warum dies so ist, wei� ich nicht.") 

            say("Es k�nnte viele Gr�nde haben: Der Krieg, die") 

            say("Versorgung, das Aufbauen und neuziehen der Grenzen") 

            say("oder gar die Steine!") 

            wait()  

            say("Diese Legende soll mit der Wahrheit verbunden sein.")   

            say("Leider bin ich nicht so stark und auch")   

            say("schon ziemlich alt und gebrechlich. Die Seiten,")   

            say("so die Legende, sollen �berall auf dem Kontinent ") 

            say("verteilt sein und diese werden von wilden Monstern") 

            say("jeglicher Art verteidigt. Du musst sie finden!") 

            say("Wenn wir es schaffen sollten, k�nnte man erneut") 

            say("versuchen, die drei Reiche zum Frieden zu bringen.") 

            wait() 

            say("Eine M�glichkeit und eine Chance, die wir nutzen") 

            say("sollten. Eventuell stehen auf diesen Seiten etwas") 

            say("�ber die Reiche und �ber die Grenzen usw. - Ich") 

            say("hoffe ich kann auf deine Hilfe z�hlen.") 

            say("Was meinst du dazu?") 

                        wait() 

            say("Wirklich? Vielen Dank!") 

            say("Dann vertraue ich dir diese Aufgabe an!") 

            wait() 

            say("Uriel:")   

            say("Laut alten Schriften sei die erste Seite.")   

            say("bei den Wei�en Eid. Soldaten gelandet.")   

            say("Vorsicht ist geboten. Sie sind nicht zu")   

            say("untersch�tzen. Pass auf,denn die Seiten.")   

            say("k�nnen auch zerrei�en. Sonst brauche ich")   

            say("eine neue, um weiter zu forschen!")   

            say("")   

            set_state(collect_tagebuchseite)   

            pc.setqf("duration",0)   

            pc.setqf("collect_count",0)   

        end   

    end   

   state collect_tagebuchseite begin   

        when letter begin   

            send_letter("Die erste Seite")   

        end   

        when button or info begin   

            say_title("Das Geheimnis des Drachengottes")   

            say("")   

            say("Finde die Seite und bringe sie Uriel.")   

            say("Zu finden ist diese bei den Wei�en-Eid Clan")   

            say("") 

            say("Uriel z�hlt auf deine Hilfe!") 

            say_item_vnum(30150)   

            say("Ob diese Seite tats�chlich zu dem Buch geh�rt?")   

            say("")   

        end   

        when 301.kill or 302.kill or 333.kill begin   

            if pc.count_item(30150)<1 then   

                local rand = number(0,99)   

                if rand<5 then pc.give_item2(30150, 1)   

                end   

            end       

        end   

        when 20011.chat."Die verlorene Seite" begin   

            if pc.count_item(30150)>0 then   

                say("Uriel:")   

                say("Dank deiner Hilfe verstehe ich nun")   

                say("langsam die Legende um dieses Buch.")   

                say("Du hast hart gek�mpft.")   

                say("Sprich mit Yu-Hwan, er wird dir helfen,")   

                say("deine inneren Kr�fte zu steigern.")   

                say("")   

                say("Komm wieder, wenn du etwas st�rker geworden bist.") 

                pc.remove_item(30150,1)   

                set_state(tagebuch_reward)   

            else   

                say("Uriel:")   

                say("Bringe mir bitte die Seite...")   

                say("Zu finden bei dem Wei�en-Eid Clan.")   

                say("Vorsicht, sie sind nicht zu untersch�tzen.")   

                say("Sei gewappnet! ...")        

                say("")           

            end   

        end   

    end       

    state tagebuch_reward begin   

        when letter begin   

            send_letter("Sprich mit Yu-Hwan")   

            local v = find_npc_by_vnum(20017)   

            ifv != 0 then target.vid("__TARGET__", v, "Doktor")   

            end   

        end   

        when button or info begin   

            say("Um die Belohnung von Uriel zu erhalten")   

            say("suche mit den Informationen der")   

            say("Seite Yu-Hwan in Map2 auf.")   

            say("")   

        end   

        when __TARGET__.target.click  or 20017.chat."Belohnung Yu-Hwan" begin   

            target.delete("__TARGET__")   

            say_title("Yu-Hwan:")   

            say("Ich sehe ...")   

            say("Uriel hat dich zu mir geschickt.")   

            say("Hier ist deine Belohnung:")   

            say("")   

            say_reward("Du erh�lst:")   

            say_reward(" 100 Tapferkeitsumh�nge und 10 Millionen Yang")   

            say("")   

            pc.give_item2(70038, 100) 

            pc.change_money(10000000) 

            complete_quest(jagdaufgabe)

        end   

    end   

end

07/29/2015 17:30 Red Firestar#11807

Ich habe ein Problem mit einer Lagerverwalter quest, und zwar nach dem ich mir ein Lager gekauft habe passiert nichts mehr, wenn man auf den Lagerverwalter dr�ckt.

Spoiler

W�re nett, wenn mir jemand helfen k�nnte.

07/29/2015 18:30 rollback#11808

Code:

quest warehouse begin
	state start begin
		when 20007.click begin
			local l = game.get_safebox_level()
			chat(l)
			if l == 0 then
				say("Hallo[ENTER]Bei mir kannst du ein Lager f�r 1000 Yang mieten[ENTER]Und?")
				if select("Bezahlen", "Abbrechen")==2 then say("Dann nicht.") return end
				if pc.get_gold()<1000 then
					say("Nicht genug Yang")
				else
					game.set_safebox_level(3)
					pc.change_money(-1000)
					say("Dein Lagerpasswort ist 000000")
				end
			elseif l >= 3 then
				say("Lagerverwalter")
				local s = select("Lager �ffnen", "Itemshoplager �ffnen", "Barren Shop", "Schlie�en")
				if s == 1 then
					game.open_safebox()
				elseif s == 2 then
					game.open_mall()
				elseif s== 3 then
					npc.open_shop(8000)
				end
			end
		end
	end
end

Sag mir mal was im chat kommt.

07/30/2015 00:48 Niklas18#11809

Quote:

Originally Posted by Niklas18

Hallo,

ich habe ein Problem mit dieser Quest.
Sie startet sich immer wieder von neu.....Also abschlie�en kann ich sie aber nach einem Relog oder wenn ich mich teleportiere, kommt sie immer wieder.
Welchen Befehl brauche ich daf�r und wo muss ich ihn einsetzen, damit die Quest eben "einmalig" bleibt.
Danke im Voraus!
Ps: Bin Neuling, daher brauche ich eine L�sung um daraus zu lernen.
Mit Erkl�rung bitte :)

PHP Code:

quest jagdaufgabe begin ---------------------------------- -- LvL 10 / Erste Seite ---------------------------------- state start begin when login or levelup with pc.level>9 begin set_state(talk_to_disciple_lv10) end end state talk_to_disciple_lv10 begin when letter begin local v = find_npc_by_vnum(20011) if v != 0 then target.vid("__TARGET__", v, "Uriel") end send_letter("Das Buch des Drachengottes") end when button or info begin say_title("Das Buch des Drachengottes") say("") say("Uriel sucht nach dir.") say("Sprich mit ihm.") say("") say_reward("Sprich mit Uriel") say("") end when __TARGET__.target.click or 20011.chat."Drachengott" begin target.delete("__TARGET__") say("Uriel:") say("") say("Wer bist du denn?") say("Oh, du scheinst neu hier zu sein.") say("Ich bin �brigens Uriel. Mir wird nachgesagt,") say("ich sei besessen auf Mythen.") say("In gewisser Weise schon, denn ich lasse mich") say("davon gerne fesseln. Ich br�uchte deine Hilfe.") say("Es geht um ein altes Buch welches ich gefunden") say("habe, doch es fehlen einige Seiten.") wait() say("Die ersten Seiten besagen folgendes:") say("Vor vielen Jahren, als die drei Kaiserreiche im") say("friedlichen Einklang miteinander lebten, fielen") say("abertausende Steine vom Himmel. Diese Steine") say("hatten starke, magnetische Wellen ausgesendet, die") say("lebten, fielen abertausende Steine vom Himmel.") say("Diese Steine, die die Tiere in freier Wildbahn") say("zu Monstern, sogenannte MOBS, werden liesen.") wait() say("Uriel:") say("Das ist total spannend, doch es geht weiter:") say("Das Unheimliche daran war, dass,nachdem diese") say("Steine das Land erreicht hatten, seltsame") say("Kreaturen auftauchten und sich vermehrt �berallhin ") say("verteilten. Nirgends waren wir vor ihnen sicher.") say("Wir mussten st�ndig damit rechnen, dass wir") say("angegriffen werden.") wait() say("Wir wappneten uns mit starken Armeen und dann kam") say("der Tag an dem sich die Klingen der Monster mit") say("unseren kreuzten. Wir hatten diese Schlacht") say("gewonnen, aber nicht den Krieg!Wir dachten wir") say("h�tten das Schlimmste �berstanden, doch wie aus") say("heiterem Himmel kam ein gigantischer Drache mit") say("�bergro�en, m�chtigen Kriegern daher um uns das") say("F�rchten zu lehren.") wait() say("Viele unserer Krieger starben") say("an Ort und Stelle und die Schlacht sowie der Krieg") say("schien verloren, doch vier Fremde mit") say("�bermenschlichen Kr�ften gaben Widerstand und") say("durch sie gewannen wir den Krieg.") wait() say("Gott selbst schicktediese vier Fremde zu uns und") say("wir ehrten sie mit einem gro�en Fest. Seitdem ist") say("es Tradition junge Krieger ab einer bestimmten") say("Grenze diese Fertigkeiten zu lehren, um das Dorf") say("vor weiteren Angriffen zu sch�tzen.") say("Die heutigen Rassen:") say("Krieger, Schamane, Sura und Ninja!") wait() say("Uriel") say("Hier endet die Geschichte.") say("Doch leider zerstritten sich die drei Kaiserreiche.") say("Warum dies so ist, wei� ich nicht.") say("Es k�nnte viele Gr�nde haben: Der Krieg, die") say("Versorgung, das Aufbauen und neuziehen der Grenzen") say("oder gar die Steine!") wait() say("Diese Legende soll mit der Wahrheit verbunden sein.") say("Leider bin ich nicht so stark und auch") say("schon ziemlich alt und gebrechlich. Die Seiten,") say("so die Legende, sollen �berall auf dem Kontinent ") say("verteilt sein und diese werden von wilden Monstern") say("jeglicher Art verteidigt. Du musst sie finden!") say("Wenn wir es schaffen sollten, k�nnte man erneut") say("versuchen, die drei Reiche zum Frieden zu bringen.") wait() say("Eine M�glichkeit und eine Chance, die wir nutzen") say("sollten. Eventuell stehen auf diesen Seiten etwas") say("�ber die Reiche und �ber die Grenzen usw. - Ich") say("hoffe ich kann auf deine Hilfe z�hlen.") say("Was meinst du dazu?") wait() say("Wirklich? Vielen Dank!") say("Dann vertraue ich dir diese Aufgabe an!") wait() say("Uriel:") say("Laut alten Schriften sei die erste Seite.") say("bei den Wei�en Eid. Soldaten gelandet.") say("Vorsicht ist geboten. Sie sind nicht zu") say("untersch�tzen. Pass auf,denn die Seiten.") say("k�nnen auch zerrei�en. Sonst brauche ich") say("eine neue, um weiter zu forschen!") say("") set_state(collect_tagebuchseite) pc.setqf("duration",0) pc.setqf("collect_count",0) end end state collect_tagebuchseite begin when letter begin send_letter("Die erste Seite") end when button or info begin say_title("Das Geheimnis des Drachengottes") say("") say("Finde die Seite und bringe sie Uriel.") say("Zu finden ist diese bei den Wei�en-Eid Clan") say("") say("Uriel z�hlt auf deine Hilfe!") say_item_vnum(30150) say("Ob diese Seite tats�chlich zu dem Buch geh�rt?") say("") end when 301.kill or 302.kill or 333.kill begin if pc.count_item(30150)<1 then local rand = number(0,99) if rand<5 then pc.give_item2(30150, 1) end end end when 20011.chat."Die verlorene Seite" begin if pc.count_item(30150)>0 then say("Uriel:") say("Dank deiner Hilfe verstehe ich nun") say("langsam die Legende um dieses Buch.") say("Du hast hart gek�mpft.") say("Sprich mit Yu-Hwan, er wird dir helfen,") say("deine inneren Kr�fte zu steigern.") say("") say("Komm wieder, wenn du etwas st�rker geworden bist.") pc.remove_item(30150,1) set_state(tagebuch_reward) else say("Uriel:") say("Bringe mir bitte die Seite...") say("Zu finden bei dem Wei�en-Eid Clan.") say("Vorsicht, sie sind nicht zu untersch�tzen.") say("Sei gewappnet! ...") say("") end end end state tagebuch_reward begin when letter begin send_letter("Sprich mit Yu-Hwan") local v = find_npc_by_vnum(20017) ifv != 0 then target.vid("__TARGET__", v, "Doktor") end end when button or info begin say("Um die Belohnung von Uriel zu erhalten") say("suche mit den Informationen der") say("Seite Yu-Hwan in Map2 auf.") say("") end when __TARGET__.target.click or 20017.chat."Belohnung Yu-Hwan" begin target.delete("__TARGET__") say_title("Yu-Hwan:") say("Ich sehe ...") say("Uriel hat dich zu mir geschickt.") say("Hier ist deine Belohnung:") say("") say_reward("Du erh�lst:") say_reward(" 100 Tapferkeitsumh�nge und 10 Millionen Yang") say("") pc.give_item2(70038, 100) pc.change_money(10000000) complete_quest(jagdaufgabe) end end end

Ich br�uchte noch immer Hilfe...wer hat eine L�sung parat?

07/30/2015 01:41 Zaturix#11810

Quote:

Originally Posted by Niklas18

Ich br�uchte noch immer Hilfe...wer hat eine L�sung parat?

PHP Code:


			
quest jagdaufgabe begin    



    ----------------------------------    

    -- LvL 10 /   Erste Seite  

    ----------------------------------    

    state start begin    

        when login or levelup with pc.level>9 begin    

            set_state(talk_to_disciple_lv10)    

        end        

    end    

    state talk_to_disciple_lv10 begin    

        when letter begin    

            local v = find_npc_by_vnum(20011)    

            if v != 0 then target.vid("__TARGET__", v, "Uriel")    

            end    

            send_letter("Das Buch des Drachengottes")    

        end    

        when button or info begin    

            say_title("Das Buch des Drachengottes")    

            say("")    

            say("Uriel sucht nach dir.")    

            say("Sprich mit ihm.")    

            say("")    

            say_reward("Sprich mit Uriel")    

            say("")    

        end    

        when __TARGET__.target.click or 20011.chat."Drachengott" begin    

            target.delete("__TARGET__")    

            say("Uriel:")    

            say("")    

            say("Wer bist du denn?")    

            say("Oh, du scheinst neu hier zu sein.")    

            say("Ich bin �brigens Uriel. Mir wird nachgesagt,")    

            say("ich sei besessen auf Mythen.")    

            say("In gewisser Weise schon, denn ich lasse mich")  

            say("davon gerne fesseln. Ich br�uchte deine Hilfe.")  

            say("Es geht um ein altes Buch welches ich gefunden")   

            say("habe, doch es fehlen einige Seiten.")  

            wait()  

            say("Die ersten Seiten besagen folgendes:")  

            say("Vor vielen Jahren, als die drei Kaiserreiche im")  

            say("friedlichen Einklang miteinander lebten, fielen")  

            say("abertausende Steine vom Himmel. Diese Steine")  

            say("hatten starke, magnetische Wellen ausgesendet, die")  

            say("lebten, fielen abertausende Steine vom Himmel.")  

            say("Diese Steine, die die Tiere in freier Wildbahn")  

            say("zu Monstern, sogenannte MOBS, werden liesen.")  

            wait()  

            say("Uriel:")  

            say("Das ist total spannend, doch es geht weiter:")  

            say("Das Unheimliche daran war, dass,nachdem diese")  

            say("Steine das Land erreicht hatten, seltsame")  

            say("Kreaturen auftauchten und sich vermehrt �berallhin ")  

            say("verteilten. Nirgends waren wir vor ihnen sicher.")  

            say("Wir mussten st�ndig damit rechnen, dass wir")  

            say("angegriffen werden.")  

            wait()  

            say("Wir wappneten uns mit starken Armeen und dann kam")  

            say("der Tag an dem sich die Klingen der Monster mit")  

            say("unseren kreuzten. Wir hatten diese Schlacht")  

            say("gewonnen, aber nicht den Krieg!Wir dachten wir")  

            say("h�tten das Schlimmste �berstanden, doch wie aus")  

            say("heiterem Himmel kam ein gigantischer Drache mit")  

            say("�bergro�en, m�chtigen Kriegern daher um uns das")  

            say("F�rchten zu lehren.")  

            wait()  

            say("Viele unserer Krieger starben")  

            say("an Ort und Stelle und die Schlacht sowie der Krieg")  

            say("schien verloren, doch vier Fremde mit")  

            say("�bermenschlichen Kr�ften gaben Widerstand und")  

            say("durch sie gewannen wir den Krieg.")  

            wait()  

            say("Gott selbst schicktediese vier Fremde zu uns und")  

            say("wir ehrten sie mit einem gro�en Fest. Seitdem ist")  

            say("es Tradition junge Krieger ab einer bestimmten")  

            say("Grenze diese Fertigkeiten zu lehren, um das Dorf")  

            say("vor weiteren Angriffen zu sch�tzen.")  

            say("Die heutigen Rassen:")  

            say("Krieger, Schamane, Sura und Ninja!")  

            wait()  

            say("Uriel")  

            say("Hier endet die Geschichte.")  

            say("Doch leider zerstritten sich die drei Kaiserreiche.")  

            say("Warum dies so ist, wei� ich nicht.")  

            say("Es k�nnte viele Gr�nde haben: Der Krieg, die")  

            say("Versorgung, das Aufbauen und neuziehen der Grenzen")  

            say("oder gar die Steine!")  

            wait()   

            say("Diese Legende soll mit der Wahrheit verbunden sein.")    

            say("Leider bin ich nicht so stark und auch")    

            say("schon ziemlich alt und gebrechlich. Die Seiten,")    

            say("so die Legende, sollen �berall auf dem Kontinent ")  

            say("verteilt sein und diese werden von wilden Monstern")  

            say("jeglicher Art verteidigt. Du musst sie finden!")  

            say("Wenn wir es schaffen sollten, k�nnte man erneut")  

            say("versuchen, die drei Reiche zum Frieden zu bringen.")  

            wait()  

            say("Eine M�glichkeit und eine Chance, die wir nutzen")  

            say("sollten. Eventuell stehen auf diesen Seiten etwas")  

            say("�ber die Reiche und �ber die Grenzen usw. - Ich")  

            say("hoffe ich kann auf deine Hilfe z�hlen.")  

            say("Was meinst du dazu?")  

                        wait()  

            say("Wirklich? Vielen Dank!")  

            say("Dann vertraue ich dir diese Aufgabe an!")  

            wait()  

            say("Uriel:")    

            say("Laut alten Schriften sei die erste Seite.")    

            say("bei den Wei�en Eid. Soldaten gelandet.")    

            say("Vorsicht ist geboten. Sie sind nicht zu")    

            say("untersch�tzen. Pass auf,denn die Seiten.")    

            say("k�nnen auch zerrei�en. Sonst brauche ich")    

            say("eine neue, um weiter zu forschen!")    

            say("")    

            set_state(collect_tagebuchseite)    

            pc.setqf("duration",0)    

            pc.setqf("collect_count",0)    

        end    

    end    

   state collect_tagebuchseite begin    

        when letter begin    

            send_letter("Die erste Seite")    

        end    

        when button or info begin    

            say_title("Das Geheimnis des Drachengottes")    

            say("")    

            say("Finde die Seite und bringe sie Uriel.")    

            say("Zu finden ist diese bei den Wei�en-Eid Clan")    

            say("")  

            say("Uriel z�hlt auf deine Hilfe!")  

            say_item_vnum(30150)    

            say("Ob diese Seite tats�chlich zu dem Buch geh�rt?")    

            say("")    

        end    

        when 301.kill or 302.kill or 333.kill begin    

            if pc.count_item(30150)<1 then    

                local rand = number(0,99)    

                if rand<5 then pc.give_item2(30150, 1)    

                end    

            end        

        end    

        when 20011.chat."Die verlorene Seite" begin    

            if pc.count_item(30150)>0 then    

                say("Uriel:")    

                say("Dank deiner Hilfe verstehe ich nun")    

                say("langsam die Legende um dieses Buch.")    

                say("Du hast hart gek�mpft.")    

                say("Sprich mit Yu-Hwan, er wird dir helfen,")    

                say("deine inneren Kr�fte zu steigern.")    

                say("")    

                say("Komm wieder, wenn du etwas st�rker geworden bist.")  

                pc.remove_item(30150,1)    

                set_state(tagebuch_reward)    

            else    

                say("Uriel:")    

                say("Bringe mir bitte die Seite...")    

                say("Zu finden bei dem Wei�en-Eid Clan.")    

                say("Vorsicht, sie sind nicht zu untersch�tzen.")    

                say("Sei gewappnet! ...")         

                say("")            

            end    

        end    

    end        

    state tagebuch_reward begin    

        when letter begin    

            send_letter("Sprich mit Yu-Hwan")    

            local v = find_npc_by_vnum(20017)    

            ifv != 0 then target.vid("__TARGET__", v, "Doktor")    

            end    

        end    

        when button or info begin    

            say("Um die Belohnung von Uriel zu erhalten")    

            say("suche mit den Informationen der")    

            say("Seite Yu-Hwan in Map2 auf.")    

            say("")    

        end    

        when __TARGET__.target.click  or 20017.chat."Belohnung Yu-Hwan" begin    

            target.delete("__TARGET__")    

            say_title("Yu-Hwan:")    

            say("Ich sehe ...")    

            say("Uriel hat dich zu mir geschickt.")    

            say("Hier ist deine Belohnung:")    

            say("")    

            say_reward("Du erh�lst:")    

            say_reward(" 100 Tapferkeitsumh�nge und 10 Millionen Yang")    

            say("")    

            pc.give_item2(70038, 100)  

            pc.change_money(10000000)

            setstate(COMPLETE) 

        end

        state COMPLETE begin

    end    

end

versuche es mal so

07/30/2015 02:02 KΛIƬӨ#11811

Quote:

Originally Posted by Zaturix

PHP Code:

quest jagdaufgabe begin ---------------------------------- -- LvL 10 / Erste Seite ---------------------------------- state start begin when login or levelup with pc.level>9 begin set_state(talk_to_disciple_lv10) end end state talk_to_disciple_lv10 begin when letter begin local v = find_npc_by_vnum(20011) if v != 0 then target.vid("__TARGET__", v, "Uriel") end send_letter("Das Buch des Drachengottes") end when button or info begin say_title("Das Buch des Drachengottes") say("") say("Uriel sucht nach dir.") say("Sprich mit ihm.") say("") say_reward("Sprich mit Uriel") say("") end when __TARGET__.target.click or 20011.chat."Drachengott" begin target.delete("__TARGET__") say("Uriel:") say("") say("Wer bist du denn?") say("Oh, du scheinst neu hier zu sein.") say("Ich bin �brigens Uriel. Mir wird nachgesagt,") say("ich sei besessen auf Mythen.") say("In gewisser Weise schon, denn ich lasse mich") say("davon gerne fesseln. Ich br�uchte deine Hilfe.") say("Es geht um ein altes Buch welches ich gefunden") say("habe, doch es fehlen einige Seiten.") wait() say("Die ersten Seiten besagen folgendes:") say("Vor vielen Jahren, als die drei Kaiserreiche im") say("friedlichen Einklang miteinander lebten, fielen") say("abertausende Steine vom Himmel. Diese Steine") say("hatten starke, magnetische Wellen ausgesendet, die") say("lebten, fielen abertausende Steine vom Himmel.") say("Diese Steine, die die Tiere in freier Wildbahn") say("zu Monstern, sogenannte MOBS, werden liesen.") wait() say("Uriel:") say("Das ist total spannend, doch es geht weiter:") say("Das Unheimliche daran war, dass,nachdem diese") say("Steine das Land erreicht hatten, seltsame") say("Kreaturen auftauchten und sich vermehrt �berallhin ") say("verteilten. Nirgends waren wir vor ihnen sicher.") say("Wir mussten st�ndig damit rechnen, dass wir") say("angegriffen werden.") wait() say("Wir wappneten uns mit starken Armeen und dann kam") say("der Tag an dem sich die Klingen der Monster mit") say("unseren kreuzten. Wir hatten diese Schlacht") say("gewonnen, aber nicht den Krieg!Wir dachten wir") say("h�tten das Schlimmste �berstanden, doch wie aus") say("heiterem Himmel kam ein gigantischer Drache mit") say("�bergro�en, m�chtigen Kriegern daher um uns das") say("F�rchten zu lehren.") wait() say("Viele unserer Krieger starben") say("an Ort und Stelle und die Schlacht sowie der Krieg") say("schien verloren, doch vier Fremde mit") say("�bermenschlichen Kr�ften gaben Widerstand und") say("durch sie gewannen wir den Krieg.") wait() say("Gott selbst schicktediese vier Fremde zu uns und") say("wir ehrten sie mit einem gro�en Fest. Seitdem ist") say("es Tradition junge Krieger ab einer bestimmten") say("Grenze diese Fertigkeiten zu lehren, um das Dorf") say("vor weiteren Angriffen zu sch�tzen.") say("Die heutigen Rassen:") say("Krieger, Schamane, Sura und Ninja!") wait() say("Uriel") say("Hier endet die Geschichte.") say("Doch leider zerstritten sich die drei Kaiserreiche.") say("Warum dies so ist, wei� ich nicht.") say("Es k�nnte viele Gr�nde haben: Der Krieg, die") say("Versorgung, das Aufbauen und neuziehen der Grenzen") say("oder gar die Steine!") wait() say("Diese Legende soll mit der Wahrheit verbunden sein.") say("Leider bin ich nicht so stark und auch") say("schon ziemlich alt und gebrechlich. Die Seiten,") say("so die Legende, sollen �berall auf dem Kontinent ") say("verteilt sein und diese werden von wilden Monstern") say("jeglicher Art verteidigt. Du musst sie finden!") say("Wenn wir es schaffen sollten, k�nnte man erneut") say("versuchen, die drei Reiche zum Frieden zu bringen.") wait() say("Eine M�glichkeit und eine Chance, die wir nutzen") say("sollten. Eventuell stehen auf diesen Seiten etwas") say("�ber die Reiche und �ber die Grenzen usw. - Ich") say("hoffe ich kann auf deine Hilfe z�hlen.") say("Was meinst du dazu?") wait() say("Wirklich? Vielen Dank!") say("Dann vertraue ich dir diese Aufgabe an!") wait() say("Uriel:") say("Laut alten Schriften sei die erste Seite.") say("bei den Wei�en Eid. Soldaten gelandet.") say("Vorsicht ist geboten. Sie sind nicht zu") say("untersch�tzen. Pass auf,denn die Seiten.") say("k�nnen auch zerrei�en. Sonst brauche ich") say("eine neue, um weiter zu forschen!") say("") set_state(collect_tagebuchseite) pc.setqf("duration",0) pc.setqf("collect_count",0) end end state collect_tagebuchseite begin when letter begin send_letter("Die erste Seite") end when button or info begin say_title("Das Geheimnis des Drachengottes") say("") say("Finde die Seite und bringe sie Uriel.") say("Zu finden ist diese bei den Wei�en-Eid Clan") say("") say("Uriel z�hlt auf deine Hilfe!") say_item_vnum(30150) say("Ob diese Seite tats�chlich zu dem Buch geh�rt?") say("") end when 301.kill or 302.kill or 333.kill begin if pc.count_item(30150)<1 then local rand = number(0,99) if rand<5 then pc.give_item2(30150, 1) end end end when 20011.chat."Die verlorene Seite" begin if pc.count_item(30150)>0 then say("Uriel:") say("Dank deiner Hilfe verstehe ich nun") say("langsam die Legende um dieses Buch.") say("Du hast hart gek�mpft.") say("Sprich mit Yu-Hwan, er wird dir helfen,") say("deine inneren Kr�fte zu steigern.") say("") say("Komm wieder, wenn du etwas st�rker geworden bist.") pc.remove_item(30150,1) set_state(tagebuch_reward) else say("Uriel:") say("Bringe mir bitte die Seite...") say("Zu finden bei dem Wei�en-Eid Clan.") say("Vorsicht, sie sind nicht zu untersch�tzen.") say("Sei gewappnet! ...") say("") end end end state tagebuch_reward begin when letter begin send_letter("Sprich mit Yu-Hwan") local v = find_npc_by_vnum(20017) ifv != 0 then target.vid("__TARGET__", v, "Doktor") end end when button or info begin say("Um die Belohnung von Uriel zu erhalten") say("suche mit den Informationen der") say("Seite Yu-Hwan in Map2 auf.") say("") end when __TARGET__.target.click or 20017.chat."Belohnung Yu-Hwan" begin target.delete("__TARGET__") say_title("Yu-Hwan:") say("Ich sehe ...") say("Uriel hat dich zu mir geschickt.") say("Hier ist deine Belohnung:") say("") say_reward("Du erh�lst:") say_reward(" 100 Tapferkeitsumh�nge und 10 Millionen Yang") say("") pc.give_item2(70038, 100) pc.change_money(10000000) setstate(COMPLETE) end state COMPLETE begin end end

versuche es mal so

PHP Code:


			
 quest jagdaufgabe begin    

    ----------------------------------    
    -- LvL 10 /   Erste Seite  
    ----------------------------------    
    state start begin    
        when login or levelup with pc.level>9 begin    
            set_state(talk_to_disciple_lv10)    
        end        
    end    
    state talk_to_disciple_lv10 begin    
        when letter begin    
            local v = find_npc_by_vnum(20011)    
            if v != 0 then target.vid("__TARGET__", v, "Uriel")    
            end    
            send_letter("Das Buch des Drachengottes")    
        end    
        when button or info begin    
            say_title("Das Buch des Drachengottes")    
            say("")    
            say("Uriel sucht nach dir.")    
            say("Sprich mit ihm.")    
            say("")    
            say_reward("Sprich mit Uriel")    
            say("")    
        end    
        when __TARGET__.target.click or 20011.chat."Drachengott" begin    
            target.delete("__TARGET__")    
            say("Uriel:")    
            say("")    
            say("Wer bist du denn?")    
            say("Oh, du scheinst neu hier zu sein.")    
            say("Ich bin �brigens Uriel. Mir wird nachgesagt,")    
            say("ich sei besessen auf Mythen.")    
            say("In gewisser Weise schon, denn ich lasse mich")  
            say("davon gerne fesseln. Ich br�uchte deine Hilfe.")  
            say("Es geht um ein altes Buch welches ich gefunden")   
            say("habe, doch es fehlen einige Seiten.")  
            wait()  
            say("Die ersten Seiten besagen folgendes:")  
            say("Vor vielen Jahren, als die drei Kaiserreiche im")  
            say("friedlichen Einklang miteinander lebten, fielen")  
            say("abertausende Steine vom Himmel. Diese Steine")  
            say("hatten starke, magnetische Wellen ausgesendet, die")  
            say("lebten, fielen abertausende Steine vom Himmel.")  
            say("Diese Steine, die die Tiere in freier Wildbahn")  
            say("zu Monstern, sogenannte MOBS, werden liesen.")  
            wait()  
            say("Uriel:")  
            say("Das ist total spannend, doch es geht weiter:")  
            say("Das Unheimliche daran war, dass,nachdem diese")  
            say("Steine das Land erreicht hatten, seltsame")  
            say("Kreaturen auftauchten und sich vermehrt �berallhin ")  
            say("verteilten. Nirgends waren wir vor ihnen sicher.")  
            say("Wir mussten st�ndig damit rechnen, dass wir")  
            say("angegriffen werden.")  
            wait()  
            say("Wir wappneten uns mit starken Armeen und dann kam")  
            say("der Tag an dem sich die Klingen der Monster mit")  
            say("unseren kreuzten. Wir hatten diese Schlacht")  
            say("gewonnen, aber nicht den Krieg!Wir dachten wir")  
            say("h�tten das Schlimmste �berstanden, doch wie aus")  
            say("heiterem Himmel kam ein gigantischer Drache mit")  
            say("�bergro�en, m�chtigen Kriegern daher um uns das")  
            say("F�rchten zu lehren.")  
            wait()  
            say("Viele unserer Krieger starben")  
            say("an Ort und Stelle und die Schlacht sowie der Krieg")  
            say("schien verloren, doch vier Fremde mit")  
            say("�bermenschlichen Kr�ften gaben Widerstand und")  
            say("durch sie gewannen wir den Krieg.")  
            wait()  
            say("Gott selbst schicktediese vier Fremde zu uns und")  
            say("wir ehrten sie mit einem gro�en Fest. Seitdem ist")  
            say("es Tradition junge Krieger ab einer bestimmten")  
            say("Grenze diese Fertigkeiten zu lehren, um das Dorf")  
            say("vor weiteren Angriffen zu sch�tzen.")  
            say("Die heutigen Rassen:")  
            say("Krieger, Schamane, Sura und Ninja!")  
            wait()  
            say("Uriel")  
            say("Hier endet die Geschichte.")  
            say("Doch leider zerstritten sich die drei Kaiserreiche.")  
            say("Warum dies so ist, wei� ich nicht.")  
            say("Es k�nnte viele Gr�nde haben: Der Krieg, die")  
            say("Versorgung, das Aufbauen und neuziehen der Grenzen")  
            say("oder gar die Steine!")  
            wait()   
            say("Diese Legende soll mit der Wahrheit verbunden sein.")    
            say("Leider bin ich nicht so stark und auch")    
            say("schon ziemlich alt und gebrechlich. Die Seiten,")    
            say("so die Legende, sollen �berall auf dem Kontinent ")  
            say("verteilt sein und diese werden von wilden Monstern")  
            say("jeglicher Art verteidigt. Du musst sie finden!")  
            say("Wenn wir es schaffen sollten, k�nnte man erneut")  
            say("versuchen, die drei Reiche zum Frieden zu bringen.")  
            wait()  
            say("Eine M�glichkeit und eine Chance, die wir nutzen")  
            say("sollten. Eventuell stehen auf diesen Seiten etwas")  
            say("�ber die Reiche und �ber die Grenzen usw. - Ich")  
            say("hoffe ich kann auf deine Hilfe z�hlen.")  
            say("Was meinst du dazu?")  
                        wait()  
            say("Wirklich? Vielen Dank!")  
            say("Dann vertraue ich dir diese Aufgabe an!")  
            wait()  
            say("Uriel:")    
            say("Laut alten Schriften sei die erste Seite.")    
            say("bei den Wei�en Eid. Soldaten gelandet.")    
            say("Vorsicht ist geboten. Sie sind nicht zu")    
            say("untersch�tzen. Pass auf,denn die Seiten.")    
            say("k�nnen auch zerrei�en. Sonst brauche ich")    
            say("eine neue, um weiter zu forschen!")    
            say("")    
            set_state(collect_tagebuchseite)    
            pc.setqf("duration",0)    
            pc.setqf("collect_count",0)    
        end    
    end    
   state collect_tagebuchseite begin    
        when letter begin    
            send_letter("Die erste Seite")    
        end    
        when button or info begin    
            say_title("Das Geheimnis des Drachengottes")    
            say("")    
            say("Finde die Seite und bringe sie Uriel.")    
            say("Zu finden ist diese bei den Wei�en-Eid Clan")    
            say("")  
            say("Uriel z�hlt auf deine Hilfe!")  
            say_item_vnum(30150)    
            say("Ob diese Seite tats�chlich zu dem Buch geh�rt?")    
            say("")    
        end    
        when 301.kill or 302.kill or 333.kill begin    
            if pc.count_item(30150)<1 then    
                local rand = number(0,99)    
                if rand<5 then pc.give_item2(30150, 1)    
                end    
            end        
        end    
        when 20011.chat."Die verlorene Seite" begin    
            if pc.count_item(30150)>0 then    
                say("Uriel:")    
                say("Dank deiner Hilfe verstehe ich nun")    
                say("langsam die Legende um dieses Buch.")    
                say("Du hast hart gek�mpft.")    
                say("Sprich mit Yu-Hwan, er wird dir helfen,")    
                say("deine inneren Kr�fte zu steigern.")    
                say("")    
                say("Komm wieder, wenn du etwas st�rker geworden bist.")  
                pc.remove_item(30150,1)    
                set_state(tagebuch_reward)    
            else    
                say("Uriel:")    
                say("Bringe mir bitte die Seite...")    
                say("Zu finden bei dem Wei�en-Eid Clan.")    
                say("Vorsicht, sie sind nicht zu untersch�tzen.")    
                say("Sei gewappnet! ...")         
                say("")            
            end    
        end    
    end        
    state tagebuch_reward begin    
        when letter begin    
            send_letter("Sprich mit Yu-Hwan")    
            local v = find_npc_by_vnum(20017)    
            ifv != 0 then target.vid("__TARGET__", v, "Doktor")    
            end    
        end    
        when button or info begin    
            say("Um die Belohnung von Uriel zu erhalten")    
            say("suche mit den Informationen der")    
            say("Seite Yu-Hwan in Map2 auf.")    
            say("")    
        end    
        when __TARGET__.target.click  or 20017.chat."Belohnung Yu-Hwan" begin    
            target.delete("__TARGET__")    
            say_title("Yu-Hwan:")    
            say("Ich sehe ...")    
            say("Uriel hat dich zu mir geschickt.")    
            say("Hier ist deine Belohnung:")    
            say("")    
            say_reward("Du erh�lst:")    
            say_reward(" 100 Tapferkeitsumh�nge und 10 Millionen Yang")    
            say("")    
            pc.give_item2(70038, 100)  
            pc.change_money(10000000)
            setstate(COMPLETE) 
        end
    end
    state COMPLETE begin
    end    
end

07/30/2015 23:19 Xernderalez#11812

Diese Quest stammt aus Kilroy.�s .DE-Quest Sammlung.
Die Pferdequest ist buggy. Nachdem die Bogis gekillt wurden z�hlt der Counter einfach weiter herunter , z.B. -8 verbleibende Sch�tzen.

Spoiler

Quote:

quest pony_buy begin
state start begin
when 20349.chat."Pferdepr�fung" with horse.get_grade()==0 begin
if pc.level<=24 then
say("Dein Level f�r ein")
say("Pferd ist zu niedrig!")
say("")
elseif pc.count_item(50050)<1 then
say("Um ein Pferd zu bekommen")
say("ben�tigst du eine bestimmte")
say("Medallie. Nur auf der Pferdemedallie")
say("k�nnen die Ergebnisse")
say("der Qualifikationspr�fung eingetragen werden.")
say("")
set_state(need_item50050)
elseif pc.count_item(50050)>=1 and pc.level>=25 then
say("Um ein Pferd zu erhalten")
say("musst du eine Qualifikationspr�fung bestehen.")
say("In 30 Minuten musst du 30 Wilde Bogensch�tzen t�ten.")
say("Nur dann bekommst du dein Pferd!")
say("Die Ergebnisse werden auf deiner Medallie eingetragen.")
if select("Ich mach die Pr�fung", "Sp�ter vielleicht")==1 then
if pc.count_item(50050)>=1 then
pc.remove_item(50050, 1)
set_state(test)
end
else
say("Pferdequest fehlgeschlagen.")
return
end
else
say("Pferdequest fehlgeschlagen.")
return
end
end
end
state need_item50050 begin
when letter begin
setskin(NOWINDOW)
send_letter("Sammle eine Pferdemedallie")
clear_letter()
set_state(start)
end
when button or info begin
say_title("Pferdemedallie!")
say("Du ben�tigst eine Pferdemedallie")
say("um die Qualifikationspr�fung zu bestehen.")
clear_letter()
set_state(start)
end
end
state test begin
when letter begin
q.set_counter("W. Bogensch�tze", 30-pc.getqf("kill_count"))
end
when kill with npc.get_race()==503 begin
pc.setqf("kill_count", pc.getqf("kill_count")+1)
q.set_counter("Wilder Bogensch�tze", 30-pc.getqf("kill_count"))
if pc.getf("kill_count") >= 30 and pc.getf("limit_time")>=get_time() then
q.set_clock("Zeit", 0)
clear_letter()
set_state(report)
else
if get_time()>=pc.getqf("limit_time") then
set_state(failure)
end
end
end
when letter begin
q.set_clock("Zeit", pc.getqf("limit_time")-get_time())
end
when enter begin
pc.setqf("limit_time", get_time()+30*60)
pc.setqf("kill_count", 0)
end
when letter begin
setskin(NOWINDOW)
send_letter("T�te Wilde Bogensch�tzen!")
end
when button or info begin
say_title("T�te Wilde Bogensch�tzen!")
say("T�te innerhalb 30 Minuten mindestens 30 Wilde Bogensch�tzen.")
say("Kehre dann zum Stallburschen zur�ck.")
end
when 20349.chat."Pferdepr�fung abbrechen" with pc.getf("limit_time")>=get_time() begin
say_title("Pferdepr�fung")
say("")
say("Was du m�chtest die Pr�fung abbrechen?!")
say("Bist du dir ganz sicher?")
if select("Ja","Nein") == 2 then return end
say("Okay, hiermit ist die Pr�fung beendet.")
say("Komm wieder wenn du es erneut versuchen")
say("m�chtest.")
clear_letter()
set_state(start)
end
end
state report begin
when letter begin
setskin(NOWINDOW)
send_letter("Qualifikation erfolgreich!")
end
when button or info begin
say_title("Qualifikation erfolgreich!")
say("Kehre zum Stallburschen zur�ck.")
end
when 20349.chat."Geschafft" with horse.get_grade()==0 begin
say("Herzlichen Gl�ckwunsch.")
say("Du hast die Qualifikation bestanden.")
say("Bis das Pferdebild fertig ist, musst du noch 1Tag warten.")
say("Vergiss nicht, 100.000 Yang mitzubringen.")
pc.setqf("make_time", get_time()+(3600*number(12,14)))
clear_letter()
set_state(wait)
end
end
state wait begin
when letter begin
setskin(NOWINDOW)
send_letter("Warte auf das Pferdebild")
end
when button or info begin
say_title("Warte auf das Pferdebild")
say("Warte, bis der Stallbursche")
say("das Pferdebild erstellt hat.")
Stunden = math.floor((pc.getqf("make_time")-get_time()) / 60 / 60)
Minuten = math.floor(((pc.getqf("make_time")-get_time()) / 60 ) - Stunden * 60)
Sekunden = math.floor((pc.getqf("make_time")-get_time()) - Stunden * 60 * 60 - Minuten * 60)
say("")
say_reward(Stunden.." Stunden, "..Minuten.." Minuten, "..Sekunden.." Sekunden.")
end
when login with get_time()>=pc.getf("pony_buy","make_time") begin
clear_letter()
set_state(buy)
end
when 20349.chat."Ist mein Pferd schon fertig?" with horse.get_grade()==0 begin
say("Das Pferdebild ist noch")
say("nicht fertig.")
say("Vergesse aber nicht die 100.000 Yang!")
Stunden = math.floor((pc.getqf("make_time")-get_time()) / 60 / 60)
Minuten = math.floor(((pc.getqf("make_time")-get_time()) / 60 ) - Stunden * 60)
Sekunden = math.floor((pc.getqf("make_time")-get_time()) - Stunden * 60 * 60 - Minuten * 60)
say("")
say_reward(Stunden.." Stunden, "..Minuten.." Minuten, "..Sekunden.." Sekunden.")
end
end
state buy begin
when letter begin
setskin(NOWINDOW)
send_letter("Das Pferdebild ist fertig!")
end
when button or info begin
say_title("Das Pferdebild ist fertig")
say("Hol es dir beim Stallburschen ab.")
say("Es kostet 100.000 Yang.")
end
when 20349.chat."Pferdebild" with horse.get_grade()==0 and get_time()>=pc.getf("pony_buy","make_time") begin
say("Das Pferdebild ist fertig!")
say("M�chtest du das Pferdebild kaufen?")
local b=select("Ja", "Sp�ter", "Abbrechen")
if 1==b then
if pc.get_money()>=100000 then
horse.set_level(horse.get_level()+1)
pc.change_money(-100000)
horse.unride()
horse.advance()
horse.ride()
pc.give_item2(50051, 1)
say("Hier ist dein Pferd")
say("Du kannst es jederzeit")
say("mit hilfe des Pferdebildes rufen.")
say("Denke daran dein Pferd zu f�ttern.")
clear_letter()
set_state(__COMPLETE__)
else
say("Du hast nicht genug Yang dabei.")
end
elseif 2==b then
say("Ok wir reden sp�ter noch einmal.")
elseif 3==b then
say("Du willst tats�chlich?")
say("all die M�he abbrechen?")
local b=select("Ja", "Nein")
if 1==b then
clear_letter()
set_state(start)
elseif 2==b then
return
end
end
end
end
state failure begin
when letter begin
setskin(NOWINDOW)
send_letter("Qualifikation fehlgeschlagen!")
set_state(start)
end
when button or info begin
say_title("Qualifikation fehlgeschlagen!")
say("Du hast leider keine 30 Wilden Bogensch�tzen")
say("in den 30 Minuten get�tet.")
say("Schade.")
say("Suche eine neue Pferdemedallie")
say("und versuche es noch einmal.")
clear_letter()
set_state(start)
end
end
state __COMPLETE__ begin
end
end

08/01/2015 00:31 It�s FrenchToast#11813

Guten Tag,
Ich w�rde gerne meine Regenbogenquest ver�ndern. Und zwar:
Von M1 bis M10 automatisch skillen per random level. Leider habe ich das noch nicht hinbekommen. Also zb das es random bis level 25 die Skills bis auf M10 skillt. Danach soll man pro Regenbogenstein ein "upgrade" bekommen. Also G1 / G2 usw. Das hab ich soweit hinbekommen, vielleicht kann einer eine bessere L�sung finden, weil sonst die Quest ziemlich lang ist. Habe es mal am beispiel vo Krieger gemacht.

Spoiler

Hoffe mir kann einer Helfen ;) Gerne auch in Skype adden. Dort lautet mein Name xfantix. W�nsche euch noch einen sch�nen Abend ;)

08/01/2015 00:58 rollback#11814

Quote:

Originally Posted by It�s FrenchToast

Guten Tag,
Ich w�rde gerne meine Regenbogenquest ver�ndern. Und zwar:
Von M1 bis M10 automatisch skillen per random level. Leider habe ich das noch nicht hinbekommen. Also zb das es random bis level 25 die Skills bis auf M10 skillt. Danach soll man pro Regenbogenstein ein "upgrade" bekommen. Also G1 / G2 usw. Das hab ich soweit hinbekommen, vielleicht kann einer eine bessere L�sung finden, weil sonst die Quest ziemlich lang ist. Habe es mal am beispiel vo Krieger gemacht.

Spoiler

quest skillung begin
state start begin
when 50512.use begin
if pc.get_level() >=17 then
if pc.get_job() == 0 then
local s = select("K�rper","Mental")
if s == 1 then
--K�rper
say("W�hle deinen Skill, der h�her als M1 ist")
say("Der ausgew�hlte Skill steigt eine Fertigkeitsstufe")
local k = select("Dreiwege-Schnitt","Schwertwirbel","Kampfrausch","Aura des Schwertes","Sausen","Abbrechen")
if k == 1 then
if math.random(1,100) <= 25 then
local skillMG = pc.get_skill_level(1)+1
if pc.get_skill_level(1)>=20 and pc.get_skill_level(1)<=29 then
pc.set_skill_level(1, 40)
pc.removeitem("50512", 1)
say_red("Regenbogenstein:")
say_white("Der Regenbogenstein wird �berpr�ft.")
say_white("Es wird �berpr�ft, ob du die Kraft")
say_white("besitzt, deine Fertigkeiten zu verbessern.")
say_white("Der Drachengott verlieh dir seine Kraft und")
say_white("gab dir eine Verbesserung f�r den")
say_white("Dreiwege-Schnitt Skill! Herzlichen Gl�ckwunsch")
say_white("")
say_white("")
say_red("Dein Skill ist jetzt auf Gro�meister!")
end
else
pc.removeitem("50512", 1)
say_red("")
say_red("Der Regenbogenstein ist fehlgeschalgen")
say_red("")
end
elseif k == 2 then
if math.random(1,100) <= 25 then
local skillMG = pc.get_skill_level(2)+1
if pc.get_skill_level(2)>=20 and pc.get_skill_level(2)<=29 then
pc.set_skill_level(2, 40)
pc.removeitem("50512", 1)
say_red("Regenbogenstein:")
say_white("Der Regenbogenstein wird �berpr�ft.")
say_white("Es wird �berpr�ft, ob du die Kraft")
say_white("besitzt, deine Fertigkeiten zu verbessern.")
say_white("Der Drachengott verlieh dir seine Kraft und")
say_white("gab dir eine Verbesserung f�r den")
say_white("Dreiwege-Schnitt Skill! Herzlichen Gl�ckwunsch")
say_white("")
say_white("")
say_red("Dein Skill ist jetzt auf Gro�meister!")
end
else
pc.removeitem("50512", 1)
say_red("")
say_red("Der Regenbogenstein ist fehlgeschalgen")
say_red("")
end
elseif k == 3 then
if math.random(1,100) <= 25 then
local skillMG = pc.get_skill_level(3)+1
if pc.get_skill_level(3)>=20 and pc.get_skill_level(3)<=29 then
pc.set_skill_level(3, 40)
pc.removeitem("50512", 1)
say_red("Regenbogenstein:")
say_white("Der Regenbogenstein wird �berpr�ft.")
say_white("Es wird �berpr�ft, ob du die Kraft")
say_white("besitzt, deine Fertigkeiten zu verbessern.")
say_white("Der Drachengott verlieh dir seine Kraft und")
say_white("gab dir eine Verbesserung f�r den")
say_white("Dreiwege-Schnitt Skill! Herzlichen Gl�ckwunsch")
say_white("")
say_white("")
say_red("Dein Skill ist jetzt auf Gro�meister!")
end
else
pc.removeitem("50512", 1)
say_red("")
say_red("Der Regenbogenstein ist fehlgeschalgen")
say_red("")
end
elseif k == 4 then
if math.random(1,100) <= 25 then
local skillMG = pc.get_skill_level(4)+1
if pc.get_skill_level(4)>=20 and pc.get_skill_level(4)<=29 then
pc.set_skill_level(4, 40)
pc.removeitem("50512", 1)
say_red("Regenbogenstein:")
say_white("Der Regenbogenstein wird �berpr�ft.")
say_white("Es wird �berpr�ft, ob du die Kraft")
say_white("besitzt, deine Fertigkeiten zu verbessern.")
say_white("Der Drachengott verlieh dir seine Kraft und")
say_white("gab dir eine Verbesserung f�r den")
say_white("Dreiwege-Schnitt Skill! Herzlichen Gl�ckwunsch")
say_white("")
say_white("")
say_red("Dein Skill ist jetzt auf Gro�meister!")
end
else
pc.removeitem("50512", 1)
say_red("")
say_red("Der Regenbogenstein ist fehlgeschalgen")
say_red("")
end
elseif k == 5 then
if math.random(1,100) <= 25 then
local skillMG = pc.get_skill_level(5)+1
if pc.get_skill_level(5)>=20 and pc.get_skill_level(5)<=29 then
pc.set_skill_level(5, 40)
pc.removeitem("50512", 1)
say_red("Regenbogenstein:")
say_white("Der Regenbogenstein wird �berpr�ft.")
say_white("Es wird �berpr�ft, ob du die Kraft")
say_white("besitzt, deine Fertigkeiten zu verbessern.")
say_white("Der Drachengott verlieh dir seine Kraft und")
say_white("gab dir eine Verbesserung f�r den")
say_white("Dreiwege-Schnitt Skill! Herzlichen Gl�ckwunsch")
say_white("")
say_white("")
say_red("Dein Skill ist jetzt auf Gro�meister!")
end
else
pc.removeitem("50512", 1)
say_red("")
say_red("Der Regenbogenstein ist fehlgeschalgen")
say_red("")
end
end
elseif s == 2 then
--Mentalo
say("W�hle deinen Skill, der h�her als M1 ist")
say("Der ausgew�hlte Skill steigt eine Fertigkeitsstufe")
local k = select("Durchschlag","Heftiges Schlagen","Stampfer","Starker K�rper","Schwertschlag","Abbrechen")
if k == 1 then
local skillMG = pc.get_skill_level(16)+1
if pc.get_skill_level(16)>=20 and pc.get_skill_level(16)<=29 then
pc.set_skill_level(16, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 2 then
local skillMG = pc.get_skill_level(17)+1
if pc.get_skill_level(17)>=20 and pc.get_skill_level(17)<=29 then
pc.set_skill_level(17, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 3 then
local skillMG = pc.get_skill_level(18)+1
if pc.get_skill_level(18)>=20 and pc.get_skill_level(18)<=29 then
pc.set_skill_level(18, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 4 then
local skillMG = pc.get_skill_level(19)+1
if pc.get_skill_level(19)>=20 and pc.get_skill_level(19)<=29 then
pc.set_skill_level(19, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 5 then
local skillMG = pc.get_skill_level(20)+1
if pc.get_skill_level(20)>=20 and pc.get_skill_level(20)<=29 then
pc.set_skill_level(20, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
end
end
elseif pc.get_job() ==1 then
say_title("Alchemist:")
say("Bringe mir 5 Skill-Steine, um")
say("einen deiner M Skills eine Stufe")
say("herauf zu zaubern.")
say_gold("Du hast genug Skill-Steine!")
local s = select("Nahkampf","Fernkampf")
if s == 1 then
--Nahkampf
say("W�hle deinen Skill, der h�her als M1 ist")
say("Der ausgew�hlte Skill steigt eine Fertigkeitsstufe")
local k = select("Hinterhalt","Blitzangriff","Degenwirbel"," Tarnung","Giftwolke","Abbrechen")
if k == 1 then
local skillMG = pc.get_skill_level(31)+1
if pc.get_skill_level(31)>=20 and pc.get_skill_level(31)<=29 then
pc.set_skill_level(31, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 2 then
local skillMG = pc.get_skill_level(32)+1
if pc.get_skill_level(32)>=20 and pc.get_skill_level(32)<=29 then
pc.set_skill_level(32, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 3 then
local skillMG = pc.get_skill_level(33)+1
if pc.get_skill_level(33)>=20 and pc.get_skill_level(33)<=29 then
pc.set_skill_level(33, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 4 then
local skillMG = pc.get_skill_level(34)+1
if pc.get_skill_level(34)>=20 and pc.get_skill_level(34)<=29 then
pc.set_skill_level(34, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 5 then
local skillMG = pc.get_skill_level(31)+1
if pc.get_skill_level(31)>=20 and pc.get_skill_level(31)<=29 then
pc.set_skill_level(35, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
end
elseif s == 2 then
--Fernkampf
say("W�hle deinen Skill, der h�her als M1 ist")
say("Der ausgew�hlte Skill steigt eine Fertigkeitsstufe")
local k = select("Federschreiten","Giftpfeil","Feuerpfeil"," Pfeilregen","Wiederholter Schuss","Abbrechen")
if k == 1 then
local skillMG = pc.get_skill_level(49)+1
if pc.get_skill_level(49)>=20 and pc.get_skill_level(49)<=29 then
pc.set_skill_level(49, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 2 then
local skillMG = pc.get_skill_level(50)+1
if pc.get_skill_level(50)>=20 and pc.get_skill_level(50)<=29 then
pc.set_skill_level(50, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 3 then
local skillMG = pc.get_skill_level(48)+1
if pc.get_skill_level(48)>=20 and pc.get_skill_level(48)<=29 then
pc.set_skill_level(48, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 4 then
local skillMG = pc.get_skill_level(47)+1
if pc.get_skill_level(47)>=20 and pc.get_skill_level(47)<=29 then
pc.set_skill_level(47, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 5 then
local skillMG = pc.get_skill_level(46)+1
if pc.get_skill_level(46)>=20 and pc.get_skill_level(46)<=29 then
pc.set_skill_level(46, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
end
end
elseif pc.get_job() == 2 then
say_title("Alchemist:")
say("Bringe mir 5 Skill-Steine, um")
say("einen deiner M Skills eine Stufe")
say("herauf zu zaubern.")
say_gold("Du hast genug Skill-Steine!")
local s = select("Magie","Waffe")
if s == 1 then
--Magie
say("W�hle deinen Skill, der h�her als M1 ist")
say("Der ausgew�hlte Skill steigt eine Fertigkeitsstufe")
local k = select("Dunkler Schlag","Flammenschlag","Geist der Flamme","Dunkler Schutz","Geisterschlag","Dunkler Stein","Abbrechen")
if k == 1 then
local skillMG = pc.get_skill_level(76)+1
if pc.get_skill_level(76)>=20 and pc.get_skill_level(76)<=29 then
pc.set_skill_level(76, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 2 then
local skillMG = pc.get_skill_level(77)+1
if pc.get_skill_level(77)>=20 and pc.get_skill_level(77)<=29 then
pc.set_skill_level(77, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 3 then
local skillMG = pc.get_skill_level(78)+1
if pc.get_skill_level(78)>=20 and pc.get_skill_level(78)<=29 then
pc.set_skill_level(78, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 4 then
local skillMG = pc.get_skill_level(79)+1
if pc.get_skill_level(79)>=20 and pc.get_skill_level(79)<=29 then
pc.set_skill_level(79, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 5 then
local skillMG = pc.get_skill_level(80)+1
if pc.get_skill_level(80)>=20 and pc.get_skill_level(80)<=29 then
pc.set_skill_level(80, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 6 then
local skillMG = pc.get_skill_level(81)+1
if pc.get_skill_level(81)>=20 and pc.get_skill_level(81)<=29 then
pc.set_skill_level(81, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
end
elseif s == 2 then
-- Waffensura
say("W�hle deinen Skill, der h�her als M1 ist")
say("Der ausgew�hlte Skill steigt eine Fertigkeitsstufe")
local k = select("Fingerschlag","Drachenwirber","Verzauberte Klinge","Furcht","Verzauberte R�stung","Zauber Aufheben","Abbrechen")
if k == 1 then
local skillMG = pc.get_skill_level(61)+1
if pc.get_skill_level(61)>=20 and pc.get_skill_level(61)<=29 then
pc.set_skill_level(61, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 2 then
local skillMG = pc.get_skill_level(62)+1
if pc.get_skill_level(62)>=20 and pc.get_skill_level(62)<=29 then
pc.set_skill_level(62, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 3 then
local skillMG = pc.get_skill_level(63)+1
if pc.get_skill_level(63)>=20 and pc.get_skill_level(63)<=29 then
pc.set_skill_level(63, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 4 then
local skillMG = pc.get_skill_level(64)+1
if pc.get_skill_level(64)>=20 and pc.get_skill_level(64)<=29 then
pc.set_skill_level(64, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 5 then
local skillMG = pc.get_skill_level(61)+1
if pc.get_skill_level(61)>=20 and pc.get_skill_level(61)<=29 then
pc.set_skill_level(65, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 6 then
local skillMG = pc.get_skill_level(66)+1
if pc.get_skill_level(66)>=20 and pc.get_skill_level(66)<=29 then
pc.set_skill_level(66, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
end
end
elseif pc.get_job() == 3 then
say_title("Alchemist:")
say("Bringe mir 5 Skill-Steine, um")
say("einen deiner M Skills eine Stufe")
say("herauf zu zaubern.")
say("")
say_gold("Du hast genug Skill-Steine!")
local s = select("Heil","Drachen")
if s == 1 then
--Heil
say("W�hle deinen Skill, der h�her als M1 ist")
say("Der ausgew�hlte Skill steigt eine Fertigkeitsstufe")
local k = select("Blitzwurf","Blitz Heraufbeschw�ren","Blitzkralle","Kurieren","Schnel ligkeit","Angriff+","Abbrechen")
if k == 1 then
local skillMG = pc.get_skill_level(106)+1
if pc.get_skill_level(106)>=20 and pc.get_skill_level(106)<=29 then
pc.set_skill_level(106, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 2 then
local skillMG = pc.get_skill_level(107)+1
if pc.get_skill_level(107)>=20 and pc.get_skill_level(107)<=29 then
pc.set_skill_level(107, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 3 then
local skillMG = pc.get_skill_level(108)+1
if pc.get_skill_level(108)>=20 and pc.get_skill_level(108)<=29 then
pc.set_skill_level(108, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 4 then
local skillMG = pc.get_skill_level(109)+1
if pc.get_skill_level(109)>=20 and pc.get_skill_level(109)<=29 then
pc.set_skill_level(109, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 5 then
local skillMG = pc.get_skill_level(110)+1
if pc.get_skill_level(110)>=20 and pc.get_skill_level(110)<=29 then
pc.set_skill_level(110, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 6 then
local skillMG = pc.get_skill_level(111)+1
if pc.get_skill_level(111)>=20 and pc.get_skill_level(111)<=29 then
pc.set_skill_level(111, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
end
elseif s == 2 then
--Drachen
say("W�hle deinen Skill, der h�her als M1 ist")
say("Der ausgew�hlte Skill steigt eine Fertigkeitsstufe")
local k = select("Fliegender Talisman","Drachenschie�en","Drachengebr�ll","Sege n","Reflektieren","Hilfe des Drachen","Abbrechen")
if k == 1 then
local skillMG = pc.get_skill_level(91)+1
if pc.get_skill_level(91)>=20 and pc.get_skill_level(91)<=29 then
pc.set_skill_level(91, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 2 then
local skillMG = pc.get_skill_level(92)+1
if pc.get_skill_level(92)>=20 and pc.get_skill_level(92)<=29 then
pc.set_skill_level(92, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 3 then
local skillMG = pc.get_skill_level(93)+1
if pc.get_skill_level(93)>=20 and pc.get_skill_level(93)<=29 then
pc.set_skill_level(93, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 4 then
local skillMG = pc.get_skill_level(94)+1
if pc.get_skill_level(94)>=20 and pc.get_skill_level(94)<=29 then
pc.set_skill_level(94, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 5 then
local skillMG = pc.get_skill_level(91)+1
if pc.get_skill_level(91)>=20 and pc.get_skill_level(91)<=29 then
pc.set_skill_level(95, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
elseif k == 6 then
local skillMG = pc.get_skill_level(96)+1
if pc.get_skill_level(96)>=20 and pc.get_skill_level(96)<=29 then
pc.set_skill_level(96, 30)
pc.removeitem("50512", 1)
chat("Dein Skill ist jetzt auf Gro�meister!")
else
say_red("Dein Skill ist noch nicht auf Meister")
say_red("oder bereits auf Gro�meister!")
end
end
end
end
else
say("Du kannst mich noch nit benutzen")
end
end
end
end

Hoffe mir kann einer Helfen ;) Gerne auch in Skype adden. Dort lautet mein Name xfantix. W�nsche euch noch einen sch�nen Abend ;)

Immer sch�n mit Variablen arbeiten ;)

Code:

--[[
	Skills auflisten:
		M1 (20) - G10 (39)
	M1 - M10: Skill -> G1
	G1 - G10: Skill+1
]]

quest skillung begin
	state start begin
		when 50512.use begin
			if pc.get_skill_group() == 0 then
				say("Du musst zuerst eine Lehre w�hlen.")
				return
			end
			local skillGroup = pc.get_skill_group()
			local skillList = skillung.BuildSkillList(20, 39)
			if not skillList or table.getn(skillList) < 1 then
				say("Du hast keine F�higkeit auf der ben�tigten Stufe.")
				return
			end
			local skillNames = {}
			for _,skill in ipairs(skillList) do
				table.insert(skillNames, skill[2])
			end
			say("Welche F�higkeit m�chtest du steigern?")
			say("F�higkeiten zwischen M1 und M10 werden auf G1")
			say("erh�ht, F�higkeit ab G1 werden um eine Stufe erh�ht.")
			local skill = skillList[select3(skillNames)] or false
			if not skill then return end
			local skillLevel = pc.get_skill_level(skill[1])
			local sourceLevel = (skillLevel < 30 and 30 or skillLevel+1)
			local levelName = ({
				[20] = "M1",
				[21] = "M2",
				[22] = "M3",
				[23] = "M4",
				[24] = "M5",
				[25] = "M6",
				[26] = "M7",
				[27] = "M8",
				[28] = "M9",
				[29] = "M10",
				[30] = "G1",
				[31] = "G2",
				[32] = "G3",
				[33] = "G4",
				[34] = "G5",
				[35] = "G6",
				[36] = "G7",
				[37] = "G8",
				[38] = "G9",
				[39] = "G10",
				[40] = "P"
			})[sourceLevel]
			say("M�chtest du "..skill[2].." wirklich auf")
			say(levelName.." erh�hen?")
			if select(skill[2].." aufwerten", "Abbrechen") == 2 then return end
			pc.remove_item(50512)
			if not perc_chance(25) then
				say("Die Aufwertung deiner F�higkeit ist leider fehlgeschlagen.")
				return
			end
			pc.set_skill_level(skill[1], sourceLevel)
			say(skill[2].." wurde erfolgreich aufgewertet.")
		end
		function BuildSkillList(min, max)
			local skillList = special.active_skill_list[pc.get_job()+1][pc.get_skill_group()] or false
			if not skillList then return nil end
			local skillData = {}
			for _,skillVnum in ipairs(skillList) do
				local skillLevel = pc.get_skill_level(skillVnum)
				if skillLevel >= min and skillLevel <= max then
					table.insert(skillData, {skillVnum, locale.GM_SKILL_NAME_DICT[skillVnum] or skillVnum})
				end
			end
			return skillData
		end
	end
end

Du ben�tigst:
select3 (Schicke ich dir falls du es nicht hast)
perc_chance (findest du [Only registered and activated users can see links. Click Here To Register...])

08/01/2015 18:06 Red Firestar#11815

Problem mit DT quest k�nnte sie mal jemand auf Fehlerpr�fen und eventuell richtig anpassen.

Spoiler

Code:

quest deviltower_zone begin
    state start begin
        when login begin
            if pc.get_map_index() == 66 then
                if pc.get_x() < 2048+88 or pc.get_y() < 6656+577 or pc.get_x() > 2048+236 or pc.get_y() > 6656+737 then
                    pc.warp((5376+532)*100, (512+596+4)*100, 22)
                end
					pc.set_warp_location(22, 5376+532, 512+596+4)
            elseif pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 then
					pc.set_warp_location(22, 5376+532, 512+596+4)
            end
        end

	when logout begin
		if pc.count_item(30300) >= 1 then
			pc.remove_item(30300, pc.count_item(30300))
		end
		if pc.count_item(30302) >= 1 then
			pc.remove_item(30302, pc.count_item(30302))
		end				
	end
		when deviltower_man.chat."D�monenturm" begin
			say_title("W�chter des D�monturmes")
			if pc . get_level ( ) < 40 then 
				say("Du hast noch nicht gen�gend Erfahrung gesammelt.")
				say("Komme wieder, wenn du Level 40 bist!") 
				return
			end
			say("M�chtest du den D�monenturm betreten?") 
			local s = select ("Betreten", "Abbrechen") 
			if s == 1 then 
				pc.warp(216500,727000)
			end
		end
        when kill with npc.get_race() == 8015 begin
            timer("devil_stone1_1", 8)
        end
        when devil_stone1_1.timer begin
            d.new_jump_all(66, special.devil_tower[1][1], special.devil_tower[1][2])
            d.regen_file("data/dungeon/deviltower2_regen.txt")
            d.set_warp_at_eliminate(4, d.get_map_index(), special.devil_tower[2][1], special.devil_tower[2][2], "data/dungeon/deviltower3_regen.txt")
        end
        when kill with npc.get_race() == 1091 begin
            d.set_warp_at_eliminate(4, d.get_map_index(), special.devil_tower[3][1], special.devil_tower[3][2], "data/dungeon/deviltower4_regen.txt")
            d.check_eliminated()
        end
        function get_4floor_stone_pos()
	    local positions = 
			{
				{368, 629}, {419, 630}, {428, 653}, {422, 679},
				{395, 689}, {369, 679}, {361, 658},
			}
            for i = 1, 6 do
                local j = number(i, 7)
                if i != j then
                    local t = positions[i];
                    positions[i] = positions[j];
                    positions[j] = t;
                end
            end
            return positions
        end
        when kill with npc.get_race() == 8016 and pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
            d.setf("level", 4)
            local positions = deviltower_zone.get_4floor_stone_pos()
            for i = 1, 6 do
                d.set_unique("fake" .. i , d.spawn_mob(8017, positions[i][1], positions[i][2]))
            end
            local vid = d.spawn_mob(8017, positions[7][1], positions[7][2])
            d.set_unique("real", vid)
	    server_loop_timer('devil_stone4_update', 10, pc.get_map_index())
	    server_timer('devil_stone4_fail1', 5*60, pc.get_map_index())

            d.notice("Du bist nun auf der 4ten Ebene.");
            d.notice("Viele falsche Metinsteine werden deine Sinne und Verstand blenden.");
            d.notice("Finde den richtigen Metinstein innerhalb 15 Minuten");
            d.notice("Es ist der einzige Weg um zur n�chsten Ebene zu gelangen.");
        end

        when devil_stone4_fail1.server_timer begin
            if d.select(get_server_timer_arg()) then
                d.notice("Noch 10 Minuten verbleibend")
		server_timer('devil_stone4_fail2', 5*60, get_server_timer_arg())
            end
        end

        when devil_stone4_fail2.server_timer begin
            if d.select(get_server_timer_arg()) then
                d.notice("Noch 5 Minuten verbleibend")
		server_timer('devil_stone4_fail', 5*60, get_server_timer_arg())
            end
        end

        when devil_stone4_fail.server_timer begin
            if d.select(get_server_timer_arg()) and d.getf("level") == 4 then
                d.notice("Die Zeit ist abgelaufen.")
                d.exit_all()
            end
        end

        when devil_stone4_update.server_timer begin
            if d.select(get_server_timer_arg()) then
                if not d.is_unique_dead("real") then
                    for i = 1, 6 do
                        if d.getf("fakedead" .. i) == 0 then
                            if d.unique_get_hp_perc("fake" .. i) < 50 then
                                d.purge_unique("fake" .. i)
                                d.setf("fakedead" .. i, 1)
                                d.notice("Der falsche Metinstein verschwindet...");
                            end
                        end
                    end
                else
                    server_timer("devil_stone4_end", 5, get_server_timer_arg())
                    
                    d.notice("Du hast einen guten Instinkt bewiesen.");
                    d.notice("Du hast den richtigen Metinstein zerst�rt.")
                    d.purge()
                end
            else
		server_timer('devil_stone4_stop_timer', 1, get_server_timer_arg())
            end
        end

        when devil_stone4_stop_timer.server_timer begin
	    clear_server_timer('devil_stone4_update', get_server_timer_arg())
        end

        when devil_stone4_end.server_timer begin
            if d.select(get_server_timer_arg()) then
			clear_server_timer('devil_stone4_update', get_server_timer_arg())
			clear_server_timer('devil_stone4_fail1', get_server_timer_arg())
			clear_server_timer('devil_stone4_fail2', get_server_timer_arg())
			clear_server_timer('devil_stone4_fail', get_server_timer_arg())

                d.setf("level", 5)
                d.setf("stone_count", 5)
                
                d.jump_all(special.devil_tower[4][1], special.devil_tower[4][2])
                d.notice("Du bist nun auf der 5ten Ebene.")
                d.notice("T�te die Monster um Schl�sselsteine zu erhalten.")
                d.notice("Diese werden die Tore �ffnen.")
                d.notice("�ffne 5 Tore in 20 Minuten um")
                d.notice("auf die n�chste Ebene zu gelangen!")

                
		server_timer('devil_stone5_fail1', 5*60, get_server_timer_arg())
		clear_server_timer('devil_stone4_update', get_server_timer_arg())

                d.set_regen_file("data/dungeon/deviltower5_regen.txt")

                d.spawn_mob(20073, 421, 452)
                d.spawn_mob(20073, 380, 460)
                d.spawn_mob(20073, 428, 414)
                d.spawn_mob(20073, 398, 392)
                d.spawn_mob(20073, 359, 426)
            end
        end
        when devil_stone5_fail1.server_timer begin
            if d.select(get_server_timer_arg()) then
                d.notice("Noch 15 Minuten verbleibend")
		server_timer('devil_stone5_fail2', 5*60, get_server_timer_arg())
            end
        end

        when devil_stone5_fail2.server_timer begin
            if d.select(get_server_timer_arg()) then
                d.notice("Noch 10 Minuten verbleibend")
		server_timer('devil_stone5_fail3', 5*60, get_server_timer_arg())
            end
        end

        when devil_stone5_fail3.server_timer begin
            if d.select(get_server_timer_arg()) then
                d.notice("Noch 5 Minuten verbleibend")
		server_timer('devil_stone5_fail', 5*60, get_server_timer_arg())
            end
        end

        when devil_stone5_fail.server_timer begin
            if d.select(get_server_timer_arg()) and d.getf("level") == 5 then
		d.notice("Die Zeit ist abgelaufen.")
		d.exit_all()
            end
        end

        when kill with npc.get_race() == 1062 and pc.in_dungeon() and d.getf("level") == 5 begin
            local KILL_COUNT_FOR_DROP_KEY = 50
            local n =d.getf("countzi") + 1
            d.setf("countzi", n)
            if n == KILL_COUNT_FOR_DROP_KEY then
                game.drop_item(50084, 1)
                d.setf("countzi", 0)
            end
        end
        when devil_stone5.take with item.vnum == 50084 begin
            npc.purge()
            item.remove()
            d.setf("stone_count", d.getf("stone_count") - 1)
            if d.getf("stone_count") <= 0 then
            	d.clear_regen()
            	d.kill_all()
                d.notice("Du hast das letzte Siegel ge�ffnet. Du wirst")
                d.notice("nun zur 6ten Ebene gelangen!")

		clear_server_timer('devil_stone5_fail1', get_server_timer_arg())
		clear_server_timer('devil_stone5_fail2', get_server_timer_arg())
		clear_server_timer('devil_stone5_fail3', get_server_timer_arg())
		clear_server_timer('devil_stone5_fail', get_server_timer_arg())
		
                d.setf("level", 6)
                d.new_jump_all(66, 2420, 6822)
				d.regen_file("data/dungeon/deviltower6_regen.txt")
		
                d.notice("Vernichte alle D�monen auf dem 6ten Ebene")
                d.notice("bevor du den K�nig t�test!")

            else
                d.notice("Du hast ein Siegel ge�ffnet! Es verbleiben "..d.getf("stone_count")..".")
            end
        end

        when kill with npc.get_race() == 1092 begin
            d.kill_all()
            d.check_eliminated()
            local reward_alchemist = {20074, 20075, 20076}
            d.spawn_mob(reward_alchemist[number(1,3)], 425, 216);
            d.setqf("can_refine", 1)
			d.spawn_mob(20378, 419, 221)
        end

   
	when 20074.chat."Obere Ebenen des D�monenturms" with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 and npc.lock() begin
          say_title(""..mob_name(20074)..":")
          say("")
          say("Du hast einen Weg zur 7ten Ebene gefunden.")
          say("Es braucht spezielle F�higkeiten um hier hochzukommen.")
          say("Hmmmm...")
          say("Du siehst stark genug aus um hier zu �berleben.....")
          wait()
          if pc.level >=75 then
          say_title(""..mob_name(20074)..":")
          say("")
              say("Du bist in Ordnung.")
              say("Ich werde dir den Weg zeigen..")
              timer("devil_jump_7", 6)
              npc.unlock()
              d.purge()
              return
          end
          say_title(""..mob_name(20074)..":")
          say("")
          say("Du must mehr trainieren um hier hochzukommen.")
          say("Komm wieder wenn du genug Erfahrung gesammelt hast.")

		say("")
		wait()
		pc.warp(50011800, 50009300)
	return
	    end
   when 20075.chat."Obere Ebenen des D�monenturms" with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 and npc.lock() begin
	say_title(""..mob_name(20075)..":")
        say("")
        say("Du hast einen Weg zur 7ten Ebene gefunden.")
        say("Es braucht spezielle F�higkeiten um hier hochzukommen.")
        say("Hmmmm...")
        say("Du siehst stark genug aus um hier zu �berleben.....")
        wait()
        if pc.level >=75 then
        	say_title(""..mob_name(20075)..":") 
        	say("")
        	say("Du bist in Ordnung.")
        	say("Ich werde dir den Weg zeigen..")
        	timer("devil_jump_7", 6)
        	npc.unlock()
        	d.purge()
        	return
        end
	say_title(""..mob_name(20075)..":") 
	say("")
        say("Du must mehr trainieren um hier hochzukommen.")
        say("Komm wieder wenn du genug Erfahrung gesammelt hast.")
	say("")
	wait()
	pc.warp(50011800, 50009300)
	return
    end
   when 20076.chat."Obere Ebenen des D�monenturms" with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 and npc.lock() begin
	say_title(""..mob_name(20076)..":")
          say("")
          say("Du ben�tigst spezielle F�higkeiten um hochzukommen.")
          say("Hmmmm...")
          say("Du siehst stark genug aus um hier zu �berleben.....")
          wait()
          if pc.level >=75 then
               	say_title(""..mob_name(20076)..":") 
               	say("")
               	say("Du bist in Ordnung.")
              	say("Ich werde dir den Weg zeigen..")
              	timer("devil_jump_7", 6)
              	npc.unlock()
              	d.purge()
             	 return
          end
		   say_title(""..mob_name(20076)..":") 
		   say("")
         	 say("Du brauchst mehr Training um hier hochzukommen.")
     		 say("Komme wieder wenn du ein h�heres Level erreicht hast.")
		say("")
		wait()
		pc.warp(50011800, 50009300)
	return
	    end

   when devil_jump_7.timer begin
		d.clear_regen()

		d.spawn_mob(8018, 639, 658)
		d.spawn_mob(8018, 611, 637)
		d.spawn_mob(8018, 596, 674)
		d.spawn_mob(8018, 629, 670)

		d.setf("level", 7)

		d.jump_all(2048+590, 6656+638)
	end
	
	when kill with npc.get_race() == 8018 and pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
		local cont = d.getf("7_stone_kill") + 1
		d.setf("7_stone_kill", cont)

		if cont >= 4 then
			d.setf("7_stone_kill", 0)
			d.set_regen_file("data/dungeon/deviltower7_regen.txt")
        end
	end

	when kill with npc.get_race() == 8031 and pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
		game.drop_item(30300, 1)
	end

	when 30300.use with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
		pc.remove_item("30300", 1)

		local pct = number(1,5)

		if pct == 1 then
			game.drop_item(30302, 1)
			d.clear_regen()
		else
			game.drop_item(30301, 1)
			
		end
	end

	when 30302.use with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
		-- 8������ ����

			if d.getf( "level" ) != 7 then
				pc.remove_item( "30302", 1)
				return
			end
			
		say("Mit dieser Karte bringe ich dich auf die n�chste Ebene!")
		pc.remove_item("30302", 1)
	    timer("devil_jump_8", 12)
	end
						
	--------------------------------------------
	-- 8�� ���Ժ��� 9�� ����
	--------------------------------------------
	when devil_jump_8.timer begin
		d.setf("level", 8)
		d.jump_all(2048+590, 6656+403)
		d.set_regen_file("data/dungeon/deviltower8_regen.txt")
		d.spawn_mob(20366, 640, 460)
		local _count = pc.count_item(30302)
		pc.remove_item(30302,_count)
	end

	when kill with npc.get_race() == 1040 and pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
		if d.getf("level") < 9 then
			local pct1 = number(1, 8)
			if pct1 == 1 then
				local pct2 = number(1, 4)
				if pct2 == 1 then
					-- ��¥ �*�� ���
					game.drop_item(30304, 1)
				else
					-- ��¥ �*�� ���
					game.drop_item(30303, 1)
				end
			else
				return
			end
		end
	end

	when 20366.take with item.vnum == 30304 begin
		-- ���� ��ü 9�� ����
		npc.purge()
		item.remove()
		d.clear_regen()
		d.kill_all()
		timer("timerhuhu", 15)
	end
	
	when timerhuhu.timer begin
		d.jump_all(2048+590, 6656+155)
		d.regen_file("data/dungeon/deviltower9_regen.txt")
	end
	
	when kill with npc.get_race() == 1093 and pc.in_dungeon() begin
		timer("devil_end_jump", 60)
	end

	when devil_end_jump.timer begin
	    d.exit_all()
	end
end
end

08/01/2015 20:07 Dharokko18#11816

Probleme mit Regenbogenstein quest

Spoiler

08/02/2015 18:00 Xernderalez#11817

Erhalte einen Fehler beim Compilieren.
Am besten w�re eigentlich eine Quest, bei der ich z.B. Ariyoung ( 20021 ) anklicke und automatisch die Frisur , f�r die Entsprechenden Klassen angezeigt bekomme, kriegt ich aber selbst noch nicht so hin.

Spoiler

Code:

quest mb begin
	state start begin

	when 20320.chat."Frisuren" begin
	     npc.open_shop(17) 
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")
	end
	when 20321.chat."Frisuren" begin
	     npc.open_shop(17)
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")
	when 20322.chat."Frisuren" begin
	     npc.open_shop(26)
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")
	when 20323.chat."Frisuren" begin
	     npc.open_shop(26)
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")
	when 20324.chat."Frisuren" begin   
	     npc.open_shop(32)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20325.chat."Frisuren" begin   
	     npc.open_shop(32)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20326.chat."Frisuren" begin   
	     npc.open_shop(20)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20327.chat."Frisuren" begin   
	     npc.open_shop(20)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	end
	
	
	when 20300.chat."Frisuren" begin   
	     npc.open_shop(17)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20301.chat."Frisuren" begin   
	     npc.open_shop(17)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	     npc.open_shop(26)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20303.chat."Frisuren" begin   
	     npc.open_shop(26)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20304.chat."Frisuren" begin   
	     npc.open_shop(32)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20305.chat."Frisuren" begin   
	     npc.open_shop(32)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20306.chat."Frisuren" begin   
	     npc.open_shop(20)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20307.chat."Frisuren" begin   
	     npc.open_shop(20)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	end
	
	
	when 20340.chat."Frisuren" begin   
	     npc.open_shop(17)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20341.chat."Frisuren" begin   
	     npc.open_shop(17)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20342.chat."Frisuren" begin   
	     npc.open_shop(26)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20343.chat."Frisuren" begin   
	     npc.open_shop(26)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20344.chat."Frisuren" begin   
	     npc.open_shop(32)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20345.chat."Frisuren" begin   
	     npc.open_shop(32)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20346.chat."Frisuren" begin   
	     npc.open_shop(20)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	when 20347.chat."Frisuren" begin   
	     npc.open_shop(20)    
		    say("Hier findest du die passenden Frisuren")
			say("Viel Spa� .")			 
	end
	
	end
end

08/02/2015 19:22 Wizard#11818

PHP Code:


			
quest Weg des Kriegers begin

        state start begin

                when 20300.chat."Ausbildung zum Kriegers" with pc.get_level() >= 10 begin

                        say_title("Ausbildung zum Kriegers")

                        say("")

                        say(""..pc.get_name().." sei gegr��t Fremdling!")

                        say("Wie ich sehe bist hier um den weg")

                        say("des Krieges zu beschreiten.")

                        say("Es ist kein einfacher Weg, aber wen du")

                        say("dich beweisen kannst, dann kannst auch du ein")

                        say("m�chtiger Krieger werden!")

                        say("")

                        say("")

                        wait()

                        say_black("Weiter")

                        say("")

                        say("Wir Krieger setzen unser ganzen Potential in")

                        say("den Angriff und in die Geschwindigkeit!")

                        say("Wen du den Weg des Kriegers beschreitest werden")

                        say("folgende Status-Punkte deines Charakters erh�ht:")

                        say("")

                        say("St�rke - 20")

                        say("Angriffsgeschwindigkeit - 10%")

                        say("")

                        say("")

                        wait()

                        say_black("Zur Entscheidung")

                        say("")

                        say("Nun frage ich dich bist du bereit den Weg des")

                        say("Kriegers zu beschreiten?")

                        say("")

                        local wahl = select ("Ja", "Nein doch nicht")

                        if wahl == 2 then

                                return

                        elseif wahl == 1 then

                                say_title("Weg des Kriegers:")

                                say("")

                                say("Du hast dich also dazu entschieden, den")

                                say("Weg des Kriegers zu beschreiten", ..pc.get_name()..".")

                                say("Ich w�nche dir auf deinen Weg viel erfolg!")

                                say("")

                                say("Folgende Status-Punkte sind gestiegen:")

                                say("")

                                say("+20 St�rke")

                                say("+10% Angriffsgeschwindigkeit")

                                affect.add_collect(apply.STR, 20, 60*60*24*365*60)

                                affect.add_collect(apply.ATT_SPEED, 10, 60*60*24*365*60)

                                set_state(__COMPLETE__)

                        end

                end

        end

        state __COMPLETE__ begin

        end

end

Irgendwie wird sie nicht beim K�rper-Lehrer angezeigt :/

08/02/2015 19:31 DasSchwarzeT#11819

Quote:

Originally Posted by SwipSwaap

PHP Code:

quest Weg des Kriegers begin state start begin when 20300.chat."Ausbildung zum Kriegers" with pc.get_level() >= 10 begin say_title("Ausbildung zum Kriegers") say("") say(""..pc.get_name().." sei gegr��t Fremdling!") say("Wie ich sehe bist hier um den weg") say("des Krieges zu beschreiten.") say("Es ist kein einfacher Weg, aber wen du") say("dich beweisen kannst, dann kannst auch du ein") say("m�chtiger Krieger werden!") say("") say("") wait() say_black("Weiter") say("") say("Wir Krieger setzen unser ganzen Potential in") say("den Angriff und in die Geschwindigkeit!") say("Wen du den Weg des Kriegers beschreitest werden") say("folgende Status-Punkte deines Charakters erh�ht:") say("") say("St�rke - 20") say("Angriffsgeschwindigkeit - 10%") say("") say("") wait() say_black("Zur Entscheidung") say("") say("Nun frage ich dich bist du bereit den Weg des") say("Kriegers zu beschreiten?") say("") local wahl = select ("Ja", "Nein doch nicht") if wahl == 2 then return elseif wahl == 1 then say_title("Weg des Kriegers:") say("") say("Du hast dich also dazu entschieden, den") say("Weg des Kriegers zu beschreiten", ..pc.get_name()..".") say("Ich w�nche dir auf deinen Weg viel erfolg!") say("") say("Folgende Status-Punkte sind gestiegen:") say("") say("+20 St�rke") say("+10% Angriffsgeschwindigkeit") affect.add_collect(apply.STR, 20, 60*60*24*365*60) affect.add_collect(apply.ATT_SPEED, 10, 60*60*24*365*60) set_state(__COMPLETE__) end end end state __COMPLETE__ begin end end

Irgendwie wird sie nicht beim K�rper-Lehrer angezeigt :/

Dein Questname [Weg des Kriegers] darf keine Leerzeichen beinhalten. Au�erdem hat jedes Reich einen eigenen Lehrer.