lKallisto

Paradise Evolution
 8.60 
 

 

 

 

 

 

 

 

Informações
Mapa evolutions editado Cada vocação tem suas próprias magias editadas Novos monstros Itens donate Novas quests Novas outfits Teleports Novas runas Npc Addoner Npc Priest *Realiza Casamentos* Evento Tetris Evento Snake Evento Zombie Evento Race PvpE Room E muito mais!  

Download
http://www.mediafire.com/download/pzr8smmlc32kote/methemia+exp+alta+8.60.rar
 
Scan
https://www.virustotal.com/en/file/f53f9969638665f369fe3983ca93129010f049d51f201f6e786405badeb81f60/analysis/1448332074/
 

Créditos totais à Amiroslo, Brilux, BT, SmoOkeR e Animal Pak.

____________________________________________
 
Créditos
Lhandoria
Larissa Azhaurn
____________________________________________
 
Posição
83 | 483 | 10
____________________________________________
SCAN
https://www.virustotal.com/en/file/6cf8f1d15fd8b0e3bea47208e202f676dd81d0c0540027933ab436a9ce0a1036/analysis/1446324861/
 
DOWNLOAD
Landhoria Trainers.rar

Imagens:














Download:
http://www.mediafire.com/download/a3eyzwjp2h1ii08/noobwar-pro.eu.rar

Scan:
https://www.virustotal.com/en/file/57b45fefcf71a3cccee52d22a690f689141357a9c21ba27c088196782fd35558/analysis/1442644841/

Créditos:
Noobwar team
Natalia

Crie um script chamado fraglook.lua na pasta data\creaturescripts\script:
function getPlayerFrags(cid) local time = os.time() local times = {today = (time - 86400), week = (time - (7 * 86400))} local contents, result = {day = {}, week = {}, month = {}}, db.getResult("SELECT `pd`.`date`, `pd`.`level`, `p`.`name` FROM `player_killers` pk LEFT JOIN `killers` k ON `pk`.`kill_id` = `k`.`id` LEFT JOIN `player_deaths` pd ON `k`.`death_id` = `pd`.`id` LEFT JOIN `players` p ON `pd`.`player_id` = `p`.`id` WHERE `pk`.`player_id` = " .. getPlayerGUID(cid) .. " AND `k`.`unjustified` = 1 AND `pd`.`date` >= " .. (time - (30 * 86400)) .. " ORDER BY `pd`.`date` DESC") if(result:getID() ~= -1) then repeat local content = {date = result:getDataInt("date")} if(content.date > times.today) then table.insert(contents.day, content) elseif(content.date > times.week) then table.insert(contents.week, content) else table.insert(contents.month, content) end until not result:next() result:free() end local size = { day = table.maxn(contents.day), week = table.maxn(contents.week), month = table.maxn(contents.month) } return size.day + size.week + size.month end function onLogin(cid) registerCreatureEvent(cid, "fraglook") return true end function onLook(cid, thing, position, lookDistance) if isPlayer(thing.uid) and thing.uid ~= cid then doPlayerSetSpecialDescription(thing.uid,'[Frags: '..getPlayerFrags(thing.uid)..']') return true elseif thing.uid == cid then doPlayerSetSpecialDescription(cid,'[Frags: '..getPlayerFrags(cid)..']') local string = 'You see yourself.' if getPlayerFlagValue(cid, PLAYERFLAG_SHOWGROUPINSTEADOFVOCATION) then string = string..' You are '.. getPlayerGroupName(cid) ..'.' elseif getPlayerVocation(cid) ~= 0 then string = string..' You are '.. getPlayerVocationName(cid) ..'.' else string = string..' You have no vocation.' end string = string..getPlayerSpecialDescription(cid)..'' if getPlayerNameByGUID(getPlayerPartner(cid), false, false) ~= nil then string = string..' You are '.. (getPlayerSex(cid) == 0 and 'wife' or 'husband') ..' of '.. getPlayerNameByGUID(getPlayerPartner(cid)) ..'.' end if getPlayerGuildId(cid) > 0 then string = string..' You are ' .. (getPlayerGuildRank(cid) == '' and 'a member' or getPlayerGuildRank(cid)) ..' of the '.. getPlayerGuildName(cid) string = getPlayerGuildNick(cid) ~= '' and string..' ('.. getPlayerGuildNick(cid) ..').' or string..'.' end if getPlayerFlagValue(cid, PLAYERCUSTOMFLAG_CANSEECREATUREDETAILS) then string = string..'nHealth: ['.. getCreatureHealth(cid) ..' / '.. getCreatureMaxHealth(cid) ..'], Mana: ['.. getCreatureMana(cid) ..' / '.. getCreatureMaxMana(cid) ..'].' string = string..'nIP: '.. doConvertIntegerToIp(getPlayerIp(cid)) ..'.' end if getPlayerFlagValue(cid, PLAYERCUSTOMFLAG_CANSEEPOSITION) then string = string..'nPosition: [X:'.. position.x..'] [Y:'.. position.y..'] [Z:'.. position.z..'].' end doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, string) return false end return true end E no arquivo creaturescripts.xml adicione:
<event type="login" name="fraglook_register" event="script" value="fraglook.lua"/> <event type="look" name="fraglook" event="script" value="fraglook.lua"/> Espero ter ajudado!
Abraços

