miniing.quest ?

05/02/2013 21:04 .Leykas#1
Hat jemand noch die funktionierende mining.quest da ?

Wäre nett wenn man mir einen Link oder die -DAtei geben würde.. Finde in der Sufu nichts gescheites..
05/02/2013 23:20 zZzElitezZz#2
Hier bitteschön, einfach in der Questlist eintragen, make.py ausführen & du kannst wieder Erze abbauen.

PHP Code:
quest mining begin 
    state start begin 
    when 20015.chat
."Spitzhacke" begin 
        setskin
(NOWINDOW
        
npc.open_shop() 
    
end 

    when 20015.take with item
.vnum >= 29101 and item.vnum 29200 and item.get_socket(0) != item.get_value(2begin 
        say
("Spitzhacke Verbessern"
    
end 
    when 20015.take with item
.vnum >= 29101 and item.vnum 29200 and item.get_socket(0) == item.get_value(2begin 
        say
("§A·Q§ï¨}¾SÀY¶Ü?[ENTER]Åý§Ú¬Ý¬Ý...[ENTER]§Aªº¾SÀYµ¥¯Å¬O".. item.get_level()..""
        if 
item.get_value(3) == 100 then 
        say
("§A·Q§ï¨}¶Ü?")  
        else 
        
say("²{¦b§Úªº¯à¤O¤£¨¬, §Ú§ï¨}¾SÀYªº¸Ü"
        
say("100*Ó¤¤" .. 100-item.get_value(3).. "*Óªºµ¥¯Å·|¤U*°. "
        
say("§AÁÙ¬O*n§ï¨}¶Ü?")  
        
end 
        local s 
select("¬Oªº","¤£¬O"
        if 
== 1 then 
           local f 
__refine_pick(item.get_cell()) 
           if 
== 2 then say("§ï¨}¤¤µo²{¿ù»~, ©Ò¥H³o¦¸§ï¨}¥¢±Ñ¤F.[ENTER]²{¦b§Ú§â¾SÀYÁÙµ¹§A[ENTER]¤U¦¸¦A¸Õ¸Õ§a.")  
           elseif 
== 1 then say("²{¦bµ¹§Aµ¥¯Å¤W¤Éªº¾SÀY! ")  
           else 
say("«u§r~ §ï¨}¥¢±Ñ¤F. ¤£¦n·N«ä[ENTER]µ¥¯Å¤U*°¤F. "
           
end  
        
else  
        
say("¨º¦n§a, ¤U¦¸¦A¨£¤F~"
        
end 
    end 

    when 20047.click 
or 
         
20048.click or 
         
20049.click or 
         
20050.click or 
         
20051.click or 
         
20052.click or 
         
20053.click or 
         
20054.click or 
         
20055.click or 
         
20056.click or 
         
20057.click or 
         
20058.click or 
         
20059.click begin 

         
if pc.is_mount() != true then 
         pc
.mining() 
         
end 
    end 
    end 
end