Ir para conteúdo

meubkk

Campones
  • Total de itens

    3
  • Registro em

  • Última visita

Sobre meubkk

Informações

  • Forma que conheci o xTibia
    Sites de Busca
  • Sou
    Scripter

Últimos Visitantes

1052 visualizações

meubkk's Achievements

  1. Todas informações do server no site: amethyst.sytes.net ou poamtys.co.cc
  2. meubkk

    [Talkaction]Fake Text

    pronto: function onSay(cid, words, param) local tab = string.explode(param, ",") if #tab < 2 then return doPlayerSendTextMessage(cid, 27, words.." name, message - use essa sequencia.") end local pid = getPlayerByName(tab[1]) if pid then doCreatureSay(pid, tab[2], TALKTYPE_SAY) else return doPlayerSendTextMessage(cid, 27, "Player Not Found") end return true end
  3. ANDAR AUTOMATICO Com esse script seu char pode andar automatico vc só precisa controlar pelas setas vai na pasta talkactions/scripts e e crie um aquivo chamado auto.lua e cole o seguinte script : function isWalkable(pos, creature, proj, pz)-- by Nord if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end if getTopCreature(pos).uid > 0 and creature then return false end cr = getThingFromPos({x = pos.x, y = pos.y, z = pos.z, stackpos = STACKPOS_TOP_CREATURE}) if isPlayer(cr.uid) or isMonster(cr.uid) then return false end if getTileInfo(pos).protection and pz then return false, true end local n = not proj and 3 or 2 for i = 0, 255 do pos.stackpos = i local tile = getTileThingByPos(pos) if tile.itemid ~= 0 and not isCreature(tile.uid) then if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then return false end end end return true end function MoveAutomatic(cid) if isWalkable(getPositionByDirection(getThingPos(cid), getCreatureLookDir(cid), 1)) then doTeleportThing(cid, getPositionByDirection(getThingPos(cid), getCreatureLookDir(cid), 1)) mayNotMove(cid, true) addEvent(MoveAutomatic, 200, cid) else doSendAnimatedText(getThingPos(cid), "OFF", math.random(250)) mayNotMove(cid, false) return true end end function onSay(cid, words, param) doSendAnimatedText(getThingPos(cid), "AUTOMATIC", math.random(250)) MoveAutomatic(cid) return true end depois vá no talkactions.xml e use a seguinte tag: <talkaction words="!auto" event="script" value="auto.lua"/>] e pronto, é só falar !auto que ele anda sozinho, depois só controlar o lado pra virar, qndo ele tromba em algo automaticamente ele para de andar. Obrigado.
  4. Não tem muito oque explicar pelo nome, vocês já sabem. Vá na pasta talkactions/script e crie um arquivo com nome de sexy.lua e cole o seguinte script: -- Sexy System(Funny) by Cobraa. function prepareToSexy(ela, ele) doCreatureSetLookDir(ela, 3) pos = getThingPos(ela) doTeleportThing(ele, {x=pos.x+3, y=pos.y, z=pos.z}) doCreatureSetLookDir(ele, 3) mayNotMove(ele, true) mayNotMove(ela, true) end function Sexy(ela, ele, rounds) if rounds < 1 then mayNotMove(ele, false) mayNotMove(ela, false) setPlayerStorageValue(ele, 8958, -1) setPlayerStorageValue(ela, 8958, -1) return true end msg = {"OOHH!", "OMG", "FAST", "FUCK ME"} pos = getThingPos(ela) doTeleportThing(ele, {x=pos.x+1, y=pos.y, z=pos.z}) addEvent(doTeleportThing, 500, ele, {x=pos.x+3, y=pos.y, z=pos.z}) doSendAnimatedText(pos, msg[math.random(#msg)], math.random(255)) setPlayerStorageValue(ele, 8958, 1) setPlayerStorageValue(ela, 8958, 1) addEvent(Sexy, 1000, ela, ele, rounds-1) end function onSay(cid, words, param) if words == "!sex" then x = getPlayerByName(param) if x then if getPlayerSex(cid) == 0 then return doPlayerSendTextMessage(cid, 27, "Uma garota tem que ser convidada.") end if param == getCreatureName(cid) then return doPlayerSendTextMessage(cid, 27, "Isto não é possivel") end if getDistanceBetween(getThingPos(cid), getThingPos(x)) > 4 then return doPlayerSendTextMessage(cid, 27, "Este player está muito longe para tranzar.") end if getPlayerStorageValue(x, 8958) == 1 or getPlayerStorageValue(cid, 8958) == 1 then return doPlayerSendTextMessage(cid, 27, "Você ou a pessoa que convidou está tranzando neste momento.") end setPlayerStorageValue(x, 8956, cid) setPlayerStorageValue(x, 8957, 1) doPlayerSendTextMessage(x, 19, getCreatureName(cid)..", te convidou para tranzar, diga !aceitar ou !recusar") doPlayerSendTextMessage(cid, 19, getCreatureName(x)..", foi convidado(a) para tranzar aguarde sua resposta.") else doPlayerSendTextMessage(x, 27, "Player Not Found.") end elseif words == "!aceitar" then if getPlayerStorageValue(cid, 8957) == 1 then if getDistanceBetween(getThingPos(cid), getThingPos(getPlayerStorageValue(cid, 8956))) > 4 then return doPlayerSendTextMessage(cid, 27, "Este player está muito longe para dar uma resposta.") end doPlayerSendTextMessage(cid, 19, "Você aceitou o convite de "..getCreatureName(getPlayerStorageValue(cid, 8956))..".") doPlayerSendTextMessage(getPlayerStorageValue(cid, 8956), 19, "Seu convite foi aceito.") setPlayerStorageValue(cid, 8957, -1) prepareToSexy(cid, getPlayerStorageValue(cid, 8956)) addEvent(Sexy, 800, cid, getPlayerStorageValue(cid, 8956), 20) else doPlayerSendTextMessage(cid, 27, "Você não tem nenhum convite de tranza para aceitar.") end elseif words == "!recusar" then if getPlayerStorageValue(cid, 8957) == 1 then if getDistanceBetween(getThingPos(cid), getThingPos(getPlayerStorageValue(cid, 8956))) > 4 then return doPlayerSendTextMessage(cid, 27, "Este player está muito longe para dar uma resposta.") end doPlayerSendTextMessage(cid, 19, "Você recusou o convite de "..getCreatureName(getPlayerStorageValue(cid, 8956))..".") doPlayerSendTextMessage(getPlayerStorageValue(cid, 8956), 19, "Seu convite foi recusado.") setPlayerStorageValue(cid, 8957, -1) else doPlayerSendTextMessage(cid, 27, "Você não tem nenhum convite de tranza para recusar.") end end return true end Depois na pasta talkactions procure o arquivo talkactions.xml e adicione a seguinte tag: <talkaction words="!sex;!aceitar;!recusar" event="script" value="sexy.lua"/> Para convidar alguem para fazer sexo , use o comando: !sex Nome do Player Para responder use !aceitar ou !recusar Obrigado a todos.
  5. vei o script q tu fes pra min de n atakar player de guilda ou party nem funfa
  • Quem Está Navegando   0 membros estão online

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