[SERVICE] Die Questkontrolle

Page 511 of 845 « First 11411461501509510 511 512513521561611 Last »
02/23/2013 13:02 TommyH99#7651
hi

hab ein problem
hab die quest jetzt geschrieben dass der betrunkene mehrere läden hat also meine quest:


Code:
quest shops begin 
    state start begin 
        when 20041.chat begin
            say_title("Herzlich Willkommen!") 
            say("")
			say("Hier bekommst du alles zum Uppen!")
			say("")
            say("Bitte wähle eine Kategorie:") 
            say("") 
            local kategorie = select("Map1 Upzeug", "Map2 Upzeug", "Orktal Upzeug", "Wüste Upzeug", "Turm Upzeug", "Sonstiges", "Abbrechen") 
            if kategorie == 7 then 
                return 
            elseif kategorie == 1 then 
                say_title("Viel Spaß") 
                say("") 
                say("Viel Spaß beim einkaufen!") 
                say("") 
                npc.open_shop(200411) 
            elseif kategorie == 2 then 
                say_title("Viel Spaß") 
                say("") 
                say("Viel Spaß beim einkaufen!") 
                say("") 
                npc.open_shop(200412) 
            elseif kategorie == 3 then 
                say_title("Viel Spaß") 
                say("") 
                say("Viel Spaß beim einkaufen!") 
                say("") 
                npc.open_shop(200413) 
            elseif kategorie == 4 then 
                say_title("Viel Spaß") 
                say("") 
                say("Viel Spaß beim einkaufen!") 
                say("") 
                npc.open_shop(200414) 
            elseif kategorie == 5 then 
                say_title("Viel Spaß") 
                say("") 
                say("Viel Spaß beim einkaufen!") 
                say("") 
                npc.open_shop(200415) 
            elseif kategorie == 6 then 
                say_title("Viel Spaß") 
                say("") 
                say("Viel Spaß beim einkaufen!") 
                say("") 
                npc.open_shop(200416) 
            end 
        end 
    end 
end
hab alles in filezilla rein in die liste eingetragen beim make.sh kam kein fehler oder so server rebootet und die ganzen läden 200411 200412 usw in navicat rein
aber wenn ich ingame den anklick startet die quest garnicht erst er öffnet nur den ersten shop warum?
02/23/2013 13:50 HenK™#7652
Was ist hier falsch wenn ich Ingame das Item anklicke wird mir der Status gutgeschrieben.
Aber ich kann darauf hin den NPC nicht anklicken.

PHP Code:
quest premium_user begin
    state start begin
        when login with pc.getqf("premium_user")==1 and not npc.is_pc() begin
        end
        when 70010.use with pc.getqf("premium_user")==0 begin
            say_title("Prometheus2-Team")
            say("")
            say("Mit diesem Item kannst du den Premium Status")
            say("aktivieren. Der Premium Status bleibt")
            say("Permanent! Du Kannst dieses Item nur einmal")
            say("benutzen. Also entscheide Weise")
            say("")
            say_title("Willst du den Premium Status Aktivieren?")
            
            local s = select("Ja", "Nein")
                
            if s == 1 then
                pc.remove_item(70010, 1)
                pc.setqf("premium_user", 1)
                
            else
                return
            end
        end
    end
end 
PHP Code:
quest premium_shop begin
    state start begin
        when login with pc.getqf("premium_user")==1 begin
        end
        when 20364.chat."Wer bist du?" with pc.getqf("premium_user")==0 begin
            say_title("Mrs.Since")
            say("")
            say("Hallo, fremder ich bin Mrs.Since")
            say("Ich habe vom Prometheus2 Team den Auftrag bekommen")
            say("die Auserwählten Spieler zu unterstützen.")
            say("Zur zeit bist du leider keiner der Auserwählten")
            say("dies kannst du jedoch ändern, in dem du dir einen")
            say("Premium Schein besorgst. Diesen bekommst du")
            say("unter anderem im Itemshop")
        end
        when 20364.chat."Premium Shop" with pc.getqf("premium_user")==1 begin
            say_title("Mrs.Since")
            say("")
            say("Hallo, Auserwählter ich bin Mrs.Since")
            say("Ich habe bereits auf dich gewartet!")
            say("Das Prometheus2 Team hat mir gesagt das du kommst")
            say("Ich habe die Aufgabe bekommen, dich zu unterstützen.")
            say("Bedien dich in meinem Shop. Hier findest du dinge,")
            say("für die du sonst hart arbeiten musst")
            say("")
            say_title("Willst du etwas kaufen?")
            
            local s = select("Ja", "Nein")
                
            if s == 1 then
                npc.open_shop(15)
            else
                return
            end
        end
    end
end 
02/23/2013 21:19 xXInYourHeadXx#7653
Die Anti-Yangbug quest funktioniert nicht.
In der console kommt immer ein fail beim laden:

PHP Code:
quest anti_yangbug begin
    state start begin
        when pc.get_gold() >= 1750000000 begin
            chat("Um einen Yangbug zu vermeiden, werden dir 1 Mrd. Yang abgezogen.")
            chat("Du erhälst dein Yang wieder, indem du auf das Item Horn des dunklen Fürsten drückst.")
            chat("----------")
            chat("Du hast ein Horn des dunklen Fürsten erhalten.")
            pc.give_gold(-1000000000)
            pc.give_item2(70044, 1)
        end
        when 70044.use with pc.get_gold <= 750000000 begin
            pc.give_gold(1000000000)
            pc.remove_item(70044, 1)
        end
    end
end 
02/24/2013 13:26 iSouli~#7654
Quote:
Originally Posted by TommyH99 View Post
hi

hab ein problem
hab die quest jetzt geschrieben dass der betrunkene mehrere läden hat also meine quest:


