Register for your free account! | Forgot your password?

Go Back   elitepvpers > Popular Games > Metin2 > Metin2 Private Server
[SERVICE] Die Questkontrolle [SERVICE] Die Questkontrolle
You last visited: Today at 15:26

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement


Advertise with us!

[SERVICE] Die Questkontrolle

Discussion on [SERVICE] Die Questkontrolle within the Metin2 Private Server forum part of the Metin2 category.

Reply
Page 687 of 845 « First 187587637677685686 687 688689697737787 Last »
 
Old 06/05/2014, 16:38   #10291
 
.J3lυє's Avatar
 
elite*gold: 111
The Black Market: 3/0/0
Join Date: Jun 2013
Posts: 774
Received Thanks: 271
Quote:
Originally Posted by .Rαρтor View Post
Code:
quest haustiere begin 
    state start begin 
        -- Setzt den neuen Petnamen in die Datenbank ein 
        function set_pet_name(name) 
            mysql_query("DELETE FROM player.pet_name WHERE id = \\'"..pc.get_player_id().."\\'") 
            mysql_query("INSERT INTO player.pet_name(id, name) VALUES(\\'"..pc.get_player_id().."\\', \\'"..name.."\\')") 
        end 
        -- Holt sich den Petnamen aus der Datenbank 
        function get_pet_name() 
            local pet_name = mysql_query("SELECT * FROM player.pet_name WHERE id = \\'"..pc.get_player_id().."\\'") 
            return (pet_name.name or {pc.get_name().."'s Haustier"})[1] 
        end 
        -- Feuer-Phönix 
        when 53001.use begin 
            if pet.is_summon() then 
                pet.unsummon() 
                chat("Dein Haustier verabschiedet sich nun von dir!") 
                affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)    
                affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) 
            else 
                local old_level = horse.get_level() 
                local old_name = horse.get_name() 
                horse.set_level(22) 
                horse.set_name(haustiere.get_pet_name()) 
                pet.summon() 
                chat("Dein Pet bringt dir: 100 Angriffswert, 100 Verteidigung und 1000 TP!") 
                horse.set_level(old_level) 
                horse.set_name(old_name) 
                affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.MAX_HP, 1000, 60*60*8) 
            end 
        end 
        -- Rentierjunges 
        when 53002.use begin 
            if pet.is_summon() then 
                pet.unsummon() 
                chat("Dein Haustier verabschiedet sich nun von dir!") 
                affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)    
                affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) 
            else 
                local old_level = horse.get_level() 
                local old_name = horse.get_name() 
                horse.set_level(24) 
                horse.set_name(haustiere.get_pet_name()) 
                pet.summon() 
                chat("Dein Pet bringt dir: 100 Angriffswert, 100 Verteidigung und 1000 TP!") 
                horse.set_level(old_level) 
                horse.set_name(old_name) 
                affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.MAX_HP, 1000, 60*60*8) 
            end 
        end 
        -- Eis-Phönix 
        when 53003.use begin 
            if pet.is_summon() then 
                pet.unsummon() 
                chat("Dein Haustier verabschiedet sich nun von dir!") 
                affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)    
                affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) 
            else 
                local old_level = horse.get_level() 
                local old_name = horse.get_name() 
                horse.set_level(23) 
                horse.set_name(haustiere.get_pet_name()) 
                pet.summon() 
                chat("Dein Pet bringt dir: 100 Angriffswert, 100 Verteidigung und 1000 TP!") 
                horse.set_level(old_level) 
                horse.set_name(old_name) 
                affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.MAX_HP, 1000, 60*60*8) 
            end 
        end 
        -- Baby-Azrael 
        when 53005.use begin 
            if pet.is_summon() then 
                pet.unsummon() 
                chat("Dein Haustier verabschiedet sich nun von dir!") 
                affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)    
                affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) 
            else 
                local old_level = horse.get_level() 
                local old_name = horse.get_name() 
                horse.set_level(25) 
                horse.set_name(haustiere.get_pet_name()) 
                pet.summon() 
                chat("Dein Pet bringt dir: 100 Angriffswert, 100 Verteidigung und 1000 TP!") 
                horse.set_level(old_level) 
                horse.set_name(old_name) 
                affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.MAX_HP, 1000, 60*60*8) 
            end 
        end 
        -- Baby-Wolfs 
        when 53006.use begin 
            if pet.is_summon() then 
                pet.unsummon() 
                chat("Dein Haustier verabschiedet sich nun von dir!") 
                affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)    
                affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) 
            else 
                local old_level = horse.get_level() 
                local old_name = horse.get_name() 
                horse.set_level(26) 
                horse.set_name(haustiere.get_pet_name()) 
                pet.summon() 
                chat("Dein Pet bringt dir: 100 Angriffswert, 100 Verteidigung und 1000 TP!") 
                horse.set_level(old_level) 
                horse.set_name(old_name) 
                affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.MAX_HP, 1000, 60*60*8) 
            end 
        end 
        -- Baby-Löwen 
        when 53007.use begin 
            if pet.is_summon() then 
                pet.unsummon() 
                chat("Dein Haustier verabschiedet sich nun von dir!") 
                affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)    
                affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) 
            else 
                local old_level = horse.get_level() 
                local old_name = horse.get_name() 
                horse.set_level(27) 
                horse.set_name(haustiere.get_pet_name()) 
                pet.summon() 
                chat("Dein Pet bringt dir: 100 Angriffswert, 100 Verteidigung und 1000 TP!") 
                horse.set_level(old_level) 
                horse.set_name(old_name) 
                affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.MAX_HP, 1000, 60*60*8) 
            end 
        end 
        -- Baby-Keiler 
        when 53008.use begin 
            if pet.is_summon() then 
                pet.unsummon() 
                chat("Dein Haustier verabschiedet sich nun von dir!") 
                affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)    
                affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) 
            else 
                local old_level = horse.get_level() 
                local old_name = horse.get_name() 
                horse.set_level(28) 
                horse.set_name(haustiere.get_pet_name()) 
                pet.summon() 
                chat("Dein Pet bringt dir: 100 Angriffswert, 100 Verteidigung und 1000 TP!") 
                horse.set_level(old_level) 
                horse.set_name(old_name) 
                affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.MAX_HP, 1000, 60*60*8) 
            end 
        end 
        -- Baby-Tiger 
        when 53009.use begin 
            if pet.is_summon() then 
                pet.unsummon() 
                chat("Dein Haustier verabschiedet sich nun von dir!") 
                affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)    
                affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) 
            else 
                local old_level = horse.get_level() 
                local old_name = horse.get_name() 
                horse.set_level(29) 
                horse.set_name(haustiere.get_pet_name()) 
                pet.summon() 
                chat("Dein Pet bringt dir: 100 Angriffswert, 100 Verteidigung und 1000 TP!") 
                horse.set_level(old_level) 
                horse.set_name(old_name) 
                affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.MAX_HP, 1000, 60*60*8) 
            end 
        end 
        -- Baby-Eisbär 
        when 53014.use begin 
            if pet.is_summon() then 
                pet.unsummon() 
                chat("Dein Haustier verabschiedet sich nun von dir!") 
                affect.remove_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.remove_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8)    
                affect.remove_collect(apply.MAX_HP, 1000, 60*60*8) 
            else 
                local old_level = horse.get_level() 
                local old_name = horse.get_name() 
                horse.set_level(30) 
                horse.set_name(haustiere.get_pet_name()) 
                pet.summon() 
                chat("Dein Pet bringt dir: 100 Angriffswert, 100 Verteidigung und 1000 TP!") 
                horse.set_level(old_level) 
                horse.set_name(old_name) 
                affect.add_collect(apply.ATT_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*8) 
                affect.add_collect(apply.MAX_HP, 1000, 60*60*8) 
            end 
        end 
        -- Namenskette - Namensändung des Haustiers 
        when 71110.use begin 
            say_title("Namenskette :") 
            say("") 
            say("Hier kannst du deinem Haustier einen neuen") 
            say("Namen geben. Damit kannst du dein Haustier") 
            say("über alle anderen hervorheben.") 
            say("") 
             
            akna = haustiere.get_pet_name() 
             
            if string.len(akna) == 0 then 
                say_reward("Dein Haustier besitzt bis jetzt keinen Namen.") 
            else 
                say_reward("Der aktuelle Name deines Haustieres lautet: "..akna) 
            end 
             
            say("") 
            say("Möchtest du fortfahren?") 
            say("") 
             
            local s=select("Umbenennen", "Abbrechen") 
            if s==2 then 
                return 
            end 
             
            say_title("Namenskette :") 
            say("") 
            say("Bitte gib hier den neuen Namen deines") 
            say("Haustieres ein.") 
             
            local x = input() 
             
            if string.len(x) < 2 then 
                say_title("Namenskette :") 
                say("Der eingegeben Name ist zu kurz.") 
                say("") 
                say_reward("Der neue Name muss aus") 
                say_reward("mind. 2 Zeichen bestehen.") 
                say("") 
                return 
            elseif string.len(x) > 12 then 
                say_title("Namenskette :") 
                say("Der eingegeben Name ist zu lang.") 
                say("") 
                say_reward("Der neue Name darf max.") 
                say_reward("aus 12 Zeichen bestehen.") 
                say("") 
                return 
            end 
             
            haustiere.set_pet_name(x) 
            chat("Haustier erfolgreich umbenannt") 
            pc.remove_item(71110, 1) 
        end 
    end 
