[SERVICE] Die Questerstellung

Page 93 of 248

05/09/2014 18:12 Zaitsev000#1381

Hi epvp,

Is tehere any working purgatory quest aviable for 34083 game?
Because original GF flame_dungeon.quest only work in 40k.

I tried this: [Only registered and activated users can see links. Click Here To Register...]
But not work.

Pls give me working for 34k game, thx

05/09/2014 18:38 SkyWodka#1382

Quote:

PHP Code:

[SUCHE]Serverinformations Quest Hey Com., ich suche eine Serverinformations Quest ich Liste euch hier nun mal die Features auf die sie haben sollte. -Wenn man einen NPC anklickt, soll als Header dort stehen "Wor�ber m�chtest du etwas wissen" und darunter halt dann die einzelnen Punkte. Die einzelnen Punkte: -Allgemeine Infos �ber den Server: Forum/HP Link. -Infos �ber Maps: Ich stelle mir das so vor, das wenn man die Map ausw�hlt ein Bild der Map im oberen Teil des Questfensters erscheint, und darunter der Text. -Das Uppsystem: Zeigt wie das Uppschema ist. -News �ber den Server: Dort sollen die aktuellen Updates stehen. -Eventinformationen: Datum, Wann und Wo, Welches Event. -Welche Items/Waffen/R�ssis etc. droppe ich auf den Maps: Entweder kleine Bilder der Items/R�stungen/Waffen etc. im obere Teil der Quest oder ein Text der so aussieht... -Itemname -Itemname -Itemname -Itemname -Welche Bosse gibt es und wo finde ich sie: Ein Bild des Boses im oberen Teil der Quest darunter die Information LG Solution

Suche immer noch, w�re sch�n wenn mir jemand dabei behilflich sein kann.

05/09/2014 20:50 K.A.K.A.S.H.I#1383

Br�uchte 4 Quests...

1. Einmal eine Quest die dir P Skills macht pro ausf�hrung der Quest und die Quest sollte immer wieder erscheinen beim Login Porten etc...

2. Einmal eine Quest die dir deine Gilde auf Level 20 macht und die Quest soll nur der Gildenleader ausf�hren k�nnen nat�rlich sollen alle Gilden skills auf Max gesetzt werden...

3. Einmal eine Quest die beim anklicken eines Npcs also Like Schmied kill Quest der Npc get�tet werden soll und dann nach ca 20-30 Sekunden wieder erscheinen soll und man sollte sie jedes mal ausf�hren k�nnen.

4. Einmal eine Quest die dich von level 1 auf level 250 setzt ohne ein kick zu bekommen... und sie soll auch jedes mal wieder kommen beim porten ausloggen und einloggen...

W�re sehr nett wenn mir jemand die 4 Quests erstellen k�nnte...

05/09/2014 22:12 ExoBiTe�#1384

Hey Leutz :D
Ich suche mal wieder eine Funktion undzwar brauche ich folgendes:
Eine Funktion, die zeigt wieviele monster x ich noch von anzahl y t�ten muss. Aber halt das es unter der Quest steht wie beim DE Server, bei der Pferdequest. VIelen Dank.

@Lightbox
Nimm doch einfach die regiquest, und �nder sie ein wenig um :D
Habe das mal hier f�r dich gemacht
Habe sie aber nicht getestet^^:

PHP Code:


			
----------------------------------
--   Regenbogenstein Quest by DarkSide
--        (c) by DarkSide und FireMt2 2010
----------------------------------
quest regenbogen begin
    state start begin
        when login begin
            set_state( auftrag )
        end
    end
    state auftrag begin
        when letter begin
            send_letter("P-Skills")
        end
        
        when button or info begin
                say_title("Regenbogenstein:")
                say("Du m�chtest also deine Skills auf")
                say("Perfekter-Meister setzen?")
                
                if pc.job ==0 then
                say("W�hle deine Lehre aus")
                
                local s=select("K�rper","Mental","Abbrechen")
                
                if s==1 then
                --K�rper
                pc.set_skill_group(1)
                pc.set_skill_level(1 ,59)
                pc.set_skill_level(2 ,59)
                pc.set_skill_level(3 ,59)
                pc.set_skill_level(4 ,59)
                pc.set_skill_level(5 ,59)
                pc.set_skill_level(6 ,59)
                set_state( start )
                say("Deine Skills sind auf Perfekter Meister")
                end
                
                if s==2 then
                --Mentalo
                pc.set_skill_group(2)
                pc.set_skill_level(16 ,59)
                pc.set_skill_level(17 ,59)
                pc.set_skill_level(18 ,59)
                pc.set_skill_level(19 ,59)
                pc.set_skill_level(20 ,59)
                pc.set_skill_level(21 ,59)
                set_state( start )
                say("Deine Skills sind auf Perfekter Meister")
                end
                
                if s==3 then
                return
                end
                
                elseif pc.job ==1 then
                say("W�hle deine Lehre aus")
                
                local s=select("Nahkampf","Fernkampf","Abbrechen")
                
                if s==1 then
                --Nahkampf
                pc.set_skill_group(3)
                pc.set_skill_level(31 ,59)
                pc.set_skill_level(32 ,59)
                pc.set_skill_level(33 ,59)
                pc.set_skill_level(34 ,59)
                pc.set_skill_level(35 ,59)
                pc.set_skill_level(36 ,59)
                set_state( start )
                say("Deine Skills sind auf Perfekter Meister")
                end
                
                if s==2 then
                --Fernkampf
                pc.set_skill_group(4)
                pc.set_skill_level(46 ,59)
                pc.set_skill_level(47 ,59)
                pc.set_skill_level(48 ,59)
                pc.set_skill_level(49 ,59)
                pc.set_skill_level(50 ,59)
                pc.set_skill_level(51 ,59)
                set_state( start )
                say("Deine Skills sind auf Perfekter Meister")
                end
                
                if s==3 then
                return
                end
                
                elseif pc.job ==2 then
                say("W�hle deine Lehre aus")
                local s=select("Magie","Waffe","Abbrechen")
                
                if s==1 then
                --Magie
                pc.set_skill_group(5)
                pc.set_skill_level(76 ,59)
                pc.set_skill_level(77 ,59)
                pc.set_skill_level(78 ,59)
                pc.set_skill_level(79 ,59)
                pc.set_skill_level(80 ,59)
                pc.set_skill_level(81, 59)
                set_state( start )
                say("Deine Skills sind auf Perfekter Meister")
                end
                
                if s==2 then
                --Waffe
                pc.set_skill_group(6)
                pc.set_skill_level(61 ,59)
                pc.set_skill_level(62 ,59)
                pc.set_skill_level(63 ,59)
                pc.set_skill_level(64 ,59)
                pc.set_skill_level(65 ,59)
                pc.set_skill_level(66 ,59)
                set_state( start )
                say("Deine Skills sind auf Perfekter Meister")
                end
                
                if s==3 then
                return
                end
                
                elseif pc.job ==3 then
                say("W�hle deine Lehre aus")
                local s=select("Heil","Drachen","Abbrechen")
                
                if s==1 then
                --Heil
                pc.set_skill_group(7)
                pc.set_skill_level(106 ,59)
                pc.set_skill_level(107 ,59)
                pc.set_skill_level(108 ,59)
                pc.set_skill_level(109 ,59)
                pc.set_skill_level(110 ,59)
                pc.set_skill_level(111 ,59)
                set_state( start )
                say("Deine Skills sind auf Perfekter Meister")
                end
                
                if s==2 then
                --Drachen
                pc.set_skill_group(8)
                pc.set_skill_level(91 ,59)
                pc.set_skill_level(92 ,59)
                pc.set_skill_level(93 ,59)
                pc.set_skill_level(94 ,59)
                pc.set_skill_level(95 ,59)
                pc.set_skill_level(96 ,59)
                set_state( start )
                say("Deine Skills sind auf Perfekter Meister")
                end
                
                if s==3 then
                return
                end
            end
        end
    end
