talkaction [Talkactions] Sistema De Sexo

[rogeriocene 126]

VA EM DATA/TALKACTIONS /SCRIPTS

CRIA UM ARQUIVO CHAMADO sexy E DIGITE ISSO

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

 

dps vá em data/talkactions e abra talkaction.xml e adicione essa tag

<talkaction words="!sex;!aceitar;!recusar" event="script" value="sexy.lua"/>

Dai para aceitar transar com o player e so dizer !aceitar ou !recusar

para mandar o convite e so falar !sex name

TE AJUDEI DA +REP xD

Editado Fevereiro 3, 2012 por Afeez

[Pikenoh 3]

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

[rogeriocene 126]

ta eu n sabia que tinha que coloca creditos

[EduziTow 2]

FuNFo Ake N

[rogeriocene 126]

como nao??qual e a versao de seu ot

[JuninhoSimao 5]

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

Editado Fevereiro 4, 2012 por JuninhoSimao

[0Shinoda0 0]

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

[LucasCastro 9]

Bem Massa!

 

;D

 

Vlw's

[ThiagoMartinsMR 32]

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

[josewitiuk 0]

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

[AlexandreKG 134]

kkkkkkkkkkkkkkkkkkkkkk

esse script é pros tarados kkkkkkkkkkkkkkk,

mais eu vo usar tambem kkkkkkk