-
Total de itens
574 -
Registro em
-
Última visita
-
Dias Ganhos
1
Tudo que cs007 postou
-
Ninguém pode colocar o link?
-
Vou tentar achar Ai achei um que da loot mas para premium e um mod <?xml version="1.0" encoding="UTF-8"?> <mod name="Premium Loot Rate" version="1.0" author="Cykotitan" contact="otland.net" enabled="yes"> <event type="kill" name="plr" event="script"> <![CDATA[ local premRate = 7 -- loot rate for premium players local rate = getConfigInfo('rateLoot') -- the normal rate, don't change function getContentDescription(uid, comma) local ret, i, containers = '', 0, {} while i < getContainerSize(uid) do local v, s = getContainerItem(uid, i), '' local k = getItemInfo(v.itemid) if k.name ~= '' then if v.type > 1 and k.stackable and k.showCount then s = v.type .. ' ' .. getItemInfo(v.itemid).plural else local article = k.article s = (article == '' and '' or article .. ' ') .. k.name end ret = ret .. (i == 0 and not comma and '' or ', ') .. s if isContainer(v.uid) and getContainerSize(v.uid) > 0 then table.insert(containers, v.uid) end else ret = ret .. (i == 0 and not comma and '' or ', ') .. 'an item of type ' .. v.itemid .. ', please report it to gamemaster' end i = i + 1 end for i = 1, #containers do ret = ret .. getContentDescription(containers[i], true) end return ret end local function send(cid, pos, corpseid, monster, party) local corpse = getTileItemById(pos, corpseid).uid local ret = isContainer(corpse) and getContentDescription(corpse) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, 'Loot of ' .. monster .. ': ' .. (ret ~= '' and ret or 'nothing')) if party then for _, pid in ipairs(getPartyMembers(party)) do doPlayerSendChannelMessage(pid, '', 'Loot of ' .. monster .. ': ' .. (ret ~= '' and ret or 'nothing'), TALKTYPE_CHANNEL_W, CHANNEL_PARTY) end end end local function createLoot(i, ext) local item = type(i.id) == 'table' and i.id[math.random(#i.id)] or i.id local random = math.ceil(math.random(100000) / (ext and premRate or rate)) local tmpItem if random < i.chance then tmpItem = doCreateItemEx(item, getItemInfo(item).stackable and random % i.count + 1 or 1) end if not tmpItem then return end if i.subType ~= -1 then doItemSetAttribute(tmpItem, 'subType', i.subType) end if i.actionId ~= -1 then doItemSetAttribute(tmpItem, 'aid', i.actionId) end if i.uniqueId ~= -1 then doItemSetAttribute(tmpItem, 'uid', i.uniqueId) end if i.text ~= '' then doItemSetAttribute(tmpItem, 'text', i.text) end return tmpItem end local function createChildLoot(parent, i, ext) if #i == 0 then return true end local size, cap = 0, getContainerCap(parent) for k = 1, #i do if size == cap then break end local tmp = createLoot(i[k], ext) if tmp then if isContainer(tmp) then if createChildLoot(tmp, i[k].child, ext) then doAddContainerItemEx(parent, tmp) size = size + 1 else doRemoveItem(tmp) end else doAddContainerItemEx(parent, tmp) size = size + 1 end end end return size > 0 end local function dropLoot(pos, v, ext) local corpse = getTileItemById(pos, v.lookCorpse).uid if isContainer(corpse) then for i = 1, getContainerSize(corpse) do doRemoveItem(getContainerItem(corpse, 0).uid) end local size, cap = 0, getContainerCap(corpse) for i = 1, #v.loot do if size == cap then break end local tmp = createLoot(v.loot[i], ext) if tmp then if isContainer(tmp) then if createChildLoot(tmp, v.loot[i].child, ext) then doAddContainerItemEx(corpse, tmp) size = size + 1 else doRemoveItem(tmp) end else doAddContainerItemEx(corpse, tmp) size = size + 1 end end end end end function onKill(cid, target, damage, flags) if isInArray({1,3}, flags) and isMonster(target) then local v = getMonsterInfo(getCreatureName(target)) if v.lookCorpse > 0 then local master = getCreatureMaster(target) if not master or master == target then addEvent(dropLoot, 0, getThingPos(target), v, isPremium(cid)) end addEvent(send, 100, cid, getThingPos(target), v.lookCorpse, v.description, getPlayerParty(cid)) end end return true end ]]></event> <event type="login" name="Premium Loot Rate" event="buffer"><![CDATA[ registerCreatureEvent(cid, 'plr') ]]></event> </mod>
- 12 respostas
-
- item script
- script
-
(e 1 mais)
Tags:
-
Iria faltar só o de loot. =/
- 12 respostas
-
- item script
- script
-
(e 1 mais)
Tags:
-
Não tem de o de loot?
- 12 respostas
-
- item script
- script
-
(e 1 mais)
Tags:
-
Lek valeu pela ajuda mas descobri o que era... kkkkk' local leave = {x=32312, y=31134, z=6}
-
Isso e tudo em um unico item. Eu nunca vi esse item mas estava vendo isso em outro server e achei interessante.
- 12 respostas
-
- item script
- script
-
(e 1 mais)
Tags:
-
Não da erro não veio. arenaroom.lua function onStepIn(cid, item, position, fromPosition) local leave = {x=32312, y=31134, z=6} if InitArenaScript == 0 then InitArenaScript = 1 -- make arena rooms free for i = 0,9 do setGlobalStorageValue(42300+i, 0) setGlobalStorageValue(42400+i, 0) end checkArenaRooms({}) end local arena_room = item.actionid local player_arena = getPlayerStorageValue(cid, 42355) if getPlayerStorageValue(cid, arena_room+getPlayerStorageValue(cid, 42355)*10-1) == 1 or arena_room+getPlayerStorageValue(cid, 42355)*10-1 == 42299 then if getGlobalStorageValue(cid, arena_room) == 0 then local monster_uid = getGlobalStorageValue(arena_room+100) if monster_uid > 0 then if isCreature(monster_uid) == TRUE then doRemoveCreature(monster_uid) end end local spawn_pos = getThingPos(arena_room) local monster = doCreateMonster(arena_monsters[arena_room+getPlayerStorageValue(cid, 42355)*10], {x=spawn_pos.x-1,y=spawn_pos.y-1,z=spawn_pos.z}) setGlobalStorageValue(arena_room+100, monster) doTeleportThing(cid, spawn_pos, TRUE) setGlobalStorageValue(arena_room, cid) setGlobalStorageValue(arena_room-1, 0) setPlayerStorageValue(cid, 42350, os.time()+arena_room_max_time) else doTeleportThing(cid, fromPosition, TRUE) doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_ORANGE,getCreatureName(getGlobalStorageValue(cid, arena_room))..' is now in next room. Wait a moment and try again.') end else doTeleportThing(cid, fromPosition, TRUE) doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_ORANGE,'First kill monster!') end if arena_room == 42300 then setPlayerStorageValue(cid, 42351, 0) setPlayerStorageValue(cid, 42352, 1) end return TRUE end function checkArenaRooms(param) addEvent(checkArenaRooms, 1000, {}) for i = 42300, 42309 do local player = getGlobalStorageValue(i) if isPlayer(player) == TRUE then local player_storage = getPlayerStorageValue(player, 42350) if player_storage <= os.time() then doTeleportThing(player, leave, TRUE) setPlayerStorageValue(player, 42350, 0) setGlobalStorageValue(i, 0) doPlayerSendTextMessage(player,MESSAGE_STATUS_CONSOLE_ORANGE,'You have been kicked from arena! You have only ' .. arena_room_max_time .. ' seconds for one room.') elseif player_storage - 10 <= os.time() then doPlayerSendTextMessage(player,MESSAGE_EVENT_DEFAULT,'Masz ' .. player_storage - os.time() .. ' sekund, zeby przejsc do kolejnego pokoju!') end else setGlobalStorageValue(i, 0) end end end
-
Se alguém souber como fazer eu também estou precisando.
- 12 respostas
-
- item script
- script
-
(e 1 mais)
Tags:
-
Arena de Svargrond veio global. tem que falar com o NPC dai vai lá matar os bixos na arena.
-
Pessoal meu server já faz tempo que está assim quando eu inicio o server ele a arena funciona normal mas acho que quando o player morre lá ninguém mais consegue fazer. tem como alguém ajudar? Meu Script do creaturescripts Arenakill.lua function onKill(cid, target) local room = getArenaMonsterIdByName(getCreatureName(target)) if room > 0 then setPlayerStorageValue(cid, room, 1) doPlayerSendTextMessage(cid,22,"You can enter next room!") end return TRUE end
-
Não deve ser trabalhoso eu não sei em qual arquivo eu posso encontrar esse componente para ser modificado.
-
Firmeza lek, vou testar aqui já já REP+ Mas se alguém souber editar a distro e quiser postar aqui vai ser de grande ajuda.
-
Fmz!
-
Se você puder me ajudar.. Faz que eu testo aqui!
-
Belo script vou testar aqui vê se vai pegar certinho...Valeu Vodkart =) Uma pequena duvida..Eu tenho um script que limpa players, account, itens e tals,,,so que ele só pega quando liga, se eu quiser por ele para rodar com um horario igual esse da house eu posso? Valeu
-
Alguém sabe algum script ou codigo para modificar na distro que deixa o server sempre de dia? acho maior saco entrar no server e estar tudo escuro tem como ajudar? REP+ Pow ninguém sabe como funciona?
-
bom seria se o nosso amigo postasse por exemplo no 4shared pois nem todo muito tem conta premium nesse site ai.
-
8.60 lek. tem como ajudar? up? ajuda?
-
Isso não apagar a tabela por inteiro? eu quero apagar só o que está dentro da tabela 183327 row(s) deleted. ( O Query demorou 3.1173 sec ) REP +
-
Teria como alguém fazer uma query para eu apagar o conteudo que está no Player_Killers? tem muita coisa lá mais de 2mil paginas estou desde ontem apagando. valeu
-
Por qual motivo nosso amigo ai de cima ainda não foi deletado? --'
-
[Tutorial] Como Resolver Problema Do Idle
tópico respondeu ao cs007 de cs007 em Tutoriais de Scripting
Se ajudei custa nada dar um REP+ -
8.60 up
-
dúvida [Encerrado] Server Fechando Por Causa Do Mapa
um tópico no fórum postou cs007 Tópicos Sem Resposta
Bom pessoal meu server estava em windows e semana passada passei ele para linux até ai tudo bem. só que está dando erro falando que tem que compilar em 64bits só que meu mapa só tem 87mb e no windows não dava esse erro. não vou formatar a maquina para fazer tudo dinovo. Alguém sabe o que eu posso fazer? flws UP. Area sobe otserv ta parada d+ POHA NINGUÉM SABE? --' -
Está dropando tudo veio. igual ao seu script. que coisa de doido --'
-
Quem Está Navegando 0 membros estão online
- Nenhum usuário registrado visualizando esta página.