end

05/10/2014 00:28 ЂraiиSh�ck#1385

Moin,

Danke erst mal Kilroy. f�r die Hilfe bei der letzten Quest.
Nun habe ich leider ein weiteres Problem mit einer anderen Quest.
Die Quest macht F�hrung,Combo,Pferdrufen usw. alle auf P doch wenn ich eine Lehre (K�rper/Mento) ausw�hle ist wieder alle auf 0 gesetzt.
Nur durch ein Relog ist alles wieder P, doch dies ist keine L�sung.
Au�erdem habe ich ein 2 Problem, obwohl das Pferdelevel mit der Quest auf 30 gesetzt wird kommt immer die Fehlermeldung ''Du benutzt das falsche Pferdebild'' ich habe alle 3 Pferdebilder benutzt doch keins geht.
Danke schon mal in voraus !

Spoiler

05/10/2014 13:29 .yorliK#1386

Quote:

Originally Posted by Lightbox

Br�uchte 4 Quests...

1. Einmal eine Quest die dir P Skills macht pro ausf�hrung der Quest und die Quest sollte immer wieder erscheinen beim Login Porten etc...

2. Einmal eine Quest die dir deine Gilde auf Level 20 macht und die Quest soll nur der Gildenleader ausf�hren k�nnen nat�rlich sollen alle Gilden skills auf Max gesetzt werden...

3. Einmal eine Quest die beim anklicken eines Npcs also Like Schmied kill Quest der Npc get�tet werden soll und dann nach ca 20-30 Sekunden wieder erscheinen soll und man sollte sie jedes mal ausf�hren k�nnen.

4. Einmal eine Quest die dich von level 1 auf level 250 setzt ohne ein kick zu bekommen... und sie soll auch jedes mal wieder kommen beim porten ausloggen und einloggen...

W�re sehr nett wenn mir jemand die 4 Quests erstellen k�nnte...

1. Kann die Skills auch verdreht haben(schau am besten selber nochmal nach)

Spoiler

PHP Code:


			
quest alles_p_machen begin
    state start begin
        when letter begin
            send_letter("Mach mir alles P")
        end
        when button or info begin
            say_title("All P")
            say("")
            say("Alle Skills P machen?")
            if select("Ja","Nein")==1 then
                tables = 
                        {
                            { 
                                { 1, 2, 3 , 4 , 5 },
                                { 16, 17, 18, 19, 20 }
                            },
                            {
                                { 31, 32, 33, 34, 35 },
                                { 46, 47, 48, 49, 50 }
                            },
                            {
                                { 76, 77, 78, 79, 80, 81 },
                                { 61, 62, 63, 64, 65, 66 }
                            },
                            {
                                { 106, 107, 108, 109, 110, 110 },
                                { 91, 92, 93, 94, 95, 96 }
                            }
                        }
                job = pc.get_job()+1
                skill = pc.get_skill_group()
                for i=1, table.getn(tables[job][skill]), 1 do
                    pc.set_skill_level(tables[job][skill][i], 59)
                end
            end
            send_letter("Mach mir alles P")
        end
    end
end

2. Gibt es kein Quest-Befehl f�r, muss dir jemand ne Dif f�r schreiben.
3. I Dont Know
4.

Spoiler

________________________________________________

Quote:

Originally Posted by ExoBiTe™

Hey Leutz :D
Ich suche mal wieder eine Funktion undzwar brauche ich folgendes:
Eine Funktion, die zeigt wieviele monster x ich noch von anzahl y t�ten muss. Aber halt das es unter der Quest steht wie beim DE Server, bei der Pferdequest. VIelen Dank.

q.set_counter("Name", Count)

Beispiel sollte alles weitere erkl�ren:

Spoiler

_______________________________________

Quote:

Originally Posted by ЂraiиSh�ck

Moin,
Die Quest macht F�hrung,Combo,Pferdrufen usw. alle auf P doch wenn ich eine Lehre (K�rper/Mento) ausw�hle ist wieder alle auf 0 gesetzt.
Nur durch ein Relog ist alles wieder P, doch dies ist keine L�sung.
Au�erdem habe ich ein 2 Problem, obwohl das Pferdelevel mit der Quest auf 30 gesetzt wird kommt immer die Fehlermeldung ''Du benutzt das falsche Pferdebild'' ich habe alle 3 Pferdebilder benutzt doch keins geht.
Danke schon mal in voraus !