end
GAME : 2089M
Quest funkt nicht, pet wird NICHT GERUFEN
Kann keiner helfen ?
.J3lυє is offline  
Old 06/05/2014, 16:39   #10292
 
drako92's Avatar
 
elite*gold: 0
The Black Market: 3/0/1
Join Date: Feb 2008
Posts: 350
Received Thanks: 77
HTML Code:
quest levelupreward begin
	state start begin
		when levelup begin
			if pc.get_level() == 30 then
				say_reward("Levelup, Herzlichen Glückwunsch "..pc.get_name())
				say_reward("Du hast soeben Level >>>>> "..pc.get_level().." <<<<< erreicht!")
				say_reward("Als kleines Dankeschön dass du bei uns spielst")
				say_reward("Kannst du dir nun eine Waffe aussuchen!")
				if pc.job == 0 then
					say("Wähle deine Waffe aus")                
					local s = select("Vollmondschwert","Roteisenklinge","Nein danke!")                
					if s == 0 then                
						pc.give_item2(290)
						say("Du hast dir das Vollmondschwert ausgewählt!")
					end                
					if s == 1 then                
						pc.give_item2(3210)
						say("Du hast dir die Roteisenklinge ausgewählt!")	
					end  
					if s == 2 then
						return
					end
				end
				if pc.job == 1 then
					say("Wähle deine Waffe aus")                
					local s = select("Vollmondschwert","Schwarzblattdolch","Hornbogen","Nein danke!")                
					if s == 0 then                
						pc.give_item2(290)
						say("Du hast dir das Vollmondschwert ausgewählt!")
					end                
					if s == 1 then                
						pc.give_item2(1170)
						say("Du hast dir den Schwarzblattdolch ausgewählt!")	
					end 
					if s == 2 then                
						pc.give_item2(2150)
						say("Du hast dir den Hornbogen ausgewählt!")	
					end
					if s == 3 then
						return
					end
				end
				if pc.job == 2 then
					say("Wähle deine Waffe aus")                
					local s = select("Vollmondschwert","Nein danke!")                
					if s == 0 then                
						pc.give_item2(290)
						say("Du hast dir das Vollmondschwert ausgewählt!")
					end                 
					if s == 1 then
						return
					end
				end
				if pc.job == 3 then
					say("Wähle deine Waffe aus")                
					local s = select("Herbstwindfächer","Antike Glocke","Nein danke!")                
					if s == 0 then                
						pc.give_item2(7160)
						say("Du hast dir den Herbstwindfächer ausgewählt!")
					end                
					if s == 1 then                
						pc.give_item2(5110)
						say("Du hast dir die Antike Glocke ausgewählt!")	
					end  
					if s == 2 then
						return
					end
				end
			end
		end		
	end
