[SERVICE] Die Questkontrolle

12/29/2010 12:51 killerwalli#1201
also: ich kann es jetzt zwar anklicken, aber irgendwie kann er keinen töten
da steht immer "sname no such a player"
12/29/2010 12:53 .Delta#1202
ach natürlich^^ mein fail sry
PHP Code:
quest Butters begin
    state start begin
        when 77786.
use begin 
            say
("Gebe den Namen des Gegners ein:")
            
say("")
            
local sname input()
            
command("kill "..sname.."")
            
chat("Du hast erfolgreich getötet.")
        
end
    end
end 
probier so, wenns dann nicht klappt bin ich zu blöd dafür ;)
12/29/2010 12:55 .NoThx#1203
prob so:
PHP Code:
quest Butters begin 
    state start begin 
        when 77786.
use begin  
            say
("Gebe den Namen des Gegners ein:"
            
say(""
            
local sname input() 
            
command("kill "..sname..""
            
chat("Du hast erfolgreich getötet."
        
end 
    end 
end 
p.s. mein is besser...
12/29/2010 12:57 killerwalli#1204
sehr gut als GM klappt es schonma aber leider als normaler player nicht =/ kannste mir auch bitte da weiterhelfen?
12/29/2010 12:58 .NoThx#1205
mein quest da klappe als norm player ned?
12/29/2010 13:00 killerwalli#1206
Quote:
Originally Posted by .NoThx View Post
mein quest da klappe als norm player ned?
nope

€dit: ich glaube es liegt an dem befehl:
Quote:
command("kill "..sname.."")
den können nur GM's benutzen, aber ich weiß nicht mit welchem Befehl man den ersetzen könnte >.<
12/29/2010 13:09 .NoThx#1207
eig egal..
PHP Code:
quest Butters begin      
    state start begin      
               when 77786.
use begin      
                   
if pc.getqf("kill") == 1 then     
                   say
("Du musst 10 Sekunden warten..")     
                   return     
                
end
    
else
        if 
pc.getqf("kill") == 0 then
                   say
("Das Töten kostet dich 3.000.000 Yang.")   
                   
say("Zudem brauchst du mindestens Level 30.")   
                   
say("Möchtest du jemanden töten?")   
                   
local abfrage select("Weiter""Abbrechen")   

    if 
abfrage == 2 then   
                    
return   
            
end
    
if abfrage == 1 then
    
if pc.get_level() => 30
    
if pc.get_gold() => 3000000 then
               say
("Gib die den Spieler namen hier ein:")
        
pc.give_gold(-3000000
    
local z=input()
    if 
==  "" then
        say
("Der Spieler existiert nicht")                                end
    
else
    if 
"z" == pc.is_gm()      
                     
say("Du Kannst Keinen GameMaster töten!")      
                    
mob.spawn(2291)    
                    
notice(" Der Spieler "b" wollte einen GameMaster Töten!")    
                     
notice("Folge dessen ist, Das Ein Roter Drache Gespawnt wurde")    
                    
notice("Solltet ihr durch den Roten Drachen sterben, bedankt")    
                    
notice(" bei spieler "b" Ende Der Durchsage! ")    
                   
end     
                    
return     
                
end
    
else
        
d.kill_all(z)
        
say("Der Spieler Wurde Erfolgreich Umgebarcht")
        
pc.setqf("kill"1)     
                   
timer("killdelay"10)    
        
end
    
else    
                if 
pc.get_gold() <= 2999999 then   
                   say
("Du hast nicht genug Yang.")   
                    return   
                
end
    
else
                    if 
pc.get_level() <= 29 then   
                    say
("Dein Level reicht nicht aus.")   
                    return   
                
end
            when 
"kill".timer begin     
                    pc
.setqf("kill"2)     
            
end     
            when login with pc
.getqf("kill") == 1 then     
                    timer
("killdelay"10)                      
                
end     
        end      
end 
12/29/2010 13:10 killerwalli#1208
und wie soll ich das abspeichern???
12/29/2010 13:13 .NoThx#1209
einfach in deine quest datei ahbe alles so angepast..
12/29/2010 13:13 killerwalli#1210
ich meinte wo^^

€dit: ok ich versuch es mal
12/29/2010 13:16 .NoThx#1211
kp was du meinsta ber versuch mal^^
12/29/2010 13:17 killerwalli#1212
irgendwie blick ich da gerade nicht mehr durch könntest du bitte mal mit team viever reinschauen?
12/29/2010 13:19 .NoThx#1213
êm ja
gib daten per pn
€:ahbe nur ca 10 min zeit dan hete abend wd^^
12/29/2010 17:51 Bimpfi#1214
1.:
PHP Code:
quest Rates begin
state start begin
when 20095.chat with pc
.is_gm() begin
say_title
("GM HILF-NPC")
say("Nur für GMs")
say("Es macht Rates auf ein klick online")
say("")
say("Wähle aus")
                        
locale main_set    select("Rates auf 1000",    "Abbrechen")
if 
main_set == 2 then
return
end
elseif == 1 then
say_title
("GM Helfer:")
say("")
say("Du moechtest also die Rates einstellen??")
say("")
say("Möchtest du alle Rates auf 1000?")

local s =select ("Alle auf 1000",    "Abbrechen"
if 
== 1 then
command
("priv_empire 0 4:exp 1000 9999")
command("priv_empire 0 2:gold_drop 1000 9999")
command("priv_empire 0 3:gold10_drop 1000 9999")
command("priv_empire 0 1:item_drop 1000 9999")
elseif 
== 2 then
return
end
end
end 
2.:

PHP Code:
quest Special  begin
    state start begin
        when login 
or levelup with pc.get_level() >=99  begin
            set_state
(information)
        
end    
    end

    state information begin
        when letter begin
            local v 
find_npc_by_vnum(9003)
            if 
!= 0 then
                target
.vid("__TARGET__"v"Quest")
            
end
            send_letter
("Special")
        
end

        when button 
or info begin
            say_title
("Special")
            
say("")
            
say("Der Rüssihändler hat seine Spielchen mit der")
            
say("Gemi getrieben, er steckte das Stück Edelstein in den")
            
say("POPO der Dame.")
            
say("Sie lies einen Schieß, bumm schon war der Edelstein")
            
say("verschwunden. Kein Wunder wenn die Gemi furzt.")
            
say("Du bist der auserwählte, finde den Stein!!")
            
say("")
        
end

        when __TARGET__
.target.click or
            
9003.chat."Quest" begin
            target
.delete("__TARGET__")
            
say("Gemischi:")
            ---                                                   
l
            say
("Er trieb mit mir seine Spielchen,es macht natürlich")
            
say("uch Spaß, als er mir den Edelstein")
            
say("in den allerwertesten steckte,")
            
say("tritt das Gas aus-Rohrbruch,alles war zu spät!")
            
say("Der Korken platze,das Gas kommte")
            
say("PUUUM-Weg war er.Hilf Mir ich habe Angst das er mich vergewaltigt!!")
            
say("")    
            
set_state(go_to_disciple)
            
pc.setqf("collect_count",0)
            
pc.setqf("drink_drug",0
        
end
    end

    state go_to_disciple begin
        when letter begin
            send_letter
("Auftrag von Gemischi")

        
end
        when button 
or info begin
            say_title
("Quest")
            ---                                                   
l
            say
("")
            
say("Gemischi gab euch den Auftrag")
            
say("10 Stück Edelstein zu sammeln!")
            
say("Das Item bekommt ihr von Himmels Geistliche in der Grotte.")
            
say("Viel Glueck!")
            
say("")
            
say_item_vnum(30021)
            
say_reward("   Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
            
say("")
        
end

        when 71035.
use begin --°g´bÃĤô
            
if pc.getqf("drink_drug")==1 then
                say
("")
                
say("Bessere Droppchance!")
                
say("")

                return
            
end
            
if pc.count_item(30021)==0 then
                say
("")
                
say("Du hast keine!")
                
say("Lauf los und besorg mir welche!")
                
say("")
                return
            
end
            item
.remove()    
            
pc.setqf("drink_drug",1)
        
end


        when 2403.kill begin
            
if pc.count_item(30021)<10-pc.getqf("collect_count"then
                pc
.give_item2(300211)
            
end
        end

        when 9003.chat
."Quest" with pc.count_item(30021) >0   begin
                say
("Einen Moment!")
                ---                                                   
l
                say
("Ich werde das Item")
                
say("schnell mal ueberpruefen.")
                
say("Hoffentlich klappt alles!")
                
say("")
                
pc.remove_item(300211)
                
wait()

                
local pass_percent
                
if pc.getqf("drink_drug")==0 then
                    pass_percent
=900
                
else        
                    
pass_percent=900
                end

                local s
number(1,100)
            if 
s<= pass_percent  then
               
if pc.getqf("collect_count")< 9 then     --5*Ó¥H¤U 
                        local index 
=pc.getqf("collect_count")+
                        pc
.setqf("collect_count",index)     --¨ú±o¤@*Ӯɠ+1
                        say
("Gemischi:")
                        
say("Perfekt! Das Item ist in Ordnung")
                        
say("Du hast bis jetzt ".." "..10-pc.getqf("collect_count").. " abgegeben!")
                        
say("Bring mir die restlichen!")
                        
say("")
                        
pc.setqf("drink_drug",0)     --ÃĤôªì©l¤Æ
                        
return
                    
end
                    say
("Gemischi:")
                    
say("Yuhu! Du hast mir")
                    
say("alles gebracht!")
                    
say("Dafür werde ich dich wie versprochen")
                    
say("belohnen!")
                    
say("")
                    
say_reward("Du bekommst ein Keule+0!")
                    
say_reward("Du bekommst ein Giftschwert+9!")
                    
say_reward("Du bekommst ein Reittier Rufer!")
                    
say_reward("Du bekommst 10.000.000 Yang!")
                    
say_reward("Du bekommst 200.000.000 Erfahrung!")
                    
pc.setqf("collect_count",0)
                    
pc.setqf("drink_drug",0)
            
end
        end
    end 
12/29/2010 18:02 iKyroja :>#1215
PHP Code:
quest Rates begin
state start begin
when 20095.chat with pc
.is_gm() begin
say_title
("GM HILF-NPC")
say("Nur für GMs")
say("Es macht Rates auf ein klick online")
say("")
say("Wähle aus")
                        
locale main_set    select("Rates auf 1000",    "Abbrechen")
if 
main_set == 2 then
return
end
elseif main_set == 1 then
say_title
("GM Helfer:")
say("")
say("Du moechtest also die Rates einstellen??")
say("")
say("Möchtest du alle Rates auf 1000?")

local s =select ("Alle auf 1000",    "Abbrechen"
if 
== 1 then
command
("priv_empire 0 4:exp 1000 9999")
command("priv_empire 0 2:gold_drop 1000 9999")
command("priv_empire 0 3:gold10_drop 1000 9999")
command("priv_empire 0 1:item_drop 1000 9999")
elseif 
== 2 then
return
end
end
end 
Probiere es mal so