Schon mit einem pc.clear_skill() versucht?

Spoiler

@ Pferd, das Pferd kann nur bis Pferdelv21 gerufen werden.

05/10/2014 17:33 .J3lυє#1387

Hallo mal wieder :p

W�re nett wenn mir jemand mir paar quests erstellen k�nnte

(1) Eine Quest die sagt, Die Gruppe von Spieler XY hat den Azrael get�tet
(gut w�re wenn dort beispiele f�r 5-10Monster gemacht werden)

(2) Eine Quest f�r Premium
(Eine Quest wenn man das Premium Item anklickt/abgibt ein [P] vor dem Name bekommt und zugriff auf die [P] map & shop)

(3) Eine Warpring Quest mit Level abfrage.
(das man z.b. ab level 80 nur auf map xy kommt und wenn man �ber level 100 ist automatisch stadt geportet wird)

(4) Eine PvM Quest wo man Monster XY xxx killen muss

(5) Eine Schmiede Quest ab level XY wo man 1/2/3 waffen abgeben muss und daf�r yang bekommt

P.s. welchen Type muss das Item nochmal haben ?? das man es �ffnen kann ?!?

P.p.s Danke schonmal f�r jede erstellte Quest (Y) :handsdown:

05/10/2014 18:40 ЂraiиSh�ck#1388

EDIT: Hat sich erledigt

05/10/2014 19:12 мя.�єαяℓєѕѕ-✔#1389

Kann mir wer sagen wie ich im Ruf chat hinbekomme das nach dem namen in den eckigen klammern reichsfarbe oder name von reich in der jeweiligen Farbe steht ?

05/10/2014 20:36 ExTassy <#1390

Heyho, k�nnte mir jemand eine quest erstellen :> Die Quest sollte als rufrolle angezeigt werden, aber nur f�r die neuen Teamler d.h man loggt sich das erste mal in seinen teamler acc ein & bekommt diese quest rolle die sagt dies das hier erh�lst du ein item.
Die questrolle sollte nur einmalig sein, danke

05/10/2014 21:01 .yorliK#1391

Quote:

Originally Posted by Ailos

Heyho, k�nnte mir jemand eine quest erstellen :> Die Quest sollte als rufrolle angezeigt werden, aber nur f�r die neuen Teamler d.h man loggt sich das erste mal in seinen teamler acc ein & bekommt diese quest rolle die sagt dies das hier erh�lst du ein item.
Die questrolle sollte nur einmalig sein, danke

PHP Code:


			
quest teamler_login begin
    state start begin
        when letter with pc.getqf("Teamler") == 0 and pc.is_gm() begin
            send_letter("Teamler")
        end
        when button or info with pc.getqf("Teamler")==0 and pc.is_gm() begin
            say_title("Teamler")
            say("")
            say("Hallo, ")
            say("TEXT")
            say("TEXTTEXT")
            say("TEXTTEXTTEXT")
            say("TEXTTEXTTEXTTEXT")
            say("TEXTTEXTTEXTTEXTTTEXT")
            say("Bekommst nen Item")
            pc.give_item2(ItemID, 1)
            pc.setqf("Teamler", 1)
        end
    end
end

________________________________________________

Quote:

Originally Posted by ЂraiиSh�ck

Habe es nun mit der Quest versucht , leider auch ohne Erfolg.
Wenn ich das Pferdelevel auf 21 mache, sagt er mit ''Du besitzt kein Pferd''.
Wei�t du vielleicht woran das liegen kann, das ich mein Pferd nicht rufen kann ?
Und kann man die Quest nicht so umschreiben, das die Quest alle paar Sekunden die Skills auf P macht und nicht nur beim Relog ?

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

Au�erdem habe ich aktuell auch ein Problem mit einer anderen Quest.
Es geht darum das ich per Quest die lehre ausw�hlen kann.
Ich bekomme die Quest auch mit Level 5 und ich kann auch die Lehre ausw�hlen doch leider bekomme ich meine Fertigkeitspunkte nicht.
Ein relog hilft dabei leider auch nicht.

Hab ich die nicht auch geschrieben?

Wie w�re es denn wenn die beiden Quests kombiniert werden?
Ich geb dir einfach Mal meine funktionierende Skill Group Quest.
Kombiniert mit der anderen siehts dann so aus:

Spoiler

PHP Code:


			
quest skill_group begin
    state start begin
        when login or levelup with pc.level>=5 and pc.get_skill_group() == 0 begin
            set_state(fertigkeit)
        end
    end
    state fertigkeit begin
        when letter with pc.get_skill_group()==0 begin
            send_letter("Die Ausbildung")
        end
        when button or info with pc.get_skill_group() == 0 begin
            local job = pc.get_job()+1
            local lehre= {
                [1] = { "K�rper-Kampf-Lehre", "Mental-Kampf-Lehre" },
                [2] = { "Nahkampf-Lehre", "Fernkampf-Lehre" },
                [3] = { "Magische-Waffen-Lehre", "Schwarze-Magie-Lehre" },
                [4] = { "Drachenmacht-Lehre", "Lehre der Heilung" }
                }
            table.insert(lehre[job], "Noch nicht.")
            say_title("Die Ausbildung")
            say("")
            say("W�hle deine Fertigkeitenrichtung.")
            say("")
            local s = select_table(lehre[job])
            if s == table.getn(lehre[job]) then send_letter("Die Ausbildung") return end
            pc.set_skill_group(s)
            pc.clear_skill()
            pc.set_skill_level(121, 59)
            pc.set_skill_level(122, 2)
            pc.set_skill_level(124, 59)
            pc.set_skill_level(131, 59)
            pc.set_skill_level(129, 59)
            pc.set_skill_level(126, 59)
            pc.set_skill_level(127, 59)
            pc.set_skill_level(128, 59)
            pc.set_skill_level(130, 30)
            syschat(lehre[job][s].." gew�hlt. Du erhielst "..(pc.level-1).." Fertigkeitspunkte.")
        end
    end