Code:
quest shops begin 
    state start begin 
        when 20041.chat begin
            say_title("Herzlich Willkommen!") 
            say("")
			say("Hier bekommst du alles zum Uppen!")
			say("")
            say("Bitte wähle eine Kategorie:") 
            say("") 
            local kategorie = select("Map1 Upzeug", "Map2 Upzeug", "Orktal Upzeug", "Wüste Upzeug", "Turm Upzeug", "Sonstiges", "Abbrechen") 
            if kategorie == 7 then 
                return 
            elseif kategorie == 1 then 
                say_title("Viel Spaß") 
                say("") 
                say("Viel Spaß beim einkaufen!") 
                say("") 
                npc.open_shop(200411) 
            elseif kategorie == 2 then 
                say_title("Viel Spaß") 
                say("") 
                say("Viel Spaß beim einkaufen!") 
                say("") 
                npc.open_shop(200412) 
            elseif kategorie == 3 then 
                say_title("Viel Spaß") 
                say("") 
                say("Viel Spaß beim einkaufen!") 
                say("") 
                npc.open_shop(200413) 
            elseif kategorie == 4 then 
                say_title("Viel Spaß") 
                say("") 
                say("Viel Spaß beim einkaufen!") 
                say("") 
                npc.open_shop(200414) 
            elseif kategorie == 5 then 
                say_title("Viel Spaß") 
                say("") 
                say("Viel Spaß beim einkaufen!") 
                say("") 
                npc.open_shop(200415) 
            elseif kategorie == 6 then 
                say_title("Viel Spaß") 
                say("") 
                say("Viel Spaß beim einkaufen!") 
                say("") 
                npc.open_shop(200416) 
            end 
        end 
    end 
end
hab alles in filezilla rein in die liste eingetragen beim make.sh kam kein fehler oder so server rebootet und die ganzen läden 200411 200412 usw in navicat rein
aber wenn ich ingame den anklick startet die quest garnicht erst er öffnet nur den ersten shop warum?
PHP Code:
quest shops begin 
    state start begin 
        when 20041.chat begin
            say_title("Herzlich Willkommen!") 
            say()
            say("Hier bekommst du alles zum Uppen!")
            say()
            say("Bitte wähle eine Kategorie:") 
            say()
            local kategorie = select("Map1 Upzeug", "Map2 Upzeug", "Orktal Upzeug", "Wüste Upzeug", "Turm Upzeug", "Sonstiges", "Abbrechen") 
            if kategorie == 7 then return end
            say_title("Viel spaß")
            say()
            say("Viel spaß beim einkaufen!")
            say()
            npc.open_shop(200410+kategorie)
            setskin(NOWINDOW)
        end
    end
end 
Quote:
Originally Posted by xXInYourHeadXx View Post
Die Anti-Yangbug quest funktioniert nicht.
In der console kommt immer ein fail beim laden:

PHP Code:
quest anti_yangbug begin
    state start begin
        when pc.get_gold() >= 1750000000 begin
            chat("Um einen Yangbug zu vermeiden, werden dir 1 Mrd. Yang abgezogen.")
            chat("Du erhälst dein Yang wieder, indem du auf das Item Horn des dunklen Fürsten drückst.")
            chat("----------")
            chat("Du hast ein Horn des dunklen Fürsten erhalten.")
            pc.give_gold(-1000000000)
            pc.give_item2(70044, 1)
        end
        when 70044.use with pc.get_gold <= 750000000 begin
            pc.give_gold(1000000000)
            pc.remove_item(70044, 1)
        end
    end
end 
PHP Code:
uest anti_yangbug begin 
    state start begin 
        when login with pc.get_gold() >= 1750000000 begin 
            chat("Um einen Yangbug zu vermeiden, werden dir 1 Mrd. Yang abgezogen.") 
            chat("Du erhälst dein Yang wieder, indem du auf das Item Horn des dunklen Fürsten drückst.") 
            chat("----------") 
            chat("Du hast ein Horn des dunklen Fürsten erhalten.") 
            pc.give_gold(-1000000000) 
            pc.give_item2(70044, 1) 
        end 
        when 70044.use with pc.get_gold <= 750000000 begin 
            pc.give_gold(1000000000) 
            pc.remove_item(70044, 1) 
        end 
    end 
end 
02/25/2013 20:02 Azemi6#7655
Hi Leute hab eine kleine Frage und zwar zu meiner Quest.
Ich habe sie fast selber geschrieben ich musste nur einige Funktionen von anderen Quest abschauen aber ansonsten ist alles self made. Also meine Frage ist ob sie so richtig geschrieben ist und ob es funktioniert?

PHP Code:
quest maxlv begin 
    state start begin 
        when login or levelup with pc.level >= 110 begin 
            set_state(maxlv) 
        end 
    end
    
    state neuepvp105 begin 
        when letter begin 
            send_letter("Herzlichen Glückwunsch") 
        end 

        when button or info begin 
                        say_title("Gratulation")
                        say("Da du das maximale Level in BloodStorm2")
                        say("erreicht hast steht dir ein wunsch zu!")
                        say("")
                        say("")
                        say("Und zwar werde ich ihn dir erfüllen")
                        say("dazu muss ich nur eines wissen")
                        say("bist du ein Mann oder eine Frau?")

                    
                    local main_set = select("Mann", "Frau") 
                    if main_set == 1 then
                        say_title("Laura") 
                        say("Ich habe etwas ganz besonderes mit dir vor.")
                        say("Hoffentlich nimmst du mein Geschenk auch an.")
                        say("Es ist etwas sehr besonderes!")
                        say("Zu erst muss ich nur noch etwas von dir wissen.")
                        say("Denn je nach Beziehungs-Status fällt die ")
                        say("Überraschung leicht verändert aus.")
                        say("")
                        say("")
                        say("")
                        say("")
                        say("Bist du noch Single oder schon Vergeben?")
                        local s = select("Single", "Vergeben")
                        
                        if s == 1 then 
                        say("Wow ich wusste es doch das du noch")
                        say("Single bist. Ich werde dir nun mein Geschenk")
                        say("präsentieren. Aber zu erst will ich mich noch")
                        say("amüsieren!")
                        say("")
                        say("")
                        say("Ahhh.... Haaaaaah.... Jaaaaa!")
                        say("..............................")
                        say("Oh Ja! Das war toll nun das war dein Geschenk.")
                        
                        
                        pc.give_item2(71144, 1) 
                        pc.give_item2(71144, 1)
                        pc.give_item2(71144, 1)
                        pc.give_item2(71144, 1)
                        pc.give_item2(71144, 1)
                        pc.give_item2(71144, 1)
                        notice_all("[Laura]:"..pc.get_name().." hat soeben das Maximale Level (110) erreicht!") 
                        notice_all("[Laura]:Ich gratuliere ihm und hoffe, dass wir weiterhin solch spannende") 
                        notice_all("[Laura]:Abenteuer erleben werden wie in Vergangenheit. Oh Ja  Grrrrr ;) ")
                        elseif s == 2 then 
                        pc.give_item2(71144, 1)
                        pc.give_item2(71144, 1)
                        pc.give_item2(71144, 1)
                        pc.give_item2(71144, 1)
                        notice_all("[MaxLv]:"..pc.get_name().." hat soeben das Maximale Level (110) erreicht!")
                        
                        if main_set == 2 then
                        say_title("John") 
                        say("Ich habe etwas ganz besonderes mit dir vor.")
                        say("Hoffentlich nimmst du mein Geschenk auch an.")
                        say("Es ist etwas sehr besonderes!")
                        say("Zu erst muss ich nur noch etwas von dir wissen.")
                        say("Denn je nach Beziehungs-Status fällt die ")
                        say("Überraschung leicht verändert aus.")
                        say("")
                        say("")
                        say("")
                        say("")
                        say("Bist du noch Single oder schon Vergeben?")
                        local s = select("Single", "Vergeben")
                        
                        if s == 1 then 
                        say("Wow ich wusste es doch das du noch")
                        say("Single bist. Ich werde dir nun mein Geschenk")
                        say("präsentieren. Aber zu erst will ich mich noch")
                        say("amüsieren!")
                        say("")
                        say("")
                        say("Ahhh.... Haaaaaah.... Jaaaaa!")
                        say("..............................")
                        say("Oh Ja! Das war toll nun das war dein Geschenk.")
                        
                        
                        pc.give_item2(71144, 1) 
                        pc.give_item2(71144, 1)
                        pc.give_item2(71144, 1)
                        pc.give_item2(71144, 1)
                        pc.give_item2(71144, 1)
                        pc.give_item2(71144, 1)
                        notice_all("[John]:"..pc.get_name().." hat soeben das Maximale Level (110) erreicht!") 
                        notice_all("[John]:Ich gratuliere ihm und hoffe, dass wir weiterhin solch spannende") 
                        notice_all("[John]:Abenteuer erleben werden wie in Vergangenheit. Oh Ja  Grrrrr ;) ")
                        elseif s == 2 then 
                        pc.give_item2(71144, 1)
                        pc.give_item2(71144, 1)
                        pc.give_item2(71144, 1)
                        pc.give_item2(71144, 1)
                        notice_all("[MaxLv]:"..pc.get_name().." hat soeben das Maximale Level (110) erreicht!")
                                                end 
                    end
                clear_letter() 
                set_state(__COMPLETE__) 
            end 
        end 
    end 
    state __COMPLETE__ begin 
    end 
