Enself

Quem ta com bug nas spells posta aqui ou cria na area de scripting eu arrumo ai.

Manoel pode me passar o seu skype quero falar com você

Editado la encima tenta denovo

local minutes = 10 -- Minutes function onSay(cid, words, param) if not isPremium(cid) return doPlayerSendCancel(cid, "Voce não é premium account") end if not isPlayer(cid) then return true end if isPremium(cid) then doSetCreatureLight(cid, 8, 215, minutes*60*1000) doSendAnimatedText(getCreaturePosition(cid), "LIGHT!", math.random(1, 255)) end return true end

Cara sem palavras, esta sensacional esse projeto varias sprites massas pra tirar aquela carinha de "Tudo Tibia" Parabéns desejo muito sucesso.

function onUse(cid, item) local item = 2160 if getPlayerStorageValue(cid, 212345) > 1 then doPlayerSendTextMessage(cid, 22, "It's empty") return true end if getPlayerStorageValue(cid, 212345) > 1 then doPlayerAddItem(cid, item, 1) doPlayerSendTextMessage(cid, 26, "Congratulations") doPlayerSetStorageValue(cid, 212345,1) return true end É so colocar as storage iguais que ai vai identificar se ele ja clico no baú. com esse script voce cria 5 baús dai é so mudar o item

Bennyywbom eu não me acho bonito né mais aê a foto dele ;s Competir na feiura voce que é bonito né fazendo BIQUINHO IGUAL MINA QUE TIRA FOTO NO FACEBOOK NO ESPELHO !

Com coisa que esse flinkton é bonito é um criança que fala muita merda.não da conta de fazer nada véi. Aê o video do roksas posso tomar ban então vejam logo flw ! http://youtu.be/JXIduLIeEQ0

Não to nem ai cara posta oque você quiser seu lixo sem futuro. pra quem quiser o da gordinha com o roksas apresentando o trabalho de escola eu vo postar jaja. 39% up

Falo o adulto que entende de tudo né ? adora zuar os outros. LIXO.

Nem ia postar demora pedir desculpas quando vem faz merdá mas fmz flw !

Como eu disse não é nada complexo nada comparado ao sistema do naruto shinobi Só não fiz o de trocar as roupas pq maioria não tem as sprites e só seria trabalho. e a promote também como disse ninguem as teria então é um simples script baseado no deles.

Bom Galera, vou ser direto to tentando postar a meia hora e não ta indo a net ta muito ruim. É um sistema que quando você arrecada 6 Corações matando players você trocar os corações por double exp no NPC Tobi. Bom sem mais vamos lá. Vá na pasta do seu ot creaturescripts/scripts crie um arquivo chamado heart.lua function onPrepareDeath(cid, deathList) local item = 5943 if isPlayer(cid) and isPlayer(deathList[1]) then local add = doPlayerAddItem(deathList[1],item,1) doItemSetAttribute(add, "description","Esse coração é de "..getPlayerName(cid).." que foi morto no level"..getPlayerLevel(cid).." por "..getPlayerName(deathList[1])..".") doPlayerSendTextMessage(deathList[1], MESSAGE_STATUS_CONSOLE_ORANGE, "Voce foi Morto " .. getCreatureName(cid) .. ".") doSendMagicEffect(getPlayerPosition(deathList[1]),12) end return true end Em Creaturescripts.xml <event type="preparedeath" name="HeartSys" event="script" value="heart.lua"/> Agora é o NPC, Vá na pasta do seu servidor data/npc/scripts crie um arquivo chamado tobi npc system.lua e cole 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 function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local experience = 2 -- Experience rates no caso 2x a experiencia do seu servidor. local item = 5943 -- ID do Item que necessita para trocar OBS: Editar no Hearth Tambem no creaturescripts se for mudar. local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid if(msgcontains(msg, 'missao')) then selfSay('Ok, Para começar vamos fazer a {troca}?', cid) end --------------------------------------------------------- if(msgcontains(msg, 'troca')) then selfSay('Traga para min 6 corações para provar a sua força {coracao}', cid) talkState[talkUser] = 1 elseif(msgcontains(msg, 'coracao') and talkState[talkUser] == 1) then if (getPlayerStorageValue(cid,2010250) > 0) then selfSay('Voce ja terminou essa missao!!', cid) else if(doPlayerRemoveItem(cid, 5943, 6) == TRUE) then setPlayerStorageValue(cid,2010250,1) doPlayerSetExperienceRate(cid, experience) selfSay('Voce recebeu sua recompensa.', cid) return true end if getPlayerItemCount(cid, item) < 6 then selfSay('Não tente me enganar, voce não tem os 6 corações !', cid) end end end end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) Depois crie um XML Chamado Tobi e Cole isso dentro. <?xml version="1.0" encoding="UTF-8"?> <npc name="Tobi" script="data/npc/scripts/tobi npc script.lua" walkinterval="2000" speed="0" floorchange="0"> <health now="100" max="100"/> <look type="480" head="0" body="0" legs="0" feet="0" addons="0"/> <parameters> <parameter key="message_greet" value="Ola vamos comecar a {troca} ?"/> </parameters> </npc> Bom não testei qualquer bug favor reportar flw. Créditos: Vodkart -- Pelo Script do Hearth Enself -- Pelo Sistema