end

05/11/2014 07:04 ЂraiиSh�ck#1392

Moin,

Ich bin zur zeit auf der Suche nach einer Quest die mit der Lehrer Quest ''verbunden'' ist.
Sprich wenn ich mit Level 5+ die Lehrer Quest bekomme und meine Klasse ausw�hle (K�rper/Mento etc )
sollte die Quest mir auch Bergbau, F�hrung etc. P machen.
Ich habe schon alles versucht, doch leider ohne Erfolg.
Danke schon mal im voraus f�r jede Hilfe !

Lehrer Quest (Nur die Lehrer Quest geht bei mir)

Spoiler

PHP Code:


			
quest skill_group begin
    state start begin
        when login or levelup with pc.get_level()>=5 and pc.get_skill_group()==0 begin
            set_state(run)
        end
    end
    state run begin
        function get_my_teacher(i)
            local teacher
            local empire = pc.get_empire()            
            if empire==1 then
                teacher=20299+i
            elseif empire==2 then
                teacher=20319+i
            elseif empire==1 then 
                teacher=20339+i
            end
            return teacher
        end
        when letter begin
            send_letter("Die Ausbildung")
            local job=pc.get_job()
            if job==0 then
                local v=find_npc_by_vnum(skill_group.get_my_teacher(1))
                if 0!=v then target.vid("teacher1", v, "Lehrer1") end
                local v=find_npc_by_vnum(skill_group.get_my_teacher(2))
                if 0!=v then target.vid("teacher2", v, "Lehrer2") end
            elseif job==1 then
                local v=find_npc_by_vnum(skill_group.get_my_teacher(3))
                if 0!=v then target.vid("teacher3", v, "Lehrer3") end
                local v=find_npc_by_vnum(skill_group.get_my_teacher(4))
                if 0!=v then target.vid("teacher4", v, "Lehrer4") end
            elseif job==2 then
                local v=find_npc_by_vnum(skill_group.get_my_teacher(5))
                if 0!=v then target.vid("teacher5", v, "Lehrer5") end
                local v=find_npc_by_vnum(skill_group.get_my_teacher(6))
                if 0!=v then target.vid("teacher6", v, "Lehrer6") end
            elseif job==3 then
                local v=find_npc_by_vnum(skill_group.get_my_teacher(7))
                if 0!=v then target.vid("teacher7", v, "Lehrer7") end
                local v=find_npc_by_vnum(skill_group.get_my_teacher(8))
                if 0!=v then target.vid("teacher8", v, "Lehrer8") end
            end
        end
        when leave begin
            target.delete("teacher1")
            target.delete("teacher2")
            target.delete("teacher3")
            target.delete("teacher4")
            target.delete("teacher5")
            target.delete("teacher6")
            target.delete("teacher7")
            target.delete("teacher8")
        end
        when button or info begin
            say_title("Die Ausbildung")
            if pc.get_job()==0 then
                say("Als Krieger hast du die Auswahl")
                say("zwischen K�rper- und Mentallehre.")
                say("Als K�rperkrieger wirst du schneller")
                say("Monster t�ten k�nnen w�hrend Mental-")
                say("krieger mehr aushalten.")
                say_reward("Sprich mit den Lehrern")
            elseif pc.get_job()==1 then
                say("Als Ninja hast du die Auswahl")
                say("zwischen Nah- und Fernlehre.")
                say("Als Nahninja wirst du deine Gegner")
                say("im Nahkampf t�ten, w�hrend Fern-")
                say("ninjas aus der Ferne angreifen.")
                say_reward("Sprich mit den Lehrern")
            elseif pc.get_job()==2 then
                say("Als Sura hast du die Auswahl")
                say("zwischen Waffen- und Magielehre.")
                say("Als Waffensura wirst du schneller")
                say("Monster t�ten k�nnen w�hrend Magie-")
                say("suras besser Spieler ausschalten.")
                say_reward("Sprich mit den Lehrern")
            elseif pc.get_job()==3 then
                say("Als Schamane hast du die Auswahl")
                say("zwischen Drachen- und Heillehre.")
                say("Als Drachenschamane wirst du mehr")
                say("offensiv spielen, w�hrend Heil-")
                say("schamanen mehr defensiv stehen.")
                say_reward("Sprich mit den Lehrern")
            end
        end
        function join(job, group, title, text)
            local pc_job=pc.get_job()
            if pc_job!=job then                
                if pc_job==0 then                    
                    say("Es tut mir Leid aber")
                    say("ich unterrichte nur Krieger.")
                    say("Gehe bitte zum K�rper- oder")
                    say("Mentalkampf Lehrer.")
                elseif pc_job==1 then
                    say("Es tut mir Leid aber")
                    say("ich unterrichte nur Ninjas.")
                    say("Gehe bitte zum Lehrer des Fern-")
                    say("oder Nahkampfes.")
                elseif pc_job==2 then
                    say("Es tut mir Leid aber")
                    say("ich unterrichte nur Suras.")
                    say("Gehe bitte zum Lehrer der Waffen-")
                    say("oder Schwarzen Magie.")
                elseif pc_job==3 then
                    say("Es tut mir Leid aber")
                    say("ich unterrichte nur Schamanen.")
                    say("Gehe bitte zum Lehrer der Drachen-")
                    say("oder Heillehre.")
                end
            else
                say_title(title)
                say(text)
                say_reward("Willst du die Lehre annehmen?")
                local s=select("Ja", "Nein, danke")
                if 1==s then
                    if pc.get_job()==job and pc.get_skill_group()==0 then
                        set_state("start")
                        clear_letter()
                        pc.set_skill_group(group)
                        pc.clear_skill()                        
                    end
                end
            end
            return false
        end
        when teacher1.target.click or 
            skill_group1_1.chat."Trainieren" or
            skill_group2_1.chat."Trainieren" or
            skill_group3_1.chat."Trainieren" 
            begin 
            target.delete("teacher1")
            if skill_group.join(0, 1, "Lehrer",
                "Ich bin der Lehrer des K�rper Kampfes.[ENTER]Ich kann dir beibringen wie du[ENTER]deinen K�rper trainieren muss[ENTER]damit du dein Schwert st�rker schwingst.") then
                say_title("Lehrer")
                say("Gl�ckwunsch")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des K�rperkriegers entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")    
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end                
            end
        end
        when teacher2.target.click or 
            skill_group1_2.chat."Trainieren" or
            skill_group2_2.chat."Trainieren" or
            skill_group3_2.chat."Trainieren" 
            begin 
            target.delete("teacher2")
            if skill_group.join(0, 2, "Lehrer","Ich bin der Lehrer des Mentalen Kampfes.[ENTER]Ich kann dir beibringen wie du[ENTER]deinen Geist dazu bringst weniger Schmerzen zu f�hlen.") then
                say_title("Lehrer")
                say("Gl�ckwunsch")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des Mentalkriegers entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")    
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end                
            end
        end
        when teacher3.target.click or 
            skill_group1_3.chat."Trainieren" or
            skill_group2_3.chat."Trainieren" or
            skill_group3_3.chat."Trainieren" 
            begin 
            target.delete("teacher3")
            if skill_group.join(1, 1, "Lehrer",
                "Ich bin der Lehrer des Nahkampfes.[ENTER]Ich kann dir beibringen wie du[ENTER]deinen Gegner schnell und lautlos[ENTER]besiegst.") then        
                say_title("Lehrer")
                say("Gl�ckwunsch")
                say("")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des Nahninjas entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")    
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end                
            end
        end
        when teacher4.target.click or 
            skill_group1_4.chat."Trainieren" or
            skill_group2_4.chat."Trainieren" or
            skill_group3_4.chat."Trainieren" 
            begin 
            target.delete("teacher4")
            if skill_group.join(1, 2, "Lehrer",
                "Ich bin der Lehrer des Fernkampfes.[ENTER]Ich kann dir beibringen wie du[ENTER]richtig mit dem Bogen umgehst.[ENTER]So hast du die M�glichkeit[ENTER]deine Gegner auf Entfernung zu halten.") then
                say_title("Lehrer")
                say("Gl�ckwunsch")
                say("")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des Fernninjas entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")    
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end                
            end
        end
        when teacher5.target.click or 
            skill_group1_5.chat."Trainieren" or
            skill_group2_5.chat."Trainieren" or
            skill_group3_5.chat."Trainieren"
            begin 
            target.delete("teacher5")
            if skill_group.join(2, 1, "Lehrer",
                "Ich bin der Lehrer der Magischen Waffen.[ENTER]Ich kann dir beibringen deine Waffen[ENTER]und R�stungen zu Verzaubern.") then
                say_title("Lehrer")
                say("Gl�ckwunsch")
                say("")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des Waffensuras entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")    
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end                
            end
        end
        when teacher6.target.click or 
            skill_group1_6.chat."Trainieren" or
            skill_group2_6.chat."Trainieren" or
            skill_group3_6.chat."Trainieren" 
            begin 
            target.delete("teacher6")
            if skill_group.join(2, 2, "Lehrer",
                "Ich bin der Lehrer der Schwarzen Magie.[ENTER]Ich kann dir beibringen die Schwarze Magie[ENTER]f�r dich zu nutzen. Sie macht viel Schaden.") then
                say_title("Lehrer")
                say("Gl�ckwunsch")
                say("")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des Magiensuras entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end                
            end
        end
        when teacher7.target.click or 
            skill_group1_7.chat."Trainieren" or
            skill_group2_7.chat."Trainieren" or
            skill_group3_7.chat."Trainieren" 
            begin 
            target.delete("teacher7")
            if skill_group.join(3, 1, "Lehrer",
                "Ich bin der Lehrer der Drachenmacht.[ENTER]Ich kann dir beibringen wie du[ENTER]mit Hilfe des Drachens sehr viel Schaden[ENTER]anrichtest oder auch verhinderst.") then
                say_title("Lehrer")
                say("Gl�ckwunsch")
                say("")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des Drachenschamanen entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")    
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end                
            end
        end
        when teacher8.target.click or 
            skill_group1_8.chat."Trainieren" or
            skill_group2_8.chat."Trainieren" or
            skill_group3_8.chat."Trainieren" 
            begin 
            target.delete("teacher8")
            if skill_group.join(3, 2, "Lehrer",
                "Ich bin der Lehrer der Heilung.[ENTER]Ich kann dir beibringen wie du[ENTER]mit Blitzen und Heilenden Kr�ften umgehst.") then
                say_title("Lehrer")
                say("Gl�ckwunsch")
                say("")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des Heilschamanen entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")    
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end
            end
        end
    end
