portal
Foro 
Members 
Calendario 
Información 
Shop TibiaFace
Editar Perfil 
Temas Recientes 
4REYES 
1
/Newtype command for 10.10 Vie Ago 30, 2013 12:59 pm
[Admin] God Maya
![[Admin] God Maya](https://2img.net/u/2712/30/40/04/avatars/1-92.jpg)
Administrador
El comando / newtype de 10.10 con todos los nuevos looktypes monstruo.
100% sin errores.
God Maya
100% sin errores.
- Código:
local function checkType(value)
return not (
value <= 1 or
value == 135 or
(value > 160 and value < 192) or
value == 411 or
value == 415 or
value == 424 or
(value > 438 and value < 441) or
(value > 466 and value < 470) or
value == 474 or
value == 485 or
value == 501 or
(value > 502 and value < 543) or
value == 549 or
value >574 )
end
function onSay(cid, words, param, channel)
if(param == '') then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command param required.")
return true
end
local t, pid = string.explode(param, ","), cid
if(t[2]) then
pid = getPlayerByNameWildcard(t[2])
if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player " .. t[2] .. " not found.")
return true
end
end
local period, tmp = -1, tonumber(t[3])
if(t[3] and tmp) then
period = tmp
end
if(not isNumeric(t[1])) then
if(getMonsterInfo(t[1])) then
doSetMonsterOutfit(pid, t[1], period)
else
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Such outfit does not exist.")
end
return true
end
t[1] = tonumber(t[1])
if(not checkType(t[1])) then
local item = getItemInfo(t[1])
if(item) then
doSetItemOutfit(pid, t[1], period)
return true
end
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Such outfit does not exist.")
return true
end
local tmp = getCreatureOutfit(pid)
tmp.lookType = t[1]
if(t[3]) then
t[3] = tonumber(t[3])
if(checkType(t[3])) then
tmp.lookMount = t[3]
end
end
doCreatureChangeOutfit(pid, tmp)
return true
end
God Maya 
2 participantes