local vocs = { [2] = {item = 2160 quant = 1} -- ID DO Item e Quantidade } function onUse(cid, item, frompos, itemEx, toPos) local he = vocs[getPlayerVocation(cid)] if getPlayerStorageValue(cid, 213125) > 1 then doPlayerSendTextMessage(cid, 20, "Voce ja completou essa quest") setPlayerStorageValue(cid, 213125,1) return true end doPlayerSendTextMessage(cid, 22, "Parabéns, recebeu skill!") setPlayerStorageValue(cid, 91670, 1) doPlayerAddItem(cid, he.item, he.quant) return true end

Bem legal Rep+ apesar de eu não saber quem é esse carinha ai até que fico boa Flenketon.

Topico mal formatado sem imagens ? está horrível reformule isso ai sinceramente.

Eta porra , ninguem é obrigado a se deparar com essas desgraças nao poxa vida em wow?

local tps = { ["Demon"] = {pos = {x=123, y=123, z=7}, toPos = {x=321, y=321, z=7}, time = 50}, } local function removeTp(tp) local t = getTileItemById(tp.pos, 5023).uid return t > 0 and doRemoveItem(t) and doSendMagicEffect(tp.pos, CONST_ME_POFF) end function onDeath(cid) local tp = tps[getCreatureName(cid)] if tp then doCreateTeleport(5023, tp.toPos, tp.pos) doCreatureSay(cid, "O teleport irá sumir em "..tp.time.." segundos.", TALKTYPE_ORANGE_1) addEvent(removeTp, tp.time*1000, tp) end return true end Tag Creaturescripts <event type="death" name="MonsterKill" event="script" value="nomedoscript.lua"/>

local function move(cid, target, playerpos, targetpos, times) if playerdir ~= getCreatureLookDirection(cid) then doCreatureSetLookDirection(target, getCreatureLookDirection(cid)) end if playerpos ~= getCreaturePosition(cid) then if playerpos.z == getCreaturePosition(cid).z then local ntpos = getCreaturePosition(cid) local x,y,z = ntpos.x-playerpos.x,ntpos.y-playerpos.y,ntpos.z-playerpos.z ntpos = getCreaturePosition(target) ntpos.x, ntpos.y, ntpos.z = ntpos.x+x,ntpos.y+y,ntpos.z+z if queryTileAddThing(target, ntpos) == RETURNVALUE_NOERROR and getCreaturePosition(cid).z == getCreaturePosition(target).z then doMoveCreature(target, getCreatureLookDirection(cid)) end end end local playerpos, targetpos = getCreaturePosition(cid), getCreaturePosition(target) local times = times+1 if times < 100 then addEvent(move, 1, cid, target, playerpos, targetpos, times) else doCreatureSetNoMove(target, 0) doSendDistanceShoot(targetpos, playerpos, 31) doSendAnimatedText(targetpos, "Livre!", math.random(1,255)) doPlayerSendCancel(cid, "Voce nao tem mais o controle do "..getCreatureName(target)..".") if (isPlayer(target)) then doPlayerSendCancel(cid, "Voce foi libertado "..getPlayerName(cid).."da tecnica da sombra.") setPlayerStorageValue(target, 14755, -1) end end end function onCastSpell(cid, var) local target = getCreatureTarget(cid) if (isPlayer(target)) or (isMonster(target)) then if getPlayerStorageValue(cid, 14755) == -1 then doCreatureSetNoMove(target, 1) doPlayerSendCancel(cid, "Voce possuiu "..getCreatureName(target)..".") if (isPlayer(target)) then doPlayerSendCancel(target, "Voce foi possuido por "..getPlayerName(cid)..".") setPlayerStorageValue(target, 14755, 1) end doSendAnimatedText(getCreaturePosition(target), "Possuido!", math.random(1,255)) local playerpos,playerdir,targetpos = getCreaturePosition(cid), getCreatureLookDir(cid), getCreaturePosition(target) doSendDistanceShoot(playerpos, targetpos, 31) doSendMagicEffect(getCreaturePosition(target), CONST_ME_SMALLCLOUDS) local times = 1 addEvent(move, 1000, cid, target, playerpos, targetpos, times) else doPlayerSendCancel(cid, "Você ainda esta sobre a possecao do inimigo.") end end end