end

Die Codes der Skill�s

Spoiler

05/11/2014 10:06 .J3lυє#1393

Quote:

Originally Posted by .Rαρтor

Hallo mal wieder :p

W�re nett wenn mir jemand mir paar quests erstellen k�nnte

(1) Eine Quest die sagt, Die Gruppe von Spieler XY hat den Azrael get�tet
(gut w�re wenn dort beispiele f�r 5-10Monster gemacht werden)

(2) Eine Quest f�r Premium
(Eine Quest wenn man das Premium Item anklickt/abgibt ein [P] vor dem Name bekommt und zugriff auf die [P] map & shop)

(3) Eine Warpring Quest mit Level abfrage.
(das man z.b. ab level 80 nur auf map xy kommt und wenn man �ber level 100 ist automatisch stadt geportet wird)

(4) Eine PvM Quest wo man Monster XY xxx killen muss

(5) Eine Schmiede Quest ab level XY wo man 1/2/3 waffen abgeben muss und daf�r yang bekommt

P.s. welchen Type muss das Item nochmal haben ?? das man es �ffnen kann ?!?

P.p.s Danke schonmal f�r jede erstellte Quest (Y) :handsdown:

^
l

05/11/2014 10:10 .Delta#1394

@ ЂraiиSh�ck
try

