[SERVICE] Die Questkontrolle

Page 271 of 845 « First 171221261269270 271 272273281321371771 Last »
11/17/2011 08:00 DavidMatth#4051
Ich wollte eine warp quest einfügen ging aber irgenwie nicht
da ist glaube ich ein fehler drin... kann sich das bitte mal jem. angucken

Fehler bei virtual ox nach make.py ausführung:

qc in malloc () error:allocatio failed
Error occured on compile warpring.quest

kann mir jemand helfen?

MFG DavidMatth
11/17/2011 09:35 .Delta#4052
Code:
quest warpring begin
	state start begin
		when 70007.use begin
			local g
			local main_set = select("Map 1", "Map 2", "Abbrechen")
			if main_set == 3 then
				return
			elseif main_set == 1 then
				g = select ("Rotes Reich" , "Gelbes Reich" , "Blaues Reich" , "Abbrechen")
				if g == 1 then
					pc.warp(474300,954800)
				elseif g == 2 then
					pc.warp(63800,166400)
				elseif g == 3 then
					pc.warp(959900,269200)
				elseif g == 4 then
					return
				end
			elseif main_set == 2 then
				g = select("Rotes Reich", "Gelbes Reich", "Blaues Reich", "Abbrechen")
				if g == 1 then
					pc.warp(353100,882900)
				elseif g == 2 then
					pc.warp(145500,240000)
				elseif g == 3 then
					pc.warp(863900,246000)
				elseif g == 4 then
					return
				end
			end
		end
	end
end
11/17/2011 13:21 xTheSoulutionxx3#4053
fehler:
PHP Code:
expecting state 

quest:
PHP Code:
quest subquest_59 begin
    state start begin
        when login or levelup with pc.level>45 begin
            set_state(go_to_lehrer_drache)
    end
