talkaction Craw Talkaction Xd

[guizo3 0]

Com mais uma script intrigante minha (lol xD), eu concedo a vocês minha Craw TalkAction!

Sem dúvidas é lagal ficar "zoando" no DP de ficar dando Craw aqui Craw ali xD Mas e se você corresse o risco de contrair Aids?! E se você corresse o risco de ter um filho?

Baseado em um server, fiz minha própria talkaction!

e aqui está ela..

ainda não testei, pois como já expliquei, estou na Inglaterra e trabalho e estudos aqui são período integral, e como aqui a páscoa é em dia diferente... Não é feriado =/

Só tenho tempo para testar finais de semana..

gostaria que alguem testasse para mim..

 

 

criando um arquivo "Craw.lua" em data/talkactions/scripts~~coloque isso:

 

function onSay(cid,words,param)

 

chances = math.random(1, 5)

dir = getPlayerLookDir(cid)

pos0 = {x=pos.x, y=pos.y-1, z=pos.z, stackpos=1}

pos1 = {x=pos.x+1, y=pos.y, z=pos.z, stackpos=1}

pos2 = {x=pos.x, y=pos.y+1, z=pos.z, stackpos=1}

pos3 = {x=pos.x-1, y=pos.y, z=pos.z, stackpos=1}

comida0 = getThingfromPos(pos0)

comida1 = getThingfromPos(pos1)

comida2 = getThingfromPos(pos2)

comida3 = getThingfromPos(pos3)

 

 

 

if dir == 0 then

if comida0 == isPlayer(cid) then

if chances == 1 then

doPlayerSendTextMessage(cid,21,'Previna-se, teve sorte, mas use camisinha!')

 

elseif dir == 0 then

if comida0 == isPlayer(cid) then

elseif chances == 2 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

 

elseif dir == 0 then

if comida0 == isPlayer(cid) then

elseif chances == 3 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

 

elseif dir == 0 then

if comida0 == isPlayer(cid) then

elseif chances == 4 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos0)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 0 then

if comida0 == isPlayer(cid) then

elseif chances == 4 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos0)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

 

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

if chances == 1 then

doPlayerSendTextMessage(cid,21,'Previna-se, teve sorte, mas use camisinha!')

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

elseif chances == 2 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

elseif chances == 3 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

elseif chances == 4 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos1)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

elseif chances == 4 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos1)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

 

 

 

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

if chances == 1 then

doPlayerSendTextMessage(cid,21,'Previna-se, teve sorte, mas use camisinha!')

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

elseif chances == 2 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

elseif chances == 3 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

elseif chances == 4 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos2)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

elseif chances == 4 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos2)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

 

 

 

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

if chances == 1 then

doPlayerSendTextMessage(cid,21,'Previna-se, teve sorte, mas use camisinha!')

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

elseif chances == 2 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

elseif chances == 3 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

doPlayerAddHealth(cid,-30)

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

elseif chances == 4 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos3)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

elseif chances == 5 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos3)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

 

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

 

Antes que alguuem critique... A Talkaction não queria loadar.. só loadou com esse monte de "ENDs" se alguem quiser tentar modificar.. à vontade

 

coloque tambem isso em data/talkactions/talkactions.xml~~

<talkaction words="craw" script="Craw.lua" />

 

Talkaction desenvolvida 100% By Me e inspirada pelo server da equipe Sharingan...

Se alguem achar algum erro ao testar, poste aqui por favor que irei tentar concertar..

se alguem postar o erro já concertado ficarei mais grato ainda ^^

pelomenso quanto ao Load, aqui não apresentou nenhum erro...

 

aki vai uma edição feita pelo foxx

pra quem teve erro com o global.lua podem usar essa

brigado foxx

 

function onSay(cid,words,param)

 

chances = math.random(1, 6)

dir = getPlayerLookDir(cid)

pos0 = {x=pos.x, y=pos.y-1, z=pos.z, stackpos=1}

pos1 = {x=pos.x+1, y=pos.y, z=pos.z, stackpos=1}

pos2 = {x=pos.x, y=pos.y+1, z=pos.z, stackpos=1}

pos3 = {x=pos.x-1, y=pos.y, z=pos.z, stackpos=1}

comida0 = getThingfromPos(pos0)

comida1 = getThingfromPos(pos1)

comida2 = getThingfromPos(pos2)

comida3 = getThingfromPos(pos3)

hp = getPlayerHealth(cid)

mana = getPlayerMana(cid)

 

 

 

if dir == 0 then

if comida0 == isPlayer(cid) then

if chances == 1 then

doPlayerSendTextMessage(cid,21,'Previna-se, teve sorte, mas use camisinha!')

 

elseif dir == 0 then

if comida0 == isPlayer(cid) then

