[SERVICE] Die Questkontrolle

04/28/2012 14:27 Kriegergeist^^#5641
Danke Kingnyze3 das du mir hilfst, aber ich habe gerade keine anhung wie ich das ein bauen soll, könntest du das vieleicht für mich machen?
Wär echt nett von dir ;)

MfG
Kriegergeist^^
04/28/2012 16:20 xN0SkiLL#5642
Wollte gerade mal die Berufs Quest von Luky Strike ausführen habe sie noch etwas um geschrieben.

Fehler Bild:

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

Quest:
04/28/2012 16:52 ROXH#5643
Irgendwie ist hier ein Fehler nur ich übersehe ihn wohl.
PHP Code:
quest rustungen begin
    state start begin
        when login with pc
.level >= 65 begin
            set_state
(information)
        
end
    end

    state information begin
        when letter begin
            send_letter
("Sensenmann")
        
end

        when info 
or button begin
            say
("Sensenmann")
            
say("Toete den Sensenmann,")
            
say("Du wirst reichlich belohnt!")
            
say_reward("Du erhältst was Seltenes von Mir.")
            
say("")
            
pc.setqf("state"1)
            
q.set_counter("Sensenmann"1)
        
end

        when 1093.kill begin
            local count 
pc.getqf("state") - 1
            
if count <= 1 then
                pc
.setqf("state"count)
                
q.set_counter("Sensenmann"count)
            
end
            
if count == 0 then
                say_title
("Sensenmann")
                
say("Du erhaeltst eine 61er Ruestung +9,")
                
say("Je nach Rasse.")
                if 
pc job == 0 then
                pc
.give_item2(112891)
                if 
pc job == 1 then
                pc
.give_item2(114891)
                if 
pc job == 2 then
                pc
.give_item2(116891)
                if 
pc job == 3 then
                pc
.give_item2(118891)
                
pc.change_money(1)
                
pc.give_exp2(1)
                
clear_letter()
                
set_state(__COMPLETE__)

            
end
        end
    end

    state __COMPLETE__ begin
    end
end 
04/28/2012 17:49 Computercrack#5644
Folgende Syserr:
Quote:
SYSERR: Apr 28 15:54:47 :: dungeon_set_flag: no dungeon !!!
04/28/2012 19:14 Retrograd#5645
@[R]a[IN]e[R]

versuch es mal so
PHP Code:
quest rustungen begin
    state start begin
        when login with pc
.level >= 65 begin
            set_state
(information)
        
end
    end

    state information begin
        when letter begin
            send_letter
("Sensenmann")
        
end

        when info 
or button begin
            say
("Sensenmann")
            
say("Toete den Sensenmann,")
            
say("Du wirst reichlich belohnt!")
            
say_reward("Du erhältst was Seltenes von Mir.")
            
say("")
            
pc.setqf("state"1)
            
q.set_counter("Sensenmann"1)
        
end

        when 1093.kill begin
            local count 
pc.getqf("state") - 1
            
if count <= 1 then
                pc
.setqf("state"count)
                
q.set_counter("Sensenmann"count)
            
end
            
if count == 0 then
                say_title
("Sensenmann")
                
say("Du erhaeltst eine 61er Ruestung +9,")
                
say("Je nach Rasse.")
                if 
pc job == 0 then
                pc
.give_item2(112891)
                elseif 
pc job == 1 then
                pc
.give_item2(114891)
                elseif 
pc job == 2 then
                pc
.give_item2(116891)
                elseif 
pc job == 3 then
                pc
.give_item2(118891)
                
pc.change_money(1)
                
pc.give_exp2(1)
                
clear_letter()
                
set_state(__COMPLETE__)

            
end
        end
    end

    state __COMPLETE__ begin
    end
end 
04/28/2012 19:20 ROXH#5646
Quote:
Originally Posted by Retrograd View Post
@[R]a[IN]e[R]