Dúvida sanada, tag adicionada.
Tópico movido!

function onUse(cid, item, frompos, item2, topos) pos = {x=549, y=14, z=7}  if getTileInfo(getThingPos(cid)).protection == false then   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"You can't remove your skull in this area.")  return false   elseif item.itemid == 8985 then    doPlayerSendCancel(cid,"Abra o bau para se tornar vip!")    doTeleportThing(cid,pos)    doRemoveItem(item.uid,1)   else    doPlayerSendCancel(cid,"Fail !")  end  return true end function onUse(cid, item, frompos, item2, topos) pos = {x=528, y=14, z=7}  if getTileInfo(getThingPos(cid)).protection == false then   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"Não é possivel usar nessa area.")  return false   elseif item.itemid == 8982 then    doPlayerSendCancel(cid,"Abra o bau para se tornar vip!")    doTeleportThing(cid,pos)    doRemoveItem(item.uid,1)   else    doPlayerSendCancel(cid,"Fail !")  end  return true end créditos: jamison

Magic Wall:
local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_ENERGY) setCombatParam(combat, COMBAT_PARAM_CREATEITEM, 1497) function onCastSpell(cid, var) if getPlayerStorageValue(cid, 34370) > 0 then doPlayerSendCancel(cid, "You cannot cast this spell in Zombie Event area.") return false end return doCombat(cid, combat, var) end Wild Growth
local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_EARTH) setCombatParam(combat, COMBAT_PARAM_CREATEITEM, 1499) function onCastSpell(cid, var) if getPlayerStorageValue(cid, 34370) > 0 then doPlayerSendCancel(cid, "You cannot cast this spell in Zombie Event area.") return false end return doCombat(cid, combat, var) end

Spell:

local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, 10) setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_ENERGY) setCombatParam(combat, COMBAT_PARAM_CREATEITEM, 1497)   local arr = { { 1, 1, 1, 1, 1, 1. }, { 1, 0, 0, 0, 0, 1. }, { 1, 0, 0, 0, 0, 1, }, { 1, 0, 0, 2, 0, 1, }, { 1, 0, 0, 0, 0, 1, }, { 1, 0, 0, 0, 0, 1, }, { 1, 1, 1, 1, 1, 1, }, }   local area = createCombatArea(arr) setCombatArea(combat, area)   function onCastSpell(cid, var)    if getPlayerStorageValue(cid, 34370) > 0 then       doPlayerSendCancel(cid, "You cannot cast this spell in Zombie Event area.")       return false    end      return doCombat(cid, combat, var) end