-- Mining V2.6
-- Please understand this is more of a bug fix release
-- Coded by Roman, some credits to twiz for giving an example of his V1.0
function onUse(cid, item, frompos, item2, topos)
Level = getPlayerLevel(cid)
ClubSkill = getPlayerSkill(cid,1)
if item2.actionid == 400 and         -- set the action id of rocks
Level >= 15   -- set the level requirement to be able to mine
and
ClubSkill >= 30  -- set the club skill requirement to be able to mine
then 
rand = math.random(1,2000)
if rand < 20 then
doPlayerSendTextMessage(cid,22,"You crafted an dwarven helmet.")              
doPlayerAddItem(cid,2502,1)
elseif rand == 800 then
doPlayerSendTextMessage(cid,22,"You crafted an dwarven armor.")              
doPlayerAddItem(cid,2503,1)                
elseif rand == 950 then
doPlayerSendTextMessage(cid,22,"You crafted an dwarven legs.")
doPlayerAddItem(cid,2504,1)
elseif rand == 900 then
doPlayerSendTextMessage(cid,22,"You crafted an dwarven shield.")              
doPlayerAddItem(cid,2525,1)
elseif rand == 750 then
doPlayerSendTextMessage(cid,22,"You crafted an leather boots.")              
doPlayerAddItem(cid,2643,1)
elseif rand >900 and rand <1000 then
doPlayerAddHealth(cid,-20)
doPlayerSendTextMessage(cid,22,"You lost hitpoints due to exhaustion of crafting.")
elseif rand >600 and rand <950 then
doPlayerAddHealth(cid,-100)
doPlayerSendTextMessage(cid,22,"You lost hitpoints due to exhaustion of crafting.")
elseif rand >2000 then
doPlayerSendTextMessage(cid,22,"Earthquake!")
doPlayerAddHealth(cid,-100)
elseif rand >= 105 and rand <150 then
end
doSendMagicEffect(topos,3)
doPlayerAddSkillTry(cid,1,1)
doPlayerSay(cid,"Argg!",1)
else
 doPlayerSendCancel(cid,"Para craftar dwarven você precisa de level 15 e de 30 de club.")
end
return 1
end