elseif chances == 2 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 0 then

if comida0 == isPlayer(cid) then

elseif chances == 3 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 0 then

if comida0 == isPlayer(cid) then

elseif chances == 4 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos0)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 0 then

if comida0 == isPlayer(cid) then

elseif chances == 6 then

doPlayerSendTextMessage(cid,21,'Seu filho nasceu com sindrome de DAL!')

filho = doCreateItem(2108,1,pos0)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".Take good care, he have

 

DAL.")

 

elseif dir == 0 then

if comida0 == isPlayer(cid) then

elseif chances == 5 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos0)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

 

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

if chances == 1 then

doPlayerSendTextMessage(cid,21,'Previna-se, teve sorte, mas use camisinha!')

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

elseif chances == 2 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

elseif chances == 3 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

elseif chances == 4 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos1)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

elseif chances == 5 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos1)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

elseif chances == 6 then

doPlayerSendTextMessage(cid,21,'Seu filho nasceu com sindrome de DAL!')

filho = doCreateItem(2108,1,pos1)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".Take good care, he have

 

DAL.")

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

if chances == 1 then

doPlayerSendTextMessage(cid,21,'Previna-se, teve sorte, mas use camisinha!')

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

elseif chances == 2 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

elseif chances == 3 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

elseif chances == 4 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos2)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

elseif chances == 5 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos2)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

elseif chances == 6 then

doPlayerSendTextMessage(cid,21,'Seu filho nasceu com sindrome de DAL!')

filho = doCreateItem(2108,1,pos2)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".Take good care, he have

 

DAL.")

 

 

 

 

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

if chances == 1 then

doPlayerSendTextMessage(cid,21,'Previna-se, teve sorte, mas use camisinha!')

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

elseif chances == 2 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

elseif chances == 3 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

elseif chances == 4 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos3)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

elseif chances == 5 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos3)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

elseif chances == 6 then

doPlayerSendTextMessage(cid,21,'Seu filho nasceu com sindrome de DAL!')

filho = doCreateItem(2108,1,pos3)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".Take good care, he have

 

DAL.")

 

 

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

porem a do foxx esta sem o event

 

 

valeu gente

cYa~~

Editado Junho 12, 2008 por guizo3

[Darllan0 1]

cara manero vei

muito bom

gostei

vo adicionar no meu ot ^^

[ThorzenhOoO 0]

pow aki n deu , qd digito "craw" n acontece nada

e na janela do ot aparece algo escrito depois 'pos'

oque pode ser?

[godoyxd 0]

pow aki n deu , qd digito "craw" n acontece nada

e na janela do ot aparece algo escrito depois 'pos'

oque pode ser?

 

 

aki tbm deu isso deve se problema no global.lua

[noobinhu 38]

Interessante a action, os ends necessários são para fechar os IFs

 

Não precisava desse monte de:

 

doPlayerAddHealth(cid,-30)

 

era só colocar:

 

doPlayerAddHealth(cid,-300)

 

Os dois tem os mesmos efeitos, a não ser que esteja dentro de um:

 

doAddEvent

Se estiver dentro de um Event, daí fica que nem quando se pisa nos fields, você vai perdendo sangue em tempos, e não de uma vez

[vini_xxe 0]

Bem criativo...

Mas nao vou colocar no meu server

acho perca de tempo

mas realmente criativo xD

[risolis 0]

Aqui nem deu tbm xC flwsss

[sfmlarl 0]

Voce pegou essa ideia de alguem, ao n ser q vc seje ele.

 

Isso ae tem no OTservenetworks seila oq, foi pego d um concurso.

 

Desculpe se estou errado, porem, Ladrao

[Darksaj 0]

?!?!?!

isso funfa de verdade??!!!

se funfa e mt massa vou ver..

[Jersom 2]

aqui naum funfoooooooooooooooooooooooooooo

[Venas 0]

