Olá XTibianos, andei procurando muito esse Script por todos os lugares e infelizmente não encontrei. Então decidi dar uma olhada em uns tutoriais de Lua para OTservers e aprendi a fazer um 100% funcional. 
  
 
Autor: Joca
Versão: 8.54
Testado: TFS 0.3.6
Tipo: TalkAction
 
  
Crie um arquivo na pasta \data\talkactions\scripts e coloque o nome removered.lua agora coloque isso nele: 
  
 
local COST = 3000000 ----- Preço par Remover o Red Skull em Gold Pieces
function onSay(cid, words, chanel, param)
   if getCreatureSkullType(cid) == SKULL_RED then
       if doPlayerRemoveMoney(cid, COST) then
	    doCreatureSetSkullType(cid, SKULL_NONE)
           doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Red Skull removed for: " .. COST)
           doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
       else
           doPlayerSendCancel(cid, "You don't have enough money.")
           doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
       end
   else
       doPlayerSendCancel(cid, "You are not with Red Skull.")
       doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
   end
end
 
  
Agora vá em talkactions.xml e adicione isso: 
 
<talkaction words="!red" script="removered.lua"/>
 
  
E está pronto seu comando para remover red skull por 3kk!! 
  
Agora o para Black skull seguindo o mesmo raciocínio. Crie um arquivo em \data\talkactions\scripts e coloque o nome de removeblack.lua e coloque isso dentro: 
  
 
local COST = 6000000 ------- Preço para Tirar Black Skull em Gold Pieces
function onSay(cid, words, chanel, param)
   if getCreatureSkullType(cid) == SKULL_BLACK then
       if doPlayerRemoveMoney(cid, COST) then
	    doCreatureSetSkullType(cid, SKULL_NONE)
           doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Black Skull removed for: " .. COST)
           doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA)
       else
           doPlayerSendCancel(cid, "You don't have enough money.")
           doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
       end
   else
       doPlayerSendCancel(cid, "You are not with Black Skull.")
       doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
   end
end
 
  
Agora vá em talkactions.xml e adicione isso: 
 
<talkaction words="!black" script="removeblack.lua"/>
 
  
E pronto, a Black Skull vai ser removida por 6kk!! 
  
Créditos: 
90% by me 
10% para o criador do script !buypremium que vem na maioria dos ot's que eu peguei uma pequena parte dele. 
  
Comentem plx!!!