-- 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

CREDITOS : COBRAA

esse script ja existia fais tempo coloque os devidos créditos

ta eu n sabia que tinha que coloca creditos

FuNFo Ake N

como nao??qual e a versao de seu ot

Tenho Outro Tipo Faça Assim

va em data/talkactions/script crie um arquivo chamado Trocadesexo.lua la vc poe isso

local config = {

costPremiumDays = 7

}

function onSay(cid, words, param, channel)

if(getPlayerSex(cid) >= 2) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You cannot change your gender.")

return TRUE

end

if(getPlayerPremiumDays(cid) < config.costPremiumDays) then

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Sorry, not enough premium time- changing gender costs " .. config.costPremiumDays .. " days.")

doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)

return TRUE

end

if(getPlayerPremiumDays(cid) < 65535) then

doPlayerAddPremiumDays(cid, -config.costPremiumDays)

end

if(getPlayerSex(cid) == PLAYERSEX_FEMALE) then

doPlayerSetSex(cid, PLAYERSEX_MALE)

else

doPlayerSetSex(cid, PLAYERSEX_FEMALE)

end

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Vc Troko Seu Sexo " .. config.costPremiumDays .. " days of premium time.")

doSendMagicEffect(getCreaturePosition(cid), CONST_ME_MAGIC_RED)

return TRUE

end

pronto agr va em daa/talkaction/talkactions.xml

e cole essa tag <talkaction words="!trocarsexo" event="script" value="Trocadesexo.lua.lua"/>

Ajudei ? Da uma Rep ae e seja feliz

Ajudas contato: Afonsosimao2008@hotmail.com

esse dai eh pra trocar sexo e o outro e pra... se sabe pra q ;e

Bem Massa!

;D

Vlw's

Coloque os créditos.. existe mais uns 3 tópicos sobre a mesma talkaction aki no Xtibia.

vlww tem gente q conseguiu mas eu nao......8.6...

kkkkkkkkkkkkkkkkkkkkkk

esse script é pros tarados kkkkkkkkkkkkkkk,

mais eu vo usar tambem kkkkkkk