end
kriege die quest einfach nicht compiled, finde den fehler auch nicht

schonmal danke im vorraus
drako92 is offline  
Old 06/05/2014, 17:18   #10293
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Jun 2013
Posts: 217
Received Thanks: 46
Quote:
Originally Posted by drako92 View Post
HTML Code:
quest levelupreward begin
	state start begin
		when levelup begin
			if pc.get_level() == 30 then
				say_reward("Levelup, Herzlichen Glückwunsch "..pc.get_name())
				say_reward("Du hast soeben Level >>>>> "..pc.get_level().." <<<<< erreicht!")
				say_reward("Als kleines Dankeschön dass du bei uns spielst")
				say_reward("Kannst du dir nun eine Waffe aussuchen!")
				if pc.job == 0 then
					say("Wähle deine Waffe aus")                
					local s = select("Vollmondschwert","Roteisenklinge","Nein danke!")                
					if s == 0 then                
						pc.give_item2(290)
						say("Du hast dir das Vollmondschwert ausgewählt!")
					end                
					if s == 1 then                
						pc.give_item2(3210)
						say("Du hast dir die Roteisenklinge ausgewählt!")	
					end  
					if s == 2 then
						return
					end
				end
				if pc.job == 1 then
					say("Wähle deine Waffe aus")                
					local s = select("Vollmondschwert","Schwarzblattdolch","Hornbogen","Nein danke!")                
					if s == 0 then                
						pc.give_item2(290)
						say("Du hast dir das Vollmondschwert ausgewählt!")
					end                
					if s == 1 then                
						pc.give_item2(1170)
						say("Du hast dir den Schwarzblattdolch ausgewählt!")	
					end 
					if s == 2 then                
						pc.give_item2(2150)
						say("Du hast dir den Hornbogen ausgewählt!")	
					end
					if s == 3 then
						return
					end
				end
				if pc.job == 2 then
					say("Wähle deine Waffe aus")                
					local s = select("Vollmondschwert","Nein danke!")                
					if s == 0 then                
						pc.give_item2(290)
						say("Du hast dir das Vollmondschwert ausgewählt!")
					end                 
					if s == 1 then
						return
					end
				end
				if pc.job == 3 then
					say("Wähle deine Waffe aus")                
					local s = select("Herbstwindfächer","Antike Glocke","Nein danke!")                
					if s == 0 then                
						pc.give_item2(7160)
						say("Du hast dir den Herbstwindfächer ausgewählt!")
					end                
					if s == 1 then                
						pc.give_item2(5110)
						say("Du hast dir die Antike Glocke ausgewählt!")	
					end  
					if s == 2 then
						return
					end
				end
			end
		end		
	end
end
kriege die quest einfach nicht compiled, finde den fehler auch nicht

schonmal danke im vorraus
Probiere die Version aus:
ArsMartialis is offline  
Thanks
1 User
Old 06/05/2014, 22:41   #10294
 
drako92's Avatar
 
elite*gold: 0
The Black Market: 3/0/1
Join Date: Feb 2008
Posts: 350
Received Thanks: 77
Quote:
Originally Posted by ArsMartialis View Post
Probiere die Version aus:
super danke, hat funktioniert
drako92 is offline  
Old 06/07/2014, 22:58   #10295

 
Pasha's Avatar
 