versuch es mal so
Funksoniert damit auch nicht :(

_______________________________

Irgendwie ist hier ein Fehler nur ich übersehe ihn wohl.
PHP Code:
quest rustungen begin
    state start begin
        when login with pc
.level >= 65 begin
            set_state
(information)
        
end
    end

    state information begin
        when letter begin
            send_letter
("Sensenmann")
        
end

        when info 
or button begin
            say
("Sensenmann")
            
say("Toete den Sensenmann,")
            
say("Du wirst reichlich belohnt!")
            
say_reward("Du erhältst was Seltenes von Mir.")
            
say("")
            
pc.setqf("state"1)
            
q.set_counter("Sensenmann"1)
        
end

        when 1093.kill begin
            local count 
pc.getqf("state") - 1
            
if count <= 1 then
                pc
.setqf("state"count)
                
q.set_counter("Sensenmann"count)
            
end
            
if count == 0 then
                say_title
("Sensenmann")
                
say("Du erhaeltst eine 61er Ruestung +9,")
                
say("Je nach Rasse.")
                if 
pc job == 0 then
                pc
.give_item2(112891)
                if 
pc job == 1 then
                pc
.give_item2(114891)
                if 
pc job == 2 then
                pc
.give_item2(116891)
                if 
pc job == 3 then
                pc
.give_item2(118891)
                
pc.change_money(1)
                
pc.give_exp2(1)
                
clear_letter()
                
set_state(__COMPLETE__)

            
end
        end
    end

    state __COMPLETE__ begin
    end
end 
04/28/2012 22:44 Kingnyze3#5647
es wäre toll wenn man wenichstens den error code von euch hätte^^
04/28/2012 23:16 .Spop™#5648
Rainer du kannst keine Sensi quest machen weil der Sensi schon in einer Quest vorhanden ist in der DT quest Ich hoffe ich konnte dir Helfen ;)
04/29/2012 01:53 .Shiraka™#5649
Quote:
Originally Posted by Kingnyze3 View Post
da
zuflucht.quest:18 error occured on compile zuflucht.quest
04/29/2012 11:42 fumadu#5650
HELP ME Bitte ich brauche hilfe :P


Meine quest:

Quote:
quest ingamebann2 begin
state start begin
when 70045.use with pc.is_gm() begin
say("Was möchtest du tun?")
local s = select('Bannen','Entbannen',"Nichts")
if s == 3 then return end
local ban,bantxt,bantxt2 = "BLOCK","bannen","gebannt"
if s == 2 then
ban,bantxt,bantxt2 = "OK","entbannen","entbannt"
end
say(col.blue('Spieler '..bantxt)); say('[ENTER]Gib den Spielernamen ein.[ENTER](ein Teil reicht auch)')
local inp = input(); inp = mysql_escape(inp)
if inp == "" or inp == pc.get_name() then
say(col.red('Ungültige Eingabe.[ENTER]Abbruch!'))
return
end
local q = mysql_query('select * from player.player WHERE name LIKE \\"%'..inp..'%\\" AND name NOT like "%[%\\"','root','Ming1995',nil,'5.4.22.62')
if q == "ERROR" then
say(col.red('Fehler beim Lesen der Daten oder es existiert niemand mit diesem Namen.'))
return
end
say('Wähle den User, der '..bantxt2..' werden soll:')
local wahl = q.name; table.insert(wahl,"-Abbruch-")
table.insert(wahl,1,6) -- 6 ist die Anzahl der Maximalen User auf einer Seite.
local auswahl = select2(wahl)
if wahl[auswahl] == "-Abbruch-" then return end
say('Den Spieler \\"'..q.name[auswahl]..'\\" wirklich '..bantxt..'?')
if select("Ja","Nein") == 2 then return end
mysql_query('UPDATE account.account SET status = "'..ban..'\\" WHERE id = '..q.account_id[auswahl]..' LIMIT 1','root','Ming1995','5.4.22.62')
say('Der Spieler wurde gebannt.')
end
end
end
04/29/2012 12:00 xN0SkiLL#5651
Quote:
Originally Posted by xN0SkiLL View Post
Quest:
Habs nun doch hin bekommen, nur möchte ich das ein Pfeil über dem NPC ist wenn man Level 15 erreicht hat.
04/29/2012 12:17 ROXH#5652
Soll zum telportieren sein habe aber irgend etwas vergessen :/
PHP Code:
quest tele begin  
    state start begin  
        when 693.chat
."Farm Map ab Lv. 15" begin 
            
if pc.get_level() < 15 then 
                say
