[SERVICE] Die Questkontrolle

06/30/2012 07:38 plechito#6181
Hello, this quest has error qc in malloc(): error: allocation failed

PHP Code:
quest lo2sob_kun begin
    state start begin
        when login with pc
.level >= 1 begin
            
if horse.set_level >= and horse.set_level <= 10 begin
            set_state
(sobik)
        
end
    end

    state sobik begin
        when letter begin
            send_letter
("Možnost soba")
        
end

        when button 
or info begin
            say
("Nestačí ti jen sob?")
                  
local s=select("Kůň ""Hnědý kůň ""Černý kůň ")
                    if 
== 1 then
                    pc
.mount(20455,999)
            
set_state(konik)
                    elseif 
== 2 then
                    pc
.mount(20455,999)
            
set_state(konik)
                    elseif 
== 3 then
                    pc
.mount(20455,999)
            
set_state(konik)
        
end
      end

    state konik begin
        when letter begin
            send_letter
("Chci zpět soba")
        
end
        
        when button 
or info begin
         pc
.unmount()
         
horse.ride()
        
end
      end
    end 
Thanks!
06/30/2012 09:37 Azemi6#6182
Okay bin schon weiter gekommen mit dem GM panel allerdings wenn ich auf Rates verwalten klicke schliesst sich das ganze^^
Und noch eine kleine frage wie kann ich im User-Panel ganz unten einbaun das er den angegebenen NPC anspricht???

Gm-Panel




User-Panel

hoffentlich hilft mir mal einer -.-
06/30/2012 15:15 Ielinque#6183
Was das problem hier? Könnte es vlt an den end's liegen oder was?
Bitte hilft mir !
PHP Code:
quest give_basic_weapon begin
    state start begin
        when login begin

            
if pc.getqf("basic_weapon") == 0 then
                say_title
