Skydangerous

Houve um problema onde descontou 25 reais do meu dinheiro do celular, ai eu conversando com daopay, eles me enviaram uma pin code, só que eu não utilizei pq ainda tenho premium. Só que parece que mudou, isso quer dizer que eu perdi meus 15 dias?

Testado no TFS 0.3.6 A função faz pega tal coisa dentre de uma posição function getCreatureInRange(type, fromPos, toPos, toGet, itemid) local types = { ["player"] = isPlayer, ["monster"] = isMonster, ["npc"] = isNpc, ["creature"] = isCreature } local tmp = {} local type = types[type] if(not type) then print('[getCreatureInRange]>> Unknow type') return 0 end local thing = nil for x = fromPos.x, toPos.x do for y = fromPos.y, toPos.y do for z = fromPos.z, toPos.z do for s = 1, 253 do local position = {x = x, y = y, z = z, stackpos = s} thing = getTileThingByPos(position) if(type(thing.uid) == true) then table.insert(tmp, thing.uid) end end end end end if(toGet == "count") then return table.maxn(tmp) elseif(toGet == "name") then return tmp else print('[getCreatureInRange]>> Unknow creature to get') return 0 end return true end Como Usar: local fromPos = {x = 100, y = 100, z = 7, stackpos = 1} local toPos = {x = 150, y = 150, z = 7, stackpos = 1} local t = getCreatureInRange("monster", fromPos, toPos, "count") print('>> There are ' .. t .. ' monsters) Exemplo como vai retornar: local fromPos = {x = 100, y = 100, z = 7, stackpos = 1} local toPos = {x = 150, y = 150, z = 7, stackpos = 1} local t = getCreatureInRange("monster", fromPos, toPos, "name") for i = 1, table.maxn(t) do print('>> The names are ' .. getCreatureName(t[i])) end Exemplo como vai retornar: Creditos: darkhaos

Como Funciona: O evento começa e X pessoas entram no portal, então ele fecha determinado período. Items iram aparecer no mapa, o objetivo é quem pegar mais, para ganhar o evento. <?xml version="1.0" encoding="UTF-8"?> <mod name="Catch the item" version="1.00" author="Kimo" contact="otland.net" enabled="yes"> <config name="catchtheitem_config"><![CDATA[ config = { center_pos = {x = 2736, y = 3497, z = 7}, item = 8304, aid = 4003, effect = CONST_ANI_FIRE, teleportPosition = {x = 74, y = 136, z = 9, stackpos = 1}, -- Onde o teleporte vai ser criado teleportToPosition = {x = 78, y = 136, z = 9}, -- Onde o teleporte enviará as pessoas teleportId = 1387, -- Id do teleporte spawnItemTime1 = 1, -- Tempo que o primeiro item vai ser criado spawnItemTime2 = 1, -- Tempo que o primeiro item vai ser criado timeToStartEvent = 1, -- Minutos após o teleporte ser fechado. itemRewards = {{2160,10}, {13305,1}, {13539,1}} } ]]></config> <talkaction words="!catch" event="script"><![CDATA[ function onSay() domodlib('catchtheitem_config') local tp = doCreateTeleport(config.teleportId, config.teleportToPosition, config.teleportPosition) doItemSetAttribute(tp, "aid", config.teleportActionId) doBroadcastMessage("Catch the item is starting in "..config.timeToStartEvent.." minute!", MESSAGE_EVENT_ADVANCE) addEvent(startEvent, config.timeToStartEvent * 1000 * 10) print(getGlobalStorageValue(3333)) return true end function startEvent() domodlib('catchtheitem_config') local get = getThingfromPos(config.teleportPosition) if get.itemid == config.teleportId then doRemoveItem(get.uid, 1) doBroadcastMessage("Catch the item teleport have been removed and the first items wave will start in " .. config.spawnItemTime1 .. " ", MESSAGE_EVENT_ADVANCE) addEvent(SpawnItem1, config.timeToStartEvent * 1000 * 10) end end function SpawnItem1() domodlib('catchtheitem_config') local field = {} local k = config.center_pos for i = -2, 3 do for j = -2, 4 do table.insert(field, {x=k.x+i, y=k.y+j, z=k.z}) end end for i = 1, 8 do local a = math.random(1, #field) local c = {x=field[a].x, y=field[a].y, z=field[a].z} if getThingFromPos({x=c.x, y=c.y, z=c.z, stackpos=1}).itemid ~= 9767 then local b = doCreateItem(config.item, {x=c.x, y=c.y, z=c.z, stackpos=1}) doItemSetAttribute(b, "aid", config.aid) doItemSetAttribute(c, "moveable", 0) doSendDistanceShoot(config.center_pos, c, config.effect) end end doBroadcastMessage("Items wave 1 has been finished wave 2 in "..config.spawnItemTime2.." minute ", MESSAGE_EVENT_ADVANCE) addEvent(SpawnItem2, config.spawnItemTime2 * 1000 * 10) end function SpawnItem2() domodlib('catchtheitem_config') local field = {} local k = config.center_pos for i = -2, 3 do for j = -1, 2 do table.insert(field, {x=k.x+i, y=k.y+j, z=k.z}) end end for i = 1, 8 do local a = math.random(1, #field) local c = {x=field[a].x, y=field[a].y, z=field[a].z} if getThingFromPos({x=c.x, y=c.y, z=c.z, stackpos=1}).itemid ~= 9767 then local b = doCreateItem(config.item, {x=c.x, y=c.y, z=c.z, stackpos=1}) doItemSetAttribute(b, "aid", config.aid) doSendDistanceShoot(config.center_pos, c, config.effect) end end doBroadcastMessage("Items wave 2 is finished and results in 1 minute", MESSAGE_EVENT_ADVANCE) addEvent(EndEvent, 1 * 1000 * 10) end function EndEvent() domodlib('catchtheitem_config') local function maximum(a) local mi = 1 local m = a[mi] for i,val in ipairs(a) do if val > m then mi = i m = val end end return m end local first = {} local second = 0 local third = 0 local players = getPlayersOnline() local winamount = {} local storage = 7777 --event storage for i, pid in ipairs(players) do if getPlayerStorageValue(pid, storage) >= 0 then table.insert(winamount, getPlayerStorageValue(pid, storage)) end end local winningamount = maximum(winamount) local price = math.random(1, #config.itemRewards) for i, pid in ipairs(players) do if getPlayerStorageValue(pid, storage) == winningamount then table.insert(first, getPlayerName(pid)) end end if #first > 1 then doBroadcastMessage('[Catch the item]\n We have a draw between '..first[1]..' and '..first[2]..'!\nTherefor NO PRICES will be given!') else for i, pid in ipairs(players) do if getPlayerStorageValue(pid, storage) == winningamount then doBroadcastMessage('[Catch the item]\n And the winner is:\n'..first[1]..' with a total score of '..winningamount..'\nYour Price: '..config.itemRewards[price][2]..' x '..getItemNameById(config.itemRewards[price][1])..'\nCongratulations!') doPlayerAddItem(pid, config.itemRewards[price][1], config.itemRewards[price][2]) end end end for i, pid in ipairs(players) do if getPlayerStorageValue(pid, storage) == (winningamount-1) then if second == 0 then doBroadcastMessage('[Catch the item]\n 2nd place is:\n'..getPlayerName(pid)..' with a total score of '..getPlayerStorageValue(pid, storage)..'\nCongratulations!') second = 1 end end end for i, pid in ipairs(players) do if getPlayerStorageValue(pid, storage) == (winningamount-2) then if third == 0 then doBroadcastMessage('[Catch the item]\n 3rd place is:\n'..getPlayerName(pid)..' with a total score of '..getPlayerStorageValue(pid, storage)..'\nCongratulations!') third = 1 end end end addEvent(EndEvent2, 1 * 1000 * 10) end function EndEvent2() setGlobalStorageValue(4444, 0) setGlobalStorageValue(3333, 0) for _, kid in ipairs(getPlayersOnline()) do if(getPlayerStorageValue(kid, 7776) > 0) then doTeleportThing(kid, getTownTemplePosition(getPlayerTown(kid))) setPlayerStorageValue(kid, 7776, 0) setPlayerStorageValue(kid, 7777, 0) end end end ]]></talkaction> <action actionid="4003" event="script"><![CDATA[ function onUse(cid, item, fromPosition, itemEx, toPosition) if item.actionid == 4003 then doRemoveItem(getThingFromPos(fromPosition).uid, 6119) setPlayerStorageValue(cid,7777, getPlayerStorageValue(cid,7777)+1) local score = getPlayerStorageValue(cid, 7777) doCreatureSay(cid, "Point!\nScore ="..getPlayerStorageValue(cid, 7777), 34) return true end end ]]></action> <movevent type="StepIn" actionid="3000" event="script"><![CDATA[ local config = { playerCount = 3333, -- Storage global que contara quantos iram participar maxPlayers = 20 -- Número máximo que pode participar } function onStepIn(cid, item, position, lastPosition, fromPosition, toPosition, actor) if getGlobalStorageValue(config.playerCount) < config.maxPlayers then setGlobalStorageValue(config.playerCount, getGlobalStorageValue(config.playerCount)+1) if getGlobalStorageValue(config.playerCount) == config.maxPlayers then doBroadcastMessage("Catch the item event is now full [" .. getGlobalStorageValue(config.playerCount) .. " players]! The event will soon start.") else doBroadcastMessage(getPlayerName(cid) .. " entered catch the item event! Currently " .. getGlobalStorageValue(config.playerCount) .. " players have joined!", MESSAGE_STATUS_CONSOLE_RED) end else doTeleportThing(cid, fromPosition) doPlayerSendCancel(cid, "The event is full. There is already " .. config.maxPlayers .. " players participating in the event.") return false end print(getGlobalStorageValue(config.playerCount) .. " Players in catch the item event.") return true end ]]></movevent> </mod> Créditos: kimokimo & Skydangerous(Traduzir)

Envia o item diretamente no depot do jogador. function doPlayerAddDepotItems(cid, items, town) if (not isPlayer(cid)) then error("Player not found") end local town = town or getPlayerTown(cid) local parcel = doCreateItemEx(ITEM_PARCEL) for item, count in pairs(items) do if (type(item) == "number") then doAddContainerItem(parcel, item, count) elseif (type(item) == "string") then doAddContainerItem(parcel, getItemIdByName(item), count) else error("Undefinied type of item name") end end return doPlayerSendMailByName(getCreatureName(cid), parcel, town) end Como usar function onSay(cid, words, param, channel) if (param == '') then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.") else local params = string.explode(param, ",") if (not params[2]) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.") elseif (not getPlayerByNameWildcard(params[1])) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player " .. param .. " not found.") else local items, item_params = {}, {} for i = 2, #params do item_params = string.explode(params[i], "x") if (#item_params ~= 2 or tonumber(item_params[1]) <= 0 or tonumber(item_params[2]) <= 0) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.") else items[tonumber(item_params[2])] = tonumber(item_params[1]) print(items[tonumber(item_params[2])]) end end if (#item_params > 0) then doPlayerAddDepotItems(getPlayerByNameWildcard(params[1]), items) end end end return true end Creditos: sn4ake Não testado

esquece. vou resolver sem ninguem saber

Esquece.

Não estava conseguindo instalar. ai eu li o tutorial e deu certo.

as reputações do perfil nao pega

Boa. Que bom que você ainda atualiza, vai ajudar muita gente que quer fazer novos items para seu otserv

que isso novinho faz isso não kkkkkk'

olha eu <-

eu já fiz 2. guards e banuta. mais nem vo disponibilizar para não virem na minha cave e roubar os bichos

nenhum funciona mais;

Obtém já 20 Ambrósias gratuitas! Tens um smartphone? Então obtém já as 20 Ambrósias para gastares no Irariam! É simples: 1) Instala a aplicação gratuita "Jogo Stone Age/ Stone Age" no teu smartphone entre as 13:00 de 09/08/2012 e as 13:00 de 10/08/2012. 2) Joga e torna-te um líder de clã! Assim que atingires o nível 8, receberás as 20 Ambrósias. A promoção termina a 31/08/2012. Este cupão é válido em todos os Jogos de Browser e MMOs da Gameforge. O cupão apenas será dado pela primeira instalação. Predador ou presa? Aqui vale a sobrevivência do mais forte! Aventuras e perigos esperam-te neste cenário pré-histórico: Descobre 36 aventuras em 4 territórios excitantes! Forma a tua tribo com mais de 50 membros, feras e itens de equipamento! Derrota os teus adversários em combates PvP e de Clã! Descobre os tesouros escondidos em cada território! Familiariza-te com a tua clava de osso e com o jogo em geral com um tutorial simples! Ascende ao papel de Chefe de Clã e governa num mundo pré-histórico! Diverte-te! Está disponível para Android, Ios(Iphone) e Windows Phone. Vamos montar um clan !! e bora dominar o jogo ! Uns esclarecimentos do Won Helder: Jogo da Idade da Pedra é o mesmo Jogo! Cada clã é INDIVIDUAL! Ou seja, só porque eu tenho o Sky no meu clã não significa que ele não possa ir para outro. Você pode estar em vários ao mesmo tempo, no momento meu clã do meu celular está level 16 (da minha mãe tá 8) Nunca esqueça de colocar pontos em fúria, é importante para poder ATACAR MAIS! Guarde sempre os dentes sobressalentes na caverna, principalmente quando você for sair. Só use o xaman se tiver certeza que você tem pontos de fúria o suficiente para atacar outros jogadores, se não tiver você vai apenas gastar dente e não vai poder atacar ninguém, além de estar mais vulnerável a um ataque pois sua vida está cheia...

ta acontecendo comigo. me prejudica muito .. nunca dei isso essas versões recentemente que começou a ocorrer.

function onLook(cid, thing, position, lookDistance)

afe. cada coisa. achava que iria dar retired .. por causa da namorada .. por falta de #*#*#& ... enfim, vai estudar logo vagabundo.

pode ser as town, verifica no seu rme .. se as town estão tudo configurada corretamente. verifica se os samples estão com o id da town correto, coordenadas e etc

Mega. Tenta testar ai o target. Ele ataca normal, só que as vezes passa do lado do bicho .. e tira o follow .. e começa a andar lurando monte de bicho.. ai não consigo deixar afk

Você está MB

em breve postarei, estou pondo sistema de cadastro junto com o bot..

LoL. achava que era alguma coisa de muié .. mas é jogo t_t

todo mundo me conhece, só ver a fotinha vai saber que sou eu.

Ja descobri.

Opaa Vlw, ele ta bem podrinho .. pq comecei a fazer ele hoje .. estava fazendo na linguagem vb , ai mudei para csharp