[Pedido] Pressiso Mt

[adelso10 2]

bom galera estou aki para pedir uma editada em um script e um outro script o primeiro é

pressiso de um item q seja tipo um go/back vo por no meu server um negossinho

 

 

 

ai vo pressisar de uma editada nesse script

o sexy sistem é via talkaction

 

 

--Sexy Sistem

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 == "!sexo" 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

 

 

é pra editar ele pra ter chance de ganhar um item a chance varia de 1 ate 50

eu quero q ganhe um item se auguem ajeita deixa q eu coloco o id ainda to fazendo a spr dele

nao sou spriter mais ainda da pra quebra o galho

bem se vcs consseguirem eu quero q o item q ganha dps de um dia +/- se o kara for premium ele vire outro item

e teja needpremium "yes" ou "no" pra eu poder editar

mt obg me ajudem o mais rapido possivel por favor

Editado Dezembro 6, 2011 por adelso

[DeadSmok3r 4]

Olá !

Para as pessoas te ajudarem com mais facilidade, coloca em "codes" e porfavor mude a cor da letra, é ruim de ler.

[adelso10 2]

.

Editado Dezembro 7, 2011 por adelso