[SERVICE] Die Questkontrolle

09/22/2010 21:33 Benhero#481
PHP Code:
quest npc_spawn begin
    state start begin
        when 30162.
use begin
            local npc1 
9003
            local npc2 
9001
            local npc3 
9012
            local npc4 
9004
            local npc5 
20016
            
            local npc6 
20087
            local npc7 
9004
            local npc8 
9010
            local npc9 
9009
            local npc10 
20011
            local npc11 
20094
            local npc12 
20349
            
            say_title
("NPC Spawner")
            
say("")
            
say("Welchen NPC willst du rufen?")
            
say("Wähle aus:")
            
local s select("Gemi","Waffenhaendler","Ruestungshaendler","Teleporter","Schmied","NPCs verschwinden lassen""Weitere""Abbrechen")
            if 
== 1 then
                mob
.spawn(npc1pc.get_local_x(), pc.get_local_y(), 0)
            elseif 
== 2 then
                mob
.spawn(npc2pc.get_local_x(), pc.get_local_y(), 0)
            elseif 
== 3 then
                mob
.spawn(npc3pc.get_local_x(), pc.get_local_y(), 0)
            elseif 
== 4 then
                mob
.spawn(npc4pc.get_local_x(), pc.get_local_y(), 0)
            elseif 
== 5 then
                mob
.spawn(npc5pc.get_local_x(), pc.get_local_y(), 0)
            elseif 
== 6 then
                kill_all_in_map
(pc.get_map_index())
            elseif 
== 7 then 
                say_title
("NPC Spawner")
                
say("")
                
say("Welchen NPC willst du rufen?")
                
say("Wähle aus:")
                
local s select(mob_name(Special Tele), mob_name(Ereignishelfer), mob_name(Item-Shop), mob_name(Fischer), mob_name(Uriel), mob_name(Steine Frau), mob_name(Stalli), "NPCs verschwinden lassen""Abbrechen")
                if 
== 1 then
                    mob
