douglasfamil1

Tente 
local focus = 0 local talk_start = 0 local target = 0 local following = false local attacking = false function onThingMove(creature, thing, oldpos, oldstackpos) end function onCreatureAppear(creature) end function onCreatureDisappear(cid, pos) if focus == cid then selfSay('???') focus = 0 talk_start = 0 end end function onCreatureTurn(creature) end function msgcontains(txt, str) return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)')) end function onCreatureSay(cid, type, msg) msg = string.lower(msg) if (msgcontains(msg, 'hi') and (focus == 0)) and getDistanceToCreature(cid) < 4 then selfSay('Olá! Se voce está pronto, diga "reborn".') focus = cid talk_start = os.clock() elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then selfSay('Desculpe, ' .. getCreatureName(cid) .. '! Hey!.') elseif focus == cid then talk_start = os.clock() if msgcontains(msg, 'reborn') and getPlayerStorageValue(cid,30023) == 4 then selfSay('Desculpe, mas voce já é rebornado.') focus = 0 talk_start = 0 elseif msgcontains(msg, 'reborn') and getPlayerLevel(cid) < 200 and getPlayerStorageValue(cid,30023) ~= 4 then selfSay('Apenas level 200 até 1000 podem rebornar.') focus = 0 talk_start = 0 elseif msgcontains(msg, 'reborn') then selfSay('Realmente quer isto?') talk_state = 2 --_GOKU_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 8 then doReborn(cid,1,10,9) talk_state = 0 --_VEGETA_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 23 then doReborn(cid,1,25,24) talk_state = 0 --_PICCOLO_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 36 then doReborn(cid,1,42,37) talk_state = 0 --_C17_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 49 then doReborn(cid,1,50,50) talk_state = 0 --_GOHAN_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 63 then doReborn(cid,1,62,64) talk_state = 0 --_TRUNKS_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 75 then doReborn(cid,1,74,76) talk_state = 0 --_CELL_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 87 then doReborn(cid,1,81,88) talk_state = 0 --_FREEZA_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 101 then doReborn(cid,1,88,102) talk_state = 0 --_MAJIN BOO_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 117 then doReborn(cid,1,98,118) talk_state = 0 --_BROLY_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 131 then doReborn(cid,1,113,132) talk_state = 0 --_C18_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 144 then doReborn(cid,1,50,145) talk_state = 0 --_UUB_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 156 then doReborn(cid,1,128,157) talk_state = 0 --_GOTEN_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 170 then doReborn(cid,1,142,171) talk_state = 0 --_CHIBI TRUNKS_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 184 then doReborn(cid,1,151,185) talk_state = 0 --_COOLER_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 197 then doReborn(cid,1,153,198) talk_state = 0 --_DENDE_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 210 then doReborn(cid,1,169,211) talk_state = 0 --_TSUFUL_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 222 then doReborn(cid,1,180,223) talk_state = 0 --_BARDOCK_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 235 then doReborn(cid,1,194,236) talk_state = 0 --_KURIRIN_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 248 then doReborn(cid,1,205,249) talk_state = 0 --_PAN_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 260 then doReborn(cid,1,212,261) talk_state = 0 --_KAIO_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 272 then doReborn(cid,1,221,273) talk_state = 0 --_VIDEL_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 284 then doReborn(cid,1,227,285) talk_state = 0 --_JANEMBA_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 296 then doReborn(cid,1,234,297) talk_state = 0 --_TENSHINHAN_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 308 then doReborn(cid,1,246,309) talk_state = 0 --_JENK_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 320 then doReborn(cid,1,257,321) talk_state = 0 --_RADITZ_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 332 then doReborn(cid,1,265,333) talk_state = 0 --_C16_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 344 then doReborn(cid,1,277,345) talk_state = 0 --_TURLES_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 356 then doReborn(cid,1,285,357) talk_state = 0 --_BULMA_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 368 then doReborn(cid,1,296,369) talk_state = 0 --_SHENRON_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 380 then doReborn(cid,1,302,381) talk_state = 0 --_VEGETTO_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 392 then doReborn(cid,1,308,393) talk_state = 0 --_TAPION_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 404 then doReborn(cid,1,321,405) talk_state = 0 --_KAME_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 417 then doReborn(cid,1,335,418) talk_state = 0 --_KING VEGETA_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 429 then doReborn(cid,1,347,430) talk_state = 0 --_KAGOME_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 441 then doReborn(cid,1,357,442) talk_state = 0 --_ZAIKO_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 453 then doReborn(cid,1,368,454) talk_state = 0 --_LORD CHILLED_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 465 then doReborn(cid,1,375,466) talk_state = 0 --_Bills_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 482 then doReborn(cid,1,517,483) talk_state = 0 --_Wiss_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 514 then doReborn(cid,1,653,515) talk_state = 0 --_Goku God_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 526 then doReborn(cid,1,627,527) talk_state = 0 --_Bills Evolution_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 538 then doReborn(cid,1,669,539) talk_state = 0 --_Yamcha_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 550 then doReborn(cid,1,674,551) talk_state = 0 --_Evolution Frezza_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 562 then doReborn(cid,1,700,563) talk_state = 0 --_Evolution Trunks_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 574 then doReborn(cid,1,712,575) talk_state = 0 --_C13_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 586 then doReborn(cid,1,723,587) talk_state = 0 --_Xicor_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 598 then doReborn(cid,1,742,599) talk_state = 0 --_c20_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 613 then doReborn(cid,1,769,614) talk_state = 0 --_Paikuhan_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 625 then doReborn(cid,1,762,626) talk_state = 0 --_Mr Satan_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 638 then doReborn(cid,1,790,639) talk_state = 0 --_C8_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 650 then doReborn(cid,1,782,651) talk_state = 0 --_coller_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 662 then doReborn(cid,1,811,663) talk_state = 0 --_anja marcarita_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 881 then doReborn(cid,1,961,882) talk_state = 0 --_begarmo_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 892 then doReborn(cid,1,967,893) talk_state = 0 --_caulifla_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 903 then doReborn(cid,1,975,904) talk_state = 0 --_dyspo_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 914 then doReborn(cid,1,980,915) talk_state = 0 --_frost_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 680 then doReborn(cid,1,824,681) talk_state = 0 --_Vados_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 692 then doReborn(cid,1,828,693) talk_state = 0 --_Dabura_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 704 then doReborn(cid,1,839,705) talk_state = 0 --_GokuJr_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 719 then doReborn(cid,1,841,720) talk_state = 0 --_Gogetta_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 731 then doReborn(cid,1,852,732) talk_state = 0 --_Hitto_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 743 then doReborn(cid,1,858,745) talk_state = 0 --_Champa_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 759 then doReborn(cid,1,874,760) talk_state = 0 --_Gokublack_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 787 then doReborn(cid,1,900,788) talk_state = 0 --_Botamo_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 775 then doReborn(cid,1,891,776) talk_state = 0 --_Chichi_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 799 then doReborn(cid,1,903,800) talk_state = 0 --_cabba_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 811 then doReborn(cid,1,912,812) talk_state = 0 --_Monaka_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 823 then doReborn(cid,1,922,824) talk_state = 0 --_Zamusu Black Fusion_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 855 then doReborn(cid,1,948,858) talk_state = 0 --_Deus Palhaço_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 868 then doReborn(cid,1,955,869) talk_state = 0 --_Zamusu_-- elseif msgcontains(msg, 'yes') and talk_state == 2 and getPlayerLevel(cid) >= 200 and getPlayerLevel(cid) <= 1000 and getPlayerVocation(cid) == 835 then doReborn(cid,1,934,836) talk_state = 0 elseif msgcontains(msg, 'yes') and talk_state == 2 then selfSay('Desculpe, ' .. getCreatureName(cid) .. '! Voce deve estar na ultima transformação ou então passou do level 1000.') elseif msgcontains(msg, 'bye') and getDistanceToCreature(cid) < 4 then selfSay('Adeus!') focus = 0 talk_start = 0 end end end function onThink() doNpcSetCreatureFocus(focus) if (os.clock() - talk_start) > 45 then if focus > 0 then selfSay('Próximo por favor...') end focus = 0 end if focus ~= 0 then if getDistanceToCreature(focus) > 5 then selfSay('Adeus!') focus = 0 end end end  

