[SERVICE] Die Questerstellung

01/24/2014 03:19 R2Down#1036
Suche Itemshop Quest

Guten Morgen liebe Leute

Ich suche eine Quest..Und zwar brauche ich eine Quest,das wenn man aus dem IS sich jetzt z.B. ein Keiler kauft uns man bekommt die Truhe wo der Keiler drin steckt (Ohne Truhe buggen sie natürlich).So ich will jetzt das man aus dieser Truhe aber die jeweiligen Items die man sich gekauft hat auch aus der Truhe raus bekommt. z.B. ich kaufe mir den Keiler bekomme die Truhe hab ich den Keiler..Ich will diesmal den Wolf und kaufe mir den Wolf bekomme diese Truhe wieder und bekomme den Wolf raus.Hat da jemand eine passende Quest zu?Wäre wirklich nett wenn sie mir jemand geben könnte.

LG

R2Down

#edit: Das gleiche mit den Pets auch.
01/24/2014 17:22 .Namikaze#1037
Könnte mir jemand vlt eine quest schreiben brauche sie für meine farmmap möchte das man dort keine exp bekommt bzw sowie bei dem anti exp ring das dort die exp immer auf 0 ist

mfg
Naero1
01/24/2014 23:15 S4HardcorePlayer#1038
Hey

Ich bräuchte eine Starter quest (eine die für alle Charackterklassen die Gleichen items/exp/yang und das Pferd gleich auf level 21 setzt gibt) mit starterlevel 50 mit den items: Regenbogenstein und dem level 1 eq und dem Ruf siegel des Mili gauls und Windschuhe

Per PN wehre echt hilfreich:)
01/26/2014 12:17 .Soυzα#1039
Quote:
quest test begin
state start begin
when kill with pc.get_map_index() == 41 begin
if npc.is_pc() then
chan = math.random(1, 5)
if chan == 1 then
game.drop_item_with_ownership(101, 1)
end
end
end
end
end
Kann mir jemand das umstellen das man Map1&2 Blau & Rot & Gelb diese Quest Funktioniert.

Meine Index:
1,3
21,23
41,43
01/26/2014 14:32 Dembe™#1040
Hallo,

Ich brauche eine Quest die Skills ab M auf G macht also ein G Buch der die Skills auf G macht wäre total nett wenn jemand mir eins macht

lg
Mlidnight
01/26/2014 18:27 .Ambition#1041
Quote:
Originally Posted by Mlidnight View Post
Hallo,

Ich brauche eine Quest die Skills ab M auf G macht also ein G Buch der die Skills auf G macht wäre total nett wenn jemand mir eins macht

lg
Mlidnight
@ Mlidnight

PHP Code:
quest regenbogen begin
    state start begin
        when 50512.
use begin
            say_title
("Regenbogenstein:")
            
say("")
            
say("Hiermit kannst du all deine Fertigkeiten")
            
say("auf Großmeister setzen!")
            
say("")
            
say("Wähle eine Lehre aus")
            
say("")
            if 
pc.job == 0 then
                local s 
select("Körper","Mental","Abbrechen")
                if 
== 1 then
                    
--Körper
                    pc
.set_skill_group(1)
                    
pc.remove_item(505121)
                    
pc.set_skill_level(130)
                    
pc.set_skill_level(230)
                    
pc.set_skill_level(330)
                    
pc.set_skill_level(430)
                    
pc.set_skill_level(530)
                    
pc.set_skill_level(630)
                    
say_title("Regenbogenstein:")
                    
say("")
                    
say("Deine Skills sind auf Großmeister")
                    
say("")
                elseif 
== 2 then
                    
--Mentalo
                    pc
.set_skill_group(2)
                    
pc.remove_item(505121)
                    
pc.set_skill_level(1630)
                    
pc.set_skill_level(1730)
                    
pc.set_skill_level(1830)
                    
pc.set_skill_level(1930)
                    
pc.set_skill_level(2030)
                    
pc.set_skill_level(2130)
                    
say_title("Regenbogenstein:")
                    
say("")
                    
say("Deine Skills sind auf Großmeister")
                    
say("")
                
end
             
elseif pc.job ==1 then
                say
("Wähle deine Lehre aus")
                
local s select("Nahkampf","Bogen","Abbrechen")
                if 
== 1 then
                    
--Nahkampf
                    pc
.set_skill_group(3)
                    
pc.remove_item(505121)
                    
pc.set_skill_level(3130)
                    
pc.set_skill_level(3230)
                    
pc.set_skill_level(3330)
                    
pc.set_skill_level(3430)
                    
pc.set_skill_level(3530)
                    
pc.set_skill_level(3630)
                    
say_title("Regenbogenstein:")
                    
say("")
                    
