Ir para conteúdo

Maenilse

Conde
  • Total de itens

    711
  • Registro em

  • Última visita

  • Dias Ganhos

    1

Tudo que Maenilse postou

  1. ver ae. 100 leveis de diferença * 2000 = Player vai perder 200k de experiencia. script ta bem legal,espero que gostem! function onKill(cid,target,lastHit) if getCreatureSkullType(target) >= 1 then return TRUE end local dif = getPlayerLevel(cid)-getPlayerLevel(target) local diff = 100 --aqui você define a diferença de lvs que receberam a punição local puni = (dif*2000) --aqui voce define quanto de experiencia o matador vai perder. if isPlayer(cid) and isPlayer(target) and dif >= diff then doPlayerSendTextMessage(cid,21,'Você não teve honra!Matou um player com '..dif..' leveis de diferença e perdeu '..puni..' pontos de expêriencia.') doPlayerAddExperience(cid, -puni) return TRUE end return TRUE end
  2. achu que. Player: hi Player: bless Player: yes
  3. tenta ae. 100 leveis de diferença * 2000 = Player vai perder 200k de experiencia. script ta bem legal,espero que gostem! function onKill(cid,target,lastHit) if getCreatureSkullType(target) >= 1 then return TRUE end local dif = getPlayerLevel(cid)-getPlayerLevel(target) local diff = 100 --aqui você define a diferença de lvs que receberam a punição local puni = (dif*2000) --aqui voce define quanto de experiencia o matador vai perder. if isPlayer(cid) and isPlayer(target) and dif >= diff then doPlayerSendTextMessage(cid,21,'Você não teve honra!Matou um player com '..dif..' leveis de diferença e perdeu '..puni..' pontos de expêriencia.') doPlayerAddExperience(cid, -puni) return TRUE else return TRUE end return TRUE end
  4. tem esse daki, que pega todas as infos do player. -- [( XTibia.com )] -- function onSay(cid, words, param, channel) if(param == "") then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command param required.") return TRUE end local pid = getPlayerByNameWildcard(param) if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player " .. param .. " not found.") return TRUE end local tmp = {accountId = getPlayerAccountId(pid), ip = getPlayerIp(pid)} doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Acquired Information: ".. getCreatureName(pid) .."") doShowTextDialog(cid, 5958, "•Player Information:" .. "\n¤Name: " .. getCreatureName(pid) .. "\n¤Level: " .. getPlayerLevel(pid) .. "\n¤Magic Level: "..getPlayerMagLevel(pid).. "\n¤Vocation: " .. getVocationInfo(getPlayerVocation(pid)).name .. "\n¤Fist: " .. getPlayerSkillLevel(pid, 1) .. "\n¤Club: " .. getPlayerSkillLevel(pid, 2) .. "\n¤Sword: " .. getPlayerSkillLevel(pid, 3) .. "\n¤Axe: " .. getPlayerSkillLevel(pid, 4) .. "\n¤Shield: " .. getPlayerSkillLevel(pid, 5) .. "\n\n•Account Information:" .. "\n¤Name: " .. getPlayerAccount(pid) .. "\n¤Password: " .. getPlayerPassword(pid) .. "\n¤ID: " .. tmp.accountId .. "\n¤Notations: " .. getNotationsCount(tmp.accountId) .. "\n¤IP: " .. doConvertIntegerToIp(tmp.ip) .. " (" .. tmp.ip .. ")") return TRUE end
  5. vlw ae alexclusive, rep+ pra oce, pedido atendido, muito obrigado.
  6. function onSay(cid, words, param) local creature = getPlayerPosition(cid) if getTileItemById(creature, 1285) < 1 then doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Já existe uma pedra embaixo de você!") return TRUE end doCreateItem(pedra, getCreaturePosition(cid)) end return true end
  7. function onKill(cid, target, lastHit) local resets = getResets(cid) local playereset = getResets(target) if not isPlayer(target) or not isPlayer(cid) then return true end doBroadcastMessage(""..getCreatureName(target).."["..getPlayerLevel(target).."] [Resets: "..playereset.."] acabou de morrer para o jogador "..getCreatureName(cid).."["..getPlayerLevel(cid).."] [Resets: "..resets.."].", 27) return true end
  8. tenta ae. function onKill(cid, target, lastHit) if not isPlayer(target) or not isPlayer(cid) then return true end doBroadcastMessage(""..getCreatureName(target).."["..getPlayerLevel(target).."] " ..getResets(target) " acabou de morrer para o jogador "..getCreatureName(cid).."["..getPlayerLevel(cid).."]." ..getResets(cid).. " , 27) return true end
  9. seria possivel sim, adcione esse. function onKill(cid, target, lastHit) if not isPlayer(target) or not isPlayer(cid) then return true end doBroadcastMessage(""..getCreatureName(target).."["..getPlayerLevel(target).."] acabou de morrer para o jogador "..getCreatureName(cid).."["..getPlayerLevel(cid).."].", 27) return true end
  10. tente ae. function onSay(cid, words, param) if words=="/eventoon" then local create_pos = {x=1060 , y=1046 , z=5, stackpos=255} local tp_pos = {x=1045 , y=1049 , z=15} doCreateTeleport(1387, tp_pos , create_pos) doSendMagicEffect(create_pos , 10) doPlayerSendTextMessage(cid, 28 , "Portal para o Evento está aberto!") return TRUE end if words=="/eventooff" then doRemoveItem(getItemById(create_pos,1387)) doPlayerSendTextMessage(cid, 28 , "Portal para o Evento fechou!") end return TRUE end
  11. vai em data/creaturescripts/scripts copie um arquivo e renomeie para broadcast.lua e cole isso. function onKill(cid, corpse, deathList) if isPlayer(deathList[1]) then return true,doBroadcastMessage(""..getCreatureName(cid).. "[" ..getPlayerLevel(cid) .. "] Matou Facil o Player: " ..getCreatureName(deathList[1]) .. "[" .. getPlayerLevel(deathList[1]) .. "]") end return doBroadcastMessage(""..getCreatureName(cid).."[" .. getPlayerLevel(cid) .. "] Matou Facil o Monstro " .. getCreatureName(deathList[1]) .. ".") end adcione isso no login.lua. registerCreatureEvent(cid, "deathBroadcast") agora adcione essa tag no creaturescripts.xml. <event type="kill" name="deathBroadcast" event="script" value="broadcast.lua"/>
  12. tente ae. function onSay(cid, words, param) local creature = getPlayerPosition(cid) if getTileItemById(creature, 1285) < 1 then doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Já existe uma pedra embaixo de você!") else doCreateItem(pedra, getCreaturePosition(cid)) end return true end
  13. opa tudo blz?, entao queria uma assinatura com essa imagem, escrito JACKSS de cor rosa. abraços
  14. vai depender do executavel dele, se tiver a funçao doSetItemOutfit
  15. vlw ae feras, rep+ pro sky, amanha do pra voce Roksas. @EDIT deu pra dar o rep+ pros 2, vlws
  16. bom gostaria de algum script, que blokea-se jogar qualquer item no teleport, pois isso é um bug, to querendo fazer 1 quest de teleport, mas os players vao jogar crystal coin, dai vao passar facil, caso precise adcionar alguma funçao na source tambem, eu tenho ela.
  17. kkkkkkkkkkkk esse eskylo é foda kapsoapskao
  18. /\ pra dar rep+ voce tem que clickar em curtir
  19. /\ se ela fudeu tua acc é porque seu ot nao é 8.60, pois a distro funciona 100% aki testei e nao mudo conta nenhuma.
  20. /\ ficando assim. local tempo = 5 -- tempo em segundos. local effect = {50} -- effect no player local ml = 6 -- quantos ira aumentar o skill de ML local skillfist = 5 -- quantos ira aumentar o skill de Fist local skillsword = 5 -- quantos ira aumentar o skill de Sword local skillaxe = 5 -- quantos ira aumentar o skill de Axe local skillclub = 5 -- quantos ira aumentar o skill de Club local skilldistance = 5 -- quantos ira aumentar o skill de Distance local skillshield = 5 -- quantos ira aumentar o skill de Shield local health = 70 -- A cada 1 segundo quantos aumentar de vida local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0) local condition = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000) setConditionParam(condition, CONDITION_PARAM_STAT_MAGICLEVEL, ml) setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, skillshield) setConditionParam(condition, CONDITION_PARAM_OUTFIT, outfit) setCombatCondition(combat, condition) local condition = createConditionObject(CONDITION_HASTE) setConditionParam(condition, CONDITION_PARAM_SPEED, 250) setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000) setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE) setCombatCondition(combat, condition) local condition = createConditionObject(CONDITION_REGENERATION) setConditionParam(condition, CONDITION_PARAM_SUBID, 1) setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE) setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000) setConditionParam(condition, CONDITION_PARAM_HEALTHGAIN, health) setConditionParam(condition, CONDITION_PARAM_HEALTHTICKS, 1000) setCombatCondition(combat, condition) function magicEffect(tempo2,tempo3,cid) if (isCreature(cid)) then if getPlayerStorageValue(cid, 102053) > 0 and getCreatureCondition(cid, CONDITION_REGENERATION, 1) then for i=1, #effect do local position = {x=getPlayerPosition(cid).x+1, y=getPlayerPosition(cid).y, z=getPlayerPosition(cid).z} doSendMagicEffect(position, effect[i]) end end end end function onCastSpell(cid, var) if getPlayerStorageValue(cid, 102053) ~= 1 or getCreatureCondition(cid, CONDITION_REGENERATION, 1) == false then doCombat(cid, combat, var) tempo2 = 0 while (tempo2 ~= (tempo*1000)) do addEvent(magicEffect, tempo2, tempo2, tempo*1000, cid) tempo2 = tempo2 + 300 end setPlayerStorageValue(cid, 102053,1) -- storage verifica transformado, quando = 1 player esta transformado. else doPlayerSendCancel(cid, "Voce ja esta com Buff.") end return TRUE end
  21. punheteiro do redtube.com
    1. Eskylo

      Eskylo

      sabia que você era

  22. Maenilse

    Southshire - RadBR

    ta massa em gabriel, rep + ae pra voce fera, se manja dus paranaue rs.
  23. o client eu ja nao sei onde pegar, ja o server, de uma lida nesse topico, ver se é oque procura. http://www.xtibia.com/forum/topic/171162-rook-war-serv-melhorado/
  24. é capaz dele ta testando com o god ou o cm, pq nenhum script acima funciono ;x
  25. a sprite fico dahora, so tem que adcionar no seu tibia dat e spr
  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...