@douglasfamil1
 
assim?
 
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 local items = {           item1 = {6527, 2205}, -- item1 item que será pedido e que será dado na primeira troca } local counts = {           count1 = {30, 1}, -- count1 quantidade que será pedido e que será dado na primeira troca } local vocation = 5 -- vocation proibida.. local vocation1 = 6 -- vocation proibida.. local vocation2 = 7 -- vocation proibida.. local vocation3 = 8 -- vocation proibida.. 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, 'vocation cabba') then             selfSay('Voce deseja trocar '.. counts.count1[1] ..' '.. getItemNameById(items.item1[1]) ..' por '.. counts.count1[2] ..' '.. getItemNameById(items.item1[2]) ..'?',cid)             talkState[talkUser] = 1         elseif talkState[talkUser] == 1 then             if msgcontains(msg, 'yes') then             if getPlayerVocation(cid) ~= vocation and getPlayerVocation(cid) ~= vocation1 and getPlayerVocation(cid) ~= vocation2 and getPlayerVocation(cid) ~= vocation3 then                 if getPlayerItemCount(cid, items.item1[1]) >= counts.count1[1] then                     doPlayerRemoveItem(cid, items.item1[1], counts.count1[1])                     doPlayerAddItem(cid, items.item1[2], counts.count1[2])                     selfSay('Voce acaba de trocar '.. counts.count1[1] ..' '.. getItemNameById(items.item1[1]) ..' por '.. counts.count1[2] ..' '.. getItemNameById(items.item1[2]) ..'.', cid)                     talkState[talkUser] = 0                 else                     selfSay('Voce precisa de '.. counts.count1[1] ..' '.. getItemNameById(items.item1[1]) ..'.', cid)                 end                 else                     selfSay('Voce está proibido de comprar aqui.', cid)                 end             end         end return TRUE end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())  