say("Deine Skills sind auf Großmeister")
                    
say("")
                elseif 
== 2 then
                    
--Fernkampf
                    pc
.set_skill_group(4)
                    
pc.remove_item(505121)
                    
pc.set_skill_level(4630)
                    
pc.set_skill_level(4730)
                    
pc.set_skill_level(4830)
                    
pc.set_skill_level(4930)
                    
pc.set_skill_level(5030)
                    
pc.set_skill_level(5130)
                    
say_title("Regenbogenstein:")
                    
say("")
                    
say("Deine Skills sind auf Großmeister")
                    
say("")
                
end
            
elseif pc.job == 2 then
                say
("Wähle deine Lehre aus")
                
local s select("Magie","Waffe","Abbrechen")
                if 
== 1 then
                    
--Magie
                    pc
.set_skill_group(5)
                    
pc.remove_item(505121)
                    
pc.set_skill_level(7630)
                    
pc.set_skill_level(7730)
                    
pc.set_skill_level(7830)
                    
pc.set_skill_level(7930)
                    
pc.set_skill_level(8030)
                    
pc.set_skill_level(8130)
                    
say_title("Regenbogenstein:")
                    
say("")
                    
say("Deine Skills sind auf Großmeister")
                    
say("")
                elseif 
== 2 then
                    
--Waffe
                    pc
.set_skill_group(6)
                    
pc.remove_item(505121)
                    
pc.set_skill_level(6130)
                    
pc.set_skill_level(6230)
                    
pc.set_skill_level(6330)
                    
pc.set_skill_level(6430)
                    
pc.set_skill_level(6530)
                    
pc.set_skill_level(6630)
                    
say_title("Regenbogenstein:")
                    
say("")
                    
say("Deine Skills sind auf Großmeister")
                    
say("")
                
end
            
elseif pc.job == 3 then
                say
("Wähle deine Lehre aus")
                
local s select("Heil","Drachen","Abbrechen")
                if 
== 1 then
                    
--Heil
                    pc
.set_skill_group(7)
                    
pc.remove_item(505121)
                    
pc.set_skill_level(10630)
                    
pc.set_skill_level(10730)
                    
pc.set_skill_level(10830)
                    
pc.set_skill_level(10930)
                    
pc.set_skill_level(11030)
                    
pc.set_skill_level(11130)
                    
say_title("Regenbogenstein:")
                    
say("")
                    
say("Deine Skills sind auf Großmeister")
                    
say("")
                elseif 
== 2 then
                    
--Drachen
                    pc
.set_skill_group(8)
                    
pc.remove_item(505121)
                    
pc.set_skill_level(9130)
                    
pc.set_skill_level(9230)
                    
pc.set_skill_level(9330)
                    
pc.set_skill_level(9430)
                    
pc.set_skill_level(9530)
                    
pc.set_skill_level(9630)
                    
say_title("Regenbogenstein:")
                    
say("")
                    
say("Deine Skills sind auf Großmeister")
                    
say("")
                
end
            end 
]]
            
            
        
end
    end
end 
01/27/2014 12:45 xFliege#1042
Könnte mir jemand eine Quest schreiben, die das macht:
- Wenn über 1,9kk soll man nen Goldbarren bekommen und 500kk abgezogen bekommen
- Goldbarren nur dann benutztbar wenn der Goldstand unter 1,4kk ist
01/27/2014 13:34 al3na66#1043
i Need this quest :

when using item 1000 give you bonus
- 100 attack speed
- 50% chance to critical hit '
everything for 30 seconds
item disappears after use
be used only for ninja.

And I want a list with all codes of bonuses to use in scrpting. I think that codes are in locale_game. For exemple : APPLY_ATTBONUS_ANIMAL

I will be grateful for your help.
01/28/2014 11:43 .Namikaze#1044
Suche immer noch eine quest womit man verhindern kann das man auf einer bestimmten map exp bekommt
01/28/2014 14:20 Adnanchen#1045
könnte mir einer eine quest ab level 33 schreiben, wo man 40x Schwarzer-Ork-Riese (637) und 40x Schwarze-Orks (636) killen muss, um 5 segis und 5 switcher zu bekommen?
01/28/2014 22:31 nOa##1046
Quote:
Originally Posted by Adnanchen View Post
könnte mir einer eine quest ab level 33 schreiben, wo man 40x Schwarzer-Ork-Riese (637) und 40x Schwarze-Orks (636) killen muss, um 5 segis und 5 switcher zu bekommen?
PHP Code:
quest level33 begin
    state start begin
        when login 
or levelup with pc.get_level() >= 33 begin
            set_state
(auftrag)
        
end
    end
    state auftrag begin
        when letter begin
            send letter
("Level 33 Auftrag")
        