end 
02/25/2013 20:26 suragott#7656
Hallo zusammen ,
ich habe ein Problem mit dieser Quest :/

Als fehler in VPC kommt :
Error occured on compile uppitemtauscher.quest


Hier ist die Quest :

PHP Code:
quest uppitemtauscher begin
state start begin
when 20041.chat."Tauschen" begin
say_title("*************** - Item tauscher")
say("Herzlich Willkommen"..pc.get_name())
say("")
say("Was möchtest du tauschen?")


local x = select("Juwelen tauschen","Upp Items tauschen","Garnichts tauschen")
if x == 1 then
say_title("*************** - Item tauscher")
say("Herzlich Wilkommen beim Item tauscher,")
say("hier kannst du alle Juwelen von Stufe 1-3")
say("gegen Juwelen einer anderen Stufe tauschen")
say("")
say_reward("Was möchtest du tauschen?")
local p = select("Stufe 1 gegen Stufe 2","Stufe 2 gegen Stufe 3","Abbrechen")
if p == 1 then
say_title("*************** - Item tauscher")
say("Du möchtest also Juwelen der Stufe 1 gegen Juwelen der Stufe 2 tauschen?")
say("")
say("Du bekommst für:")
say("20 Juwelen Stufe 1 -> 5 Juwelen Stufe 2")
say("")
say("40 Juwelen Stufe 1 -> 10 Juwelen Stufe 2")
say("")
say("100 Juwelen Stufe 1 -> 30 Juwelen Stufe 2")
say("")
say("200 Juwelen Stufe 1 -> 65 Juwelen Stufe 2")
say("")
say("")
wait()
say_reward("Wie viele möchtest du tauschen?")
local s = select("20 Juwelen der Stufe 1","40 Juwelen der Stufe 1","100 Juwelen der Stufe 1","200 Juwelen der Stufe 1","Abbrechen")
if s == 1 then
if pc.count_item(30251) >= 20 then
pc.removeitem("30251, 20")
pc.give_item2("30252, 5")
say("Tausch erfolgreich")
else
say("Du hast nicht genügend Juwelen der Stufe 1")
say("Bitte komm ein andermal wieder")
end
elseif s == 2 then
if pc.count_item(30251) >= 40 then
pc.removeitem("30251, 40")
pc.give_item2("30252, 10")
say("Tausch erfolgreich")
else
say("Du hast nicht genügend Juwelen der Stufe 1")
say("Bitte komm ein andermal wieder")
end
elseif s == 3 then
if pc.count_item(30251) >= 100 then
pc.removeitem("30251, 100")
pc.give_item2("30252, 30")
say("Tausch erfolgreich")
else
say("Du hast nicht genügend Juwelen der Stufe 1") say("Bitte komm ein andermal wieder")
elseif s == 4 then
if pc.count_item(30251) >= 200 then
pc.removeitem("30251, 200")
pc.give_item2("30252, 65")
say("Tausch erfolgreich")
else
say("Du hast nicht genügend Juwelen der Stufe 1")
say("Bitte komm ein andermal wieder")
end
elseif s == 5 then
say("Okay, bis zum nächsten mal")
end

elseif p == 2 then
say_title("************ - Item tauscher")
say("Du möchtest also Juwelen der Stufe 2 gegen Juwelen der Stufe 3 tauschen?")
say("")
say("Du bekommst für:")
say("20 Juwelen der Stufe 2 -> 5 Juwelen der Stufe 3")
say("")
say("40 Juwelen der Stufe 2 -> 10 Juwelen der Stufe 3")
say("")
say("100 Juwelen der Stufe 2 -> 30 Juwelen der Stufe 3")
say("")
say("200 Juwelen der Stufe 2 -> 65 Juwelen der Stufe 3")
say("")
say("")
wait()
say_reward("Wie viele möchtest du tauschen?")
local n = select("20 Juwelen der Stufe 2","40 Juwelen der Stufe 2","100 Juwelen der Stufe 2","200 Juwelen der Stufe 2","Abbrechen")
if n == 1 then
if pc.count_item(30252) >= 20 then
pc.removeitem("30252, 20")
pc.give_item2("30253, 5")
say("Tausch erfolgreich")
else
say("Du hast nicht genügend Juwelen der Stufe 2")
say("Bitte komm ein andermal wieder")
end
elseif n == 2 then
if pc.count_item(30252) >= 40 then
pc.removeitem("30252, 40")
pc.give_item2("30253, 10")
say("Tausch erfolgreich")
else
say("Du hast leider nicht genügend Juwelen der Stufe 2")
say("Bitte komm ein andermal wieder")
end
elseif n == 3 then
if pc.count_item(30252) >= 100 then
pc.removeitem("30252, 100")
pc.give_item2("30253, 30")
say("Tausch erfolgreich")
else
say("Du hast leider nicht genügend Juwelen der Stufe 2")
say("Bitte komm ein andermal wieder")
end
elseif n == 4 then
if pc.count_item(30252) >= 200 then
pc.removeitem("30252, 200")
pc.give_item2("30253, 65")
say("Tausch erfolgreich")
else
say("Du hast leider nicht genügend Juwelen der Stufe 2")
say("Bitte komm ein andermal wieder")
end
elseif n == 5 then
say("Okay, bis zum nächsten mal")
end