@douglasfamil1 veja se é isso
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 local items = {           item1 = {6527, 2205}, -- item1 item que será pedido e que será dado na primeira troca } local counts = {           count1 = {30, 1}, -- count1 quantidade que será pedido e que será dado na primeira troca } local vocation = 5 -- vocation proibida.. 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, 'vocation cabba') then             selfSay('Voce deseja trocar '.. counts.count1[1] ..' '.. getItemNameById(items.item1[1]) ..' por '.. counts.count1[2] ..' '.. getItemNameById(items.item1[2]) ..'?',cid)             talkState[talkUser] = 1         elseif talkState[talkUser] == 1 then             if msgcontains(msg, 'yes') then             if getPlayerVocation(cid) ~= vocation then                 if getPlayerItemCount(cid, items.item1[1]) >= counts.count1[1] then                     doPlayerRemoveItem(cid, items.item1[1], counts.count1[1])                     doPlayerAddItem(cid, items.item1[2], counts.count1[2])                     selfSay('Voce acaba de trocar '.. counts.count1[1] ..' '.. getItemNameById(items.item1[1]) ..' por '.. counts.count1[2] ..' '.. getItemNameById(items.item1[2]) ..'.', cid)                     talkState[talkUser] = 0                 else                     selfSay('Voce precisa de '.. counts.count1[1] ..' '.. getItemNameById(items.item1[1]) ..'.', cid)                 end                 else                     selfSay('Voce está proibido de comprar aqui.', cid)                 end             end         end return TRUE end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())  

~~~~~ * Auto Loot System 100% * ~~~~~ TFS 0.4 / TFS 0.3.7
Fala galerinha do Tibiaking, então, várias pessoas estão tendo problema com o sistema de autoloot, aqui vai um sistema que eu editei para melhorar o uso do mesmo. Sem muita enrolação vamos ao que interessa.
 
1° - Acesse a pasta data/lib e crie um arquivo chamado Auto_Loot.lua, coloque isso dentro do arquivo:
 
 
2° - Abra a pasta data/actions/scripts e crie um arquivo chamado Auto_Loot_Boost.lua, dentro dele adicione:
 
 
3° - Abra a pasta data/creaturescripts/scripts e crie um arquivo chamado Auto_Loot.lua, dentro dele adicione:
 
 
4° - Abra a pasta data/talkactions/scripts e crie um arquivo chamado Auto_Loot.lua, dentro dele adicione:
 
 
5° - Em data/actions/actions.xml adicione a seguinte tag:
 
<!-- Auto Loot --> <action itemid="7443" event="script" value="Auto_Loot_Boost.lua"/> Altere o numero 7443 caso queira mudar o id do item do seu auto loot boost.
 
6° - Em data/creaturescripts/creaturescripts.xml adicione a seguinte tag:
 