end
    state go_to_lehrer_drache begin
        when letter begin
        local vnum=0
        if pc.get_empire() == 1 then
        vnum= 20307
        elseif pc.get_empire() == 2 then
        vnum= 20327
        elseif pc.get_empire() == 3 then
        vnum= 20347
        end
        end
        end
        local v=find_npc_by_vnum(vnum)
        if 0!= v then
        target.vid("__TARGET__",v,"")
    end
        send_letter("Gehe zum Lehrer der Drachenmacht!")
    end
        when button or info begin
        say_title("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say("")
        say_reward("text")
        say("")
    end
        when __TARGET__.target.click or 20327.chat."Der Rest!" or 20307.chat."Der Rest!" or 20347.chat."Der Rest!" begin
        target.delete("__TARGET__")
        say_title("Lehrer der Drachenmacht:")
        say("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say("")
        say_reward("text")
        say_reward("text")
        say("")
        set_state(go_to_kill_stolzer_dunkler)
    end
end
    state go_to_kill_stolzer_dunkler begin
        when letter begin
        send_letter("Der Rest!")
    end
        when button or info begin
        say_title("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say_reward("text")
        say("")
    end
        when 734.kill begin
        local rand = number(0,99) 
        if rand<4 then pc.give_item2(30147, 1)
        if rand 6 then pc.give_item2(30148, 1)
        if pc.count_item(30147) >= 1 with pc.count_item(30148) >= 1 then
        set_state(go_back_to_drachenmacht)
    end
end
    end
end
    state go_back_to_drachenmacht begin
        when letter begin
        send_letter("Gehe zum Lehrer der Drachenmacht!")
        end
        when button or info begin
        say_title("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say_reward("text")
        say("")
    end
        when __TARGET__.target.click or 20327.chat."Der Rest!" or 20307.chat."Der Rest!" or 20347.chat."Der Rest!" with pc.count_item(30147) >= 1 with pc.count_item(30148) >= 1 begin
        target.delete("__TARGET__")
        say_title("Lehrer der Drachenmacht:")
        say("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say_reward("text")
        say_reward("text")
        say("")
        pc.remove_item(30147, 1)
        pc.remove_item(30148, 1)
        pc.give_exp2(1700000)
        pc.give_gold(30000)
        pc.give_item2(50621, 3)
        set_state(_complete_)
    end
end
    state _complete_ begin
    end
end 
11/17/2011 13:30 .Delta#4054
PHP Code:
quest subquest_59 begin
    state start begin
        when login or levelup with pc.level>45 begin
            set_state(go_to_lehrer_drache)
        end
    end
    state go_to_lehrer_drache begin
        when letter begin
            local vnum
            if pc.get_empire() == 1 then
                vnum= 20307
            elseif pc.get_empire() == 2 then
                vnum= 20327
            elseif pc.get_empire() == 3 then
                vnum= 20347
            end
            local v=find_npc_by_vnum(vnum)
            if v != 0 then
                target.vid("__TARGET__",v,"")
            end
            send_letter("Gehe zum Lehrer der Drachenmacht!")
        end
        when button or info begin
            say_title("text")
            say("text")
            say("text")
            say("text")
            say("text")
            say("text")
            say("")
            say_reward("text")
            say("")
        end
        when __TARGET__.target.click or 20327.chat."Der Rest!" or 20307.chat."Der Rest!" or 20347.chat."Der Rest!" begin
            target.delete("__TARGET__")
            say_title("Lehrer der Drachenmacht:")
            say("text")
            say("text")
            say("text")
            say("text")
            say("text")
            say("")
            say_reward("text")
            say_reward("text")
            say("")
            set_state(go_to_kill_stolzer_dunkler)
        end
    end
    state go_to_kill_stolzer_dunkler begin
        when letter begin
            send_letter("Der Rest!")
        end
        when button or info begin
            say_title("text")
            say("text")
            say("text")
            say("text")
            say("text")
            say("text")
            say_reward("text")
            say("")
        end
        when 734.kill begin
            local rand = number(0,99) 
            if rand < 4 then 
                pc.give_item2(30147, 1)
            elseif rand >= 4 and rand < 7 then 
                pc.give_item2(30148, 1)
            end
            if pc.count_item(30147) >= 1 and pc.count_item(30148) >= 1 then
                set_state(go_back_to_drachenmacht)
            end
        end
    end
    state go_back_to_drachenmacht begin
        when letter begin
            local vnum
            if pc.get_empire() == 1 then
                vnum= 20307
            elseif pc.get_empire() == 2 then
                vnum= 20327
            elseif pc.get_empire() == 3 then
                vnum= 20347
            end
            local v=find_npc_by_vnum(vnum)
            if v != 0 then
                target.vid("__TARGET__",v,"")
            end
            send_letter("Gehe zum Lehrer der Drachenmacht!")
        end
        when button or info begin
            say_title("text")
            say("text")
            say("text")
            say("text")
            say("text")
            say("text")
            say_reward("text")
            say("")
        end
        when __TARGET__.target.click or 20327.chat."Der Rest!" or 20307.chat."Der Rest!" or 20347.chat."Der Rest!" with pc.count_item(30147) >= 1 with pc.count_item(30148) >= 1 begin
            target.delete("__TARGET__")
            say_title("Lehrer der Drachenmacht:")
            say("text")
            say("text")
            say("text")
            say("text")
            say("text")
            say_reward("text")
            say_reward("text")
            say("")
            pc.remove_item(30147, 1)
            pc.remove_item(30148, 1)
            pc.give_exp2(1700000)
            pc.change_gold(30000)
            pc.give_item2(50621, 3)
            set_state(_complete_)
        end
    end
    state _complete_ begin
    end
end 
11/17/2011 14:43 xTheSoulutionxx3#4055
PHP Code:
quest subquest_47 begin
    state start begin
        when login or levelup with pc.level>49 begin
            set_state(go_to_kp1)
        end
    end
    state go_to_kp1 begin
        when letter begin
        local v = find_npc_by_vnum(20020) 
        if v != 0 then target.vid("__TARGET__", v, "idontkonow")
    end
        send_letter("Hilf dem Hauptmann!")
    end
        when button or info begin
        say_title("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say("")
        say_reward("text")
        say("")
    end
        when __TARGET__.target.click or 20020.chat."Mein Zustand" begin
        target.delete("__TARGET__")
        say_title("Hauptmann:")
        say("text")
        say("text")
        say("text")
        say("text")
        local main_set = select("FeInDe Am Horzont GeSSichtet","feinde am horizont gesichtet","am horizont gesichtet feinde","Nochmal kucken")
        if main_set == 1 then
        say_title("text")
        say("text")
        say("text")
        say("text")
        return
    end
        if main_set == 3 then
        say_title("text")
        say("text")
        say("text")
        say("text")
        return
    end
        if main_set == 4 then
        return
    end
        if main_set == 2 then
        say_title("text")
        say("text")
        say("text")
        say("text")
        pc.give_exp2(1300000)
        pc.give_gold(20000)
        set_state(_complete_)
    end
end
    state _complete_ begin
    end
end 
11/17/2011 19:32 North#4056
PHP Code:
quest perlentausch begin
    state start begin
    
    when 20018.take with item.vnum == 27992 begin 
         say("Hey,")
         say("Bist du etwa auf der Suche nach einer anderen Perle?")
         say("Nun dann bist du hier richtig! Ich habe Perlen jeder Art.")
         say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
         say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
         say("--------------------------------------------------------------------------")
         say("Drei weiße Perlen und 33kk = eine blaue Perle")
         say("Neun weiße Perlen und 33kk = eine blutrote Perle")
         say("")
         local s = select ("Blaue Perlen", "Blutrote Perle", "Keine")

         if s == 1 then
            if pc.count_item(27992) >= 3 and pc.money>= 33000000 then
                pc.removeitem("27992")
                pc.change_gold(-33000000)        
                pc.give_item2("27993")
                say("Danke dir!")
                say("Du erhältst eine Blaue Perle")
                say("Ich hoffe sie wird dir von großem Nutzen sein")
                say("lieber Abenteurer!")
                say("")
            end
         if s == 2 then
            if pc.count_item(27992) >= 9 and pc.money>= 33000000 then
                pc.removeitem("27992")
                pc.change_gold(-33000000)
                pc.give_item2("27994")
                say("Danke dir!")
                say("Du erhältst eine Blutrote Perle")
                say("Ich hoffe sie wird dir von großem Nutzen sein")
                say("lieber Abenteurer!")
                say("")
            end   
        end
    end
    
    when 20018.take with item.vnum == 27993 begin 
         say("Hey,")
         say("Bist du etwa auf der Suche nach einer anderen Perle?")
         say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
         say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
         say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
         say("--------------------------------------------------------------------------")
         say("Eine blaue Perle und 33kk = drei weiße Perlen")
         say("Drei blaue Perlen und 33kk = eine blutrote Perle")
         say("")
         local s = select ("Weiße Perle", "Blutrote Perle", "Keine")

         if s == 1 then
            if pc.count_item(27993) >= 1 and pc.money>= 33000000 then
                pc.removeitem("27993")
                pc.change_gold(-33000000)                
                pc.give_item2("27992, 3")
                say("Danke dir!")
                say("Du erhältst drei Weiße Perlen")
                say("Ich hoffe sie wird dir von großem Nutzen sein")
                say("lieber Abenteurer!")
                say("")
            end
         if s == 2 then
            if pc.count_item(27993) >= 3 and pc.money>= 33000000 then
                pc.removeitem("27993")
                pc.change_gold(-33000000)  
                pc.give_item2("27994")
                say("Danke dir!")
                say("Du erhältst eine Blutrote Perle")
                say("Ich hoffe sie wird dir von großem Nutzen sein")
                say("lieber Abenteurer!")
                say("")
            end   
        end
    end
    
    when 20018.take with item.vnum == 27994 begin 
         say("Hey,")
         say("Bist du etwa auf der Suche nach einer anderen Perle?")
         say("Nun dann bist du hier richtig!! Ich habe Perlen jeder Art.")
         say("Allerdings bin ich nur innerhalb des Koenigreichs unterwegs, was bedeutet")
         say("Ich kann dir nur Blutrote, Blaue oder Weiße Perlen anbieten.")
         say("--------------------------------------------------------------------------")
         say("Eine blutrote Perle und 33kk = neun weiße Perlen")
         say("Eine blutrote Perle und 33kk = drei blaue Perlen")
         say("")
         local s = select ("Weiße Perle", "Blaue Perle", "Keine")

         if s == 1 then
            if pc.count_item(27994) >= 1 and pc.money>= 33000000 then
                pc.removeitem("27994")
                pc.change_gold(-33000000)                  
                pc.give_item2("27992, 9")
                say("Danke dir!")
                say("Du erhältst neun Weiße Perlen")
                say("Ich hoffe sie wird dir von großem Nutzen sein")
                say("lieber Abenteurer!")
                say("")
            end
         if s == 2 then
            if pc.count_item(27994) >= 1 and pc.money>= 33000000 then
                pc.removeitem("27994")
                pc.change_gold(-33000000)
                pc.give_item2("27993, 3")
                say("Danke dir!")
                say("Du erhältst drei Blaue Perlen")
                say("Ich hoffe sie wird dir von großem Nutzen sein")
                say("lieber Abenteurer!")
                say("")
            end   
        end
    end 
11/17/2011 20:02 killa673#4057
Tag, hab mein Problem immernoch nicht gelöst bekommen -.- , man sollte 20 oder 30 Items brauchen, aber so wie die quest jetz ist funkt sie zwar aber man braucht nur 1 item -.-

Quest:

----------------------------------------------------
--Made by SA Encore von BlackSourceMT2
----------------------------------------------------
quest Premiumitem begin
state start begin
when login or levelup with pc.get_level() >=150 begin
set_state(information)
end
end

state information begin
when letter begin
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET__", v, "Quest")
end
send_letter("Premiumitem")
end

when button or info begin
say_title("Premiumitem")
say("")
say("Hallo mutiger Krieger,")
say("Uriel hat eine Aufgabe für dich")
say("durch diese Aufgabe kannst du dir")
say("ein Mystisches Item holen")
say("durch welches du zum Premium User")
say("aufsteigen wirst.")
say_reward("GEHE ZU URIEL!")
end

when __TARGET__.target.click or
20011.chat."Premiumitem" begin
target.delete("__TARGET__")
say("Uriel:")
--- l
say("Hallo mein Freund,")
say("Du kennst doch sicherlich")
say("den Dämonengott, oder?")
say("Dieser Kreatur besitzt")
say("1 Teil einer uralten Mystischen Rolle")
say("bring mir dieses Teil der Drachengottrolle")
say("")
set_state(go_to_disciple)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end

state go_to_disciple begin
when letter begin
send_letter("Auftrag von Uriel")

end
when button or info begin
say_title("Teil der Rolle")
--- l
say("")
say("Uriel gab euch den Auftrag")
say("Das Teil der Drachengottrolle zu sammeln!")
say("Das Item bekommt ihr von Dämonengott.")
say("Viel Glueck!")
say("")
say_item_vnum(90863)
say_reward(" Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
say("")
end

when 71035.use begin --°g´bÃĤô
if pc.getqf("drink_drug")==1 then
say("")
say("Bessere Droppchance!")
say("")

end
end


when 20210.kill begin
if pc.count_item(90863)<200-pc.getqf("collect_count") then
pc.give_item2(90863, 1)
end
end

when 20011.chat."Quest" with pc.count_item(90863) >0 begin
say("Einen Moment!")
--- l
say("Ich werde das Item")
say("schnell mal ueberpruefen.")
say("Hoffentlich klappt alles!")
say("")
pc.remove_item(90863, 1)
wait()

local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=90864
else
pass_percent=90864
end

local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 199 then --5*Ó¥H¤U
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index) --¨ú±o¤@* +1
say("Uriel:")
say("Perfekt! Das Item ist in Ordnung")
say("Du hast bis jetzt ".." "..200-pc.getqf("collect_count").. " abgegeben!")
say("Bring mir die restlichen!")
say("")
pc.setqf("drink_drug",0) --ÃĤôªì©l¤Æ
end
end
say("Uriel:")
say("Yuhu! Du hast mir")
say("alles gebracht!")
say("Dafür werde ich dich wie versprochen")
say("belohnen!")
say("")
say_reward("Du bekommst ein Heilige Drachengottrolle!")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.give_item2(90864)
clear_letter()
end
end
end
11/18/2011 02:22 Synfonia#4058
subquest_59 von xTheSoulitionxx3


Premiumitemquest von killa673


Perlentauschquest von hippo


subquest 47 von TheSoulutionxx


Nehme für Fehler keine Haftung, man beachte die Uhrzeit zu der ich das hier mache.

@ .Delta kleiner nett gemeinter Vorschlag, sag bei deinen Korrekturen auch was sie falsch machen damit sie schließlich was draus lernen.
11/18/2011 08:51 .Delta#4059
Quote:
Originally Posted by Synfonia View Post

@ .Delta kleiner nett gemeinter Vorschlag, sag bei deinen Korrekturen auch was sie falsch machen damit sie schließlich was draus lernen.
Sollen sie sich halt durch die Quest arbeiten und sich die Unterschiede anschaun :P
Aber nagut, ich werde demnächst Kommentare in die Quest einbauen
11/18/2011 13:51 xTheSoulutionxx3#4060
PHP Code:
Fehler:die quest startet nicht! 
PHP Code:
quest subquest_48 begin
    state start begin
        when login or levelup with pc.level>43 begin
            set_state(go_to_soonse)
    end
end
    state go_to_soonse begin
        when letter begin
        local v = find_npc_by_vnum(20023) 
        if v != 0 then target.vid("__TARGET__", v, "sesesese")
    end
        send_letter("Begebe dich zu Soon!")
    end
        when button or info begin
        say_title("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say("")
        say_reward("text")
        say("")
    end
        when __TARGET__.target.click or 20023.chat."Mein Schatz!" begin
        target.delete("__TARGET__")
        say_title("Soon:")
        say("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say("")
        say_reward("text")
        say_reward("text")
        say("")
        set_state(go_to_kill_tier_gott)
    end
end
    state go_to_kill_tier_gott begin
            when letter begin
        send_letter("Der Schatz von Soon!")
    end
        when button or info begin
        say_title("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say_reward("text")
        say("")
    end
    when 191.kill or 192.kill or 193.kill or 194.kill begin
     local rand = number(0,99) 
        if rand<4 then pc.give_item2(27988, 1)
        if pc.count_item(27988) >= 4 then
        set_state(go_back_to_soont)
    end
end
    end
end
    state go_back_to_soont begin
        when letter begin
        send_letter("Kehre zurück zu Soon!")
        end
        when button or info begin
        say_title("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say_reward("text")
        say("")
    end
        when __TARGET__.target.click or 20023.chat."Die Schatzkarten!" with pc.count_item(27988) >= 4 begin
        target.delete("__TARGET__")
        say_title("Soon:")
        say("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say_reward("text")
        say_reward("text")
        say("")
        pc.remove_item(27988, 4)
        set_state(go_to_alter_mann)
    end
end
    state go_to_alter_mann begin
        when letter begin
        send_letter("Begebe dich nun zum Alten Mann!")
        end
        when button or info begin
        say_title("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say_reward("text")
        say("")
    end
        when __TARGET__.target.click or 20009.chat."Soon schickt mich!" begin
        target.delete("__TARGET__")
        say_title("Alter Mann:")
        say("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say("")
        say_reward("text")
        say_reward("text")
        say("")
        set_state(go_back_to_soones)
        pc.give_item2(70009, 1)
    end
end
    state go_back_to_soones begin
        when letter begin
        send_letter("Bringe Soon die Schatztruhe!")
    end
        when button or info begin
        say_title("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say_reward("text")
        say("")
    end
        when __TARGET__.target.click or 20023.chat."Ich habe die Schatztruhe!" with pc.count_item(70009) >= 1 begin
        target.delete("__TARGET__")
        say_title("Soon:")
        say("text")
        say("text")
        say("text")
        say("text")
        say("text")
        say_reward("text")
        say_reward("text")
        say("")
        pc.remove_item(70009, 1)
        pc.give_exp2(1400000)
        pc.give_gold(25000)
        local items = {12240,12380,12520,12660}
           local item = items[number( 1 ,4)];
        pc.give_item2(item)
        set_state(_complete_)
    end
end
    state _complete_ begin
    end
end 
11/18/2011 16:03 HuHu95#4061
Hier die quest:
PHP Code:
---------------------------------------------------- 
--Tempel des Drachen 
---------------------------------------------------- 
quest dragontemple begin 
state start begin
        
        when 30121.chat."Tempel des Drachen" begin
        if get_time() > game.get_event_flag("Grotte_time") then        
        game.set_event_flag("Grotte_zugang",0) 
        end        
        if pc.is_gm() or pc.count_item(80041) >= 1 then 
        say_title(""..mob_name(30121).."") 
        say("") 
        say("Hallo Gamemaster, "..pc.get_name().."") 
        say("Ich lasse dich auch ohne die Schlüssel und") 
        say("das Passwort passieren.") 
        wait() 
        pc.warp(843200, 1066900) 
        return 
        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 Gewundene Schlüssel 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 3 Schlüssel abgeben.") 
        say("Ich lasse dich passieren.") 
        pc.setqf("erlaubt",1) 
        wait() 
        pc.warp(843200, 1066900) 
        return 
        end 
        say("Tut mir Leid, der Raum ist reseviert.") 
        say("Wenn du das Kennwort hast für den Zugang,") 
        say("gebe es 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("Das Kennwort 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 Schlüssel 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) end 
        pc.warp(843200, 1066900) 
        elseif passi != pc.getqf("grotte_passworto") then 
        say_title(""..mob_name(30121).."") 
        say("") 
        say("Das Kennwort 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 drei gewundene 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("") 
        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)>=1 then 
        game.set_event_flag("Grotte_zugang",1) 
        game.set_event_flag("Grotte_passwort",passwort)  
        say_title(""..mob_name(30121).."") 
        pc.setqf("abgabe",1) 
        say("") 
        say("Das Kennwort lautet:") 
        chat("Das Kennwort für den Eintritt lautet: "..passwort.."") 
        say_reward(""..passwort.."") 
        say("Gib das Kennwort deinen Mitstreitern weiter!") 
        pc.remove_item("30179",3) 
        else  
        say_title(""..mob_name(30121).."") 
        say("") 
        say("Beim Kennwort setzen ist ein Fehler aufgetreten, versuche es erneut.") 
        say("Bitte gebe nur Zahlen ein.") 
        end
        end
        end
        end    
        
        when login with pc.get_map_index() == 408  begin 
            timer("skipia_boss_end1", 2) 
        end
        when skipia_boss_end1.timer begin
            d.notice("Willkommen im Drachenraum!") 
            d.notice("") 
            d.notice("Ihr habt nun 30 Minuten Zeit den Wasserdrachen zu besiegen!") 
            d.notice("Nur zusammen könnt ihr ihn bewältigen!") 
            d.notice("Doch bevor ihr anfangt, zerstört den Metin des Kummers!") 
            d.notice("Tötet den Drachen") 
            d.notice("Zeitlimit: 30 Minuten") 
            d.notice("Viel Erfolg!") 
            d.notice("")            
            timer(5*60) 
            d.notice("Ihr habt noch 25 Minuten Zeit.") 
            timer(5*60) 
            d.notice("Ihr habt noch 20 Minuten Zeit.") 
            timer(5*60) 
            d.notice("Ihr habt noch 15 Minuten Zeit.") 
            timer(5*60) 
            d.notice("Ihr habt noch 10 Minuten Zeit.") 
            timer(5*60)
            d.notice("Ihr habt noch 5 Minuten Zeit.")
            timer(5*60)                
            d.notice("Die Zeit ist abgelaufen, ihr werdet in wenigen Sekunden in eure Städte teleportiert!") 
            warp_all_to_village( pc.get_map_index() , 5 ) 
        end
        when 8001.kill with pc.get_map_index() == 408 begin
        notice_in_map("Der Zugang zum Drachenraum wurde soeben mit einem Passwort versehen!")
        notice_in_map("Jetzt können nur noch Spieler den Drachenraum betreten, die das Passwort kennen!")
        notice_in_map("Bitte beachtet, dass die anderen Metinsteine den Wasserdrachen verstärken!")
        notice_in_map("Je mehr Metinsteine sich im Raum befinden, desto stärker ist der Wasserdrache!")
        timer("skipia_boss_end", 2)        
        end    
        when skipia_boss_end.timer begin
        game.set_event_flag("Grotte_zugang",1)
        end        
    when 8031.kill or 8032.kill or 8033.kill or 8034.kill with pc.get_map_index() == 408 begin
        notice_in_map("Ihr habt einen Metinstein zerstört! Der Drache wird immer schwächer!")
        end    
        
    when 2493.kill with pc.get_map_index() == 408 begin  
        notice_all("Die Gruppe von "..pc.get_name().." hat Beran-Setaou getötet.")
        timer("skipia_boss_ende", 30)
        notice_in_map("Beeindruckend, ihr habt ihn tatsächlich besiegt.")
        notice_in_map("Ihr werdet in 30 Sekunden zurück in die Stadt gebracht.")
        warp_all_to_village( pc.get_map_index() , 30 )        
        end
        when skipia_boss_ende.timer begin     
        game.set_event_flag("Grotte_zugang",0)
        end
        end    
end 
Bitte um schnelle hilfe.. ich weiß nicht wo ich nen fehler finden sollte..
11/18/2011 16:12 bayberry#4062
Hey,

hab ein Problem mit der Warpring.quest.

PHP Code:
quest warpring begin
    state start begin
        when 70007.use with pc.get_level() >= 10 begin 
        
            say_title("Ring:")
            say("Möchtest du teleportiert werden?")

            local main_set = select("Ja","Nein")
            if main_set == 2 then
                return
            end
            
            if pc.get_level() < 10 then
                say_title("Ring:")
                say("Hm… Mit deinem derzeitigen Level bist du noch")
                say("zu schwach für die Reise durch Zeit und Raum.")
                say("Komm wieder, wenn du höher als Level 10 bist.")
                return
            end

            local sub_set = select("Rotes Reich", "Blaues Reich", "Gelbes Reich", "MetinMap", "HighLvlMap 1", "HighLvlMap 2", "Abbrechen") + 5
            if sub_set == 7 then
                return
            elseif sub_set == 1 then
                pc.warp(474120, 954400)
            elseif sub_set == 2 then
                pc.warp(352900, 882500)
            elseif sub_set == 3 then
                pc.warp(63200, 166100)
            elseif sub_set == 4 then
                pc.warp(999900, 999900)
            elseif sub_set == 5 then
                pc.warp(83200, 0)
            elseif sub_set == 6 then
                pc.warp(940000, 897200)
            end
        end
    end
end 
Wenn ich auf "Rotes Reich" klicke, dann portet er in die HighLvlMap 2 und bei den anderen passiert gar nichts.



Hätte da noch eine "Autorates" quest die nicht funktioniert, hoffe mir kann auch da jemand helfen.

PHP Code:
quest rates begin
    state start begin
        when login with pc.is_gm() begin
            timer("rates_1", 1)
        end
        when rates_1.timer begin
            local day = os.date("%A")
            if get_time() > game.get_event_flag("autorates") then
                if day == "Friday" then
                    __give_empire_priv("0", "4", "1000", "24")
                    __give_empire_priv("0", "1", "1000", "24")
                    __give_empire_priv("0", "2", "1000", "24")
                    game.set_event_flag("autorates", get_time()+60*60*24)
                elseif day == "Saturday" then
                    __give_empire_priv("0", "4", "1000", "24")
                    __give_empire_priv("0", "1", "1000", "24")
                    __give_empire_priv("0", "2", "1000", "24")
                    game.set_event_flag("autorates", get_time()+60*60*24)
                elseif day == "Sunday" then
                    __give_empire_priv("0", "4", "1000", "24")
                    __give_empire_priv("0", "1", "1000", "24")
                    __give_empire_priv("0", "2", "1000", "24")
                    game.set_event_flag("autorates", get_time()+60*60*24)
                else
                    __give_empire_priv("0", "4", "500", "96")
                    __give_empire_priv("0", "1", "500", "96")
                    __give_empire_priv("0", "2", "500", "96")
                    game.set_event_flag("autorates", get_time()+60*60*96)
                end
            end
            timer("rates_2", 1)
        end
        when rates_2.timer begin
            if get_time() > game.get_event_flag("autorates") then
                if day == "Friday" then
                    __give_empire_priv("0", "4", "1000", "24")
                    __give_empire_priv("0", "1", "1000", "24")
                    __give_empire_priv("0", "2", "1000", "24")
                    game.set_event_flag("autorates", get_time()+60*60*24)
                elseif day == "Saturday" then
                    __give_empire_priv("0", "4", "1000", "24")
                    __give_empire_priv("0", "1", "1000", "24")
                    __give_empire_priv("0", "2", "1000", "24")
                    game.set_event_flag("autorates", get_time()+60*60*24)
                elseif day == "Sunday" then
                    __give_empire_priv("0", "4", "1000", "24")
                    __give_empire_priv("0", "1", "1000", "24")
                    __give_empire_priv("0", "2", "1000", "24")
                    game.set_event_flag("autorates", get_time()+60*60*24)
                else
                    __give_empire_priv("0", "4", "500", "96")
                    __give_empire_priv("0", "1", "500", "96")
                    __give_empire_priv("0", "2", "500", "96")
                    game.set_event_flag("autorates", get_time()+60*60*96)
                end
            end
            timer("rates_1", 1)
        end
    end
end 
Es komm irgendso ein Fehler " have to start with "quest", oder so was ähnliches.
11/18/2011 17:53 Sp0ngeb0b ist cool#4063
PHP Code:
quest warpring begin
    state start begin
        when 70007.use with pc.get_level() >= 10 begin 
        
            say_title("Ring:")
            say("Möchtest du teleportiert werden?")

            local main_set = select("Ja","Nein")
            if main_set == 2 then
                return
            end
            
            if pc.get_level() < 10 then
                say_title("Ring:")
                say("Hm… Mit deinem derzeitigen Level bist du noch")
                say("zu schwach für die Reise durch Zeit und Raum.")
                say("Komm wieder, wenn du höher als Level 10 bist.")
                return
            end

            local sub_set = select("Rotes Reich", "Blaues Reich", "Gelbes Reich", "MetinMap", "HighLvlMap 1", "HighLvlMap 2", "Abbrechen")
            if sub_set == 7 then
                return
            elseif sub_set == 1 then
                pc.warp(474120, 954400)
            elseif sub_set == 2 then
                pc.warp(352900, 882500)
            elseif sub_set == 3 then
                pc.warp(63200, 166100)
            elseif sub_set == 4 then
                pc.warp(999900, 999900)
            elseif sub_set == 5 then
                pc.warp(83200, 0)
            elseif sub_set == 6 then
                pc.warp(940000, 897200)
            end
        end
    end
end 
PHP Code:
quest rates begin
    state start begin
        when login with pc.is_gm() begin
            timer("rates", 1)
        end
        when rates.timer begin
            timer("rates", 1)
            local day = os.date("%A")
            if get_time() > game.get_event_flag("autorates") then
                if day == "Friday" then
                    __give_empire_priv("0", "4", "1000", "24")
                    __give_empire_priv("0", "1", "1000", "24")
                    __give_empire_priv("0", "2", "1000", "24")
                    game.set_event_flag("autorates", get_time()+60*60*24)
                elseif day == "Saturday" then
                    __give_empire_priv("0", "4", "1000", "24")
                    __give_empire_priv("0", "1", "1000", "24")
                    __give_empire_priv("0", "2", "1000", "24")
                    game.set_event_flag("autorates", get_time()+60*60*24)
                elseif day == "Sunday" then
                    __give_empire_priv("0", "4", "1000", "24")
                    __give_empire_priv("0", "1", "1000", "24")
                    __give_empire_priv("0", "2", "1000", "24")
                    game.set_event_flag("autorates", get_time()+60*60*24)
                else
                    __give_empire_priv("0", "4", "500", "96")
                    __give_empire_priv("0", "1", "500", "96")
                    __give_empire_priv("0", "2", "500", "96")
                    game.set_event_flag("autorates", get_time()+60*60*96)
                end
            end
        end 
    end
end 
bei der 2. hab ich nichts auffälliges gesehen...allerdings bin ich nicht zuhause und habe somit kein notepad++ bzw. einen editor ;)

falls es nicht klappt, schau ich mir das später, wenn ich zuhause bin an :P

zur port quest: "+5" hatte da nichts zu suchen ; hättest nur mal mit der 5 rechnen sollen, dann hätte das alles erklärt ;)
11/18/2011 18:02 HuHu95#4064
pls mir auch helfen :)
11/18/2011 19:06 Kriegergeist^^#4065
Moin moin ihr leute,

Ich habe mich mal nach länger Zeit, habe ich mich entschieden mal wieder paar questen zu schreiben mit einen guten Kumpel :rolleyes:

Da ich momentan bei ihn bin, kann ich leider nicht auf meinen Server zugreifen :(
somit kann ich die Quest nicht testen.

Jetzt wollte ich fragen, ob ihr mal die Quest kontrolieren könntet, ob sie gehen könnte.
Hier die Quest:
Wir waren uns nicht ganz sicher ob alles mit diesen local funktionen richtig ist, sowie waren wir unsicher wegen den Rang überpüfen und abziehen.
Es wär echt nett, wen ihr uns Helfen könntet :handsdown:

MfG
Kriegergeist^^ und Kumpel
Page 271 of 845 « First 171221261269270 271 272273281321371771 Last »