elite*gold: 1
The Black Market: 37/0/1
Join Date: Oct 2010
Posts: 1,055
Received Thanks: 349
PHP Code:
quest ankündigung begin
    state start begin
        when login or levelup with pc.level == 50 begin
            notice_all("".. pc.get_name() .." hat gerade")
            notice_all("Level 50 erreicht. Herzlichen Glückwunsch!")
            notice_all("Das ganze Volk gratuliert ".. pc.get_name() .."!")
        end
    end
end
quest lvl90 begin
    state start begin
        when login or levelup with pc.level == 75 begin
            notice_all("".. pc.get_name() .." hat gerade")
            notice_all("Level 75 erreicht. Herzlichen Glückwunsch!")
            notice_all("Das ganze Volk gratuliert ".. pc.get_name() .."!")
        end
    end
end
quest lvl100 begin
    state start begin
        when login or levelup with pc.level == 100 begin
            notice_all("".. pc.get_name() .." hat gerade")
            notice_all("Level 100 erreicht. Herzlichen Glückwunsch!")
            notice_all("Das ganze Volk gratuliert ".. pc.get_name() .."!")
        end
    end
end
quest lvl105 begin
    state start begin
        when login or levelup with pc.level == 120 begin
            notice_all("".. pc.get_name() .." hat gerade")
            notice_all("Level 120 erreicht. Herzlichen Glückwunsch!")
            notice_all("Er/Sie ist nun auf dem maximalen Level!")
            notice_all("Das ganze Volk gratuliert ".. pc.get_name() .."!")
        end
    end
end 
Immer wenn ich mich einlogge wird die Nachricht nochmal angezeigt. Heißt wenn ich mit Level 120 on komme bekomm ich diese Meldung. Wie mach ich, dass es nur einmal angezeigt wird.
Pasha is offline  
Old 06/07/2014, 23:07   #10296
 
drako92's Avatar
 
elite*gold: 0
The Black Market: 3/0/1
Join Date: Feb 2008
Posts: 350
Received Thanks: 77
Quote:
Originally Posted by ArsMartialis View Post
Probiere die Version aus:
Quote:
Originally Posted by Yuroshi View Post
PHP Code:
quest ankündigung begin
    state start begin
        when login or levelup with pc.level == 50 begin
            notice_all("".. pc.get_name() .." hat gerade")
            notice_all("Level 50 erreicht. Herzlichen Glückwunsch!")
            notice_all("Das ganze Volk gratuliert ".. pc.get_name() .."!")
        end
    end
end
quest lvl90 begin
    state start begin
        when login or levelup with pc.level == 75 begin
            notice_all("".. pc.get_name() .." hat gerade")
            notice_all("Level 75 erreicht. Herzlichen Glückwunsch!")
            notice_all("Das ganze Volk gratuliert ".. pc.get_name() .."!")
        end
    end
end
quest lvl100 begin
    state start begin
        when login or levelup with pc.level == 100 begin
            notice_all("".. pc.get_name() .." hat gerade")
            notice_all("Level 100 erreicht. Herzlichen Glückwunsch!")
            notice_all("Das ganze Volk gratuliert ".. pc.get_name() .."!")
        end
    end
end
quest lvl105 begin
    state start begin
        when login or levelup with pc.level == 120 begin
            notice_all("".. pc.get_name() .." hat gerade")
            notice_all("Level 120 erreicht. Herzlichen Glückwunsch!")
            notice_all("Er/Sie ist nun auf dem maximalen Level!")
            notice_all("Das ganze Volk gratuliert ".. pc.get_name() .."!")
        end
    end
end 
Immer wenn ich mich einlogge wird die Nachricht nochmal angezeigt. Heißt wenn ich mit Level 120 on komme bekomm ich diese Meldung. Wie mach ich, dass es nur einmal angezeigt wird.
versuchs mal hiermit:
drako92 is offline  
Thanks
1 User
Old 06/09/2014, 01:32   #10297
 
Mr Gucci's Avatar
 
