Daniel augusto silva

Vc Vai em data/lib/000-constant.lua
SEX_MALE = 4
SEX_FEMALE = 3
SEX_GENDERLESS = 0
Acho pq meu serve n e desde de sites ele e refeito entao e diferente
 
 

e pda
 

Script 
local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)
local talkState = {}
function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end
function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end
function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end
function onThink() npcHandler:onThink() end
function playerHaveItems(cid, itemid)
local items = type(itemid) == "table" and itemid or {itemid}
for i = 1, #items do
if getPlayerItemCount(cid, items) <= 0 then
return false
end
end
return true
end
function doPlayerRemoveItems(cid, itemid, count)
local items = type(itemid) == "table" and itemid or {itemid}
for i = 1, #items do
doPlayerRemoveItem(cid, items, count ~= nil and count or 1)
end
return nil
end
function creatureSayCallback(cid, type, msg)
if(not npcHandler:isFocused(cid)) then
return false
end
if msgcontains(msg, "trocar") then
if playerHaveItems(cid, {2134, 2174, 2159}) then
doPlayerRemoveItems(cid, {2134, 2174, 2159}, 300)
doPlayerAddItem(cid, 2090, 1)
else
selfSay("Você Não tem os itens necessarios.")
end
end
return true
endnpcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())
 
 
Agora vá em Data/Npc/Nomedonpc.xml
 
<?xml version="1.0" encoding="UTF-8"?>
<npc name="Fernando" script="trocaitems.lua" walkinterval="2000" floorchange="0">
<health now="100" max="100"/>
<look type="169" head="114" body="86" legs="114" feet="0" addons="2"/>
<parameters>
<parameter key="message_greet" value="Ola, diga {trocar} para trocar 3 items por 1."/>
</parameters>
</npc>
Ta Dando esse erro
[10/02/2016 12:58:23] [Error - LuaScriptInterface::loadFile] data/npc/scripts/trocaitems.lua:45: 'end' expected (to close 'function' at line 29) near 'endnpcHandler'
[10/02/2016 12:58:23] [Warning - NpcScript::NpcScript] Cannot load script: data/npc/scripts/trocaitems.lua
[10/02/2016 12:58:23] data/npc/scripts/trocaitems.lua:45: 'end' expected (to close 'function' at line 29) near 'endnpcHandler'

0.4

eu resolvi por mim 
mais brigado pela ajuda

pelo que vi deicha esse mesmo 
Torneio.xml
<?xml version="1.0" encoding="UTF-8"?>
<npc name="Nick" script="torneio.lua" walkinterval="999000" floorchange="0">
<health now="150" max="150"/>
<look type="1806" head="20" body="100" legs="50" feet="99" corpse="111"/>]
<parameters>
<parameter key="message_greet" value="Ola |PLAYERNAME|. Sou o NIKE, Encarregado pelo Torneio diario caso queira entrar diga: {torneio}."/>
        </parameters>
</npc>
 
 
agr no caso substitua seu  Torneio.lua por esse pegue ele todo \/\/\/
 
local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)
local talkState = {}
function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end
function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end
function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end
function onThink() npcHandler:onThink() end
function creatureSayCallback(cid, type, msg)
if(not npcHandler:isFocused(cid)) then
return false
end
local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid
if msgcontains(msg, 'torneio') or msgcontains(msg, 'enter') then
if getPlayerItemCount(cid, torneio.revivePoke) >= 1 then
selfSay('You can not enter the tournament with {revives}, please throw them out.', cid)
return true
end
selfSay('You want to participate in the tournament by '..torneio.price..' gps / dollars?', cid)
talkState[talkUser] = 2

elseif talkState[talkUser] == 2 then
if msgcontains(msg, 'yes') or msgcontains(msg, 'sim') then
if os.date("%X") < torneio.startHour or os.date("%X") > torneio.endHour then
selfSay('Registration for the tournament finished, come back later.', cid)
return true
end
if doPlayerRemoveMoney(cid, torneio.price) then
doTeleportThing(cid, torneio.waitPlace)
doPlayerSendTextMessage(cid, 21, "Welcome, this is the waiting room, you wait here while the tournament does not start. Start time: {"..torneio.endHour.."}.")
else
selfSay('You do not have enough money ('..torneio.price..').', cid)
end
else
selfSay('Sure you do not want to participate? Okay, see you next time!', cid)
talkState[talkUser] = 0
end
end
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())

subistitua ali em npc para esse
e da rep+ se der
 
<?xml version="1.0" encoding="UTF-8"?>
<npc name="Nick" script="torneio.lua" walkinterval="2000" floorchange="0">
<health now="150" max="150"/>
<look type=" 1806 " head="20" body="100" legs="50" feet="99" corpse="2212"/>]
<parameters>
<parameter key="message_greet" value="Hello |PLAYERNAME|. If you want to participate in the tournament say: {torneio} or {enter}."/>
    </parameters>
</npc>

Troca isso:
endnpcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
 
Por isso:
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
 
O error está nesse "end" que estava junto da função. 

Baixa o servidor PokémonBLACK+Fire la tem,o,!addons remove

fala pessoal agora que estou com net boa,, posso então ensinar todos mexerem em seu cliente com direito há vídeo aula é simples e facil...
Hoje vamos aprender no modo fácil como troca seu icone de seu cliente de qualquer tipo de servidor, baseado em tibia etc...
 
 
**Requerimento**
 
*1 ResHAck versão antiga. Para baixa >> resource Hacker.rar
*1 Cliente para editar seu icone a gosto.
 
 
Assistindo vídeo aula em modo fácil...
 
         
 
 
 
 
 
 
 
 
 
 

vle é noix!

Fala ai galera tudo bem com vocês? então venho aqui mais uma vez trazer um servidor para download , agora o do Pokémon Titanium , lembrando que não fiz nada nesse servidor estou apenas postando para download 
 
Informações Básicas do Servidor 
 
 
- Servidor Com Sistema de level nos Pokémons
- Servidor com Pokémons da 1° até a 6° Geração ( Incompleta ) ( 1° e 2° gera com suas respectivas formas Shinys)
- Novas Pokebolas , umas 5 por ai
- Mapa original do servidor
- Sistema de Bike
- Sistema de ovos Pokémon 
- Sistema de clan
- Pokémons Selvagens tem o nome "Wild" na frente
- Golden Arena
- Sistema de Duelo 
entre outros Sistemas .....
 
 
Algumas Print sobre o Servidor :
 
 
Spoiler     
 
 
Link para download do Servidor:
Servidor https://mega.co.nz/#!KYJTFDrT!THO6iGH4Leg-xnB0Qt1XWSQzGZzBbxvl6QDrtPNGvYE
Client(Mega)http://www.4shared.com/rar/JCJcuV5Uba/Zombi_TRs_PGalaxy_Client.html
Créditos :
Aline
PGalaxy Team
Gabrieltxu
Slicer 
 
Caso Gostou do servidor deixe seu curtir ai para ajudar :3 , Irei atualizar mais tarde o topico deixar ele com uma aparencia mais agradavel , obrigado a todos