.spawn(npc6pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==2 then
                    mob
.spawn(npc7pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==3 then
                    mob
.spawn(npc8pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==4 then
                    mob
.spawn(npc9pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==5 then
                    mob
.spawn(npc10pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==6 then
                    mob
.spawn(npc11pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==7 then
                    mob
.spawn(npc12pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==8 then
                    kill_all_in_map
(pc.get_map_index())
                elseif 
s==9 then    
                end
            
elseif == 8 then  
            end
        end
    end
end 
die geht ja... wenn du Typ auf 18 umstellst..

Greatz Benhero

PHP Code:
quest durchsage begin
    state start begin
        when 30163.
use with pc.is_gm() begin
            say_title
("Willst du eine Durchsage durchführen?")
            
local s=select("Ja""Nein")
            if 
s==1 then
                say
("Text der Durchsage?")
                
local text_msg input("")
                
notice_all("###" .. text_msg ..  "###")
            elseif 
s==2 then
            
else
            
end
        end    
    end
end 
nochmal ein bischen verändert... wenn´s nu net geht. Liegt es nicht an der Quest.

Greatz Benhero
09/22/2010 21:37 lilwalk3r#482
gehen beide jetzt danke x3 bei der ersten hab ich es iwrklich vergessen.... :D danke danke danke
09/22/2010 21:39 Churon#483
habe die quest in einem anderen thread gefunden jedoch nur mit yang als bezahlung für die pferde.
mein versuch die gewünschten gegenstände einzusetzen scheiterte.
bin im questschreiben auch nicht gerade geschult wie man wohl sieht.


PHP Code:
quest pferdevk begin 
    state start begin 
        when 20349.chat
with pc.level>=10 begin 
            say_title
("Stallbursche:"
            
say(""
            
say("Moechtest du ein Pferd level 1 kaufen?"
            
say("Das kostet dich 15.000.000 Yang"
            
local s select("Ja""Nein"
        if 
== 1 then 
            horse
.set_level(1
            
pc.give_item2(50051
            
pc.changemoney(-15000000
        else 
            return 
        
end 
    end 
        when 20349.chat
with pc.level>=35 begin 
            say_title
("Stallbursche:"
            
say(""
            
say("Moechtest du ein KampfPferd kaufen?"
            
say("Das kostet dich 85 Muscheln"
            
local s select("Ja""Nein"
        if 
== 1 then 
            horse
.set_level(11
            
pc.give_item2(50052
            if 
pc.countitem("27987")=85 then
            pc
.removeitem("27987"85)
        else 
            return 
            
end 
        end 
        when 20349.chat
with pc.level>=35 begin 
            say_title
("Stallbursche:"
            
say(""
            
say("Moechtest du ein MilitärPferd kaufen?"
            
say("Das kostet dich einen Kristall"
            
local s select("Ja""Nein"
        if 
== 1 then 
            horse
.set_level(21
            
pc.give_item2(50053
            if 
pc.countitem("90003")>=1 then
            pc
.removeitem("90003"1)
        else 
            return 
            
end 
        end 
    end 
end 
hoffe auf baldige hilfe
MfG Churon
09/22/2010 23:00 ManuX.#484
horse.set_level(11)

*das geht doch nicht ? soweit ich weiß
das muss odh so aussehen?

PHP Code:
horse.set_level()
horse.set_level()
horse.set_level()
horse.set_level()
horse.set_level()
horse.set_level()
horse.set_level()
horse.set_level()
horse.set_level()
horse.set_level() 
*glaube es nur

mfg ManuX.
09/23/2010 11:43 lilwalk3r#485
Die Quest geht NICHT unten auch noch nen vpc Error

[Only registered and activated users can see links. Click Here To Register...]

PHP Code:
quest npc_spawn begin
    state start begin
        when 30162.
use begin
            local npc1 
9003
            local npc2 
9001
            local npc3 
9012
            local npc4 
9004
            local npc5 
20016
            
            local npc6 
20087
            local npc7 
9004
            local npc8 
9010
            local npc9 
9009
            local npc10 
20011
            local npc11 
20094
            local npc12 
20349
            
            say_title
("NPC Spawner")
            
say("")
            
say("Welchen NPC willst du rufen?")
            
say("Wähle aus:")
            
local s select("Gemi","Waffenhaendler","Ruestungshaendler","Teleporter","Schmied","NPCs verschwinden lassen""Weitere""Abbrechen")
            if 
== 1 then
                mob
.spawn(npc1pc.get_local_x(), pc.get_local_y(), 0)
            elseif 
== 2 then
                mob
.spawn(npc2pc.get_local_x(), pc.get_local_y(), 0)
            elseif 
== 3 then
                mob
.spawn(npc3pc.get_local_x(), pc.get_local_y(), 0)
            elseif 
== 4 then
                mob
.spawn(npc4pc.get_local_x(), pc.get_local_y(), 0)
            elseif 
== 5 then
                mob
.spawn(npc5pc.get_local_x(), pc.get_local_y(), 0)
            elseif 
== 6 then
                kill_all_in_map
(pc.get_map_index())
            elseif 
== 7 then 
                say_title
("NPC Spawner")
                
say("")
                
say("Welchen NPC willst du rufen?")
                
say("Wähle aus:")
                
local s select(mob_name(Special Tele), mob_name(Ereignishelfer), mob_name(Item-Shop), mob_name(Fischer), mob_name(Uriel), mob_name(Steine Frau), mob_name(Stalli), "NPCs verschwinden lassen""Abbrechen")
                if 
== 1 then
                    mob
.spawn(npc6pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==2 then
                    mob
.spawn(npc7pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==3 then
                    mob
.spawn(npc8pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==4 then
                    mob
.spawn(npc9pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==5 then
                    mob
.spawn(npc10pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==6 then
                    mob
.spawn(npc11pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==7 then
                    mob
.spawn(npc12pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==8 then
                    kill_all_in_map
(pc.get_map_index())
                elseif 
s==9 then    
                end
            
elseif == 8 then  
            end
        end
    end
end 
09/23/2010 13:16 Churon#486
@ManuX
an dem befehl liegts net ich poste noch mal das original das funzt 100%
das problem liegt darin das ich die gegenstände und nicht ausschließlich yang als bezahlung wollte.
trotzdem danke für den versuch :)

PHP Code:
quest pferdevk begin 
    state start begin 
        when 20349.chat
."Normales Gaul" with pc.level>=10 begin 
            say_title
("Stallbursche:"
            
say(""
            
say("Moechtest du ein Pferd level 1 kaufen?"
            
say("Das kostet dich 50.000.000 Yang"
            
local s select("Ja""Nein"
        if 
== 1 then 
            horse
.set_level(1
            
pc.give_item2(50051
            
pc.changemoney(-50000000
        else 
            return 
        
end 
    end 
        when 20349.chat
."KampfGaul" with pc.level>=35 begin 
            say_title
("Stallbursche:"
            
say(""
            
say("Moechtest du ein Pferd level 11 kaufen?"
            
say("Das kostet dich 100.000.000 Yang"
            
local s select("Ja""Nein"
        if 
== 1 then 
            horse
.set_level(11
            
pc.give_item2(50052
            
pc.changemoney(-100000000
        else 
            return 
            
end 
        end 
        when 20349.chat
."Millitärgaul" with pc.level>=35 begin 
            say_title
("Stallbursche:"
            
say(""
            
say("Moechtest du ein Pferd level 35 kaufen?"
            
say("Das kostet dich 250.000.000 Yang"
            
local s select("Ja""Nein"
        if 
== 1 then 
            horse
.set_level(21
            
pc.give_item2(50053
            
pc.changemoney(-250000000
        else 
            return 
            
end 
        end 
    end 
end 
^ so funzt sie also der befehl horse.set_level(11) is in ordnung
09/23/2010 16:55 ~shaylan~#487
hey,

mir geht es hier um den biologenbug (mit 1 oz fluchbuch usw. die ganze quest machen)
ich komm mit der if formulierung nicht ganz klar (rot markiert)
ansonsten funzt die quest (fehler liegt in dem roten bereich)



vielen dank im voraus :)

mfg ~shaylan~
09/23/2010 16:59 xIvan4ikx#488
Quote:
Originally Posted by ~shaylan~ View Post
hey,

mir geht es hier um den biologenbug (mit 1 oz fluchbuch usw. die ganze quest machen)
ich komm mit der if formulierung nicht ganz klar (rot markiert)
ansonsten funzt die quest (fehler liegt in dem roten bereich)



vielen dank im voraus :)

mfg ~shaylan~
Wo die Quest nicht funktioniert findet Benhero schon selbst raus.
Ihm würde es nur leichter sein, wenn du es in php stellst,
aber das wurde ja schon öfters genannt.

So schwer?
09/23/2010 17:21 Benhero#489
@lil
hier
PHP Code:
quest npc_spawn begin
    state start begin
        when 30162.
use begin
            local npc1 
9003
            local npc2 
9001
            local npc3 
9012
            local npc4 
9004
            local npc5 
20016
            
            local npc6 
20087
            local npc7 
9004
            local npc8 
9010
            local npc9 
9009
            local npc10 
20011
            local npc11 
20094
            local npc12 
20349
            
            say_title
("NPC Spawner")
            
say("")
            
say("Welchen NPC willst du rufen?")
            
say("Wähle aus:")
            
local s select("Gemi","Waffenhaendler","Ruestungshaendler","Teleporter","Schmied","NPCs verschwinden lassen""Weitere""Abbrechen")
            if 
== 1 then
                mob
.spawn(npc1pc.get_local_x(), pc.get_local_y(), 0)
            elseif 
== 2 then
                mob
.spawn(npc2pc.get_local_x(), pc.get_local_y(), 0)
            elseif 
== 3 then
                mob
.spawn(npc3pc.get_local_x(), pc.get_local_y(), 0)
            elseif 
== 4 then
                mob
.spawn(npc4pc.get_local_x(), pc.get_local_y(), 0)
            elseif 
== 5 then
                mob
.spawn(npc5pc.get_local_x(), pc.get_local_y(), 0)
            elseif 
== 6 then
                kill_all_in_map
(pc.get_map_index())
            elseif 
== 7 then 
                say_title
("NPC Spawner")
                
say("")
                
say("Welchen NPC willst du rufen?")
                
say("Wähle aus:")
                
local s select(mob_name(npc6), mob_name(npc7), mob_name(npc8), mob_name(npc9), mob_name(npc10), mob_name(npc11), mob_name(npc12), "NPCs verschwinden lassen""Abbrechen")
                if 
== 1 then
                    mob
.spawn(npc6pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==2 then
                    mob
.spawn(npc7pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==3 then
                    mob
.spawn(npc8pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==4 then
                    mob
.spawn(npc9pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==5 then
                    mob
.spawn(npc10pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==6 then
                    mob
.spawn(npc11pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==7 then
                    mob
.spawn(npc12pc.get_local_x(), pc.get_local_y(), 0)
                elseif 
s==8 then
                    kill_all_in_map
(pc.get_map_index())
                elseif 
s==9 then    
                end
            
elseif == 8 then  
            end
        end
    end
end 
..

Greatz Benhero
09/23/2010 19:13 lilwalk3r#490
entlich :D liebe dich x3
09/23/2010 19:33 ManuX.#491
müsste das nicht so aussehen?


PHP Code:
quest pferdevk begin 
    state start begin 
        when 20349.chat
with pc.level>=10 begin 
            say_title
("Stallbursche:"
            
say(""
            
say("Moechtest du ein Pferd level 1 kaufen?"
            
say("Das kostet dich 15.000.000 Yang"
            
local s select("Ja""Nein"
        if 
== 1 then 
            horse
.set_level() 
            
pc.give_item2(50051
            
pc.changemoney(-15000000
        else 
            return 
        
end 
    end 
        when 20349.chat
with pc.level>=35 begin 
            say_title
("Stallbursche:"
            
say(""
            
say("Moechtest du ein KampfPferd kaufen?"
            
say("Das kostet dich 85 Muscheln"
            
local s select("Ja""Nein"
        if 
== 1 then 
            horse
.set_level()
            
horse.set_level()
            
horse.set_level()
            
horse.set_level()
            
horse.set_level()
            
horse.set_level()
            
horse.set_level()
            
horse.set_level()
            
horse.set_level()
            
horse.set_level()
            
pc.give_item2(50052
            
pc.changeitem("27987")=85 then
            pc
.removeitem("27987"85)
        else 
            return 
            
end 
        end 
        when 20349.chat
with pc.level>=35 begin 
            say_title
("Stallbursche:"
            
say(""
            
say("Moechtest du ein MilitärPferd kaufen?"
            
say("Das kostet dich einen Kristall"
            
local s select("Ja""Nein"
        if 
== 1 then 
            horse
.set_level()
            
horse.set_level()
            
horse.set_level()
            
horse.set_level()
            
horse.set_level()
            
horse.set_level()
            
horse.set_level()
            
horse.set_level()
            
horse.set_level()
            
horse.set_level()
            
pc.give_item2(50053
            
pc.changeitem("90003")>=1 then
            pc
.removeitem("90003"1)
        else 
            return 
            
end 
        end 
    end 
end 
Ich bin mir nit sicher denke es nur

mfg ManuX.
09/23/2010 20:38 Churon#492
funzt leider auch nicht, trotzdem danke
09/23/2010 20:45 Benhero#493
@Churon...
Hier
PHP Code:
quest pferdevk begin 
    state start begin 
        when 20349.chat
with pc.level>=10 begin 
            say_title
("Stallbursche:"
            
say(""
            
say("Moechtest du ein Pferd level 1 kaufen?"
            
say("Das kostet dich 15.000.000 Yang"
            
local s select("Ja""Nein"
            if 
== 1 then 
                horse
.advance()
                
pc.give_item2(50051
                
pc.changemoney(-15000000
            else 
                return 
            
end
        end 
        when 20349.chat
with pc.level>=35 begin 
            say_title
("Stallbursche:"
            
say(""
            
say("Moechtest du ein KampfPferd kaufen?"
            
say("Das kostet dich 85 Muscheln"
            
local s select("Ja""Nein"
            if 
== 1 then 
                
if horse.get_level() >= 11 then
                    
--
                else
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
pc.give_item2(50052
                    if 
pc.countitem("27987")=85 then
                        pc
.removeitem2("27987"85)
                    else
                    
end
                end
            
elseif s==2 then
            end 
        end 
        when 20349.chat
with pc.level>=35 begin 
            say_title
("Stallbursche:"
            
say(""
            
say("Moechtest du ein MilitärPferd kaufen?"
            
say("Das kostet dich einen Kristall"
            
local s select("Ja""Nein"
            if 
== 1 then 
                
if horse.get_level() >= 21 then
                    
--
                else
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
horse.advance()
                    
pc.give_item2(50053
                    if 
pc.countitem("90003")>=1 then
                        pc
.removeitem2("90003"1)
                    else
                    
end
                end
            
elseif s==2 then
            end 
        end 
    end 
end 

Greatz Benhero
09/23/2010 21:40 .Alessa#494
Könnt ihr noch jemanden gebrauchen, der mithelft bei den Quests? Ich würde mich bereit erklären. Wenn ihr wollt, kann ich auch ein paar Refferenzen vorzeigen.
09/23/2010 21:58 Benhero#495
Ich glaube .. ich habe das ganz gut im griff hier ;)

Aber frag ma Therad poster..

Greatz Benhero