elite*gold: 30
The Black Market: 38/0/0
Join Date: Apr 2013
Posts: 710
Received Thanks: 91
PHP Code:
quest skilltree begin
    state start begin
        when 20004.chat."Skillbaum Panel" with pc.is_gm() begin
            say(col.gold("Skillbaum:[ENTER]"))
            say("Skillbaum ".. ({'offline','online'})[game.get_event_flag("skill_tree")+1])
            say()
            if select("Skillbaum "..({'anschalten','ausschalten'})[game.get_event_flag("skill_tree")+1], "Nichts") == 2 then return end
            notice_all("Der Skillbaum ist jetzt "..({"erreichbar","nicht erreichbar"})[game.get_event_flag("skill_tree")+1])
            if game.get_event_flag("skill_tree") == 0 then
                game.set_event_flag("skill_tree", 1)
            else
                game.set_event_flag("skill_tree", 0)
            end
        end
        
        when 20004.chat."Skillbaum" with game.get_event_flag("skill_tree") == 1 begin
            local bonis = {}
            local tree = {
            --    [Skillbaumlevel]//Bonus Name//Flag_name//Bonus pro up//Bonus Name//Benötigtes Item//Anzahl
                 [0] = {
                    {"Trefferpunkte","tree_tp", 1000, apply.MAX_HP, 141400, 1},
                    {"Angriffsgeschwindigkeit","tree_angr", 2, apply.ATT_SPEED, 141400, 1},
                    {"Laufgeschwindigkeit","tree_speed", 3, apply.MOV_SPEED, 141400, 1},
                    {"Tp-Regeneration","tree_reg", 2, apply.HP_REGEN, 141400, 1},
                },
                [1] = {
                    {"Stark gegen Tiere","tree_animals", 3, apply.ATTBONUS_ANIMAL, 141400, 1},
                    {"Stark gegen Orks","tree_orc", 2, apply.ATTBONUS_ORC, 141400, 1},
                    {"Stark gegen Teufel","tree_devil", 2, apply.ATTBONUS_DEVIL, 141400, 1},
                },
                [2] = {
                    {"Kritische Treffer","tree_crit", 1, apply.CRITICAL_PCT, 141400, 1},
                    {"Durchbohrende Treffer","tree_db", 1, apply.PENERATE_PCT, 141400, 1},
                    {"Vergiftungschane","tree_poisen", 1, apply.POISON_PCT, 141400, 1},
                },
                [3] = {
                    {"Stark gegen Halbmenschen","tree_hm", 2, apply.ATTBONUS_HUMAN, 141400, 1},
                    {"Schwertverteidigung","tree_sword", 1, apply.RESIST_SWORD, 141400, 1},
                    {"Zweihänderverteidigung","tree_tsword", 1, apply.RESIST_TWOHAND, 141400, 1},
                    {"Glockenverteidigung","tree_bell", 1, apply.RESIST_BELL, 141400, 1},
                    {"Fächerverteidigung","tree_fan", 1, apply.RESIST_FAN, 141400, 1},
                    {"Dolchverteidigung","tree_dagger", 1, apply.RESIST_DAGGER, 141400, 1},
                    {"Pfeilverteidigung","tree_bow", 1, apply.RESIST_BOW, 141400, 1},
                },
                [4] = {
                    {"Stark gegen Krieger","tree_warrior", 1, apply.ATT_BONUS_TO_WARRIOR, 141400, 1},
                    {"Stark gegen Ninja","tree_assasine", 1, apply.ATT_BONUS_TO_ASSASSIN, 141400, 1},
                    {"Stark gegen Sura","tree_sura", 1, apply.ATT_BONUS_TO_SURA, 141400, 1},
                    {"Stark gegen Schamenen","tree_shaman", 1, apply.ATT_BONUS_TO_SHAMAN, 141400, 1},
                },
            }
            say(col.gold("Hallo "..pc.get_name()..","))
            say("bei mir kannst du im Tausch von")
            say("Gegenständen verschiedene Bonis skillen.")
            say("Möchtest du fortfahren?")
            if select("Forfahren","Abbruch") == 2 then return end
            say(col.gold("Skillbaum:[ENTER]"))
            say("Gut, ich werde dir Auflisten")
            say("was du alles skillen kannst.")
            wait()
            say(col.gold("Skillbaum:[ENTER]"))
            for i = 1, table.getn(tree[pc.getqf("tree_level")]), 1 do
                if pc.getqf(tree[pc.getqf("tree_level")][i][2]) >= 10 then
                    table.insert(bonis, tree[pc.getqf("tree_level")][i][1].." - Beendet")
                else
                    table.insert(bonis, tree[pc.getqf("tree_level")][i][1])
                end
            end
            local menu = select3(bonis)
            if menu == -1 then return end
            local rnd = math.random(1, 100)
            say(col.gold("Skillbaum:[ENTER]"))
            say("Du hast den Boni bereits auf "..pc.getqf(tree[pc.getqf("tree_level")][menu][2]))
            say()
            say("Du möchtest also "..tree[pc.getqf("tree_level")][menu][1].." skillen?")
            if select("Skillen","Abbruch") == 2 then return end
            if pc.getqf(tree[pc.getqf("tree_level")][menu][2]) < 10 then
                if get_time() > pc.getqf("tree_time") then    
                    if pc.count_item(tree[pc.getqf("tree_level")][menu][5]) >= tree[pc.getqf("tree_level")][menu][6] then
                        if rnd > 39 then -- Chance ob klappen soll immoment 50%
                            say(col.gold("Skillbaum:[ENTER]"))
                            say("Glückwunsch dein Skillpunkt")
                            say("wurde erfolgreich gesetzt.[ENTER]")
                            say(col.lightgreen("Erfolgreich!![ENTER]"))
                            wait()
                            pc.remove_item(tree[pc.getqf("tree_level")][menu][5], tree[pc.getqf("tree_level")][menu][6])
                            affect.add_collect(tree[pc.getqf("tree_level")][menu][4], tree[pc.getqf("tree_level")][menu][3], 60*60*24*365*60)
                            chat("Du hast "..tree[pc.getqf("tree_level")][menu][3].." mehr "..tree[pc.getqf("tree_level")][menu][1].." erhalten.")
                            pc.setqf(tree[pc.getqf("tree_level")][menu][2], pc.getqf(tree[pc.getqf("tree_level")][menu][2])+1)
                            pc.setqf("tree_time", get_time()+3600)    -- Warte Zeit
                            if pc.getqf(tree[pc.getqf("tree_level")][menu][2]) >= 10 then
                                local tree_skill = table.getn(tree[pc.getqf("tree_level")])*1
                                say(col.gold("Skillbaum:[ENTER]"))
                                say("Glückwunsch dein Skill,")
                                say("wurde erfolgreich auf die max.")
                                say("Stufe gestuft.")
                                say()
                                say(col.lightgreen("Mach weiter so!"))
                                say()
                                wait()
                                pc.setqf("tree_level_skill", pc.getqf("tree_level_skill")+1)
                                if pc.getqf("tree_level_skill") == tree_skill then
                                    pc.setqf("tree_level", pc.getqf("tree_level")+1)
                                    say(col.gold("Skillbaum[ENTER]"))
                                    say("Glückwunsch du hast das Level")
                                    say("erfolgreich absolviert.")
                                    say()
                                    say(col.lightgreen("Aufstieg: Level "..pc.getqf("tree_level")))
                                    wait()
                                    pc.setqf("tree_time", get_time()+7200)
                                end    
                            end
                        else
                            say(col.gold("Skillbaum:[ENTER]"))
                            say("Leider ist der Skillpunkt")
                            say("nicht gut genung gewesen.")
                            say()
                            say_reward("Fehlgeschlagen!!")
                            pc.remove_item(tree[pc.getqf("tree_level")][menu][5], tree[pc.getqf("tree_level")][menu][6])
                            say()
                            return
                        end
                    else
                        say(col.gold("Skillbaum:"))
                        say()
                        say("Leider fehlt dir ein")
                        say_item_vnum(tree[pc.getqf("tree_level")][menu][5])
                        say()
                        return
                    end    
                else
                    say(col.gold("Skillbaum:[ENTER]"))
                    say("Du musst noch warten")
                    say("bevor du wieder skillen kannst.")
                    say()
                    return
                end    
            else
                say(col.gold("Skillbaum"))
                say("Leider ist der Skill")
                say("bereits auf dem Maximum.")
                say()
                return
            end
        end
    end