Spoiler

PHP Code:


			
quest skill_group begin
    state start begin
        when login or levelup with pc.get_level()>=5 and pc.get_skill_group()==0 begin
            set_state(run)
        end
    end
    state run begin
        function get_my_teacher(i)
            local teacher
            local empire = pc.get_empire()            
            if empire==1 then
                teacher=20299+i
            elseif empire==2 then
                teacher=20319+i
            elseif empire==1 then 
                teacher=20339+i
            end
            return teacher
        end
        when letter begin
            send_letter("Die Ausbildung")
            local job=pc.get_job()
            if job==0 then
                local v=find_npc_by_vnum(skill_group.get_my_teacher(1))
                if 0!=v then target.vid("teacher1", v, "Lehrer1") end
                local v=find_npc_by_vnum(skill_group.get_my_teacher(2))
                if 0!=v then target.vid("teacher2", v, "Lehrer2") end
            elseif job==1 then
                local v=find_npc_by_vnum(skill_group.get_my_teacher(3))
                if 0!=v then target.vid("teacher3", v, "Lehrer3") end
                local v=find_npc_by_vnum(skill_group.get_my_teacher(4))
                if 0!=v then target.vid("teacher4", v, "Lehrer4") end
            elseif job==2 then
                local v=find_npc_by_vnum(skill_group.get_my_teacher(5))
                if 0!=v then target.vid("teacher5", v, "Lehrer5") end
                local v=find_npc_by_vnum(skill_group.get_my_teacher(6))
                if 0!=v then target.vid("teacher6", v, "Lehrer6") end
            elseif job==3 then
                local v=find_npc_by_vnum(skill_group.get_my_teacher(7))
                if 0!=v then target.vid("teacher7", v, "Lehrer7") end
                local v=find_npc_by_vnum(skill_group.get_my_teacher(8))
                if 0!=v then target.vid("teacher8", v, "Lehrer8") end
            end
        end
        when leave begin
            target.delete("teacher1")
            target.delete("teacher2")
            target.delete("teacher3")
            target.delete("teacher4")
            target.delete("teacher5")
            target.delete("teacher6")
            target.delete("teacher7")
            target.delete("teacher8")
        end
        when button or info begin
            say_title("Die Ausbildung")
            if pc.get_job()==0 then
                say("Als Krieger hast du die Auswahl")
                say("zwischen K�rper- und Mentallehre.")
                say("Als K�rperkrieger wirst du schneller")
                say("Monster t�ten k�nnen w�hrend Mental-")
                say("krieger mehr aushalten.")
                say_reward("Sprich mit den Lehrern")
            elseif pc.get_job()==1 then
                say("Als Ninja hast du die Auswahl")
                say("zwischen Nah- und Fernlehre.")
                say("Als Nahninja wirst du deine Gegner")
                say("im Nahkampf t�ten, w�hrend Fern-")
                say("ninjas aus der Ferne angreifen.")
                say_reward("Sprich mit den Lehrern")
            elseif pc.get_job()==2 then
                say("Als Sura hast du die Auswahl")
                say("zwischen Waffen- und Magielehre.")
                say("Als Waffensura wirst du schneller")
                say("Monster t�ten k�nnen w�hrend Magie-")
                say("suras besser Spieler ausschalten.")
                say_reward("Sprich mit den Lehrern")
            elseif pc.get_job()==3 then
                say("Als Schamane hast du die Auswahl")
                say("zwischen Drachen- und Heillehre.")
                say("Als Drachenschamane wirst du mehr")
                say("offensiv spielen, w�hrend Heil-")
                say("schamanen mehr defensiv stehen.")
                say_reward("Sprich mit den Lehrern")
            end
        end
        function join(job, group, title, text)
            local pc_job=pc.get_job()
            if pc_job!=job then                
                if pc_job==0 then                    
                    say("Es tut mir Leid aber")
                    say("ich unterrichte nur Krieger.")
                    say("Gehe bitte zum K�rper- oder")
                    say("Mentalkampf Lehrer.")
                elseif pc_job==1 then
                    say("Es tut mir Leid aber")
                    say("ich unterrichte nur Ninjas.")
                    say("Gehe bitte zum Lehrer des Fern-")
                    say("oder Nahkampfes.")
                elseif pc_job==2 then
                    say("Es tut mir Leid aber")
                    say("ich unterrichte nur Suras.")
                    say("Gehe bitte zum Lehrer der Waffen-")
                    say("oder Schwarzen Magie.")
                elseif pc_job==3 then
                    say("Es tut mir Leid aber")
                    say("ich unterrichte nur Schamanen.")
                    say("Gehe bitte zum Lehrer der Drachen-")
                    say("oder Heillehre.")
                end
            else
                say_title(title)
                say(text)
                say_reward("Willst du die Lehre annehmen?")
                local s=select("Ja", "Nein, danke")
                if 1==s then
                    if pc.get_job()==job and pc.get_skill_group()==0 then
                        set_state("start")
                        clear_letter()
                        pc.set_skill_group(group)
                        pc.clear_skill()                        
                    end
                end
            end
            return false
        end
        when teacher1.target.click or 
            skill_group1_1.chat."Trainieren" or
            skill_group2_1.chat."Trainieren" or
            skill_group3_1.chat."Trainieren" 
            begin 
            target.delete("teacher1")
            if skill_group.join(0, 1, "Lehrer",
                "Ich bin der Lehrer des K�rper Kampfes.[ENTER]Ich kann dir beibringen wie du[ENTER]deinen K�rper trainieren muss[ENTER]damit du dein Schwert st�rker schwingst.") then
                say_title("Lehrer")
                say("Gl�ckwunsch")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des K�rperkriegers entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")    
                    skill_group.skillsp() 
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end                
            end
        end
        when teacher2.target.click or 
            skill_group1_2.chat."Trainieren" or
            skill_group2_2.chat."Trainieren" or
            skill_group3_2.chat."Trainieren" 
            begin 
            target.delete("teacher2")
            if skill_group.join(0, 2, "Lehrer","Ich bin der Lehrer des Mentalen Kampfes.[ENTER]Ich kann dir beibringen wie du[ENTER]deinen Geist dazu bringst weniger Schmerzen zu f�hlen.") then
                say_title("Lehrer")
                say("Gl�ckwunsch")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des Mentalkriegers entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")    
                    skill_group.skillsp()
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end                
            end
        end
        when teacher3.target.click or 
            skill_group1_3.chat."Trainieren" or
            skill_group2_3.chat."Trainieren" or
            skill_group3_3.chat."Trainieren" 
            begin 
            target.delete("teacher3")
            if skill_group.join(1, 1, "Lehrer",
                "Ich bin der Lehrer des Nahkampfes.[ENTER]Ich kann dir beibringen wie du[ENTER]deinen Gegner schnell und lautlos[ENTER]besiegst.") then        
                say_title("Lehrer")
                say("Gl�ckwunsch")
                say("")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des Nahninjas entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")    
                    skill_group.skillsp()
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end                
            end
        end
        when teacher4.target.click or 
            skill_group1_4.chat."Trainieren" or
            skill_group2_4.chat."Trainieren" or
            skill_group3_4.chat."Trainieren" 
            begin 
            target.delete("teacher4")
            if skill_group.join(1, 2, "Lehrer",
                "Ich bin der Lehrer des Fernkampfes.[ENTER]Ich kann dir beibringen wie du[ENTER]richtig mit dem Bogen umgehst.[ENTER]So hast du die M�glichkeit[ENTER]deine Gegner auf Entfernung zu halten.") then
                say_title("Lehrer")
                say("Gl�ckwunsch")
                say("")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des Fernninjas entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")    
                    skill_group.skillsp()
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end                
            end
        end
        when teacher5.target.click or 
            skill_group1_5.chat."Trainieren" or
            skill_group2_5.chat."Trainieren" or
            skill_group3_5.chat."Trainieren"
            begin 
            target.delete("teacher5")
            if skill_group.join(2, 1, "Lehrer",
                "Ich bin der Lehrer der Magischen Waffen.[ENTER]Ich kann dir beibringen deine Waffen[ENTER]und R�stungen zu Verzaubern.") then
                say_title("Lehrer")
                say("Gl�ckwunsch")
                say("")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des Waffensuras entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")    
                    skill_group.skillsp()
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end                
            end
        end
        when teacher6.target.click or 
            skill_group1_6.chat."Trainieren" or
            skill_group2_6.chat."Trainieren" or
            skill_group3_6.chat."Trainieren" 
            begin 
            target.delete("teacher6")
            if skill_group.join(2, 2, "Lehrer",
                "Ich bin der Lehrer der Schwarzen Magie.[ENTER]Ich kann dir beibringen die Schwarze Magie[ENTER]f�r dich zu nutzen. Sie macht viel Schaden.") then
                say_title("Lehrer")
                say("Gl�ckwunsch")
                say("")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des Magiensuras entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")
                    skill_group.skillsp()
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end                
            end
        end
        when teacher7.target.click or 
            skill_group1_7.chat."Trainieren" or
            skill_group2_7.chat."Trainieren" or
            skill_group3_7.chat."Trainieren" 
            begin 
            target.delete("teacher7")
            if skill_group.join(3, 1, "Lehrer",
                "Ich bin der Lehrer der Drachenmacht.[ENTER]Ich kann dir beibringen wie du[ENTER]mit Hilfe des Drachens sehr viel Schaden[ENTER]anrichtest oder auch verhinderst.") then
                say_title("Lehrer")
                say("Gl�ckwunsch")
                say("")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des Drachenschamanen entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")    
                    skill_group.skillsp()
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end                
            end
        end
        when teacher8.target.click or 
            skill_group1_8.chat."Trainieren" or
            skill_group2_8.chat."Trainieren" or
            skill_group3_8.chat."Trainieren" 
            begin 
            target.delete("teacher8")
            if skill_group.join(3, 2, "Lehrer",
                "Ich bin der Lehrer der Heilung.[ENTER]Ich kann dir beibringen wie du[ENTER]mit Blitzen und Heilenden Kr�ften umgehst.") then
                say_title("Lehrer")
                say("Gl�ckwunsch")
                say("")
                if not pc.is_clear_skill_group() then
                    local point = pc.level -1
                    say("Du hast dich f�r die Lehre")
                    say("des Heilschamanen entschieden.")            
                    say_reward("Du erh�ltst "..point.." Fertigkeitspunkte.")
                    say("")    
                    skill_group.skillsp()
                else
                    say("Du hast bereits eine Klasse!")
                    say("")
                end
            end
        end
        function skillsp() 
            pc.set_skill_level(124, 50)
            pc.set_skill_level(131, 50)
            pc.set_skill_level(121, 50)
            pc.set_skill_level(129, 50)
            pc.set_skill_level(126, 50)
            pc.set_skill_level(127, 50)
            pc.set_skill_level(128, 50)
            pc.set_skill_level(137, 59)
            pc.set_skill_level(138, 59)
            pc.set_skill_level(139, 59)
            pc.set_skill_level(140, 59)
            pc.set_skill_level(130, 21)
        end
    end