<!-- Auto Loot --> <event type="login" name="Auto_Loot_Login" event="script" value="Auto_Loot.lua"/> <event type="kill" name="Auto_Loot_Kill" event="script" value="Auto_Loot.lua"/> 7° - Em data/talkactions/talkactions.xml adicione a seguinte tag:
 
<!-- Auto Loot --> <talkaction access="0-4" words="/autoloot;!autoloot" event="script" value="Auto_Loot.lua"/>  
Créditos
50% Killua(Vitor Bertolucci)
50% Danyel Varejão
 

Bom galera, o Tópico já diz tudo, irei explicar como mudar para Uint16 dessa vez nas Source, para quem não sabe. Irei explicar como aumentar em Magic Effects, para assim você seu Server usar mais de 255, e ShootEffects para usar mais de 41 Distance efeitos(muito mais). Existe Tópicos no Tk, porém não é a mesma coisa, esse é diferente pois você irá alterá o valor dos uint's disparados para o Client, para assim então usar além do Padrão!
  Abaixo umas informações essenciais ! 
Esse Tópico é especifico para TFS 0.4, para que assim você possa aumentar o limite de efeitos no Client, e usar mais de 255 efeitos, e mais de 41 efeitos em Distância.  Vale lembra também que você não é obrigado a mudar em ambos, se você quiser apenas aumentar o Limite de Efeitos para mais de 255, então mude apenas ele, caso queria aumentar apenas os Efeitos que são lançados a distância(ShootEffects ou Distance Effects), caso queria os dois, use ambos. 
 
Vamos começar primeiramente com os Magic Effects:
 
 
 
Agora vamos mudar o ShootEffects para uint16.
 
 
Bom não adianta mudar isso se não fizer alteração no Client, então deixarei aqui, dois Tópicos de como mudar de uint8 para uint16 no Client em em ShootEffects e MagicEffect.
 
 
Mudando os Efeitos de uint8 a 16 para Magic Effects
Mudando os Efeitos de uint8 a 16 para Shoot Effects
 
Então é isso ae, qualquer erro só comentar para que eu possar tentar ajudar.
 
Tópico exclusivo do Tk, proibido posta em outro site, blog ou fórum! 
 
xD

Base Naruto Leagues V0.1 Bem Pessoal Vou Começar Falando Porque Estou  Postando Essa Base.
Eu Procurei Muitos Ntos Para Começar Projeto Porem Nenhum Encontrei !
Esse Nto que Estou Postando Contem Mapa Proprio. Porem Sprites e Jutsus Não Foram Feitos Por Min.
 