end 
Nach dem man sich ausgeloggt hat und sich wieder einloggt ist der Bonus weg aber der Skillpunkt besteht dennoch..Woran liegt das?
Mr Gucci is offline  
Old 06/10/2014, 07:51   #10298
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Oct 2013
Posts: 5
Received Thanks: 0
Hay com, könnte mal jemand über die quest Datei gucken





Wenn ich die einfüge kommt der Fehler
Rach:3 is offline  
Old 06/10/2014, 17:28   #10299

 
.yorliK's Avatar
 
elite*gold: 0
The Black Market: 31/0/0
Join Date: Nov 2011
Posts: 1,448
Received Thanks: 1,257
Quote:
Originally Posted by Rach:3 View Post
Hay com, könnte mal jemand über die quest Datei gucken


Wenn ich die einfüge kommt der Fehler
.yorliK is offline  
Old 06/10/2014, 21:13   #10300
 
elite*gold: 0
The Black Market: 1/0/0
Join Date: May 2014
Posts: 24
Received Thanks: 8
Ich habe ein Problem mit der Quest und zwar werde ich bei der map nach 3 sekunden wieder nach map1 teleportiert kann mir vielleicht jemand helfen?


quest z_run begin
state start begin
when login with pc.get_map_index() >= 82 and pc.get_map_index() < 86 begin
if d.getf("warpen")==1 then
timer("anti_warp", 5)
return
end
warp_to_village()
end
when anti_warp.timer begin
d.setf("warpen", 0)
end
when 9010.chat."Der Z-Run" begin --NPC zum Starten
say_title(mob_name(9010)) --NPC zum Starten
say("Hallo Abenteurer,")
say("ich habe längst verlassene Gänge und")
say("Schluchten entdeckt, wo Ungeheuer ihr")
say("unwesen treiben. Nur die stärksten")
say("Krieger halten denen Stand!")
if pc.count_item(19) == 0 then
say("Du benötigst einen Z-Key um passieren zu können.")
say_item_vnum(19)
return
end
say("Soll ich dich dahin bringen?")
local s=select("Ja", "Nein")
if s==2 then return end
if pc.count_item(19) > 0 then
pc.remove_item(19, 1)
pc.warp(1018500, 1018000)
end
end
when login with pc.get_map_index() == 82 begin
say("Die Brücke ist kaputt gegangen.")
say("Jetzt gibt es kein zurück mehr!")
end
when 8030.kill with pc.get_map_index() == 83 begin
timer("z_run_warp1", 10)
notice_in_map("Du wirst in 10Sekunden geportet")
end
when z_run_warp1.timer begin
d.new_jump_all(131, 11166, 11448)
d.setf("warpen", 1)
d.setf("floor", 1)
local posis = {
{164, 286},
{282, 284},
{424, 284},
{577, 278},
{723, 352},
{741, 548},
{771, 546}
}
for i=1, 7 do
d.spawn_mob(11510, posis[i][1], posis[i][2])
end
d.setf("metins", 7)
end
when 11510.kill with pc.in_dungeon() begin
d.setf("metins", d.getf("metins") - 1)
if d.getf("metins") == 0 then
d.clear_regen()
d.kill_all()
d.setf("floor", 2)
d.notice("Ihr habt alle Metine zerstört!")
d.notice("Macht euch für Angriffswellen der Monster bereit")
timer("z_run_warp2", 5)
else
d.notice("Es verbleiben "..d.getf("metins").." Metine")
if d.getf("metins") >= 2 then
timer("next_metin", 5)
end
end
end
when next_metin.timer begin
local posis = {
{11857, 11583},
{11659, 11378},
{11808, 11449},
{11514, 11381},
{11373, 11387}
}
local t = d.getf("metins") -1
d.jump_all(posis[t][1], posis[t][2])
end
when z_run_warp2.timer begin
d.jump_all(11289, 12058)
d.setf("wave", 1)
timer("z_run_wait", 30)
end
when kill with d.getf("floor") == 2 and not npc.is_pc() begin
d.setf("mobs", d.getf("mobs") + 1)
if d.getf("mobs") >= 2 then --Anzahl der Mobs pro Welle 140
if d.getf("wave") < 1 then
d.setf("wave", d.getf("wave") + 1)
d.setf("mobs", 0)
timer("z_run_wait", 30)
d.notice("Bereitet euch auf Welle "..d.getf("wave").." vor!")
else
d.notice("Ihr habt alle fünf Angriffswellen erfolgreich abgewehrt!")
d.notice("Findet die drei Schalter und aktiviert sie. Ihr habt 20 Minuten Zeit.")
timer("z_run_warp3", 5)
end
end
end
when z_run_wait.timer begin
d.regen_file("data/dungeon/z_run/wave"..d.getf("wave")..".txt")
pc.aggregate_monster()
pc.aggregate_monster()
end
when z_run_warp3.timer begin
d.new_jump_all(204, 16800, 17076)
d.setf("warpen", 1)
d.setf("floor", 3)
d.regen_file("data/dungeon/z_run/regen.txt")
server_timer("z_run_time1", 80*5, pc.get_map_index())
end
when z_run_time1.server_timer begin
server_timer("z_run_time2", 60*5, pc.get_map_index())
d.notice("Es verbleiben noch 15 Minuten.")
end
when z_run_time2.server_timer begin
server_timer("z_run_time3", 60*5, pc.get_map_index())
d.notice("Es verbleiben noch 10 Minuten.")
end
when z_run_time3.server_timer begin
server_timer("z_run_time4", 60*5, pc.get_map_index())
d.notice("Es verbleiben noch 5 Minuten.")
end
when z_run_time4.server_timer begin
d.notice("Die Zeit ist abgelaufen. Ihr werdet aus den Dungeon teleportiert.")
d.exit_all()
end
when kill with d.getf("floor") == 3 and not npc.is_pc() begin
d.setf("schalter_kills", d.getf("schalter_kills") + 1)
if d.getf("schalter_kills") >= 50 then --Ein drittel der Anzahl der Mobs aus regen.txt
game.drop_item_with_ownership(70030, 1)
d.setf("schalter_kills", 0)
end
end
when 70030.use begin
d.setf("schalter", d.getf("schalter") + 1)
if d.getf("schalter") == 3 then
clear_server_timer("z_run_time1", get_server_timer_arg())
clear_server_timer("z_run_time2", get_server_timer_arg())
clear_server_timer("z_run_time3", get_server_timer_arg())
clear_server_timer("z_run_time4", get_server_timer_arg())
d.notice("Ihr habt alle drei Schalter aktiviert!")
d.notice("Als nächstes müsst ihr alle vier Elementare bezwingen")
timer("z_run_warp4", 5)
else
d.notice("Der "..d.getf("schalter")..". Schalter wurde aktiviert!")
end
item.remove()
end
when z_run_warp4.timer begin
d.new_jump_all(202, 12440, 12485)
d.setf("warpen", 1)
d.setf("floor", 4)
d.spawn_mob(6091, 256, 256)
d.regen_file("data/dungeon/z_run/feuer.txt")
end
when kill with pc.in_dungeon() begin
if npc.get_race() == 6091 then
timer("jump1", 5)
end
end
when jump1.timer begin
d.jump_all(12497, 13027)
d.spawn_mob(6191, 256, 775)
d.regen_file("data/dungeon/z_run/eis.txt")
end
when kill with d.getf("floor") == 4 and not npc.is_pc() begin
if npc.get_race() == 6191 then
d.notice("TEST")
timer("jump2", 5)
end
-- if npc.get_race() == 6191 then
-- timer("jump2", 5)
-- end
end
when jump2.timer begin
d.new_jump_all(203, 14725, 14725)
d.setf("warpen", 1)
d.spawn_mob(3901, 256, 256)
d.regen_file("data/dungeon/z_run/erde.txt")
end
when kill with pc.in_dungeon() begin
if npc.get_race() == 3901 then
timer("jump3", 5)
end
end
when jump3.timer begin
d.jump_all(14719, 15249)
d.spawn_mob(3291, 256, 775)
d.regen_file("data/dungeon/z_run/wuste.txt")
end
when kill with pc.in_dungeon() begin
if npc.get_race()== 3291 then
d.notice("Alle vier Elementarmonster wurden bezwungen!")
d.notice("Drücke nun die drei Siegel ein, um Monster zu beschwören.")
timer("z_run_warp5", 5)
end
end
when z_run_warp5.timer begin
d.new_jump_all(204, 16747, 17943)
d.setf("warpen", 1)
d.setf("floor", 5)
local posis = {
{385, 1272},
{396, 1279},
{383, 1286}
}
for i=1, 3 do
d.spawn_mob(20073, posis[i][1], posis[i][2])
end
end
when 20073.click with d.getf("online") == 0 begin
d.setf("online", 1)
d.setf("kills", 0)
npc.purge()
d.setf("click", d.getf("click") + 1)
d.regen_file("data/dungeon/z_run/regen"..d.getf("click")..".txt")
if d.getf("click") == 3 then
d.spawn_mob(3791, 389, 1277) --Bossmob, letzter raum
end
end
when kill with not npc.is_pc() and d.getf("floor") == 5 begin
d.setf("kills", d.getf("kills") + 1)
if d.getf("kills") == 1 then
d.setf("online", 0)
end
end
when 3791.kill with pc.in_dungeon() begin --Bossmob, letzter raum
d.notice("Ihr habt den Legendären Jabba besiegt und damit den Z-Run gerettet!")
warp_all_to_village(pc.get_map_index(), 30)
end
end[/php]
Fire.Nyphos2 is offline  
Old 06/10/2014, 22:36   #10301
 