elseif x == 3 then
say("Okay, bis zum nächsten mal")
end

elseif x == 2 then
say_title("************ - Item tauscher")
say("Herzlich Wilkommen beim Item tauscher,")
say("hier kannst du alle UppItems von Stufe 1-3")
say("gegen UppItems einer anderen Stufe tauschen")
say("")
say_reward("Was möchtest du tauschen?")
local m = select("Stufe 1 gegen Stufe 2","Stufe 2 gegen Stufe 3","Abbrechen")
if m == 1 then
say_title("********* - Item tauscher")
say("Du möchtest also UppItems der Stufe 1 gegen UppItems der Stufe 2 tauschen?")
say("")
say("Du bekommst für:")
say("20 UppItems Stufe 1 -> 5 UppItems Stufe 2")
say("")
say("40 UppItems Stufe 1 -> 10 UppItems Stufe 2")
say("")
say("100 UppItems Stufe 1 -> 30 UppItems Stufe 2")
say("")
say("200 UppItems Stufe 1 -> 65 UppItems Stufe 2")
say("")
say("")
wait()
say_reward("Wie viele möchtest du tauschen?")
local o = select("20 UppItems der Stufe 1","40 UppItems der Stufe 1","100 UppItems der Stufe 1","200 UppItems der Stufe 1","Abbrechen")
if o == 1 then
if pc.count_item(30197) >= 20 then
pc.removeitem("30197, 20")
pc.give_item2("30196, 5")
say("Tausch erfolgreich")
else
say("Du hast leider nicht genügend UppItems der Stufe 1")
say("Bitte komm ein andermal wieder")
end
elseif o == 2 then
if pc.count_item(30197) >= 40 then
pc.removeitem("30197, 40")
pc.give_item2("30196, 10")
say("Tausch erfolgreich")
else
say("Du hast leider nicht genügend UppItems der Stufe 1")
say("Bitte komm ein andermal wieder")
end
elseif o == 3 then
if pc.count_item(30197) >= 100 then
pc.removeitem("30197, 100")
pc.give_item2("30196, 30")
say("Tausch erfolgreich")
else
say("Du hast leider nicht genügend UppItems der Stufe 1")
say("Bitte komm ein andermal wieder")
end
elseif o == 4 then
if pc.count_item(30197) >= 200 then
pc.removeitem("30197, 200")
pc.give_item2("30196, 65")
say("Tausch erfolgreich")
else
say("Du hast leider nicht genügend UppItems der Stufe 1")
say("Bitte komm ein andermal wieder")
end
elseif o == 5 then
say("Okay,bis zum nächsten mal")
end
elseif m == 2 then
say_title("*********** - Item tauscher")
say("Du möchtest also UppIItems der Stufe 2 gegen UppItems der Stufe 3 tauschen?")
say("")
say("Du bekommst für:")
say("20 UppItems Stufe 2 -> 5 UppItems Stufe 3")
say("")
say("40 UppItems Stufe 2 -> 10 UppItems Stufe 3")
say("")
say("100 UppItems Stufe 2 -> 30 UppItems Stufe 3")
say("")
say("200 UppItems Stufe 2 -> 65 UppItems Stufe 3")
say("")
say("")
wait()
say_reward("Wie viele möchtest du tauschen?")
local o = select("20 UppItems der Stufe 2","40 UppItems der Stufe 2","100 UppItems der Stufe 2","200 UppItems der Stufe 2","Abbrechen")
if o == 1 then
if pc.count_item(30196) >= 20 then
pc.removeitem("30196, 20")
pc.give_item2("30192, 5")
say("Tausch erfolgreich")
else
say("Du hast leider nicht genügend UppItems der Stufe 2")
say("Bitte komm ein andermal wieder")
end
elseif o == 2 then
if pc.count_item(30196) >= 40 then
pc.removeitem("30196, 40")
pc.give_item2("30192, 10")
say("Tausch erfolgreich")
else
say("Du hast leider nicht genügend UppItems der Stufe 2")
say("Bitte komm ein andermal wieder")
end
elseif o == 3 then
if pc.count_item(30196) >= 100 then
pc.removeitem("30196, 100")
pc.give_item2(30192, 30")
say("Tausch erfolgreich")
else
say("Du hast leider nicht genügend UppItems der Stufe 2")
say("Bitte komm ein andermal wieder")
end
elseif o == 4 then
if pc.count_item(30196) >= 200 then
pc.removeitem("30196, 200")
pc.give_item2("30192, 10")
say("Tausch erfolgreich")
else
say("Du hast leider nicht genügend UppItems der Stufe 2")
say("Bitte komm ein andermal wieder")
end
elseif o == 5 then
say("Okay bis zum nächsten mal")
end
elseif m == 3 then
say("Okay , bis dann")
end
elseif x == 3 then
say("Okay, bis zum nächsten mal")
end
end
end
end
end 

Help me :/
02/26/2013 06:50 Baum'#7657
Hat wer evtl. eine Quest die so aufgebaut ist :


aber man solle zb Schmuck auswählen dann kommt eine Unterkategorie wie zb :
Helme,Schuhe,Ketten,Ohrringe, etc
02/26/2013 18:23 MrPlayboy#7658
PHP Code:
quest npc_shop begin
    state start begin
        when NPCVNUM.chat."Rüstungen" begin
            local z=select("Krieger","Ninja","Sura","Schami")
            if z==1 then
                setskin(NOWINDOW)
                npc.open_shop(SHOPVNUM)
            elseif z==2 then
                setskin(NOWINDOW)
                npc.open_shop(SHOPVNUM)
            elseif z==3 then
                setskin(NOWINDOW)
                npc.open_shop(SHOPVNUM)
            elseif z==4 then
                setskin(NOWINDOW)
                npc.open_shop(SHOPVNUM)
            end
        end
        when NPCVNUM.chat."Schmuck" begin
            local a=select("Helme","Ketten","Armband","Ohrringe","Schuhe")
            if a==1 then
                setskin(NOWINDOW)
                npc.open_shop(SHOPVNUM)
            elseif a==2 then
                setskin(NOWINDOW)
                npc.open_shop(SHOPVNUM)
            elseif a==3 then
                setskin(NOWINDOW)
                npc.open_shop(SHOPVNUM)
            elseif a==4 then
                setskin(NOWINDOW)
                npc.open_shop(SHOPVNUM)            
            elseif a==5 then
                setskin(NOWINDOW)
                npc.open_shop(SHOPVNUM)
            end
        end
        when NPCVNUM.chat."Schmuck 2" begin
            local b=select("Helme","Ketten","Armband","Ohrringe","Schuhe")
            if b==1 then
                setskin(NOWINDOW)
                npc.open_shop(SHOPVNUM)
            elseif b==2 then
                setskin(NOWINDOW)
                npc.open_shop(SHOPVNUM)
            elseif b==3 then
                setskin(NOWINDOW)
                npc.open_shop(SHOPVNUM)
            elseif b==4 then
                setskin(NOWINDOW)
                npc.open_shop(SHOPVNUM)            
            elseif b==5 then
                setskin(NOWINDOW)
                npc.open_shop(SHOPVNUM)
            end
        end
    end
end 
Musst nur NPCVNUM und SHOPVNUM ändern
02/26/2013 20:22 ©by Noa#7659
welchen wert gibt pet.summon() wieder?
02/26/2013 20:29 SkyRox400#7660
Ist die Quest richtig?


PHP Code:
quest warpmap1 begin 
    state start begin  
        when 20090.chat"Kämpfen" begin 
            say_title ("warpmap")    
            say("") 
            say ("Möchtest du kämpfen?")  
            local v = ("Ja" , "Nein")  
                if v == 1 then 
                    pc.warp (911100, 911100)  
                elseif v == 2 then 
                    return  
                end 
            end 
        end   
    end 
end 
Ich habe Nämlich eine neue Map eingefügt und ich möchte die warpquest zu einem Npc hinzufügen, dass wenn ich auf den Npc klicke auf die Map teleportiert werde. Und noch eine frage^^ Muss ich bei dem NPC ,,OnClick´´ in der Mob-Proto auf 1 oder 2 Setzen.

Brauche ehrlich dringend hilfe sitze schon seit gestern abend dran aber bekomme es nicht hin, und ja die Quest habe ich auch in QuestList hinzugefügt. Ich benutze die Daroo-Files

Fettes thx wenn mir jemand helfen könnte ;D
02/26/2013 20:32 HNSYTwtyThree#7661
Hey, sobald ich in den Drachenraum Teleportiert werde erscheint kein Text Metins/Mobs einfach nichts... die Pfade zu den .txt Dateien stimmen, Querys in der mob_proto vorhanden alles in Ordnung wie es sein soll..



PHP Code:
quest Tempel_of_dragon begin 
    state start begin 
        when 30121.chat."Tempel des Drachen" with pc.get_map_index() == 73 begin 
            if get_time() > game.get_event_flag("Grotte_time") then 
                game.set_event_flag("Grotte_zugang",0) 
            end 
            if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) < 3 then 
                say_title(""..mob_name(30121).."") 
                say("") 
                say("Dir fehlen "..item_name(30179).."") 
                say_item_vnum(30179) 
                say("Komme wieder wenn du 3 besitzt.") 
                return 
            end 
            if game.get_event_flag("Grotte_zugang") == 1 then 
                say_title(""..mob_name(30121).."") 
                say("") 
                pc.setqf("grotte_passworto", 078954687921) 
                if pc.getqf("abgabe") == 1 then 
                    pc.setqf("abgabe",0) 
                    say("Du hast bereits deine 3 Schlüssel abgeben.") 
                    say("Ich lasse dich passieren.") 
                    pc.setqf("erlaubt",1) 
                    wait() 
                    pc.warp(171900, 1221300) 
                    return 
                end 
                say("Tut mir Leid, der Raum ist reseviert.") 
                say("Wenn du ein die Kennzahl hast für den Zugang,") 
                say("gebe sie jetzt bitte ein.") 
                local passwort = tonumber(input("")) 
                --pc.setqf("grotte_passworto", passwort)  
                if game.get_event_flag("Grotte_passwort") == passwort then 
                    say_title(""..mob_name(30121).."") 
                    say("") 
                    say("Die Kennzahl stimmt überein.") 
                    if pc.count_item(30179) < 3 then 
                        say("Ich kann dir den zutritt nicht gewähren") 
                        say("Dir fehlt "..item_name(30179).."") 
                        say_item_vnum(30179) 
                        say("Komme wieder wenn du 3 besitzt.") 
                        return 
                    end 
                    say("Ich gewähre dir den zutritt!") 
                    pc.setqf("erlaubt",1) 
                    wait() 
                    if pc.can_warp() then    pc.remove_item("30179",3) timer("trigger_timer", 30) pc.warp(171900, 1221300) end
                elseif passi != pc.getqf("grotte_passworto") then 
                    say_title(""..mob_name(30121).."") 
                    say("") 
                    say("Die Kennzahl ist leider falsch.") 
                    return 
                end 
            end 
            if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) >= 3 then 
                say_title(""..mob_name(30121).."") 
                say("") 
                say("Du bist der erste der den Eintritt in den Tempel") 
                say("des Drachens verlangt. Ich werde dich passieren") 
                say("lassen, sofern du einen gewunden Schlüssel") 
                say("besitzt. Bevor du den Raum betreten darfst") 
                say("musst du eine geheime Zahl eingeben.") 
                say("Diese kannst du innerhalb von 5 Minuten an") 
                say("deine Mitstreiter weitergeben, so das auch") 
                say("sie den Raum betreten können. ") 
                say("") 
                say("Bedenke auch das die Macht der Schlüssel nur") 
                say("30 Minuten lang hält. In dieser Zeit müsst") 
                say("ihr den Drachen besiegt haben.") 
                local i = select("Ich bin Bereit", "Abbrechen") 
                if 1 == i then 
                    say_title(""..mob_name(30121).."") 
                    say("Dann Lege jetzt die kennzahl fest.") 
                    local passwort = tonumber(input("")) 
                    if passwort and passwort <= 999999999 and pc.count_item(30179) >= 3 then 
                        game.set_event_flag("Grotte_zugang",1) 
                        game.set_event_flag("Grotte_passwort",passwort) 
                        local times = get_time() + 3600 --Wartezeit 
                        game.set_event_flag("Grotte_time", times) 
                        say_title(""..mob_name(30121).."") 
                        pc.setqf("abgabe",1) 
                        say("") 
                        say("Die Kennzahl lautet:") 
                        chat("Die Kennzahl lautet für den Tempel des Drachen: "..passwort.."") 
                        say_reward(""..passwort.."") 
                        say("Gib die Kennzahl deinen Mitstreitern weiter") 
                        pc.remove_item("30179",3) 
                    else  
                        say_title(""..mob_name(30121).."") 
                        say("") 
                        say("Beim Kennzahl setzen ist ein fehler aufgetreten, versuche es erneut.") 
                        say("Bitte gebe nur Ziffern ein.") 
                    end 
                end 
            end 
        end 

        when "trigger_timer".timer with pc.get_map_index() == 82 begin
            regen_in_map(82,"data/dungeon/drachenraum/skia_boss.txt") 
            notice_in_map("Willkommen im Tempel des Drachen, ihr habt maximal 1 Stunde Zeit Beran-Setaou zu besiegen, Viel Erfolg") 
            local sekunden = game.get_event_flag("Grotte_time") - get_time() 
            notice_in_map("Verbleibende Zeit bis ihr rausfliegt: "..sekunden.." Sekunden") 
            timer("skipia_boss_ende", sekunden) 
            pc.set_warp_location(73 , 1825, 12207) 
            game.set_event_flag("Grotte_zugang", 0) 
        end
     
        when 8031.kill or 8032.kill or 8033.kill or 8034.kill begin 
            local metin = number(1, 4) 
                if 1 == metin then 
                    regen_in_map(82,"data/dungeon/drachenraum/skia_boss1.txt") 
                elseif 2 == metin then 
                    regen_in_map(82,"data/dungeon/drachenraum/skia_boss2.txt") 
                elseif 3 == metin then 
                    regen_in_map(82,"data/dungeon/drachenraum/skia_boss3.txt") 
                else 
                    regen_in_map(82,"data/dungeon/drachenraum/skia_boss4.txt") 
                end 
            end 
             
        when 2493.kill with pc.get_map_index() == 82 begin 
            notice_all("Die Gruppe von "..pc.get_name().." hat Beran-Setaou getötet.") 
            notice_in_map("Beeindruckend, ihr habt ihn tatsächlich besiegt. Als Abschluss könnt ihr noch die Metins zerstören") 
            notice_in_map("ihr werdet in 60 Sekunden zurück in Grotte 2 gebracht.") 
            timer("skipia_boss_ende", 60) 
            kill_all_in_map(82) 
        end 

        when skipia_boss_ende.timer begin 
            game.set_event_flag("Grotte_zugang", 0) 
            pc.warp(182500,1220700) 
            kill_all_in_map(82) 
        end 
    end 