Muito Bom, arrumo aquele negocio do exit quando o player da cast no outro por exemplo. estou numa hunt com o cast ligado alguem da cast em min, quando da !cast exit eles teleporta no player?

function onUse(cid, item, fromPosition, itemEx, toPosition) if getPlayerStorageValue(cid, 2521512) > os.time() then doPlayerSendCancel(cid, "You are exhausted.") end setPlayerStorageValue(cid, 2521512, os.time() + 60) return true end function Wall() local x = true local B = { {1054,{x=1084, y=859, z=7, stackpos = 1}}, -- id da parede e pos da parede {1054,{x=1084, y=860, z=7, stackpos = 1}} } for i = 1, #B do if getTileItemById(B[i][2], B[i][1]).uid == 0 then x = false end if x == true then doRemoveItem(getThingfromPos(B[i][2]).uid,1) else doCreateItem(B[i][1], 1, B[i][2]) end end end Wall() addEvent(Wall, 5000) doTransformItem(item.uid, item.itemid == 1945 and 1946 or 1945) return true end Pelomenos pega cara? tenta isso...

function onUse(cid, item, fromPosition, itemEx, toPosition) if getPlayerStorageValue(cid, 2521512) > os.time() then doPlayerSendCancel(cid, "You are exhausted.") end setPlayerStorageValue(cid, 2521512, os.time() + 60) end function Wall() local x = true local B = { {1054,{x=1084, y=859, z=7, stackpos = 1}}, -- id da parede e pos da parede {1054,{x=1084, y=860, z=7, stackpos = 1}} } for i = 1, #B do if getTileItemById(B[2], B[1]).uid == 0 then x = false end if x == true then doRemoveItem(getThingfromPos(B[2]).uid,1) else doCreateItem(B[1], 1, B[2]) end end end Wall() addEvent(Wall, 5000) doTransformItem(item.uid, item.itemid == 1945 and 1946 or 1945) return true end return true end

Tenta ai function onUse(cid, item, fromPosition, itemEx, toPosition) local exhausted = 60 -- Tempo em segundos if getPlayerStorageValue(cid, 112333) > os.time() then doPlayerSendCancel(cid, "You are exhausted.") return true end setPlayerStorageValue(cid, 112333, os.time() + exhausted) end return true function Wall() local x = true local B = { {1054,{x=1084, y=859, z=7, stackpos = 1}}, -- id da parede e pos da parede {1054,{x=1084, y=860, z=7, stackpos = 1}} } for i = 1, #B do if getTileItemById(B[i][2], B[i][1]).uid == 0 then x = false end if x == true then doRemoveItem(getThingfromPos(B[i][2]).uid,1) else doCreateItem(B[i][1], 1, B[i][2]) end end end Wall() addEvent(Wall, 5000) doTransformItem(item.uid, item.itemid == 1945 and 1946 or 1945) return true end

Cara eu adorei namoral, estarei usando a v2 como a pedido meu eu queria esse efeito bem massa de azul.