[SERVICE] Die Questkontrolle

10/23/2011 18:06 hunger97#3826
Hallo Leute,

ich sitze gerade an einem Userpanel und möchte das man unter dem Punkt TEAM-LISTE (wie man es dem Script entnehmen kann), alle teamler angezeigt werden und ob sie on oder offline sind jedoch hab ich keine Ahnung wie man das macht? :(:( :confused::confused:

Script:
PHP Code:
quest USER_PANEL begin
    state start begin
        when login 
or levelup with pc.get_level() >= 1 begin
            set_state
(information)
        
end
    end
    
    state information begin
        when letter begin
            local v 
find_npc_by_vnum(11000)
            if 
!= 0 then
                target
.vid("__TARGET__"v"Userpanel")
            
end
            send_letter
("Userpanel (User)")
        
end
        
        when button 
or info begin
            say_title
("Userpanel (User)")
            
say("")
            
say("Du hast nun die Möglichkeit, ")
            
say("das Userpanel zubenutzen")
            
say("Bitte gehe zum Wächter des Dorfplatzes")
            
say("Er wird dir alles berichten was du wissen brauchst")
            
say("")
        
end
        
        when __TARGET__
.target.click or 
            
11000.chat."User" begin
            target
.delete("__TARGET__")
            
say("Wächter des Dorfplatzes:")
            
say("Du hast nun die Möglichkeit das Userpanel zu benutzen ")
            
say("und damit an große Macht zu gelangen")
            
say_reward("Userpanel benutzen?")
            
        
local s select("Ja""Nein")
            if 
== s then
                
return
            if 
== s then
            say_reward
("Bitte wähle eine Aktion aus!")
            
        
local x select("TEAM-LISTE""User-Melden""Rates Anzeigen""Zurück")
            if 
== x then
                
return
            if 
== x then
                say
("Folgende Teamler sind online: "
Danke für eure Hilfe schonmal

Mit freundlichsten Grüßen
xPrivate
10/23/2011 18:30 FuZi0nZ.™#3827
Quote:
Originally Posted by xXKimariXx View Post
PHP Code:
quest gm begin
     state start begin
            when login begin
                timer
("timer1"20)
                    
notice_all("~~~Uppe Die Waffen Und Rüstungen Von Dem Spezial Shop Beim 2011 Upper Weiter~~~")
            
end
            when timer1
.timer begin
                timer
("timer2"20)
                
notice_all("~~~Uppe Die Waffen Und Rüstungen Von Dem Spezial Shop Beim 2011 Upper Weiter~~~")
            
end
            when timer2
.timer begin
                timer
("timer1"20)
                
notice_all("Euer Revolution2 Team Wünscht Euch Noch Viel Spaß")
        
end
    end
end 
Ka obs so funktioniert

ich probiers mal

Nep erscheint immer noch nichts im rufchat
10/23/2011 19:02 -Roxon-#3828
quest warpring begin
state start begin
when 30120.use with pc.get_level() >= 45 begin
local newmap = select("Metin-Map", "Abbrechen")
if newmap == 1 then
pc.remove_item(30120, 1)
pc.warp(83200,0)
else
return
end
end
end
end




Wer kann mir bei dieser quest einfügen, das die nicht verschwindet wenn man nicht 10 sek nach dem handeln gewartet hat.
Die soll nur verschwinden, wenn man hin geportet wird.
10/23/2011 19:07 xXKimariXx#3829
Geht glaubich nicht da es ein bug ist
10/23/2011 19:16 -Roxon-#3830
also kann man es nicht machen, das wenn man ausversehen nicht 10 sek lang gewartet hat das das item nicht verschwindet?
10/23/2011 19:52 xXKimariXx#3831
nein wird wohl nicht gehen
10/23/2011 20:46 Sp0ngeb0b ist cool#3832
PHP Code:
quest warpring begin
    state start begin
        when 30120.
use with pc.get_level() >= 45 begin
            pc
.setqf("loeschen"get_time()+10)
            
local newmap select("Metin-Map""Abbrechen")
            if 
newmap == 1 then
                
if get_time() > pc.getqf("loeschen"then
                    pc
.remove_item(301201)
                    
pc.warp(83200,0)
                    
pc.delqf("loeschen")
                else
                    
say("Warte noch einige Sekunden.")
                
end
            
elseif newmap == 2 then
                
return
            
end    
        end
    end
end 
teste es mal so ;)
10/23/2011 20:51 .Delta#3833
nein wird nicht funktieren, da die if bedingung nie erfüllt ist xD

Du setzt bei jeder Benutzung des items die qf neu :P
10/23/2011 22:55 IRoxasI#3834
<<< QUEST : map_warp
STATE : start
WHEN : 9012.chat ("Möchtest du reisen?")
must start with 'quest'
map_warp.quest:321:Abort trap (core dumped)
Error occured on compile map_warp.quest

322 net 321 jetzt

quest
10/24/2011 01:12 .α¢нιℓℓєѕ#3835
Wer kann mir helfen?

erhalte kein Fehler aber inGame funzt Quest nicht.
Wenn ich auf Zombiemap & Grotte "klicke" portet nicht mal...



Code:
quest teleport begin 
    state start begin 
        when 20087.chat."Teleportieren" begin 
            say_title("Teleportieren") 
            say("") 
            say("Ist das nicht ein schöner Ort hier?") 
            say("Doch irgendwie ist es hier langweilig") 
            say("und trostlos. Doch zum erholen ist dies") 
            say("ein prima Ort. Wenn du diesen Ort jedoch") 
            say("verlassen willst, kann ich dich hier fort") 
            say("bringen.") 
            say_reward("Willst du dich Teleportieren?") 
            local s = select("Ja","Nein") 
            if s == 1 then 
                say_title("Teleportieren") 
                say("") 
                say_reward("Wo soll es hingehen?") 
                local b = select("Spinnendungeon 2","Grotte der Verbannung","Zombiemap","Abbrechen") 
                if b == 1 then
                    if pc.level >= 42 then 
                        pc.warp(665600, 435200)
                elseif b == 2 then
                    if pc.level >= 61 then 
                        pc.warp(0, 1203200) 
                elseif b == 3 then 
                    if pc.level >= 90 then 
                        pc.warp(83200, 0) 
                    else 1
                        say("Du bist noch nicht bereit für diese Map. Komm wieder") 
                        say("wenn du das Level 90 erreicht hast!") 
                    end
                    else
                        say("Du bist noch nicht bereit für diese Map. Komm wieder") 
                        say("wenn du das Level 90 erreicht hast!") 
                    end
                    else 
                        say("Du bist noch nicht bereit für diese Map. Komm wieder") 
                        say("wenn du das Level 90 erreicht hast!") 
                    end
                elseif b == 4 then 
                    say_title("Teleportieren")
                    say("")
                    say("Dann nicht")
                end
            elseif s == 2 then
                say_title("Teleportieren")
                say("")
                say("Dann bleib erstmal hier.")
            end 
        end 
    end 
end
klappt nicht..
core dumped
10/24/2011 11:28 IRoxasI#3836
stimmen die Kordies ?
10/24/2011 23:02 .α¢нιℓℓєѕ#3837
Quote:
Originally Posted by IRoxasI View Post
stimmen die Kordies ?
werde ich mir mal anschauen ob die Kordies stimmen..
10/25/2011 13:13 .Risan.#3838
Bekomm Lua Error:

PHP Code:
    function skill_look()
    
say_title("Fähigkeits Level")
        
local skill1 be_Soladat.get_angriffswert()
        
local skill2 be_Soladat.get_Halbmenschen()
        --
local skill3 be_Soladat.get_Stark_gg_Rasse()
        --
local skill4 be_Soladat.get_Tp_Bonus()
        --
local skill5 be_Soladat.get_Status()
        --
local skill6 be_Soladat.get_Tp_Regeneration()
        
1
        
while i  <= do
        
say(""..skill..i.."")
        if 
level_angriff == 0 then
        say
(""..text.." kein Punkt vergeben.")
        elseif 
level_angriff >= and level_angriff <= 5 then
        say
(""..text.."  | Anfänger | Level "..level_angriff.."")
        elseif 
level_angriff >= and level_angriff <= 9 then
        say
(""..text.."  | fortgeschrittener | Level "..level_angriff.."")
        elseif 
level_angriff >= 10 and level_angriff <= 14 then
        say
(""..text.."  | Profi | Level "..level_angriff.."")
        elseif 
level_angriff >= 15 and level_angriff <= 19 then
        say
(""..text.."  | Meister | Level "..level_angriff.."")
        elseif 
level_angriff >= 20 then
        say
(""..text.."  | Großmeister | Level "..level_angriff.."")
        
end
        i 
1
    end
    end

    
function get_angriffswert()
    
rows =  mysql_select("SELECT skill_level1 FROM player.beruf_soldat WHERE player_id='"..pc.get_player_id().."'")
    return 
rows[1][1]
    
end 
Abrufen klappt, aber durch die While bekomm ich error, eventuell weil While zu schnell ist >.<
10/25/2011 13:17 .Delta#3839
wieso machst dus net mit for? xD
ich mein, du hast ja nur 6 durchläufe :D
PHP Code:
for i=1i<=6do
... 
10/25/2011 13:28 xXKimariXx#3840
Edit: Danke .Delta hat geklappt <3