end
        when info 
or button begin
            say_title
("Level 33 Auftrag")
            
say("")
            
say("Sei gegrüßt Fremder!")
            
say("Ich habe einen Auftrag für dich.")
            
say("Gehe in das Orktal und hilf mir einige")
            
say("Orks zu töten!")
            
say("Würdest du mir helfen?")
            
            
local s select("Ja, gerne""Nein, danke")
            if 
== 2 then
                
return
            else
                
say("Ich danke dir gehe nun los!")
                
say("")
                
say_reward("Töte 40x Schwarzer-Ork-Riese")
                
say_reward("Töte 40x Schwarzer-Ork")
                
pc.setqf("state1")
                
pc.setqf("state2")
                
q.set_counter("Riese"40)
                
q.set_counter("Ork"40)
                
set_state(killgo)
            
end
        end
    end
    state killgo begin
        when letter begin 
            send_letter
("In das Orktal")
        
end
        when info 
or button begin 
            say_title
("In das Orktal"
            
say("Staus:"
            
say_reward("Du hast schon "..pc.getqf("state1").." von 40x Schwarzen-Ork-Riesen getötet."
            
say_reward("Du hast schon "..pc.getqf("state2").." von 40x Schwarzen-Orks getötet.")
        
end
        when 637.kill begin 
            local count1 
pc.getqf("state1") + 
            
if count1 <= 1 then 
                pc
.setqf("state1"count1
                
q.set_counter("Riese"count1
            
end 
            
if count1 == 1 then 
            set_state
(abgeschlossen
            
end 
        end 
        when 636.kill begin 
            local count1 
pc.getqf("state2") + 
            
if count2 <= 1 then 
                pc
.setqf("state2"count2
                
q.set_counter("Ork"count1
            
end 
            
if count1 == 1 then 
            set_state
(abgeschlossen
            
end 
        end 
    end
    state abgeschlossen begin
        when letter begin 
            send_letter
("Aufgabe abgeschlossen!"
        
end
        when info 
or button begin 
            say_title
("Aufgabe abgeschlossen!"
            
say("Du bist fertig!"
            
say("Ich danke dir für deine Mühen."
            
say("Du hast eine Belohnung verdient!"
            
wait() 
            
say("Hier ist deine Belohnung!")
            
say("")
            
say_reward("Du erhälst 5x Segenschriftrolle")
            
say_reward("Du erhälst 5x Gegenstand Verzaubern")
            
pc.give_item2(25040 5)
            
pc.give_item2(390285)
            
set_state(ende)
            return
        
end
    end
end 
Müsste gehen, viel Spaß

Kind Regarts
nOa/KDT
01/29/2014 00:10 Adnanchen#1047
Quote:
Originally Posted by 123Crusher123 View Post
PHP Code:
quest level33 begin
    state start begin
        when login 
or levelup with pc.get_level() >= 33 begin
            set_state
(auftrag)
        
end
    end
    state auftrag begin
        when letter begin
            send letter
("Level 33 Auftrag")
        
end
        when info 
or button begin
            say_title
("Level 33 Auftrag")
            
say("")
            
say("Sei gegrüßt Fremder!")
            
say("Ich habe einen Auftrag für dich.")
            
say("Gehe in das Orktal und hilf mir einige")
            
say("Orks zu töten!")
            
say("Würdest du mir helfen?")
            
            
local s select("Ja, gerne""Nein, danke")
            if 
== 2 then
                
return
            else
                
say("Ich danke dir gehe nun los!")
                
say("")
                
say_reward("Töte 40x Schwarzer-Ork-Riese")
                
say_reward("Töte 40x Schwarzer-Ork")
                
pc.setqf("state1")
                
pc.setqf("state2")
                
q.set_counter("Riese"40)
                
q.set_counter("Ork"40)
                
set_state(killgo)
            
end
        end
    end
    state killgo begin
        when letter begin 
            send_letter
("In das Orktal")
        
end
        when info 
or button begin 
            say_title
("In das Orktal"
            
say("Staus:"
            
say_reward("Du hast schon "..pc.getqf("state1").." von 40x Schwarzen-Ork-Riesen getötet."
            
say_reward("Du hast schon "..pc.getqf("state2").." von 40x Schwarzen-Orks getötet.")
        
end
        when 637.kill begin 
            local count1 
pc.getqf("state1") + 
            
if count1 <= 1 then 
                pc
.setqf("state1"count1
                
q.set_counter("Riese"count1
            
end 
            
if count1 == 1 then 
            set_state
(abgeschlossen
            
end 
        end 
        when 636.kill begin 
            local count1 
pc.getqf("state2") + 
            
if count2 <= 1 then 
                pc
.setqf("state2"count2
                
q.set_counter("Ork"count1
            
end 
            
if count1 == 1 then 
            set_state
(abgeschlossen
            
end 
        end 
    end
    state abgeschlossen begin
        when letter begin 
            send_letter
("Aufgabe abgeschlossen!"
        
end
        when info 
or button begin 
            say_title
("Aufgabe abgeschlossen!"
            
say("Du bist fertig!"
            
say("Ich danke dir für deine Mühen."
            
say("Du hast eine Belohnung verdient!"
            
wait() 
            
say("Hier ist deine Belohnung!")
            
say("")
            
say_reward("Du erhälst 5x Segenschriftrolle")
            
say_reward("Du erhälst 5x Gegenstand Verzaubern")
            
pc.give_item2(25040 5)
            
pc.give_item2(390285)
            
set_state(ende)
            return
        
end
    end
end 
Müsste gehen, viel Spaß

Kind Regarts
nOa/KDT


Danke vielmals für die gut Arbeit, sehr nett von dir :)
01/29/2014 14:44 nOa##1048
Quote:
Originally Posted by xFliege View Post
Könnte mir jemand eine Quest schreiben, die das macht:
- Wenn über 1,9kk soll man nen Goldbarren bekommen und 500kk abgezogen bekommen
- Goldbarren nur dann benutztbar wenn der Goldstand unter 1,4kk ist
PHP Code:
quest goldbarren begin
    state start begin
        when login 
or levelup or kill with pc.get_gold() >= 1999000000 begin
                say_title
("Zu viel Yang")
            
say("")
            
say("Du trägst zu viel Yang bei dir")
            
say("ich gebe dir deswegen einen Ring, den du später")
            
say("wieder gegen Yang eintauschen kannst!")
            
pc.give_item2(500281)   --Auch hier musst du dann das Item ändern
            pc
.change_gold(1499000000)
        
end
        when 
use.50028 begin  -- als 50028 habe ich den Goldring mit Goldgehalt 999 ausgewähltHier kannst du jedes Item nutzendu muss nur die VNUM eintragen.
            
say_title("Goldener Ring")
            
say("")
            
say("Diesen Ring kannst du gegen 500000000 Yang eintauschen!")
            
say("Stelle aber fest, dass du nicht mehr als 1400000000 Yang")
            
say("bei dir trägst.")
            
local s selcet("Ja, ich nehme das Yang""Abbrechen")
            if 
== 2 then
                
return
            elseif 
== and pc.get_gold() <= 1400000000 then
                pc
.give_gold(500000000)
        
end
    end
end 
Du kannst das Item welches 500kk geben soll jederzeit ändern. Dann musst du aber noch den Itemtyp auf 18 (für eine Quest setzten).
Wenn ein Problem auftreten sollte gib mir einfach bescheid.

Kind Regarts
nOa/KDT
01/29/2014 15:53 xFliege#1049
Quote:
Originally Posted by 123Crusher123 View Post
PHP Code:
quest goldbarren begin
    state start begin
        when login 
or levelup or kill with pc.get_gold() >= 1999000000 begin
                say_title
("Zu viel Yang")
            
say("")
            
say("Du trägst zu viel Yang bei dir")
            
say("ich gebe dir deswegen einen Ring, den du später")
            
say("wieder gegen Yang eintauschen kannst!")
            
pc.give_item2(500281)   --Auch hier musst du dann das Item ändern
            pc
.change_gold(1499000000)
        
end
        when 
use.50028 begin  -- als 50028 habe ich den Goldring mit Goldgehalt 999 ausgewähltHier kannst du jedes Item nutzendu muss nur die VNUM eintragen.
            
say_title("Goldener Ring")
            
say("")
            
say("Diesen Ring kannst du gegen 500000000 Yang eintauschen!")
            
say("Stelle aber fest, dass du nicht mehr als 1400000000 Yang")
            
say("bei dir trägst.")
            
local s selcet("Ja, ich nehme das Yang""Abbrechen")
            if 
== 2 then
                
return
            elseif 
== and pc.get_gold() <= 1400000000 then
                pc
.give_gold(500000000)
        
end
    end
end 
Du kannst das Item welches 500kk geben soll jederzeit ändern. Dann musst du aber noch den Itemtyp auf 18 (für eine Quest setzten).
Wenn ein Problem auftreten sollte gib mir einfach bescheid.

Kind Regarts
nOa/KDT
Fehlercode:
PHP Code:
when doesn't have begin-end clause. (0.50028)
Sonstiges/Yang.quest:12:Error occured on compile Sonstiges/Yang.quest 
01/30/2014 02:39 Kreshcz#1050
Hallo,
Wie ich muss einen Quest gestellt , das Item von alle Monstern zu bekommen, ist der Niveauunterschied 10?
Danke