Fishing Brasileiro =p

Skyblade
em Actions e Talkactions

Skyblade

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 20/06/08Posts: 76Char no Tibia: Yahuu

Então...

 

No meu sv eu pensei em fazer um "campeonato" de pescaria então criei esse script...

 

Explicação:

 

Quando você pescar irá aparecer dando look no peixe se ele é um Bagre...Truta...Atum...e outros...

 

 

Como adicionar...

 

Va em Data/actions/scripts lah geralmente existe um arquivo chamado Fishing_rod.lua abra ele e cole isso...

-- By Skyblade

function onUse(cid, item, frompos, item2, topos)

tipo = math.random(1,25)


	if item2.itemid == 4608 or item2.itemid == 490 or item2.itemid == 4608 or item2.itemid == 628 or item2.itemid == 627 or item2.itemid == 626 or item2.itemid == 625 or item2.itemid == 624 or item2.itemid == 623 or item2.itemid == 622 or item2.itemid == 620 or item2.itemid == 619 or item2.itemid == 618 or item2.itemid == 492 then
		fishingskill = getPlayerSkill(cid,6)
		formula = fishingskill /200+0.85* math.random()
		if formula > 0.70 and doPlayerRemoveItem(cid, 3976, 1) == 1 then
			doSendMagicEffect(topos,1)
			doPlayerAddSkillTry(cid,6,2)
			anel1 = doPlayerAddItem(cid,2667,1)
if tipo == 1 then
doSetItemSpecialDescription(anel1, "Isto eh uma Truta .")
elseif tipo == 2 then
doSetItemSpecialDescription(anel1, "Isto eh um Bagre.")
elseif tipo == 3 then
doSetItemSpecialDescription(anel1, "Isto eh um Lambari.")
elseif tipo == 4 then
doSetItemSpecialDescription(anel1, "Isto eh uma Anchova .")
elseif tipo == 5 then
doSetItemSpecialDescription(anel1, "Isto eh um Atum.")
elseif tipo == 6 then
doSetItemSpecialDescription(anel1, "Isto eh um Robalo.")
elseif tipo == 7 then
doSetItemSpecialDescription(anel1, "Isto eh um Baiacu.")
elseif tipo == 8 then
doSetItemSpecialDescription(anel1, "Isto eh um Namorado.")
elseif tipo == 9 then
doSetItemSpecialDescription(anel1, "Isto eh um Tainha.")
elseif tipo == 10 then
doSetItemSpecialDescription(anel1, "Isto eh um Tilapia.")
elseif tipo == 11 then
doSetItemSpecialDescription(anel1, "Isto eh um Pintado.")
elseif tipo == 12 then
doSetItemSpecialDescription(anel1, "Isto eh um Pacu.")
elseif tipo == 13 then
doSetItemSpecialDescription(anel1, "Isto eh um Barbado.")
elseif tipo == 14 then
doSetItemSpecialDescription(anel1, "Isto eh um Apapa.")
elseif tipo == 15 then
doSetItemSpecialDescription(anel1, "Isto eh uma Carpa.")
elseif tipo == 16 then
doSetItemSpecialDescription(anel1, "Isto eh uma Piranha.")
elseif tipo == 17 then
doSetItemSpecialDescription(anel1, "Isto eh um Beta.")
elseif tipo == 18 then
doSetItemSpecialDescription(anel1, "Isto eh uma Traira.")
elseif tipo == 19 then
doSetItemSpecialDescription(anel1, "Isto eh um Badejo.")
elseif tipo == 20 then
doSetItemSpecialDescription(anel1, "Isto eh um Baiacu.")
elseif tipo == 21 then
doSetItemSpecialDescription(anel1, "Isto eh um Sardinha.")
elseif tipo == 22 then
doSetItemSpecialDescription(anel1, "Isto eh um Pirarucu.")
elseif tipo == 23 then
doSetItemSpecialDescription(anel1, "Isto eh um Bacalhau.")
elseif tipo == 24 then
doSetItemSpecialDescription(anel1, "Isto eh um Queimado.")
elseif tipo == 25 then
doSetItemSpecialDescription(anel1, "Isto eh um Pirapitinga.")
end

		else
			doSendMagicEffect(topos,1)
			doPlayerAddSkillTry(cid,6,1)
		end

end
return 1
end

 

ai vá em seu server e use /reload actions e tente pescar =P

 

Contra:

 

Se vc juntar os peixes eles irao mostrar no look "fishs" e nao mais os nomes =/

 

Eh isso =P

 

Créditos:

Eu e meus queridos players que deram os nomes dos peixes =D

