Ir para conteúdo

[Duvida]


edu014

Posts Recomendados

Para tirar as skulls mais rápidas existe um comando para isso:

 

Vá em data/talkactions e abra o talkactions.xml e adicione essa tag:

<talkaction words="!removepk" script="skullclean.lua"/>

 

Agora entre na pasta scripts e crie um arquivo .lua e renomeie para skullclean, dentro dele adicione isso:

function onSay(cid, words, param, channel)

 

if (getCreatureSkullType(cid) == SKULL_BLACK) then

doPlayerRemoveMoney(cid, 200000)

doCreatureSetSkullType(cid, SKULL_NONE)

doPlayerSendTextMessage(cid, 22, "You soul are clean.")

else

doPlayerSendTextMessage(cid, 22, "You need 200.000 gold pieces to remove the black skull")

end

 

if (getCreatureSkullType(cid) == SKULL_RED) then

doPlayerRemoveMoney(cid, 100000)

doCreatureSetSkullType(cid, SKULL_NONE)

doPlayerSendTextMessage(cid, 22, "You soul are clean.")

else

doPlayerSendTextMessage(cid, 22, "You need 100.000 gold pieces to remove the red skull")

end

 

if (getCreatureSkullType(cid) == SKULL_WHITE) then

doPlayerRemoveMoney(cid, 10000)

doCreatureSetSkullType(cid, SKULL_NONE)

doPlayerSendTextMessage(cid, 22, "You soul are clean.")

else

doPlayerSendTextMessage(cid, 22, "You need 10.000 gold pieces to remove the white skull")

end

 

if (getCreatureSkullType(cid) == SKULL_NONE) then

doPlayerSendTextMessage(cid, 22, "You soul are clean like water!")

end

 

return TRUE

end

 

E vc nao falou no topico qual magia vc qer. Poste qe estarei vendo se tem como fazer.

 

Espero ter ajudado, Att. Snowz.

pwn.gif

Editado por luisfe23
Link para o comentário
Compartilhar em outros sites

Snowz, além de ter retirado os créditos do meu script, este script está errado.

Este funciona:

 

 

--- skull remover by kakilo - quinto script

 

function onSay(cid, words, param, channel)

 

if (getCreatureSkullType(cid) == SKULL_BLACK) then

if doPlayerRemoveMoney(cid, 200000) then

doCreatureSetSkullType(cid, SKULL_NONE)

doPlayerSendTextMessage(cid, 22, "Your soul was been cleaned.")

else

doPlayerSendTextMessage(cid, 22, "You need 200.000 gold pieces to remove the black skull")

end

end

 

if (getCreatureSkullType(cid) == SKULL_RED) then

if doPlayerRemoveMoney(cid, 100000) then

doCreatureSetSkullType(cid, SKULL_NONE)

doPlayerSendTextMessage(cid, 22, "Your soul was been cleaned.")

else

doPlayerSendTextMessage(cid, 22, "You need 100.000 gold pieces to remove the red skull")

end

end

 

if (getCreatureSkullType(cid) == SKULL_WHITE) then

if doPlayerRemoveMoney(cid, 10000) then

doCreatureSetSkullType(cid, SKULL_NONE)

doPlayerSendTextMessage(cid, 22, "Your soul was been cleaned.")

else

doPlayerSendTextMessage(cid, 22, "You need 10.000 gold pieces to remove the white skull")

end

end

 

if (getCreatureSkullType(cid) == SKULL_NONE) then

doPlayerSendTextMessage(cid, 22, "Your soul clean like water!")

end

 

return TRUE

end

 

 

 

Abraços.

Link para o comentário
Compartilhar em outros sites

  • 2 weeks later...
×
×
  • Criar Novo...