("Willkommen "..pc.get_name()..")
                say_reward("
Glaubst du das du der auserwählte bist?")
                say_reward("
Wenn ja dann beweise es uns werde der Beste!")
                say_reward("
Du hast ein paar items erhalten..")
                say_reward("
Laufgeschwindigkeit und so .. FTW")
                say_reward("
Heave fun Hau rein !!!")
                say("
-------------------------------------------------------------")
                say_reward("
Levele dich erstmal bis level 35 und dann")
                say_reward("
gehts richitg ab !")
                say("")
                pc.setqf("
basic_weapon", 1)
 
                if pc.job == 0 then
                    pc.give_item2(19)
                    pc.give_item2(11209)
                    pc.give_item2(12209)
                    pc.give_item2(13009)
                    pc.give_item2(14009)
                    pc.give_item2(15009)
                    pc.give_item2(16009)
                    pc.give_item2(17009)
                    pc.give_item2(72701)
                    pc.give_item2(71044, 200)
                    pc.give_item2(71045, 200)
                    pc.give_item2(72037,200 )                
                    pc.give_item2(72031,200 )                
                    pc.give_item2(72034,200 )                
                    pc.give_item2(72040,200 )                
                    pc.give_item2(70038,200 )
                    pc.give_item2(72726)
                    pc.give_item2(72730)
                    pc.give_item2(70005)
                    pc.give_item2(71015)
                    pc.give_item2(70007)
                    pc.give_item2(71107)
                    pc.give_item2(50512)
                    pc.give_item2(70036)
                    pc.give_item2(27105,200)
                    pc.give_item2(27112,200)
                    horse . set_level ( 1 ) 
                    pc.give_item2(27003,200)
                    pc.give_item2(27003,200)
                    pc.give_item2(27006,200)
                    pc.change_money(150000000)
                    pc.give_item2(70045)
                    pc . set_skill_level ( 131 , 59 )
                    pc . set_skill_level ( 137 , 59 )
                    pc . set_skill_level ( 138 , 59 )
                    pc . set_skill_level ( 139 , 59 )
                    pc . set_skill_level ( 140 , 59 ) 

                elseif pc.job == 1 then
                
                    pc.give_item2(1009)
                    pc.give_item2(11409)
                    pc.give_item2(12349)
                    pc.give_item2(13009)
                    pc.give_item2(14009)
                    pc.give_item2(15009)
                    pc.give_item2(16009)
                    pc.give_item2(17009)
                    pc.give_item2(72701)
                    pc.give_item2(71044, 200)
                    pc.give_item2(71045, 200)
                    pc.give_item2(72037,200 )                
                    pc.give_item2(72031,200 )                
                    pc.give_item2(72034,200 )                
                    pc.give_item2(72040,200 )                
                    pc.give_item2(70038,200 )    
                    pc.give_item2(72726)
                    pc.give_item2(72730)
                    pc.give_item2(70005)
                    pc.give_item2(71015)
                    pc.give_item2(70007)
                    pc.give_item2(71107)
                    pc.give_item2(50512)
                    pc.give_item2(70036)
                    pc.give_item2(27105,200)
                    pc.give_item2(27112,200)
                    horse . set_level ( 1 ) 
                    pc.give_item2(27003,200)
                    pc.give_item2(27003,200)
                    pc.give_item2(27006,200)
                    pc.change_money(150000000)
                    pc.give_item2(70045)        
                    pc . set_skill_level ( 131 , 59 )
                    pc . set_skill_level ( 137 , 59 )
                    pc . set_skill_level ( 138 , 59 )
                    pc . set_skill_level ( 139 , 59 )
                    pc . set_skill_level ( 140 , 59 ) 
                    
                elseif pc.job == 2 then
                
                    pc.give_item2(19)
                    pc.give_item2(11609)
                    pc.give_item2(12489)
                    pc.give_item2(13009)
                    pc.give_item2(14009)
                    pc.give_item2(15009)
                    pc.give_item2(16009)
                    pc.give_item2(17009)
                    pc.give_item2(72701)
                    pc.give_item2(71044, 200)
                    pc.give_item2(71045, 200)
                    pc.give_item2(72037,200 )                
                    pc.give_item2(72031,200 )                
                    pc.give_item2(72034,200 )                
                    pc.give_item2(72040,200 )                
                    pc.give_item2(70038,200 )
                    pc.give_item2(72726)
                    pc.give_item2(72730)
                    pc.give_item2(70005)
                    pc.give_item2(71015)
                    pc.give_item2(70007)
                    pc.give_item2(71107)
                    pc.give_item2(50512)
                    pc.give_item2(70036)
                    pc.give_item2(27105,200)
                    pc.give_item2(27112,200)
                    horse . set_level ( 1 ) 
                    pc.give_item2(27003,200)
                    pc.give_item2(27003,200)
                    pc.give_item2(27006,200)
                    pc.change_money(150000000)
                    pc.give_item2(70045)
                    pc . set_skill_level ( 131 , 59 )
                    pc . set_skill_level ( 137 , 59 )
                    pc . set_skill_level ( 138 , 59 )
                    pc . set_skill_level ( 139 , 59 )
                    pc . set_skill_level ( 140 , 59 ) 
                
                elseif pc.job == 3 then

                    pc.give_item2(7009)
                    pc.give_item2(11809)
                    pc.give_item2(12629)
                    pc.give_item2(13009)
                    pc.give_item2(14009)
                    pc.give_item2(15009)
                    pc.give_item2(16009)
                    pc.give_item2(17009)
                    pc.give_item2(72701)
                    pc.give_item2(71044, 200)
                    pc.give_item2(71045, 200)
                    pc.give_item2(72037,200 )                
                    pc.give_item2(72031,200 )                
                    pc.give_item2(72034,200 )                
                    pc.give_item2(72040,200 )                
                    pc.give_item2(70038,200 )
                    pc.give_item2(72726)
                    pc.give_item2(72730)
                    pc.give_item2(70005)
                    pc.give_item2(71015)
                    pc.give_item2(70007)
                    pc.give_item2(71107)
                    pc.give_item2(50512)
                    pc.give_item2(70036)
                    pc.give_item2(27105,200)
                    pc.give_item2(27112,200)
                    horse . set_level ( 1 ) 
                    pc.give_item2(27003,200)
                    pc.give_item2(27003,200)
                    pc.give_item2(27006,200)
                    pc.give_item2(27006,200)
                    pc.change_money(150000000)
                    pc.give_item2(70045)
                    pc . set_skill_level ( 131 , 59 )
                    pc . set_skill_level ( 137 , 59 )
                    pc . set_skill_level ( 138 , 59 )
                    pc . set_skill_level ( 139 , 59 )
                    pc . set_skill_level ( 140 , 59 ) 
                    pc.setqf("
basic_weapon", 1)
                    end
                end
            end
        end
    end
end 
06/30/2012 15:41 *.Creatic.*#6184
Quote:
Originally Posted by plechito View Post
Hello, this quest has error qc in malloc(): error: allocation failed

PHP Code:
quest lo2sob_kun begin
    state start begin
        when login with pc
.level >= 1 begin
            
if horse.set_level >= and horse.set_level <= 10 begin
            set_state
(sobik)
        
end
    end

    state sobik begin
        when letter begin
            send_letter
("Možnost soba")
        
end

        when button 
or info begin
            say
("Nestačí ti jen sob?")
                  
local s=select("Kůň ""Hnědý kůň ""Černý kůň ")
                    if 
== 1 then
                    pc
.mount(20455,999)
            
set_state(konik)
                    elseif 
== 2 then
                    pc
.mount(20455,999)
            
set_state(konik)
                    elseif 
== 3 then
                    pc
.mount(20455,999)
            
set_state(konik)
        
end
      end

    state konik begin
        when letter begin
            send_letter
("Chci zpět soba")
        
end
        
        when button 
or info begin
         pc
.unmount()
         
horse.ride()
        
end
      end
    end 
Thanks!


Here :

Code:
quest lo2sob_kun begin
    state start begin
        when login with pc.get_level() >= 1 begin
            if horse.set_level >= 1 and horse.set_level <= 10 then
            set_state(sobik)
			end
        end
    end

    state sobik begin
        when letter begin
            send_letter("Možnost soba")
        end

        when button or info begin
            say("Nestací ti jen sob?")
			local s=select("Kun ", "Hnedý kun ", "Cerný kun ")
			if s == 1 then
				pc.mount(20455,999)
				set_state(konik)
			elseif s == 2 then
				pc.mount(20455,999)
				set_state(konik)
			elseif s == 3 then
				pc.mount(20455,999)
				set_state(konik)
			end
		end
	end	

    state konik begin
        when letter begin
            send_letter("Chci zpet soba")
        end
        
		when button or info begin
			pc.unmount()
			horse.ride()
		end
	end
end

@TheMad

Code:
----------------------------------
--    Spezial Event Quest
--    by Zaraki      
----------------------------------
quest spezial_event begin
    state start begin
        when letter with pc.get_map_index()==200 begin
            send_letter("Spezial Event verlassen")
        end
        when button or info begin
            say_title("Spezial Event")
            say("Spezial Event verlassen?")
            local s=select("Ja", "Nein")
            if s==2 then
                send_letter("Spezial Event verlassen")
                return
            end
            local empire = pc.get_empire()
            if empire== 1 then
                pc.warp(433300, 219600)
            elseif  empire == 2 then  
                pc.warp(431500, 209200)
            elseif  empire == 3 then 
                pc.warp(439800, 211000)
            end
        end
        when 20086.chat."Das Spezial Event" begin
            say_title("Spezial Event")
            say("Hey du da, hör mal")
            say("Ein Spezial Event ist gestartet")
            say("Dort kannst du je nachdem was es ist")
            say("Bosse, Metins und andere Sachen")
            say("vorfinden, aber das steht dan im Ruf-Chat")
            say("Möchtest du teilnehmen?")
                local s = select("Teilnehmen", "Abbrechen")
                if s == 1 then
                    say_title("Spezial Event")
                    say("Du möchtest teilnehmen?")
                    say("Okay - Dann mal los.")
                    wait()
                    pc.warp(83200, 20000)
                elseif s == 2 then
                    return
                end
            end
        when 20086.chat."GM: Spezial Event" with pc.is_gm() begin
            if pc.get_name() == "Zaraki" or pc.get_name() == "[GM]Zaraki" or pc.get_name() == "[GA]Zaraki" then
                say_title("Spezial Event")
                say("Was möchtest du tun?")
                say("Such ein Event aus, für DIESE Map")
                local s = select("Bosse-Event", "Metin-Event", "Noch nix", "Beenden")
                if s == 1 then
                    mob.spawn( 1094 , 166 , 107 , 1, 1, 1)
                    mob.spawn( 1094 , 116 , 103 , 1, 1, 1)
                    mob.spawn( 1094 , 101 , 101 , 1, 1, 1)
                    mob.spawn( 1094 , 135 , 121 , 1, 1, 1)
                    mob.spawn( 1094 , 167 , 127 , 1, 1, 1)
                    mob.spawn( 1094 , 168 , 130 , 1, 1, 1)
                    mob.spawn( 1094 , 132 , 116 , 1, 1, 1)
                    mob.spawn( 1094 , 109 , 119 , 1, 1, 1)
                    mob.spawn( 1094 , 143 , 140 , 1, 1, 1)
                    mob.spawn( 1094 , 119 , 137 , 1, 1, 1)
                    mob.spawn( 1094 , 133 , 117 , 1, 1, 1)
                    mob.spawn( 1094 , 150 , 119 , 1, 1, 1)
                    mob.spawn( 1094 , 101 , 120 , 1, 1, 1)
                    server_timer("automatic1", 10*60, 113)
                    notice_all("Macht euch für das Plattmachen von Bossen berreit")
                    notice_all("Sprich mit Mira, Sie bringt dich zur Event-Map")    
                    notice_all("Du findest Mira vor dem DT")                    
                elseif s == 2 then
                    mob.spawn( 8021 , 166 , 107 , 1, 1, 1)
                    mob.spawn( 8026 , 116 , 103 , 1, 1, 1)
                    mob.spawn( 8027 , 101 , 101 , 1, 1, 1)
                    mob.spawn( 8022 , 135 , 121 , 1, 1, 1)
                    mob.spawn( 8019 , 167 , 127 , 1, 1, 1)
                    mob.spawn( 8017 , 168 , 130 , 1, 1, 1)
                    mob.spawn( 8023 , 132 , 116 , 1, 1, 1)
                    mob.spawn( 8027 , 109 , 119 , 1, 1, 1)
                    mob.spawn( 8026 , 143 , 140 , 1, 1, 1)
                    mob.spawn( 8019 , 119 , 137 , 1, 1, 1)
                    mob.spawn( 8018 , 133 , 117 , 1, 1, 1)
                    mob.spawn( 8018 , 150 , 119 , 1, 1, 1)
                    mob.spawn( 8021 , 101 , 120 , 1, 1, 1)            
                    mob.spawn( 8021 , 107 , 166 , 1, 1, 1)
                    mob.spawn( 8027 , 103 , 116 , 1, 1, 1)
                    mob.spawn( 8018 , 101 , 101 , 1, 1, 1)
                    mob.spawn( 8022 , 121 , 135 , 1, 1, 1)
                    mob.spawn( 8019 , 127 , 167 , 1, 1, 1)
                    mob.spawn( 8026 , 130 , 168 , 1, 1, 1)
                    mob.spawn( 8023 , 116 , 132 , 1, 1, 1)
                    mob.spawn( 8017 , 119 , 109 , 1, 1, 1)
                    mob.spawn( 8027 , 140 , 143 , 1, 1, 1)
                    mob.spawn( 8019 , 137 , 119 , 1, 1, 1)
                    mob.spawn( 8027 , 117 , 133 , 1, 1, 1)
                    mob.spawn( 8026 , 119 , 150 , 1, 1, 1)
                    mob.spawn( 8021 , 120 , 101 , 1, 1, 1)                                
                    server_timer("automatic1", 10*60, 113)
                    notice_all("Macht euch für einen Metin-Event berreit!")
                    notice_all("Sprich mit Mira, Sie bringt dich zur Event-Map")
                    notice_all("Du findest Mira vor dem DT")
                elseif s == 3 then
                    return
                end
                elseif s == 4 then                    
                    special_event.end_event()
                    notice_all("Das wars, wir sehen uns beim nächsten mal")
                    notice_all("Ihr werdet in eure Stadt geportet")
					warp_to_village()
                    setskin(finish)
                return
			end	
        end            
    end
end
06/30/2012 17:32 plechito#6185
Quote:
Originally Posted by *.Creatic.*
Here :

Code:
quest lo2sob_kun begin
    state start begin
        when login with pc.get_level() >= 1 begin
            if horse.set_level >= 1 and horse.set_level <= 10 then
            set_state(sobik)
			end
        end
    end

    state sobik begin
        when letter begin
            send_letter("Možnost soba")
        end

        when button or info begin
            say("Nestací ti jen sob?")
			local s=select("Kun ", "Hnedý kun ", "Cerný kun ")
			if s == 1 then
				pc.mount(20455,999)
				set_state(konik)
			elseif s == 2 then
				pc.mount(20455,999)
				set_state(konik)
			elseif s == 3 then
				pc.mount(20455,999)
				set_state(konik)
			end
		end
	end	

    state konik begin
        when letter begin
            send_letter("Chci zpet soba")
        end
        
		when button or info begin
			pc.unmount()
			horse.ride()
		end
	end
end
Thanks
06/30/2012 18:18 Azemi6#6186
Quote:
Originally Posted by Azemi6 View Post
Okay bin schon weiter gekommen mit dem GM panel allerdings wenn ich auf Rates verwalten klicke schliesst sich das ganze^^
Und noch eine kleine frage wie kann ich im User-Panel ganz unten einbaun das er den angegebenen NPC anspricht???

Gm-Panel




User-Panel

hoffentlich hilft mir mal einer -.-
Hilfe komme jetze nicht mehr weiter
................................................
07/01/2012 18:55 maximuss00#6187
will unbedingt das man den schluss erst ab 100 sieht :/ pls helft mir ist meine erste eigene kwest XD
thx
PHP Code:
quest warpring begin
    state start begin
        when 70007.
use begin
            say_title
("Warpring:")
            
say("Guten Tag")
            
say("Ich bin ein gut gebauter Joint")
            
say("Rauche mich und du wirst irgendwo anders sein")
            
local main_set select("Fixx","Niccht")
            if 
main_set == 2 then
                
return
            
end
            local sub_set 
select("Blaues Reich","Rotes Reich","Gelbes Reich","Weitere Gebiete","Abbrechen")
            if 
sub_set == 1 then
                say_title
("Warpring:")
                
say("Viel spaß im Blauen Reich!")
                
wait()
                
pc.warp(959900,268800)
            elseif 
sub_set == 2 then
                say_title
("Warpring:")
                
say("Viel spaß im Roten Reich!")
                
wait()
                
pc.warp(474200,954200)
            elseif 
sub_set == 3 then
                say_title
("Warpring:")
                
say("Viel spaß im Gelben Reich!")
                
wait()
                
pc.warp(63300,166400)
            elseif 
sub_set == 4 then
                local sub2 
select("Orktal mitte""Yongbi Wüste""Berg Sohan""Level u Farmmap 0-100""Spinnendungeon1""Andere Gebiete""Abbrechen")
                if 
sub2 == 1 then
                    say_title
("Warpring:")
                    
say("Viel Spaß im Orktal")
                    
wait()
                    
pc.warp(332700746800)
                elseif 
sub2 == 2 then
                    say_title
("Warpring:")
                    
say("Viel spaß in der Wüste!")
                    
wait()
                    
pc.warp(296600,547000)
                elseif 
sub2 == 3 then
                    say_title
("Warpring:")
                    
say("Viel spaß auf dem Berg Sohan!")
                    
wait()
                    
pc.warp(436400,215600)
                elseif 
sub2 == 4 then
                        say_title
("Warpring:")
                        
say("Viel spaß auf der Lvl u Farmmap")
                        
wait()
                        
pc.warp(599500,756300)
                elseif 
sub2 == 5 then
                        say_title
("Warpring:")
                        
say("Viel spaß im Spinendungeon1")
                        
wait()
                        
pc.warp(60000,496000)                        
                elseif 
sub2 == 6 then
                   
if level 100 then -- 100?? : ?????, ???, 
                    
local sub3 select("Dämonenturm""Lungsam""Roterwald""Land der Riesen",  "Abbrechen")
                    if 
sub3 == 5 then 
                        
return
                    
end

                    
else -- 101?? : ????, ???, ????, ????
                    
local sub3 select("Dämonenturm""Lungsam""Roterwald""Land der Riesen""High Lvl maps ab 100 ;D""Abbrechen")
                        if 
sub3 == 1 then
                        say_title
("Warpring:")
                        
say("Viel Spaß im Dämonenturm")
                        
wait()
                        
pc.warp(590800,110800)
                    elseif 
sub3 == 2 then
                        say_title
("Warpring:")
                        
say("Viel Spaß im Geisterwald")
                        
wait()
                        
pc.warp(288700,5700)
                    elseif 
sub3 == 3 then
                        say_title
("Warpring:")
                        
say("Viel Spaß im Roten Wald")
                        
wait()
                        
pc.warp(1119900,70800)
                    elseif 
sub3 == 4 then
                        say_title
("Warpring:")
                        
say("Viel Spaß im Land der Riesen")
                        
wait()
                        
pc.warp(845100,745900)
                    elseif 
sub3 == 5 then    
                        local sub4 
select("Lvl u Farmmap ab 100 ;D""Abbrechen")
                        if 
sub4 == 1 then
                            say_title
("Warpring:")
                            
say("Viel Spaß auf der high Lvl map ;D")
                            
wait()
                            
pc.warp(2643200,2694300)
                        elseif 
sub4 == 2 then
                            say
("Dann halt nicht")
                        
end
                    
elseif sub3 == 6 then
                        say
("Dann halt nicht")
                    
end                    
                
elseif sub2 == 7 then
                    say
("Dann halt nicht")
                
end
            
elseif sub_set == 5 then
                say
("Dann halt nicht")
            
end
        end
    end
end 
:handsdown:
07/01/2012 22:21 JediMax#6188
Ich möchte ab lvl 10 Jobs vergeben haut aber ned hin.

PHP Code:
quest lol begin 
    state start begin 
        when pc
.get_level() = 10 with pc.getqf("Job"0begin 
         
            say_title
("Irgend ein Typ:"
            
say("Na wie gehts du Tapferes Der Gerät :D"
            
say("OMG"
            
say("DU HAST WIRKLICH LEVEL 10 GESCHAFFT??"
            
say("Das muss aber belohnt werden"
            
say("Ich mach dir ein Angebot:) 
            say("
Warte kurz muss den doofen Zettel suchen") 
            say("
bin so blöd und hab ihn liegen lassen") 
            wait() 
            wait() 
            say("
ah hier ist er") 
            sub_set = select("
Weiter") 
            if sub_set == 1 then 
             
            say_title("
Irgend ein Typ:") 
            say("
Okay also nun hier die Jobs:") 
            say("") 
            say("
1.Job Oldie") 
            say("
Oldie brint dir 20gegen Monster.") 
            say("") 
            say("
2.Job S(Oldat)") 
            say("
(S)Oldat bringt dir 10 Halbmenschen.") 
            say("") 
            say("
3.Job Oldit") 
            say("
Oldit brint dir 7Deff gegen alle Rassen") 
            sub_set = select("
Weiter") 
            if sub_set == 1 then 
             
            say_tilte("
Irgend ein Typ:") 
            say("
Wähle deinen Beruf:) 
            
sub_set select("Oldie""S(Oldat)""Oldit"
            if 
sub_set == 1 then 
             
                affect
.add_collect(apply.ATT_BONUS_TO_MONSTER20,60*60*24*365*60
                
end 
            
else 
                if 
sub_set == 2 then 
             
                affect
.add_collect(apply.ATTBONUS_HUMAN10,60*60*24*365*60
                
end 
            
else 
                if 
sub_set == 3 then 
                 
                affect
.add_collect(apply.RESIST_ASSASSIN7,60*60*24*365*60
                
affect.add_collect(apply.RESIST_WARRIOR7,60*60*24*365*60
                
affect.add_collect(apply.RESIST_SURA7,60*60*24*365*60
                
affect.add_collect(apply.RESIST_SHAMAN10,60*60*24*365*60
                
end 
            pc
.setqf("Job"1
            
end 
        end 
    end 
end 
07/01/2012 22:29 -Ryuu#6189
Ich habe ein Problem mit der Mob_drob in filezilla.
Da das auch sozusagen eine quest ist, denke ich dass ichs hier reinschreiben kann.
Wenn nicht, dann sorry :3


Alle Bosse und Metins droppen GAR NICHTS mehr.
Nachdem ich alles angepasst hatte, ging alles. dann habe ich Server noch öfters rebootet und dann droppten die metins usw gar ncihts mehr. Waruuuuum? :D ich finde den fehler ned.
Datei hat "777" Rechte!
07/01/2012 22:52 losser123456789#6190
Wo ist der Fhelr und wie kann man das machen das die miobs im chat gezählt erten wäre echt cool danke schon mal für eure hilfe
Quote:
quest ebene1 begin
state start begin
when kill with npc.get_race() == 30166 and pc.get_map_index() == 129 begin
pc.setqf("wolf", pc.getqf("wolf")+1)
if pc.getqf("wolf") == 80 then
say_title("Die 80 Kinder der Untweterwelt")
say("Euch ist es tatsächlich gelungen!")
say("Die 80 Kinder der Unterwelt zu vertrieben!")
say("Respekt aber ihr habt es noch nicht geschafft")
say("Die Kinder hinterlassen euch eine wertvolle Truhe")
say_reward("Ihr erhaltet Die Truhe der Kinder der Untweterwelt")
say_reward("Ihr werdet nun zu den Schneemännern der Unterweltglangen")
say_reward("Viel Erfolg!")
notice_all("Die Gruppe von ".. pc.get_name() .." hat die 80 Kinder der Untweterwelt!")
pc.give_item2("50114")
pc.warp(1515000,1510000)
end
end
end
end
07/01/2012 23:26 callmax#6191
PHP Code:
quest phoenix begin
    state start begin
        when 71131.
use with pc.getqf("icephoenix") == 0 begin
            
if pc.getqf("phoenix_fly") == 0 then
                local old_horse_name 
horse.get_name() ;
                    if 
string.len(old_horse_name) == 0 then
                        say_title
("Jungphönixsiegel")
                        
say("Dein Jungphönix hat noch keinen Namen. Du")
                        
say("kannst ihn erst benutzten sobald du ihn getauft")
                        
say("hast, besorg dir das dafür zuständige Item !")
                        return
                    
end
                chat
("Dein Jungphönix ist erschienen")
                
local your_horse_level horse.get_level()
                
pc.setqf("horse_level_save"your_horse_level)
                
pc.setqf("phoenix_fly"1)
                
pc.setqf("firephoenix"1)
                
affect.add_collect(apply.ATT_BONUS_TO_MONSTER2060*60*8)
                
affect.add_collect(apply.MAX_HP300060*60*8)
                
horse.set_level("22")
                
horse.unsummon() horse.summon()
            else
                
chat("Der Jungphönix hat dich verlassen")
                
affect.remove_collect(apply.ATT_BONUS_TO_MONSTER2060*60*8)   
                
affect.remove_collect(apply.MAX_HP300060*60*8)                   
                
horse.unsummon()
                
pc.setqf("phoenix_fly"0)
                
pc.setqf("firephoenix"0)
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            
            
end
        end
        when logout 
or login with pc.getqf("phoenix_fly") == 1 begin
            affect
.remove_collect(apply.ATT_BONUS_TO_MONSTER2060*60*8)   
            
affect.remove_collect(apply.MAX_HP300060*60*8)
            
            
pc.setqf("phoenix_fly"0)
            
pc.setqf("firephoenix"0)
                
            
local horse_settings pc.getqf("horse_level_save")
            
horse.set_level(horse_settings)
            
            
chat("Dein Jungephönix ist geflohen!")
            
affect.remove_collect(apply.ATT_BONUS_TO_MONSTER2060*60*8)   
            
affect.remove_collect(apply.MAX_HP300060*60*8)  
        
end
        when 30255.
use with pc.getqf("firephoenix") == 0 begin
            
if pc.getqf("phoenix_2_fly") == 0 then
                local old_horse_name 
horse.get_name() ;
                    if 
string.len(old_horse_name) == 0 then
                        say_title
("Drachenphönixsiegel")
                        
say("Dein Drachenphönix hat noch keinen Namen. Du")
                        
say("kannst ihn erst benutzten sobald du ihn getauft")
                        
say("hast, besorg dir das dafür zuständige Item !")
                        return
                    
end
                chat
("Dein mächtiger Begleiter, der Drachenphönix wurde gerufen!")
                
local your_horse_level horse.get_level()
                
pc.setqf("horse_level_save"your_horse_level)
                
pc.setqf("phoenix_2_fly"1)
                
pc.setqf("icephoenix"1)
                
affect.add_collect(apply.ATT_BONUS_TO_MONSTER4060*60*8)
                
affect.add_collect(apply.MAX_HP600060*60*8)                   
                
affect.add_collect(apply.ATT_BONUS_TO_HUMAN1560*60*8)
                
horse.set_level("23")
                
horse.unsummon() horse.summon()
            else
                
chat("Dein Drachenphönix verabschiedet sich nun von dir!")
                
affect.remove_collect(apply.ATT_BONUS_TO_MONSTER4060*60*8)        
                
affect.remove_collect(apply.MAX_HP600060*60*8)
                
affect.remove_collect(apply.ATT_BONUS_TO_HUMAN1560*60*8)
                
horse.unsummon()
                
pc.setqf("phoenix_2_fly"0)
                
pc.setqf("icephoenix"0)
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            
            
end
        end
        when logout 
or login with pc.getqf("phoenix_2_fly") == 1 begin
            affect
.remove_collect(apply.ATT_BONUS_TO_MONSTER4060*60*8)
            
affect.remove_collect(apply.MAX_HP600060*60*8)
            
affect.remove_collect(apply.ATT_BONUS_TO_HUMAN1560*60*8)
            
            
pc.setqf("phoenix_2_fly"0)
            
pc.setqf("icephoenix"0)
                
            
local horse_settings pc.getqf("horse_level_save")
            
horse.set_level(horse_settings)
            
            
chat("Dein Drachenphönix verlässt dich nun!")
            
affect.remove_collect(apply.ATT_BONUS_TO_MONSTER4060*60*8)
            
affect.remove_collect(apply.MAX_HP600060*60*8)
            
affect.remove_collect(apply.ATT_BONUS_TO_HUMAN1560*60*8)
        
end
    end
end 
Also, die Quest funktioniert tadelos, NUR bringt keiner der Phönixe stark gegen Monster O.o.

Hoffe auf hilfreiche Hilfen xD

MfG,
callmax
07/02/2012 07:37 CZMadman#6192
Hi can somebody help me write function to warp one empire to village

for example:

warp_empire(1,100) // warp red players which are on map index 100 to village

is possible write this ? Thx
07/02/2012 10:21 maximuss00#6193
bitte helfen danke keine ahnung was schiedf gegangen ist dieser error :
syntax error : [string start]:93: énd´expected (to close ´if´ at line 53) near
elseif
????????
PHP Code:
quest warpring begin
    state start begin
        when 70007.
use begin
            say_title
("Warpring:")
            
say("Guten Tag")
            
say("Ich bin ein gut gebauter Joint")
            
say("Rauche mich und du wirst irgendwo anders sein")
            
local main_set select("Fixx","Niccht")
            if 
main_set == 2 then
                
return
            
end
            local sub_set 
select("Blaues Reich","Rotes Reich","Gelbes Reich","Weitere Gebiete","Abbrechen")
            if 
sub_set == 1 then
                say_title
("Warpring:")
                
say("Viel spaß im Blauen Reich!")
                
wait()
                
pc.warp(959900,268800)
            elseif 
sub_set == 2 then
                say_title
("Warpring:")
                
say("Viel spaß im Roten Reich!")
                
wait()
                
pc.warp(474200,954200)
            elseif 
sub_set == 3 then
                say_title
("Warpring:")
                
say("Viel spaß im Gelben Reich!")
                
wait()
                
pc.warp(63300,166400)
            elseif 
sub_set == 4 then
                local sub2 
select("Orktal mitte""Yongbi Wüste""Berg Sohan""Level u Farmmap 0-100""Spinnendungeon1""Andere Gebiete""Abbrechen")
                if 
sub2 == 1 then
                    say_title
("Warpring:")
                    
say("Viel Spaß im Orktal")
                    
wait()
                    
pc.warp(332700746800)
                elseif 
sub2 == 2 then
                    say_title
("Warpring:")
                    
say("Viel spaß in der Wüste!")
                    
wait()
                    
pc.warp(296600,547000)
                elseif 
sub2 == 3 then
                    say_title
("Warpring:")
                    
say("Viel spaß auf dem Berg Sohan!")
                    
wait()
                    
pc.warp(436400,215600)
                elseif 
sub2 == 4 then
                        say_title
("Warpring:")
                        
say("Viel spaß auf der Lvl u Farmmap")
                        
wait()
                        
pc.warp(599500,756300)
                elseif 
sub2 == 5 then
                        say_title
("Warpring:")
                        
say("Viel spaß im Spinendungeon1")
                        
wait()
                        
pc.warp(60000,496000)                        
                elseif 
sub2 == 6 then
                   
if level 100 then -- 100?? : ?????, ???, 
                    
local sub3 select("Dämonenturm""Lungsam""Roterwald""Land der Riesen",  "Abbrechen")
                    if 
sub3 == 5 then 
                        
return
                    
end

                    
else -- 101?? : ????, ???, ????, ????
                    
local sub3 select("Dämonenturm""Lungsam""Roterwald""Land der Riesen""High Lvl maps ab 100 ;D""Abbrechen")
                        if 
sub3 == 1 then
                        say_title
("Warpring:")
                        
say("Viel Spaß im Dämonenturm")
                        
wait()
                        
pc.warp(590800,110800)
                    elseif 
sub3 == 2 then
                        say_title
("Warpring:")
                        
say("Viel Spaß im Geisterwald")
                        
wait()
                        
pc.warp(288700,5700)
                    elseif 
sub3 == 3 then
                        say_title
("Warpring:")
                        
say("Viel Spaß im Roten Wald")
                        
wait()
                        
pc.warp(1119900,70800)
                    elseif 
sub3 == 4 then
                        say_title
("Warpring:")
                        
say("Viel Spaß im Land der Riesen")
                        
wait()
                        
pc.warp(845100,745900)
                    elseif 
sub3 == 5 then    
                        local sub4 
select("Lvl u Farmmap ab 100 ;D""Abbrechen")
                        if 
sub4 == 1 then
                            say_title
("Warpring:")
                            
say("Viel Spaß auf der high Lvl map ;D")
                            
wait()
                            
pc.warp(2643200,2694300)
                        elseif 
sub4 == 2 then
                            say
("Dann halt nicht")
                        
end
                    
elseif sub3 == 6 then
                        say
("Dann halt nicht")
                    
end                    
                
elseif sub2 == 7 then
                    say
("Dann halt nicht")
                
end
            
elseif sub_set == 5 then
                say
("Dann halt nicht")
            
end
        end
    end
end 
07/02/2012 14:05 [SA]Sibba / Christian#6194
@ JediMax, also wie ich sehe, soll einfach der Text erscheinen, doch ich würde es übe reinen npc laufen lassen also :

PHP Code:
quest lol begin  
    state start begin  
        when NPCVNUM
.chat."Berufe" with pc.get_level()  = 10 and pc.getqf("Job") == 0 begin  
          
            say_title
("Irgend ein Typ:")  
            
say("Na wie gehts du Tapferes Der Gerät :D")  
            
say("OMG")  
            
say("DU HAST WIRKLICH LEVEL 10 GESCHAFFT??")  
            
say("Das muss aber belohnt werden")  
            
say("Ich mach dir ein Angebot:)  
            say("
Warte kurz muss den doofen Zettel suchen")  
            say("
bin so blöd und hab ihn liegen lassen")  
            wait()  
            wait()  
            say("
ah hier ist er")  
            sub_set = select("
Weiter")  
            if sub_set == 1 then  
              
            say_title("
Irgend ein Typ:")  
            say("
Okay also nun hier die Jobs:")  
            say("")  
            say("
1.Job Oldie")  
            say("
Oldie brint dir 20gegen Monster.")  
            say("")  
            say("
2.Job S(Oldat)")  
            say("
(S)Oldat bringt dir 10 Halbmenschen.")  
            say("")  
            say("
3.Job Oldit")  
            say("
Oldit brint dir 7Deff gegen alle Rassen")  
            sub_set = select("
Weiter")  
            if sub_set == 1 then  
              
            say_tilte("
Irgend ein Typ:")  
            say("
Wähle deinen Beruf:)  
            
sub_set select("Oldie""S(Oldat)""Oldit")  
            if 
sub_set == 1 then  
              
                affect
.add_collect(apply.ATT_BONUS_TO_MONSTER20,60*60*24*365*60)  
                
end  
            
else  
                if 
sub_set == 2 then  
              
                affect
.add_collect(apply.ATTBONUS_HUMAN10,60*60*24*365*60)  
                
end  
            
else  
                if 
sub_set == 3 then  
                  
                affect
.add_collect(apply.RESIST_ASSASSIN7,60*60*24*365*60)  
                
affect.add_collect(apply.RESIST_WARRIOR7,60*60*24*365*60)  
                
affect.add_collect(apply.RESIST_SURA7,60*60*24*365*60)  
                
affect.add_collect(apply.RESIST_SHAMAN10,60*60*24*365*60)  
                
end  
            pc
.setqf("Job"1)  
            
end  
        end  
    end  
end 
07/02/2012 15:31 callmax#6195
Quote:
Originally Posted by Superior007 View Post
PHP Code:
quest phoenix begin
    state start begin
        when 71131.
use with pc.getqf("icephoenix") == 0 begin
            
if pc.getqf("phoenix_fly") == 0 then
                local old_horse_name 
horse.get_name() ;
                    if 
string.len(old_horse_name) == 0 then
                        say_title
("Jungphönixsiegel")
                        
say("Dein Jungphönix hat noch keinen Namen. Du")
                        
say("kannst ihn erst benutzten sobald du ihn getauft")
                        
say("hast, besorg dir das dafür zuständige Item !")
                        return
                    
end
                chat
("Dein Jungphönix ist erschienen")
                
local your_horse_level horse.get_level()
                
pc.setqf("horse_level_save"your_horse_level)
                
pc.setqf("phoenix_fly"1)
                
pc.setqf("firephoenix"1)
                
affect.add_collect(apply.ATT_BONUS_TO_MONSTER2060*60*8)
                
affect.add_collect(apply.MAX_HP300060*60*8)
                
horse.set_level("22")
                
horse.unsummon() horse.summon()
            else
                
chat("Der Jungphönix hat dich verlassen")
                
affect.remove_collect(apply.ATT_BONUS_TO_MONSTER2060*60*8)   
                
affect.remove_collect(apply.MAX_HP300060*60*8)                   
                
horse.unsummon()
                
pc.setqf("phoenix_fly"0)
                
pc.setqf("firephoenix"0)
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            
            
end
        end
        when logout 
or login with pc.getqf("phoenix_fly") == 1 begin
            affect
.remove_collect(apply.ATT_BONUS_TO_MONSTER2060*60*8)   
            
affect.remove_collect(apply.MAX_HP300060*60*8)
            
            
pc.setqf("phoenix_fly"0)
            
pc.setqf("firephoenix"0)
                
            
local horse_settings pc.getqf("horse_level_save")
            
horse.set_level(horse_settings)
            
            
chat("Dein Jungephönix ist geflohen!")
            
affect.remove_collect(apply.ATT_BONUS_TO_MONSTER2060*60*8)   
            
affect.remove_collect(apply.MAX_HP300060*60*8)  
        
end
        when 30255.
use with pc.getqf("firephoenix") == 0 begin
            
if pc.getqf("phoenix_2_fly") == 0 then
                local old_horse_name 
horse.get_name() ;
                    if 
string.len(old_horse_name) == 0 then
                        say_title
("Drachenphönixsiegel")
                        
say("Dein Drachenphönix hat noch keinen Namen. Du")
                        
say("kannst ihn erst benutzten sobald du ihn getauft")
                        
say("hast, besorg dir das dafür zuständige Item !")
                        return
                    
end
                chat
("Dein mächtiger Begleiter, der Drachenphönix wurde gerufen!")
                
local your_horse_level horse.get_level()
                
pc.setqf("horse_level_save"your_horse_level)
                
pc.setqf("phoenix_2_fly"1)
                
pc.setqf("icephoenix"1)
                
affect.add_collect(apply.ATT_BONUS_TO_MONSTER4060*60*8)
                
affect.add_collect(apply.MAX_HP600060*60*8)                   
                
affect.add_collect(apply.ATT_BONUS_TO_HUMAN1560*60*8)
                
horse.set_level("23")
                
horse.unsummon() horse.summon()
            else
                
chat("Dein Drachenphönix verabschiedet sich nun von dir!")
                
affect.remove_collect(apply.ATT_BONUS_TO_MONSTER4060*60*8)        
                
affect.remove_collect(apply.MAX_HP600060*60*8)
                
affect.remove_collect(apply.ATT_BONUS_TO_HUMAN1560*60*8)
                
horse.unsummon()
                
pc.setqf("phoenix_2_fly"0)
                
pc.setqf("icephoenix"0)
                
                
local horse_settings pc.getqf("horse_level_save")
                
horse.set_level(horse_settings)
            
            
end
        end
        when logout 
or login with pc.getqf("phoenix_2_fly") == 1 begin
            affect
.remove_collect(apply.ATT_BONUS_TO_MONSTER4060*60*8)
            
affect.remove_collect(apply.MAX_HP600060*60*8)
            
affect.remove_collect(apply.ATT_BONUS_TO_HUMAN1560*60*8)
            
            
pc.setqf("phoenix_2_fly"0)
            
pc.setqf("icephoenix"0)
                
            
local horse_settings pc.getqf("horse_level_save")
            
horse.set_level(horse_settings)
            
            
chat("Dein Drachenphönix verlässt dich nun!")
            
affect.remove_collect(apply.ATT_BONUS_TO_MONSTER4060*60*8)
            
affect.remove_collect(apply.MAX_HP600060*60*8)
            
affect.remove_collect(apply.ATT_BONUS_TO_HUMAN1560*60*8)
        
end
    end
end 
Also, die Quest funktioniert tadelos, NUR bringt keiner der Phönixe stark gegen Monster O.o.

Hoffe auf hilfreiche Hilfen xD

MfG,
callmax
Push WICHTIG !