Carismafw2's Avatar
 
elite*gold: 150
The Black Market: 12/0/0
Join Date: Jan 2010
Posts: 117
Received Thanks: 33
ich habe hier eine quest und wollte fragen ob man da auch eine abfrage der special_item_group nehmen kann im die items raus zu bekommen die vorgesehen ist

hier die quest:


mfg Carisma wäre nett wenn da einer was wüsste
Carismafw2 is offline  
Old 06/12/2014, 20:13   #10302
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Nov 2012
Posts: 47
Received Thanks: 5
Ich habe gleich 2 Quests, bei denen ich Probleme habe.
Bei der ersten werden die kills nicht in der Datenbank hinzugefügt.
Hier die Quest:



Bei der anderen ist das Problem, dass sie verschwindet sobald man auf die Questrolle geklickt hat und was ausgewählt hat und das Ausblenden dann nur geht, wenn man die Quest mit "N" nochmal aufruft.
Ich will aber, dass die permanent als Questrolle links angezeigt wird.

Hier die Quest:
HaRdCoOrEd is offline  
Old 06/13/2014, 15:54   #10303

 
.yorliK's Avatar
 
elite*gold: 0
The Black Market: 31/0/0
Join Date: Nov 2011
Posts: 1,448
Received Thanks: 1,257
Quote:
Originally Posted by HaRdCoOrEd View Post
Ich habe gleich 2 Quests, bei denen ich Probleme habe.
Bei der ersten werden die kills nicht in der Datenbank hinzugefügt.
Hier die Quest:

Bei der anderen ist das Problem, dass sie verschwindet sobald man auf die Questrolle geklickt hat und was ausgewählt hat und das Ausblenden dann nur geht, wenn man die Quest mit "N" nochmal aufruft.
Ich will aber, dass die permanent als Questrolle links angezeigt wird.

Hier die Quest:
1.
2.
.yorliK is offline  
Old 06/14/2014, 00:11   #10304
 
Carismafw2's Avatar
 
elite*gold: 150
The Black Market: 12/0/0
Join Date: Jan 2010
Posts: 117
Received Thanks: 33
bei mir Funktioniert die quest nicht =(



Error occured on compile moonlight.quest

und bei der quest zeigt er mir keine zeit an bzw nach der gewünschten zeit passiert nichts
das kommt bei mir in putty raus bitte um hilfe
Carismafw2 is offline  
Old 06/17/2014, 18:05   #10305
 
elite*gold: 168
The Black Market: 32/0/1
Join Date: May 2014
Posts: 574
Received Thanks: 193
Code:
quest give_basic_weapon begin
	state start begin
		when login begin

			local item_vnum = 19
			local item_vnum2 = 11209
			local item_vnum3 = 12209
			if pc.get_job() == 1 then
				item_vnum = 1009
				item_vnum2 = 11409
				item_vnum3 = 12349
			elseif pc.get_job() == 2 then				
				item_vnum2 = 11609
				item_vnum3 = 12489
			elseif pc.get_job() == 3 then
				item_vnum = 7009
				item_vnum2 = 11809
				item_vnum3 = 12629
			end
			pc.give_item2(item_vnum)
			pc.give_item2(item_vnum2)
			pc.give_item2(item_vnum3)
			pc.give_item2(27003, 200)
			pc.give_item2(27006, 200)
			pc.give_item2(72702)
			pc.give_item2(71050, 20)
			pc.give_item2(70038, 20)
			pc.give_item2(13009)
			pc.give_item2(14009)
			pc.give_item2(15009)
			pc.give_item2(16009)
			pc.give_item2(17009)
		end
	end	
end
Starterset - geht jedesmal ins Inventar beim Einloggen.
Würde es gerne nur beim ersten mal Einloggen haben :3
|_| is offline  
Reply
Page 687 of 845 « First 187587637677685686 687 688689697737787 Last »

« I need a HWID remover | [Xclusive Mt2] Alte Gesichter? »



All times are GMT +1. The time now is 15:27.

elitepvpers - play less, get more - Top

Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2025 elitepvpers All Rights Reserved.