É aqui tbm nao funfo não. =.(

[Nandu Minerim 0]

inutil, ridiculo, contribuindo para mediocridade dos ots brasileiros

[Xnone 0]

inutil, ridiculo, contribuindo para mediocridade dos ots brasileiros

 

ja q vc pensa assim começe a melhorar o brasil a partir de agora e naum fike falando

=========================================

a respeito do topico:

 

muito divertido sua action

 

eu, particulamente, gostei pois alem de divertida, ela é instrutiva, pois nos mostra q é sempre bom se prevenir quando for "fazer" na vida real.

 

:smile_positivo:

Editado Abril 12, 2008 por Xnone

[morgan13 0]

eiii galera procuro um talkactions maker qm quiser ser do meu ot add msn:hermes_silva_peixoto@hotmail.com

 

 

 

>>>>>>>>>>>>>>>>>>>>>>>>>>quero saber como faz um script para area vip um chao q tenha q faser /addvip nome do kra

 

ai o kra pode passar pelo chao

 

flws

[bepokemon1 0]

toma ai com chances do seu filho nascer com dal XD aparece voodo doll

 

quote:

 

--changed by foxx -- !

 

function onSay(cid,words,param)

 

chances = math.random(1, 6)

dir = getPlayerLookDir(cid)

pos0 = {x=pos.x, y=pos.y-1, z=pos.z, stackpos=1}

pos1 = {x=pos.x+1, y=pos.y, z=pos.z, stackpos=1}

pos2 = {x=pos.x, y=pos.y+1, z=pos.z, stackpos=1}

pos3 = {x=pos.x-1, y=pos.y, z=pos.z, stackpos=1}

comida0 = getThingfromPos(pos0)

comida1 = getThingfromPos(pos1)

comida2 = getThingfromPos(pos2)

comida3 = getThingfromPos(pos3)

hp = getPlayerHealth(cid)

mana = getPlayerMana(cid)

 

 

 

if dir == 0 then

if comida0 == isPlayer(cid) then

if chances == 1 then

doPlayerSendTextMessage(cid,21,'Previna-se, teve sorte, mas use camisinha!')

 

elseif dir == 0 then

if comida0 == isPlayer(cid) then

elseif chances == 2 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 0 then

if comida0 == isPlayer(cid) then

elseif chances == 3 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 0 then

if comida0 == isPlayer(cid) then

elseif chances == 4 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos0)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 0 then

if comida0 == isPlayer(cid) then

elseif chances == 6 then

doPlayerSendTextMessage(cid,21,'Seu filho nasceu com sindrome de DAL!')

filho = doCreateItem(2108,1,pos0)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".Take good care, he have

 

DAL.")

 

elseif dir == 0 then

if comida0 == isPlayer(cid) then

elseif chances == 5 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos0)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

 

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

if chances == 1 then

doPlayerSendTextMessage(cid,21,'Previna-se, teve sorte, mas use camisinha!')

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

elseif chances == 2 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

elseif chances == 3 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

elseif chances == 4 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos1)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

elseif chances == 5 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos1)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 1 then

if comida1 == isPlayer(cid) then

elseif chances == 6 then

doPlayerSendTextMessage(cid,21,'Seu filho nasceu com sindrome de DAL!')

filho = doCreateItem(2108,1,pos1)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".Take good care, he have

 

DAL.")

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

if chances == 1 then

doPlayerSendTextMessage(cid,21,'Previna-se, teve sorte, mas use camisinha!')

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

elseif chances == 2 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

elseif chances == 3 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

elseif chances == 4 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos2)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

elseif chances == 5 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos2)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 2 then

if comida2 == isPlayer(cid) then

elseif chances == 6 then

doPlayerSendTextMessage(cid,21,'Seu filho nasceu com sindrome de DAL!')

filho = doCreateItem(2108,1,pos2)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".Take good care, he have

 

DAL.")

 

 

 

 

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

if chances == 1 then

doPlayerSendTextMessage(cid,21,'Previna-se, teve sorte, mas use camisinha!')

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

elseif chances == 2 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

elseif chances == 3 then

doPlayerSendTextMessage(cid,21,'Você Contraiu AIDS! Se Cuide!')

doPlayerAddHealth(cid,-hp)

doPlayerAddHealth(cid,1)

doPlayerAddMana(cid,-mana)

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

elseif chances == 4 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos3)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

elseif chances == 5 then

doPlayerSendTextMessage(cid,21,'Você Teve Um Filho Seu Descabeçado! Iai Vai ASSumir?!')

filho = doCreateItem(2110,1,pos3)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".")

 

elseif dir == 3 then

if comida3 == isPlayer(cid) then

elseif chances == 6 then

doPlayerSendTextMessage(cid,21,'Seu filho nasceu com sindrome de DAL!')

filho = doCreateItem(2108,1,pos3)

doSetItemSpecialDescription(filho, "He's Son Of "..getPlayerName(cid)..".Take good care, he have

 

DAL.")

 

 

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

end

 

vlw

 

-----edit

@morgan13

 

eu ja te add, sou o bepokemon@hot....

eu te falo como faz vip

assim:

vai em vocations e passa os comandos de tutor pra senior tutor, sendo assim tutor fica sem comando, soh os de player, ai se cria 1 sala q soh assim:

acess = getplayeracess(cid)

if acess > 1 then

 

ai soh quem for "tutor" sem comandos pode entrar, tutor = vip

 

------2edit

 

vou fazer aki fazendo cair blood embaixo da comida e milk embaixo do players :DD:DDDDDD vai ficar #######

Editado Abril 16, 2008 por FoxXs