end

05/11/2014 13:17 .yorliK#1395

Quote:

Originally Posted by .Rαρтor

Hallo mal wieder :p

W�re nett wenn mir jemand mir paar quests erstellen k�nnte

(1) Eine Quest die sagt, Die Gruppe von Spieler XY hat den Azrael get�tet
(gut w�re wenn dort beispiele f�r 5-10Monster gemacht werden)

(2) Eine Quest f�r Premium
(Eine Quest wenn man das Premium Item anklickt/abgibt ein [P] vor dem Name bekommt und zugriff auf die [P] map & shop)

(3) Eine Warpring Quest mit Level abfrage.
(das man z.b. ab level 80 nur auf map xy kommt und wenn man �ber level 100 ist automatisch stadt geportet wird)

(4) Eine PvM Quest wo man Monster XY xxx killen muss

(5) Eine Schmiede Quest ab level XY wo man 1/2/3 waffen abgeben muss und daf�r yang bekommt

P.s. welchen Type muss das Item nochmal haben ?? das man es �ffnen kann ?!?

P.p.s Danke schonmal f�r jede erstellte Quest (Y) :handsdown:

Gleich zu Anfang: Der Type des Items muss auf 18 sein.

1.

Spoiler

2. [Only registered and activated users can see links. Click Here To Register...]