end 
02/26/2013 21:07 Andreasi#7662
Wenn ich die Quest in der quest_list eingetragen habe als warpring.quest, kommt nachdem ich /reload p ingame und m2 qc bei den daroo files 1678 eingegeben habe: warpring.quest:23:Error occured on compile warpring.quest
HTML Code:
quest warpring begin
    state start begin
        when 70007.use begin 
            say_title("Warpring")
            say("")
            say("In welches gebiet möchtest du?")
            local s = select("Joan","Pyungmoo","Yongan","Schließen")
                if s==1 then
                    pc.warp(55700, 157900)
                end
                if s==2 then
                    pc.warp(969600, 278400)
                end
                if s==3 then
                    pc.warp(469300, 964200)
                end
                if s==4 then
                    return
                end
            end
        end
    end
end


Kann mir jemand helfen?

LG Andreasi
02/26/2013 22:03 ©by Noa#7663
Quote:
Originally Posted by Andreasi View Post
Wenn ich die Quest in der quest_list eingetragen habe als warpring.quest, kommt nachdem ich /reload p ingame und m2 qc bei den daroo files 1678 eingegeben habe: warpring.quest:23:Error occured on compile warpring.quest
HTML Code:
quest warpring begin
    state start begin
        when 70007.use begin 
            say_title("Warpring")
            say("")
            say("In welches gebiet möchtest du?")
            local s = select("Joan","Pyungmoo","Yongan","Schließen")
                if s==1 then
                    pc.warp(55700, 157900)
                end
                if s==2 then
                    pc.warp(969600, 278400)
                end
                if s==3 then
                    pc.warp(469300, 964200)
                end
                if s==4 then
                    return
                end
            end
        end
    end
