Script de bau.

por Karlos Seg 07 Dez 2009, 15:23

1- Faça uma pasta na pasta de scripts local "main.txt",
Nomeio a pasta com o seguinte nome: playerschest

2- Agora adicione o seguinte codigo a algum: Sub ScriptedTile(Index, Script) | Sub ScriptedNPC(Index, Script) | Sub OnClick(Index, Script) [ o melhor lugar vai de acordo com que vc achar melhor]

Código:: Case X If GetVar("scripts\playerschest" & GetPlayerName(index) & ".ini", "Progress", "Chest") = "" then Call putvar("scripts\playerschest" & GetPlayerName(index) & ".ini", "Progress", "Chest", 0) Call GiveCurrency(Index, 1, 100) Call putvar("scripts\playerschest" & GetPlayerName(index) & ".ini", "Progress", "Chest", 1) Else If GetVar("scripts\playerschest" & GetPlayerName(index) & ".ini", "Progress", "Chest") = "1" then Call PlayerMsg(Index, "O Baú Est Vazio! :D", WHITE) End If End If Exit Sub

Não esqueça de alterar estes comandos no script.

Case X = Case livre ponha o numero que estiver livre em seu main.txt.

Call GiveCurrency(Index, 1, 100) = Then item they get when they step on it. Call GiveCurrency (Index, 1, 100) = O item que começa antes de ser usado XD
1 é o item 1 , e 100 é a quantidade disponivel no script do item.

Call PlayerMsg (Index, "O bau está vazio.", White) Altere o que esta em vermelho para o que quiser. XD

Basta serem criativos agora pode ser utilizado num quest tbm. XD

Obs.: o player que ja pegou o item no bau não pode pegar denovo pois estará com seu nome salvo em Server/Scripts/Playerschest. XD

Uma boa sorte a todos, duvidas perguntem. ^^

Creditos a TouchDeath. What a Face

por João™ Seg 07 Dez 2009, 18:39

legal, mas pra que exatamente serve? tipo um 2º bank?

por Karlos Seg 07 Dez 2009, 18:42

não tipow um bau do rpg maker xp só e funciona quem me deu a ideia foi o lendario xd, e o ele nem sabe que me deu a ideia + funcionou ^^

por DshFox Seg 07 Dez 2009, 18:52

em vez do give currency ,tu coloca um item e dai,tu pede esse item numa quest

vo usa :]

vlw cara

por Karlos Seg 07 Dez 2009, 18:52

que bom que serviu pra alguem ^^

por Zeus Seg 07 Dez 2009, 19:21

Interessante xD

por Karlos Ter 08 Dez 2009, 14:48

por João™ Ter 08 Dez 2009, 15:36

intendi xD
vo usa tbm, valeu Very Happy

por greeik Sáb 20 Fev 2010, 22:29

so falta o Carlos dizer:que bom que serviu pra 2 pessoas xD

por Karlos Dom 21 Fev 2010, 06:24

Que bom que serviu pra 2 pessoas

por Lucas Lôpo Ter 23 Fev 2010, 20:19

Interessante...Mas post por favor os creditos corretos ;D

por Karlos Ter 23 Fev 2010, 20:25

adm.karlos escreveu:

Creditos a mim e ao lendario por ter me despertado a ideia de criar esse script.

por Lucas Lôpo Ter 23 Fev 2010, 20:39

Ok se voce ta dizendo que voce criou o codigo quem so eu
pra dizer que nao ne ;D

por Fenix Ter 16 Mar 2010, 14:54

uau cara erá exatamente oque eu tava procurando (up+1)

por St4rk Qui 18 Mar 2010, 16:41

Realmente Otimo Parabens + 1 cred

por Karlos Qui 18 Mar 2010, 21:28

manow

por viniguerrero Ter 22 Jun 2010, 21:18

Nesse script vai ser um item pra cada jogador q abrir o baú por uma vez?
E ond eu altero no código pra colocar o item?

por pokoloko Dom 18 Jul 2010, 22:52

como por o npc e quando alguem cliakar abrir a tela do bau?

por Karlos Dom 18 Jul 2010, 23:05

não entendi nada, Razz

off] vou dormir amanhã respondo se vc souber fazer uma pergunta melhor Very Happy

por **Lendário** Seg 19 Jul 2010, 09:22

Acho que ele ta pensando que isso é script de banco Surprised

?

por pokoloko Ter 20 Jul 2010, 10:42

o Bau nao pega no Eclipse ???

por Karlos Ter 20 Jul 2010, 10:48

Sim ele foi feito para eclipse :S

por pokoloko Ter 20 Jul 2010, 19:15

porque nao esta pegando?

por pokoloko Ter 20 Jul 2010, 19:17

Sub scriptedNPC(index, script)

Select Case script
Case 1
If GetVar("scripts\playerschest" & GetPlayerName(index) & ".ini", "Progress", "Chest") = "" then
Call putvar("scripts\playerschest" & GetPlayerName(index) & ".ini", "Progress", "Chest", 0)
Call GiveCurrency(Index, 1, 100)
Call putvar("scripts\playerschest" & GetPlayerName(index) & ".ini", "Progress", "Chest", 1)
Else
If GetVar("scripts\playerschest" & GetPlayerName(index) & ".ini", "Progress", "Chest") = "1" then
Call PlayerMsg(Index, "O Baú Est Vazio!", BLUE)
End If
End If
Exit Sub
Case 2
Call PlayerMsg(Index, "Olá, irei te curar.", BLUE)
If GetPlayerHP(Index) < GetPlayerMaxHP(Index) Then
Call SetPlayerHP(Index, GetPlayerMaxHP(Index))
Call SpellAnim(40, GetPlayerMap(Index), GetPlayerX(Index), GetPlayerY(Index))
Call PlayerMSG(Index, "Eu te curei.", BLUE)

Else

Call PlayerMSG(Index, "Você não precisa de recuperação.", BLUE)
End If
Case Else

End Select

End Sub

É SO AKI Q TEM Q POR OU EM TUDO >>Sub scriptedTile(Index, script) | Sub scriptedNPC(Index, script) | Sub OnClick(Index, script)

por Silver!e.e Ter 20 Jul 2010, 20:25

Fico bom... na verdade mto bom +1 de cred!

por Conteúdo patrocinado

Script de bau.

Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.

Re: Script de bau.