("Du bist noch nicht Level 15. Kommt erst"
                
say("wenn du 15 bist."
            else 
            
say("Du möchtest also in die Farm Map?"
            
local a select("Ja, Los!""Nein, noch nicht")  
            if 
== 1 then 
                pc
.warp(972800,102400)  
            elseif 
== 2 then 
                
return 
            
end 
        end  
        when 693.chat
."Level Map ab Lv. 75" begin 
            
if pc.get_level() < 75 then 
                say
("Du bist noch nicht Level 75. Komme erst"
                
say("wenn du 75 bist."
            else 
            
say("Hallo grosser Spieler!")  
            
say("Dich wird grosses erwarten auf dieser Map")  
            
say("unglaubliche starke Monster versuchen dich zu besiegen")  
            
say("Werden sie es schaffen?")  
            
say("Geh Los und besiege sie!")  
            
local b select("Ja, hier""Nein, noch nicht"
            if 
== 1 then 
                pc
.warp(563200,435200)  
            elseif 
== 2 then 
                
return 
            
end 
        end  
        when 693.chat
."Level Map ab. 90" begin 
            
if pc.get_level() >= 90 
                say
("Du bist noch nicht Level 90. Komme"
                
say("erst, wennn du 90 bist."
            else 
            
say("Hallo grosser Spieler!")  
            
say("Dich wird grosses erwarten auf dieser Map")  
            
say("unglaubliche starke Monster versuchen dich zu besiegen")  
            
say("Werden sie es schaffen?")  
            
say("Geh Los und besiege sie!"
            
local c select("Ja, hier""Nein, noch nicht"
            if 
== 1 then 
                pc
.warp(819200,844800
            elseif 
== 2 then 
                
return 
            
end  
        end  
    end  
end 
also man kann den npc nicht anklicken :o
04/29/2012 13:39 fumadu#5653
Hilfe miene quest
Quote:
quest ingamebann2 begin
state start begin
when 70045.use with pc.is_gm() begin
say("Was möchtest du tun?")
local s = select('Bannen','Entbannen',"Nichts")
if s == 3 then return end
local ban,bantxt,bantxt2 = "BLOCK","bannen","gebannt"
if s == 2 then
ban,bantxt,bantxt2 = "OK","entbannen","entbannt"
end
say(col.blue('Spieler '..bantxt)); say('[ENTER]Gib den Spielernamen ein.[ENTER](ein Teil reicht auch)')
local inp = input(); inp = mysql_escape(inp)
if inp == "" or inp == pc.get_name() then
say(col.red('Ungültige Eingabe.[ENTER]Abbruch!'))
return
end
local q = mysql_query('select * from player.player WHERE name LIKE \\"%'..inp..'%\\" AND name NOT like "%[%\\"','root','Ming1995',nil,'5.4.22.62')
if q == "ERROR" then
say(col.red('Fehler beim Lesen der Daten oder es existiert niemand mit diesem Namen.'))
return
end
say('Wähle den User, der '..bantxt2..' werden soll:')
local wahl = q.name; table.insert(wahl,"-Abbruch-")
table.insert(wahl,1,6) -- 6 ist die Anzahl der Maximalen User auf einer Seite.
local auswahl = select2(wahl)
if wahl[auswahl] == "-Abbruch-" then return end
say('Den Spieler \\"'..q.name[auswahl]..'\\" wirklich '..bantxt..'?')
if select("Ja","Nein") == 2 then return end
mysql_query('UPDATE account.account SET status = "'..ban..'\\" WHERE id = '..q.account_id[auswahl]..' LIMIT 1','root','Ming1995','5.4.22.62')
say('Der Spieler wurde gebannt.')
end
end
end



BILD UNTEN IM ANHANG
04/29/2012 13:46 DasKuchen#5654
Quote:
Originally Posted by [R]a[IN]e[R] View Post
Soll zum telportieren sein habe aber irgend etwas vergessen :/
PHP Code:
quest tele begin  
    state start begin  
        when 693.chat
."Farm Map ab Lv. 15" begin 
            
if pc.get_level() < 15 then 
                say
("Du bist noch nicht Level 15. Kommt erst"
                
say("wenn du 15 bist."
            else 
            
say("Du möchtest also in die Farm Map?"
            
local a select("Ja, Los!""Nein, noch nicht")  
            if 
== 1 then 
                pc
.warp(972800,102400)  
            elseif 
== 2 then 
                
return 
            
end 
        end  
        when 693.chat
."Level Map ab Lv. 75" begin 
            
if pc.get_level() < 75 then 
                say
("Du bist noch nicht Level 75. Komme erst"
                
say("wenn du 75 bist."
            else 
            
say("Hallo grosser Spieler!")  
            
say("Dich wird grosses erwarten auf dieser Map")  
            
say("unglaubliche starke Monster versuchen dich zu besiegen")  
            
say("Werden sie es schaffen?")  
            
say("Geh Los und besiege sie!")  
            
local b select("Ja, hier""Nein, noch nicht"
            if 
== 1 then 
                pc
.warp(563200,435200)  
            elseif 
== 2 then 
                
return 
            
end 
        end  
        when 693.chat
."Level Map ab. 90" begin 
            
if pc.get_level() >= 90 
                say
("Du bist noch nicht Level 90. Komme"
                
say("erst, wennn du 90 bist."
            else 
            
say("Hallo grosser Spieler!")  
            
say("Dich wird grosses erwarten auf dieser Map")  
            
say("unglaubliche starke Monster versuchen dich zu besiegen")  
            
say("Werden sie es schaffen?")  
            
say("Geh Los und besiege sie!"
            
local c select("Ja, hier""Nein, noch nicht"
            if 
== 1 then 
                pc
.warp(819200,844800
            elseif 
== 2 then 
                
return 
            
end  
        end  
    end  
end 
also man kann den npc nicht anklicken :o
Probier es mal so:
PHP Code:
quest tele begin  
    state start begin  
        when 693.chat
."Farm Map ab Lv. 15" begin 
            
if pc.get_level() < 15 then 
                say
("Du bist noch nicht Level 15. Kommt erst"
                
say("wenn du 15 bist."
            
end 
            say
("Du möchtest also in die Farm Map?"
            
local a select("Ja, Los!""Nein, noch nicht")  
            if 
== 1 then 
                pc
.warp(972800,102400)  
            elseif 
== 2 then 
                
return 
            
end 
        end  
        when 693.chat
."Level Map ab Lv. 75" begin 
            
if pc.get_level() < 75 then 
                say
("Du bist noch nicht Level 75. Komme erst"
                
say("wenn du 75 bist."
            
end 
            say
("Hallo grosser Spieler!")  
            
say("Dich wird grosses erwarten auf dieser Map")  
            
say("unglaubliche starke Monster versuchen dich zu besiegen")  
            
say("Werden sie es schaffen?")  
            
say("Geh Los und besiege sie!")  
            
local b select("Ja, hier""Nein, noch nicht"
            if 
== 1 then 
                pc
.warp(563200,435200)  
            elseif 
== 2 then 
                
return 
            
end 
        end  
        when 693.chat
."Level Map ab. 90" begin 
            
if pc.get_level() >= 90 
                say
("Du bist noch nicht Level 90. Komme"
                
say("erst, wennn du 90 bist."
            
end 
            say
("Hallo grosser Spieler!")  
            
say("Dich wird grosses erwarten auf dieser Map")  
            
say("unglaubliche starke Monster versuchen dich zu besiegen")  
            
say("Werden sie es schaffen?")  
            
say("Geh Los und besiege sie!"
            
local c select("Ja, hier""Nein, noch nicht"
            if 
== 1 then 
                pc
.warp(819200,844800
            elseif 
== 2 then 
                
return 
            
end  
        end  
    end  
end 
04/29/2012 15:40 ROXH#5655
Quote:
Originally Posted by DasKuchen View Post
Probier es mal so:
So hat es auch nicht funksoniert kam gleich mehrere Fehler :)
__________________________________________________ ____

Wieder zum Anfang da ist ja meins wieder besser xD
PHP Code:
uest tele begin   
    state start begin   
        when 693.chat
."Farm Map ab Lv. 15" begin  
            
if pc.get_level() < 15 then  
                say
("Du bist noch nicht Level 15. Kommt erst")  
                
say("wenn du 15 bist.")  
            else  
            
say("Du möchtest also in die Farm Map?")  
            
local a select("Ja, Los!""Nein, noch nicht")   
            if 
== 1 then  
                pc
.warp(972800,102400)   
            elseif 
== 2 then  
                
return  
            
end  
        end   
        when 693.chat
."Level Map ab Lv. 75" begin  
            
if pc.get_level() < 75 then  
                say
("Du bist noch nicht Level 75. Komme erst")  
                
say("wenn du 75 bist.")  
            else  
            
say("Hallo grosser Spieler!")   
            
say("Dich wird grosses erwarten auf dieser Map")   
            
say("unglaubliche starke Monster versuchen dich zu besiegen")   
            
say("Werden sie es schaffen?")   
            
say("Geh Los und besiege sie!")   
            
local b select("Ja, hier""Nein, noch nicht")  
            if 
== 1 then  
                pc
.warp(563200,435200)   
            elseif 
== 2 then  
                
return  
            
end  
        end   
        when 693.chat
."Level Map ab. 90" begin  
            
if pc.get_level() >= 90  
                say
("Du bist noch nicht Level 90. Komme")  
                
say("erst, wennn du 90 bist.")  
            else  
            
say("Hallo grosser Spieler!")   
            
say("Dich wird grosses erwarten auf dieser Map")   
            
say("unglaubliche starke Monster versuchen dich zu besiegen")   
            
say("Werden sie es schaffen?")   
            
say("Geh Los und besiege sie!")  
            
local c select("Ja, hier""Nein, noch nicht")  
            if 
== 1 then  
                pc
.warp(819200,844800)  
            elseif 
== 2 then  
                
return  
            
end   
        end   
    end   
end