end


Kann mir jemand helfen?

LG Andreasi
PHP Code:
quest warpring begin
    state start begin
        when 70007.use begin 
            local warp={{55700, 157900},{969600, 278400},{469300, 964200},}
            say_title("Warpring")
            say("")
            say("In welches gebiet möchtest du?")
            local s = select("Joan","Pyungmoo","Yongan","Schließen")
            pc.warp(warp[s][1],warp[s][1])
        end
    end
end 
02/26/2013 22:27 Andreasi#7664
@©by Noa
Hey, jetzt steht da aber noch must start with "quest"
nachdem ich m2 qc gemacht habe
02/27/2013 11:56 LolligerBob#7665
Hallo!

Das hier ist die Warpring Quest von Sanii. Hier hätte ich gerne die "GM-Chat Funktion", die "Shopping Funktion" und die "Tastensperre" weg. Habe das selbst probiert aber nicht ganz hinbekommen. ._.

PHP Code:
quest multiring begin
    state start begin
        when 70007.use begin
            say_title("Warpring:")
            local main=select("Warpring-Funktion", "Lager-Funktion", "Shopping-Funktion", "GM.Chat-Funktion", "Tastensperre")
            if 1==main then
                say_title("Warpring-Funktion:")
                local s=select("Map1", "Map2", "Orktal (Mitte)", "Eisland (Mitte)", "Wüste (Oase)", "Weitere", "Beenden")
                if 1==s then
                    say_title("Warpring-Funktion:")
                    local a=select ("Rotes", "Gelbes", "Blaues", "Beenden")
                    if 1==a then
                        pc.warp(474086, 954540)
                    elseif 2==a then
                        pc.warp(63098, 166617)
                    elseif 3==a then
                        pc.warp(960054, 268807)
                    elseif 4==a then
                        return
                    end
                elseif 2==s then
                    say_title("Warpring-Funktion:")
                    local a=select ("Rotes", "Gelbes", "Blaues", "Beenden")
                    if 1==a then
                        pc.warp(353003, 882460)
                    elseif 2==a then
                        pc.warp(145582, 240227)
                    elseif 3==a then
                        pc.warp(863589, 246139)
                    elseif 4==a then
                        return
                    end
                elseif 3==s then
                    pc.warp(332885, 745737)
                elseif 4==s then
                    pc.warp(435705, 215084)
                elseif 5==s then
                    pc.warp(296758, 547724)
                elseif 6==s then
                    if pc.get_level() < 75 then    
                        say_title("Weitere Maps:")
                        local a=select ("Feuerland (Teleporter)", "Spinnendungeon", "Dämonenturm", "Beenden")
                        if 1==a then
                            pc.warp(600813, 687144)
                        elseif 2==a then
                            say_title("Warping-Funktion:")
                            local sd = select ("Spinnendungeon 1", "Spinnendungeon 2", "Spinnenwald", "Beenden")
                            if 1==sd then
                                pc.warp(51200, 486400)
                            elseif 2==sd then
                                pc.warp(665600, 435200)
                            elseif 3==sd then
                                pc.warp(4168320, 4173180)
                            elseif 4==sd then
                                return
                            end
                        elseif 3==a then
                            pc.warp(590516, 110606)
                        elseif 4==a then
                            return
                        end
                    elseif pc.get_level() < 90 then
                        say_title("Weitere Maps:")
                        local a=select ("Feuerland (Teleporter)", "Spinnendungeon", "Dämonenturm", "Seelengrotte", "Areal der Steine", "Königsraum", "Beenden")
                        if 1==a then
                            pc.warp(600813, 687144)
                        elseif 2==a then
                            say_title("Warping-Funktion:")
                            local sd = select ("Spinnendungeon 1", "Spinnendungeon 2", "Spinnenwald", "Beenden")
                            if 1==sd then
                                pc.warp(51200, 486400)
                            elseif 2==sd then
                                pc.warp(665600, 435200)
                            elseif 3==sd then
                                pc.warp(4168320, 4173180)
                            elseif 4==sd then
                                return
                            end
                        elseif 3==a then
                            pc.warp(590516, 110606)
                        elseif 4==a then
                            say_reward("In welche Seelengrotte möchtest du denn?")
                            local b=select ("Seelengrotte 1", "Seelengrotte 2", "Beenden")
                            if 1==b then
                                pc.warp(10086, 1213190)
                            elseif 2==b then
                                pc.warp(241682, 1275028)
                            elseif 3==b then
                                return
                            end
                        elseif 5==a then
                            pc.warp(44445978, 44445878)
                        elseif 6==a then
                            pc.warp(92110, 97047)
                        elseif 7==a then
                            return
                        end
                    elseif pc.get_level() < 110 then
                        say_title("Weitere Maps:")
                        local a=select ("Feuerland (Teleporter)", "Spinnendungeon", "Dämonenturm", "Seelengrotte", "Areal der Steine", "Königsraum", "Weitere", "Beenden")
                        if 1==a then
                            pc.warp(600813, 687144)
                        elseif 2==a then
                            say_title("Warping-Funktion:")
                            local sd = select ("Spinnendungeon 1", "Spinnendungeon 2", "Spinnenwald", "Beenden")
                            if 1==sd then
                                pc.warp(51200, 486400)
                            elseif 2==sd then
                                pc.warp(665600, 435200)
                            elseif 3==sd then
                                pc.warp(4168320, 4173180)
                            elseif 4==sd then
                                return
                            end
                        elseif 3==a then
                            pc.warp(590516, 110606)
                        elseif 4==a then
                            say_reward("In welche Seelengrotte möchtest du denn?")
                            local b=select ("Seelengrotte 1", "Seelengrotte 2", "Beenden")
                            if 1==b then
                                pc.warp(10086, 1213190)
                            elseif 2==b then
                                pc.warp(241682, 1275028)
                            elseif 3==b then
                                return
                            end
                        elseif 5==a then
                            pc.warp(44445978, 44445878)
                        elseif 6==a then
                            pc.warp(92110, 97047)
                        elseif 7==a then
                            say_title("Warpring-Funktion:")
                            local c=select ("Verkommenes Land", "Beenden")
                            if 1==c then
                                pc.warp(2206207, 2231958)
                            elseif 2==c then
                                return
                            end
                        elseif 7==a then
                            return
                        end
                    elseif pc.get_level() >= 110 then
                        say_title("Weitere Maps:")
                        local a=select ("Feuerland (Teleporter)", "Spinnenmaps", "Dämonenturm", "Seelengrotte", "Areal der Steine", "Königsraum", "Weitere", "Beenden")
                        if 1==a then
                            pc.warp(600813, 687144)
                        elseif 2==a then
                            say_title("Warping-Funktion:")
                            local sd = select ("Spinnendungeon 1", "Spinnendungeon 2", "Spinnenwald", "Beenden")
                            if 1==sd then
                                pc.warp(51200, 486400)
                            elseif 2==sd then
                                pc.warp(665600, 435200)
                            elseif 3==sd then
                                pc.warp(4168320, 4173180)
                            elseif 4==sd then
                                return
                            end
                        elseif 3==a then
                            pc.warp(590516, 110606)
                        elseif 4==a then
                            say_reward("In welche Seelengrotte möchtest du denn?")
                            local b=select ("Seelengrotte 1", "Seelengrotte 2", "Beenden")
                            if 1==b then
                                pc.warp(10086, 1213190)
                            elseif 2==b then
                                pc.warp(241682, 1275028)
                            elseif 3==b then
                                return
                            end
                        elseif 5==a then
                            pc.warp(44445978, 44445878)
                        elseif 6==a then
                            pc.warp(92110, 97047)
                        elseif 7==a then
                            say_title("Warpring-Funktion:")
                            local c=select ("Verkommenes Land", "Orkberg", "Beenden")
                            if 1==c then
                                pc.warp(2206207, 2231958)
                            elseif 2==c then
                                pc.warp(35039765, 35085766)
                            elseif 3==c then
                                return
                            end
                        elseif 8==a then
                            return
                        end
                    end
                elseif 7==s then
                    return
                end
            elseif 2==main then
                say_title("Lager-Funktion")
                say("Hallo und Herzlich Willkomen!")
                say("Ich bin deine Mobile Lager-Funktion.")
                say("Ich kann dir überall dein Lager öffnen.")
                say_reward("Möchtest du dein Lager öffnen?")
                local lager=select("Ja", "Nein")
                if 1==lager then
                    say_title("Lager-Funktion:")
                    say("Welches Lager möchtest du denn öffnen?")
                    local a=select("Normales Lager", "Itemshop Lager", "Beenden")
                    if 1==a then
                        game.open_safebox()
                    elseif 2==a then
                        game.open_mall()
                    elseif 3==a then
                        return
                    end
                elseif 2==lager then
                    return
                end
            elseif 3==main then
                say_title("Shopping-Funktion:")
                say("Mit dieser Funktion kannst einen")
                say("Multishop herbeirufen.")
                say("Dieser Shop hat das zu bieten ,was du bestellst")
                say("Also probier es einfach mal aus!")
                say()
                say("Aber denk dran:")
                say()
                say("Der Shop muss einmal geöffnet werden!")
                say_reward("Sonst funktioniert das Handy nichtmehr!")
                local s=select("Ok", "Nein")
                if 1==s then
                    say("Shopping-Funktion:")
                    say_reward("Welchen Shop möchtes du öffnen?")
                    local shop=select("Waffenhandel", "Specialshop", "Rüstungshandel", "Gemischtwarenhandel", "Schmuckhandel", "Mehr Anzeigen", "Beenden")
                    if 1==shop then
                        mob.spawn(20024, pc.get_local_x(),  pc.get_local_y(), 1, 1, 1)
                        set_state(waffen)
                    elseif 2==shop then
                        mob.spawn(20024, pc.get_local_x(),  pc.get_local_y(), 1, 1, 1)
                        set_state(special)
                    elseif 3==shop then
                        mob.spawn(20024, pc.get_local_x(),  pc.get_local_y(), 1, 1, 1)
                        set_state(rüstung)
                    elseif 4==shop then
                        mob.spawn(20024, pc.get_local_x(),  pc.get_local_y(), 1, 1, 1)
                        set_state(gemi)
                    elseif 5==shop then
                        mob.spawn(20024, pc.get_local_x(),  pc.get_local_y(), 1, 1, 1)
                        set_state(schmuck)
                    elseif 6==shop then
                        say_title("Shopping-Funktion")
                        say_reward("Welchen Shop möchtest du öffnen?")
                        local shop2=select("Pfeilhandel", "Beenden")
                        if 1==shop2 then
                            mob.spawn(20024, pc.get_local_x(),  pc.get_local_y(), 1, 1, 1)
                            set_state(pfeil)
                        elseif 2==shop2 then
                            return
                        end
                    elseif 7==shop then
                        return
                    end
                elseif 2==s then
                    return
                end
            elseif 4==main then
                if get_time() > pc.getqf("duration") then
                    say_title("GM.Chat-Funktion:")
                    say("Hallo ".. pc.get_name() .." ich bin die GM.Chat-Funktion und")
                    say("ich kann deine Nachrichten in andere Reiche")
                    say("vermitteln. Es kostet dich auch nichts.")
                    say("Das einzigste was du beachten musst, sind die")
                    say("Regeln.")
                    say("")
                    say_reward("Klicke auf Weiter um die Regeln zu lesen.")
                    wait()
                    say_title("GM.Chat-Funktion:")
                    say("Durch diese Funktion, könnt ihr in dem so-")
                    say("gennanten GM - Chat eure Nachrichten vermitteln.")
                    say("Ihr könnt damit durch alle 3. Reiche handeln")
                    say("oder Fragen rund um den Server Fragen.")
                    say("")
                    say_title("Beachte bitte diese Regeln:")
                    say_reward("- Du darfst / kannst maximal. 1 Nachricht")
                    say_reward("  innerhalb einer Minute schreiben.")
                    say_reward("- Keine Beleidigungen oder Drohungen.")
                    say_reward("- Sinnloses Spamen führt zum Account Bann.")
                    say_reward("- Keine rassistischen Wörter/Sprüche.")
                    say("")
                    wait()
                    say_title("GM.Chat-Funktion:")
                    say("Hast du die Regeln gelesen, so kannst du hier")
                    say("deine Nachricht eingeben, die der ganze Server")
                    say("lesen soll.")
                    say("")
                    say_reward("Bitte gebe deine Nachricht jetzt ein!")
                    local y = input(  )
                    say_title("GM.Chat-Funktion:")
                    say("Möchtest du deine Nachricht wirklich senden?")
                    local main_set = select("Nachricht senden.","Abbrechen.")
                    if main_set == 2 then
                        say_title("GM.Chat-Funktion:")
                        say("Deine Nachricht wurde nicht versendet.")
                    elseif main_set == 1 then
                        notice_all("".. pc.get_name() ..":".. y .."")
                        say_title("GM.Chat-Funktion:")
                        say("Deine Nachricht wurde gesendet.")
                        pc.setqf("duration",get_time()+60)
                    end
                else
                    say("Du hast in dieser Minute erst eine Nachricht geschrieben.")
                    say("Warte noch ein wenig.")
                end
            elseif 5==main then
                return
            end
        end    
    end
    state waffen begin
        when 20024.chat."Waffenhandel" begin
            npc.open_shop(1)
            setskin(NOWINDOW)
            npc.purge()
            set_state(start)
        end
    end
    state special begin
        when 20024.chat."Spezialhandel" begin
            npc.open_shop(41)
            setskin(NOWINDOW)
            npc.purge()
            set_state(start)
        end
    end
    state rüstung begin
        when 20024.chat."Rüstungshandel" begin
            npc.open_shop(16)
            setskin(NOWINDOW)
            npc.purge()
            set_state(start)
        end
    end
    state gemi begin
        when 20024.chat."Gemischtwarenhandel" begin
            npc.open_shop(3)
            setskin(NOWINDOW)
            npc.purge()
            set_state(start)
        end
    end
    state schmuck begin
        when 20024.chat."Schmuckhandel" begin
            npc.open_shop(17)
            setskin(NOWINDOW)
            npc.purge()
            set_state(start)
        end
    end
    state pfeil begin
        when 20024.chat."Pfeilhandel" begin
            npc.open_shop(15)
            setskin(NOWINDOW)
            npc.purge()
            set_state(start)
        end
    end    
end 


Wäre für Hilfe dankbar. :o
Page 511 of 845 « First 11411461501509510 511 512513521561611 Last »