Beispiel:
3.

Spoiler

und zu dem �ber level 100 backteleport schau mal hier:
[Only registered and activated users can see links. Click Here To Register...]

4. Gibs auch gen�gen auf Epvp
[Only registered and activated users can see links. Click Here To Register...]

5. Das letzte:

Spoiler

PHP Code:


			
quest give_weapons_three begin
    state start begin 
        when login or levelup with pc.level>=50 begin
            set_state(info)
        end
    end
    state info begin
        when letter begin 
            local v = find_npc_by_vnum(20016)
            if v != 0 then
            target.vid("Target1", v, "Schmied")
            end
            send_letter("Der Schmied braucht dich!")
        end
        when button or info begin
            say_title("Der Schmied!")
            say("")
            say("Begib dich schnellstm�glich zum")
            say("Schmied und sprich mit ihm.")
            say("")
            say_reward("Sprich mit dem Schmied")
            say("")
        end
        when Target1.target.click or 20016.chat."Die Waffe!" begin
            target.delete("Target1")
            say_title("Die Waffe")
            say("Hallo,")
            say("ich br�uchte kurz deine Hilfe.")
            say("")
            say("Ich m�chte das du ein Schwert f�r mich")
            say("besorgst.")
            say("")
            say_reward("Besorge das Schwert")
            set_state(sword1)
        end 
    end    
    state sword1 begin
        when letter begin 
            send_letter("Das Schwert f�r den Schmied!")
        end
        when button or info begin
            say_title("Das Schwert!")
            say("")
            say("Besorge das Schwert f�r den Schmied.")
            say("")
            say("")
        end
        when 20016.chat."Das Schwert" begin
            say_title("Das Schwert")
            say("")
            say("Ah, du hast also das Schwert")
            say("besorgt?")
            say("")
            wait()
            if pc.count_item(schwert)<1 then return end
            say_title("Schmied")
            say("")
            say("Wunderbar, als Belohnung erh�lst du")
            say("ein bisschen Yang.")
            say("")
            say_reward("1.000.000 Yang erhalten")
            pc.remove_item(schwert, 1)
            pc.change_money(1000000)
            set_state(info2)
        end
    end
    state info2 begin
        when letter begin 
            local v = find_npc_by_vnum(20016)
            if v != 0 then
            target.vid("Target1", v, "Schmied")
            end
            send_letter("Der Schmied braucht dich!")
        end
        when button or info begin
            say_title("Der Schmied!")
            say("")
            say("Begib dich schnellstm�glich zum")
            say("Schmied und sprich mit ihm.")
            say("")
            say_reward("Sprich mit dem Schmied")
            say("")
        end
        when Target1.target.click or 20016.chat."Die Waffe!" begin
            target.delete("Target1")
            say_title("Die Waffe")
            say("Hallo,")
            say("ich br�uchte kurz deine Hilfe.")
            say("")
            say("Ich m�chte das du ein Schwert f�r mich")
            say("besorgst.")
            say("")
            say_reward("Besorge das Schwert")
            set_state(sword2)
        end 
    end    
    state sword2 begin
        when letter begin 
            send_letter("Das Schwert f�r den Schmied!")
        end
        when button or info begin
            say_title("Das Schwert!")
            say("")
            say("Besorge das Schwert f�r den Schmied.")
            say("")
            say("")
        end
        when 20016.chat."Das Schwert" begin
            say_title("Das Schwert")
            say("")
            say("Ah, du hast also das Schwert")
            say("besorgt?")
            say("")
            wait()
            if pc.count_item(schwert)<1 then return end
            say_title("Schmied")
            say("")
            say("Wunderbar, als Belohnung erh�lst du")
            say("ein bisschen Yang.")
            say("")
            say_reward("1.000.000 Yang erhalten")
            pc.remove_item(schwert, 1)
            pc.change_money(1000000)
            set_state(info3)
        end
    end
    state info3 begin
        when letter begin 
            local v = find_npc_by_vnum(20016)
            if v != 0 then
            target.vid("Target1", v, "Schmied")
            end
            send_letter("Der Schmied braucht dich!")
        end
        when button or info begin
            say_title("Der Schmied!")
            say("")
            say("Begib dich schnellstm�glich zum")
            say("Schmied und sprich mit ihm.")
            say("")
            say_reward("Sprich mit dem Schmied")
            say("")
        end
        when Target1.target.click or 20016.chat."Die Waffe!" begin
            target.delete("Target1")
            say_title("Die Waffe")
            say("Hallo,")
            say("ich br�uchte kurz deine Hilfe.")
            say("")
            say("Ich m�chte das du ein Schwert f�r mich")
            say("besorgst.")
            say("")
            say_reward("Besorge das Schwert")
            set_state(sword3)
        end 
    end    
    state sword3 begin
        when letter begin 
            send_letter("Das Schwert f�r den Schmied!")
        end
        when button or info begin
            say_title("Das Schwert!")
            say("")
            say("Besorge das Schwert f�r den Schmied.")
            say("")
            say("")
        end
        when 20016.chat."Das Schwert" begin
            say_title("Das Schwert")
            say("")
            say("Ah, du hast also das Schwert")
            say("besorgt?")
            say("")
            wait()
            if pc.count_item(schwert)<1 then return end
            say_title("Schmied")
            say("")
            say("Wunderbar, als Belohnung erh�lst du")
            say("ein bisschen Yang.")
            say("")
            say_reward("1.000.000 Yang erhalten")
            pc.remove_item(schwert, 1)
            pc.change_money(1000000)
            set_state(__COMPLETE__)
        end
    end
    state __COMPLETE__ begin
    end
end

Page 93 of 248