Einzelne Steine aus einer Waffe entfernen

09/15/2012 11:59 Shadow乙™#1
Ja hallo habe hier eine Quest womit man die einzelnen Steine aus einer waffe, rüssi halt entfernen kann.
Aber ein Problem habe ich, die Quest kann auch Steinsplitterstück entfernen.
Aber wenn beim entfernen auf "Leeren Slot" entfernen klickt steht da das es nicht geht.
Kann man die Quest so bearbeiten das es beim Steinsplitterstück auch nicht geht.?

Hier die Quest

PHP Code:
--------------------------------------- 
---
Slots einzelnd leeren Quest 
---erstellt von [PRO]Floke 
-------------------------------------- 
quest stones_out begin 
    state start begin 
    when 20041.chat
."Einzelnen Slot leeren" begin 
        say_title
("Einzelnen Slot leeren:") 
        
say("Ich kann dir dabei helfen einen einzelnen") 
        
say("Slot zu leeren.") 
        
say("") 
        
say_reward("Ziehe dafür einfach dein Item auf mich.") 
        
end     
    when 9007.take begin 
        item
.set_socket(0,1) 
        
item.set_socket(1,1) 
        
item.set_socket(2,1) 
        
chat("Steine zurückgesetzt") 
    
end 
    when 20041.take begin 
    
--    if item.vnum >=11901 and item.vnum <= 11904 then -- brautkleider & 
    --        
chat("Dieses Item ("..item_name(item.vnum)..") wird nicht unterstützt!") 
    --        return 
    --    elseif 
item.vnum >=11911 and item.vnum <= 11914 then -- smokings 
    
--        chat("Dieses Item ("..item_name(item.vnum)..") wird nicht unterstützt!") 
    --        return 
    --    
end 
        local steine 
= 0 
        local a 
= item.vnum 
        local a1 
= item.get_socket(0) 
        
local a2 = item.get_socket(1) 
        
local a3 = item.get_socket(2) 
        if 
a1 >28000 then 
            steine
= steine+1 
        end 
        
if a2 >28000 then 
            steine
= steine+1 
        end 
        
if a3 >28000 then 
            steine
= steine+1 
        end 
        
if a1==1 then 
            a1
=0 
        end 
        
if a2==1 then 
            a2
=0 
        end 
        
if a3==1 then 
            a3
=0 
        end 
        
if steine==0 then 
            say_title
("Slot leeren") 
            
say("Du kannst keinen Slot leeren,") 
            
say("da kein Slot belegt ist.") 
            
say("") 
        else 
            
local s 
            say_title
("Slot leeren") 
            
say("Welchen Slot möchtest du leeren?") 
            
say("Du bekommst dann das Item aus dem Slot.") 
            
say("") 
            if 
a1!=0 and a2!=0 and a3!=0 then 
                s
=select(item_name(a1),item_name(a2),item_name(a3),"Abbrechen") 
            elseif 
a1!=0 and a2!=0 and a3==0 then 
                s
=select(item_name(a1),item_name(a2),"Leerer Slot","Abbrechen") 
            elseif 
a1!=0 and a2==0 and a3==0 then 
                s
=select(item_name(a1),"Leerer Slot","Leerer Slot","Abbrechen") 
            elseif 
a1==0 and a2!=0 and a3==0 then 
                s
=select("Leerer Slot",item_name(a2),"Leerer Slot","Abbrechen") 
            elseif 
a1==0 and a2==0 and a3!=0 then 
                s
=select("Leerer Slot","Leerer Slot",item_name(a3),"Abbrechen") 
            elseif 
a1!=0 and a2==0 and a3!=0 then 
                s
=select(item_name(a1),"Leerer Slot",item_name(a3),"Abbrechen") 
            elseif 
a1==0 and a2!=0 and a3!=0 then 
                s
=select("Leerer Slot",item_name(a2),item_name(a3),"Abbrechen") 
            
end 
            
if s==4 then 
                
return 
            elseif 
s==1 and a1 != 0 then 
                item
.set_socket(0,1) --28960) 
                
pc.give_item2(a1,1) 
                
say_title("Slot leeren") 
                
say("Der Slot wurde geleert,") 
                
say("und du hast dein Item bekommen.") 
                
say("") 
                
say_title(item_name(a1).." erhalten.") 
            elseif 
s==2 and a2 != 0 then 
                item
.set_socket(1,1) --28960) 
                
pc.give_item2(a2,1) 
                
say_title("Slot leeren") 
                
say("Der Slot wurde geleert,") 
                
say("und du hast dein Item bekommen.") 
                
say("") 
                
say_reward(item_name(a2).." erhalten.") 
            elseif 
s==3 and a3 != 0 then 
                item
.set_socket(2,1) --28960) 
                
pc.give_item2(a3,1) 
                
say_title("Slot leeren") 
                
say("Der Slot wurde geleert,") 
                
say("und du hast dein Item bekommen.") 
                
say("") 
                
say_reward(item_name(a3).." erhalten.") 
            else 
                
say_title("Slot leeren") 
                
say("Wollt ihr mich auf dem Arm nehmen?") 
                
say("Einen leeren Slot kann ich nicht leeren!") 
            
end 
        end 
    end 
end 
end 
09/15/2012 19:40 RedKing2#2
Verwende doch einfach "Rolle der Korrektur" . Der entfernt den letzten Geiststein in den Gegenständen und lässt Steinplitter in Ruhe.