[Meu Projeto Nto Leagues Esta Online Mais Estou Lançando uma Update v0.2]  Vou Falar Algumas Coisas que o Servidor Contem Que Adicionei:
 
 
-- Servidor Naruto Leagues --  Versao V0.1
- Trade System [100%]
[Groups 1 a 6 ] [100%]
Canais 
- Help-Channel.
- Mercado-Livre.
[ Quests Por Alavanca , Projeto Todas. Feitas Apenas 1 Kurama. ]
[ Area de Quests Todas Criadas. ]
Senzus Adicionadas.
- kit inicial [100%] [ Com uma 'Senzu Que heala 10k de Mana/Life Para Novatos. ]
- Temos atualmente nessa Versão 8 Caves com teleporte. 
- Shinobi Fire [2]. [100%]
- Nukenin [1] , Nukenin [2] , Nukenin [3] , Nukenin [4]. [100%]
- Mutation [1]. [100%]
- Shinobi Skys [5]. [100%]
- Itachi [5]. [100%]
- Akatsuki Corrupted. [100%]
- Deidara. [100%]
- Yoth. [100%]
- Teleport Evento BAG - [100%]
- Teleport Boss - [100%]
- Teleport Arena - [100%]
- Teleport Arena Evento. [50%]
- NPC Recompensa Por Dia. 
- NPC Mendigo.
- Sala Staff. [100%]
- TPS Falantes. [100%]
- Minoru [0%] [ Por conta de ser Mapa Proprio. ]
- Mapa Proprio.
- Shop Configurado Para Items Médios.  Preço De Items 2k por Item [ Moeda Gold Normal ID:2160] Coloquei os Items Madara , Kurama etcs em Futuras Quests
- Quests: Projetos De Quests. Atualmente.
- Tais Como:
- Quest Pergaminho Madara Rikudou.
- Quest Pergaminho Naruto Rikudou.
- Quest Pergaminho Sasuke Rikudou.
- Quest Pergaminho Kaguya.
- Quest Pergaminho Madara.
- Quest Pergaminho Obito.
- Quest Pergaminho Kakuzo.
- Quest Pergaminho Hashirama.
- Quest Pergaminho Tsunade.
- Quest Pergaminho Yamato.
- Quest Pergaminho Anbu.
- Quest Pergaminho Nidaime.
- Quest Pegaminho De XP 10%.
- Quest yalahari mask.
- Quest Madara Armor.
- Quest Madara Legs.
- Quest Madara Boots.
- Quest Nto Points.
- Quest Més Premium.
- Quest Semana Premium.
- Quest Remove  Red Skull.
- Quest Remove Black Skull.
- Quest Hidan Amulet.
- Quest Rikudou Cedro.
- Quest Gunbai.
- Quest Akatsuki Ring.
- Quest Nagato Ring.
- Quest Chojuro Sword.
- Quest Kurama Helmet.
- Quest Kurama Sword.
- Quest Kurama Boots.
- Quest Kurama Legs.
- Quest Kurama Armor.
- Quest Mystic Senzu. [ Essa Senzu Heala 70k] [ Pode Ser Configurada Para Healar Mais Ou Retirada do servidor. ]  [ Life/Mana ]
- Arena VIP/Hunt VIP [0%]   [ Coloquei um Aviso no chao Que a Area Vip Nao Esta Pronta ]
- Tipos De Ninja:
- naruto. [100%]
- sasuke. [100%]
- lee. [100%]
- shikamaru. [100%]
- neji. [100%]
- tenten. [100%]
- hinata. [100%]
- kakashi. [100%]
- killer bee. [100%]
- sakura. [100%]
- gaara. [100%]
- kiba. [100%]
- itachi. [100%]
- tobi. [100%]
- minato. [100%]
- madara. [100%]
- tsunade. [100%]
- hashirama. [100%]
- nidaime. [100%]
- nagato. [100%]
- yamato. [100%]
- raikage. [100%]
- kisame. [100%]
- temari. [100%]
- kankuro. [100%]
- deidara. [100%]
- zetsu. [100%]
- jiraiya. [100%]
- kabuto. [100%]
- Madara Rikudou. [100%]
- Naruto Rikudou. [100%]
- Sasuke Rikudou. [100%]
- System Novas Como:
- Ser Um Heroi ! Se Torne o Heroi da cidade Matando os Jogadores Pks. 
- Ganhe Gold Vendendo LOOT ao NPC. Ou matando Jogadores Pks. Varia Com o Level do Jogador.
- Veja Quantas Pessoas ele Mato  e quantas Vezes Ele morreu Dando Use Nele.

Entre Outras Coisas Em Breve Posto  Prints !
 
Baixar Servidor : MEDIAFIRE
http://www.mediafire.com/download/dxlt33gdbxkkkum/Servidor+Leagues.rar
Baixar Client:  MEDIAFIRE
http://www.mediafire.com/download/ss3ss79c1exb382/Client+Leagues.rar
Scan: Client [VIRUSTOTAL]
https://www.virustotal.com/pt/file/5a9913d2ffdf4449f35462429da22cadd030b0331fb05af89908a1344fb7e9ef/analysis/1471540818/
Scan: Servidor [VIRUSTOTAL]
https://www.virustotal.com/pt/file/5751807d537277817c6d8592c989fe224ad5d35849e4ef80c2253ca073cfab12/analysis/1471541220/
 
Não Vou Colocar Print das Hunts Porque Elas São Muitos Grandes.
 
imagems:
https://uploaddeimagens.com.br/imagens/22-png--156
https://uploaddeimagens.com.br/imagens/sds-png--15
https://uploaddeimagens.com.br/imagens/sdsds-png--10
https://uploaddeimagens.com.br/imagens/sdsdsds-png--2
https://uploaddeimagens.com.br/imagens/sem_titulo-png--17218
https://uploaddeimagens.com.br/imagens/sem_titulod-png--4
https://uploaddeimagens.com.br/imagens/w-png--33
 
 
[V0.1] Versao 8.54   
 
 
 
 
 

Se Gostou REP+ Que Eu Trago a versão V1
 
Aprova Ai ADMINISTRADOR XD
VAI APROVAR NAO ADM ?