ºº A erva é mais importante pra quem não conhece ela ºº

ºº Nós olhamos pra ela e falamos... A erva...ºº

Bob Marley



ATS Com sistemas unicos como:

Carros,Skate, Quests únicas

Forja de items, mais de 15 sports para jogar

areas de treino e de caça

Items totalmente editados

Tutoriais explicando como jogar no site

Eventos Diários.

Entre agora mesmo!



Esperamos Você la!

Luiz™

avatar
Barão
Barão

INFOS

Grupo: BarãoRegistrado: 26/01/09Posts: 244

O 1° spoil não ta abrindo cara :/

INGRASSADU NÉANH?


- Cya Xtibia -
1 Mês de pedidos para retirar da Colaboração, talvez assim tirem ;D

Skyblade

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 20/06/08Posts: 76Char no Tibia: Yahuu

alguem edito jaah =x

ºº A erva é mais importante pra quem não conhece ela ºº

ºº Nós olhamos pra ela e falamos... A erva...ºº

Bob Marley



ATS Com sistemas unicos como:

Carros,Skate, Quests únicas

Forja de items, mais de 15 sports para jogar

areas de treino e de caça

Items totalmente editados

Tutoriais explicando como jogar no site

Eventos Diários.

Entre agora mesmo!



Esperamos Você la!

Skyblade

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 20/06/08Posts: 76Char no Tibia: Yahuu

Bah galera...

 

postem algo ae ^^

 

me ajudem a postar mais :D

 

 

o/ ~fuiz

/l

/\

ºº A erva é mais importante pra quem não conhece ela ºº

ºº Nós olhamos pra ela e falamos... A erva...ºº

Bob Marley



ATS Com sistemas unicos como:

Carros,Skate, Quests únicas

Forja de items, mais de 15 sports para jogar

areas de treino e de caça

Items totalmente editados

Tutoriais explicando como jogar no site

Eventos Diários.

Entre agora mesmo!



Esperamos Você la!

caioba777

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 22/02/09Posts: 2Char no Tibia: ADM Styller

ow skyblade... tem como vc me mandar esse sistema por pm...ou posta dinovo aew...deve ser bem legal

thx :smile_positivo:

Eventide

avatar
Cavaleiro
Cavaleiro

INFOS

Grupo: CavaleiroRegistrado: 08/10/08Posts: 189

tem peixe repetido na tabela.. x]



?

 

 

1440522_2.png

 

Skyblade

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 20/06/08Posts: 76Char no Tibia: Yahuu

@ADM Styller

 

pq qual o problema?

 

@Eventide

 

qual vc quer dizer?

ºº A erva é mais importante pra quem não conhece ela ºº

ºº Nós olhamos pra ela e falamos... A erva...ºº

Bob Marley



ATS Com sistemas unicos como:

Carros,Skate, Quests únicas

Forja de items, mais de 15 sports para jogar

areas de treino e de caça

Items totalmente editados

Tutoriais explicando como jogar no site

Eventos Diários.

Entre agora mesmo!



Esperamos Você la!

Eventide

avatar
Cavaleiro
Cavaleiro

INFOS

Grupo: CavaleiroRegistrado: 08/10/08Posts: 189

baiacu, e acho que tem +



?

 

 

1440522_2.png

 

walckerstriker

;The Striker.
avatar
Cavaleiro
Cavaleiro

INFOS

Grupo: CavaleiroRegistrado: 21/02/07Posts: 167Char no Tibia: Ardrak

Legalzinho.

 

Gostei da elaboração do script mas creio que não irá mudar nada de mais, acho meio 'desnecessário'.

Mesmo assim, creio que usuários irão curtir a idéia.

 

Parabéns pelo tópico organizado e pelo script.

 

 

-

Atenciosamente,

Walcker Striker

DnWalcker OTs 4 eveR


Lucasdos

GOD †£ucas†
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 06/06/08Posts: 6Char no Tibia: Vikan Rubanakina

legal

1.....Post.... SERVO
[X]10...Posts...CAMPONÊS
[X]25...Posts...CAÇADOR
[_]50...Posts...CAVALEIRO
[_]100..Posts...BARONETE
[_]200..Posts...BARÃO
[_]300..Posts...VISCONDE
[_]400..Posts...DUQUE
[_]600..Posts...ARQUEDUQUE
[_]800..Posts...ARISTOCRATA
[_]1000.Posts...REGENTE
[_]1400.Posts...SÁBIO
[_]1800.Posts...SACERDOTE
[_]2500.Posts...PRÍNCIPE
[_]3000.Posts...REI
Um dia Chego Aki xD