Reset Automatico

por MaxLittle Dom 21 Fev 2010, 10:29

Por favor,
Tem como alguem me arranjar o script de um reset automatico ? Por favor.

Att,
MaxLittle

por klinton-1234 Dom 21 Fev 2010, 22:36

em baixo de

Call BattleMsg(index, "Você tem " & GetPlayerPOINTS(index) & " pontos para gastar.", 9, 0)

bote

If GetPlayerLevel(index) => 1000 Then
Call GlobalMsg(GetPlayerName(index) & " resetou!Parabéns", 10)
Call SetPlayerExp(index, 1)
Call SetPlayerLevel(index, 1)
Call SetPlayerPOINTS(index, GetPlayerPoints(index) + 0)
Call SetPlayerResets(index, GetPlayerResets(index) + 1)
Call PutVar("Rank.ini", "Resets", GetPlayerName(index), GetPlayerResets(index))
Call SavePlayer(index)
Call SendPOINTS(Index)
Call SendStats(Index)
End If
End Sub

vai ficar assim

Call BattleMsg(index, "Você tem " & GetPlayerPOINTS(index) & " pontos para gastar.", 9, 0)
If GetPlayerLevel(index) => 1000 Then
Call GlobalMsg(GetPlayerName(index) & " resetou!Parabéns", 10)
Call SetPlayerExp(index, 1)
Call SetPlayerLevel(index, 1)
Call SetPlayerPOINTS(index, GetPlayerPoints(index) + 0)
Call SetPlayerResets(index, GetPlayerResets(index) + 1)
Call PutVar("Rank.ini", "Resets", GetPlayerName(index), GetPlayerResets(index))
Call SavePlayer(index)
Call SendPOINTS(Index)
Call SendStats(Index)
End If
End Sub

por MaxLittle Seg 22 Fev 2010, 13:00

Certo, mais tenho uma duvida, o reset ficará automatico ?

por God of Fusion Seg 22 Fev 2010, 13:13

Sim ^^ Quando ele chegar no level 1000 vai resetar só xD
Uso esse no meu jogo '-'

por God of Fusion Seg 22 Fev 2010, 13:15

Ah e se voçê nao tiver sistema de Reset no Visual Basic deixe assim xD

Código:: If GetPlayerLevel(index) => 1000 Then Call GlobalMsg(GetPlayerName(index) & " resetou!Parabéns", 10) Call SetPlayerExp(index, 1) Call SetPlayerLevel(index, 1) Call SavePlayer(index) Call SendPOINTS(Index) Call SendStats(Index) End If End Sub

por **Lendário** Seg 22 Fev 2010, 13:25

Edite o post por favor não dê doble post vlw

por MaxLittle Seg 22 Fev 2010, 14:56

Não funcionou aqui, eu botei e puff deu erro no servidor qndo cheguei no lv 1000

por God of Fusion Ter 23 Fev 2010, 11:00

Blz lendario Smile

Axei muito estranho Max Neutral

tenta aumentar o level maximo pois as veses o player pode ultrapassar o level maximo e consequentemente fazer o server cair

OBS: O Level maximo do Dados.ini ou Data.ini ;P

por MaxLittle Qua 24 Fev 2010, 18:01

Sim mais... Tem algum jeito de fazer ele não conseguir passar ? pq eu sei q qndo passa da bug.

por Ramonxxd Ter 09 Mar 2010, 10:34

Tambem To Atraz Desse De Nao Deixar Ele Passa Mais Eu Dexo No Level Max A Exp
9999999999 Dexo O Maximo De Exp Dai Ele N Passa

por Lord Goku Qui 11 Mar 2010, 21:39

Mais tipo eu coloquei tudo sertinho ai reseta uma veis da eu vou resetar denovo e da erro 9

por Ramonxxd Qui 11 Mar 2010, 21:47

deve ter colokado algo errado

por Akatsukyi Ter 24 Ago 2010, 19:02

aki funcionou direitinho ^^ vlws

por nuno960 Dom 12 Set 2010, 08:30

no meu server não deu :s
ajudem

por igorfla10 Seg 20 Set 2010, 16:25

eu coloquei isto no main

If GetPlayerLevel(index) => 1000 Then
Call GlobalMsg(GetPlayerName(index) & " resetou!Parabéns", 10)
Call SetPlayerExp(index, 1)
Call SetPlayerLevel(index, 1)
Call SavePlayer(index)
Call SendPOINTS(Index)
Call SendStats(Index)
End If
End Sub

embaixo do texto q vc disse e tals..mas nem resetar resetou¬¬,eu deixei o char no level maximo e nada...ajuda\o

PS ; Nao tenho sistema de reset no vb

por tomaerola Qua 29 Set 2010, 16:13

boa!! me ajudo tambem muito Smile

por edsonpet Sáb 02 Out 2010, 01:53

Parabéns min ajudou mto!!vlww +1

por Lucas Roberto Sáb 02 Out 2010, 08:29

O erro de voces deve ser o seguinte
voce pom o level que voces querem resetar no sistema mais nao muda a apsta ed experiencia

Pois sem muda ele tambem e voce nunca vai fazer que o sistema funcione
Very Happy

Pois o problema seu e que voce deve ter posto no lugar errado
seja se seu scrip esta ligado

ou se pelo menos esta funfando
Para testa liga o server entra no jogo e digita

/teste

Isso e para voce se "/"esta funfando se nao aparacer um mensagem falando que esse comando no existe voce pois o sistema de reseta no lugar errado

por juan_9000 Sáb 02 Out 2010, 14:33

Valeu mano me ajudou muito dimais

por Goku852 Sex 07 Jan 2011, 07:30

Mas tipow eu so novo nisso e não sei ond por essas coizaradas Podem me fala o nome da pasta ou o lugar de por isso?

por Lucas Roberto Sex 07 Jan 2011, 08:44

Bom vou fazer uma previa de Sistema de Resete automatico

vamos la

abre seu Binários

Binários >Pasta Servidor > Scripts >Principal

depois procura por:

Código:: Call BattleMsg(index, "Você tem " & GetPlayerPOINTS(index) & " pontos para gastar.", 9, 0)

abaixo ponha:

Código:: If GetPlayerLevel(index) => 1000 Then Call GlobalMsg(GetPlayerName(index) & " resetou com sucesso!", 15) Call GlobalMsg(index, "Está com " & GetPlayerResets(index) & " Resets!", 13, 0) Call SetPlayerExp(index, 1) Call SetPlayerLevel(index, 1) Call SetPlayerPOINTS(index, GetPlayerPoints(index) + 110) Call SetPlayerResets(index, GetPlayerResets(index) + 1) Call SavePlayer(index) Call SendPOINTS(Index) Call SendStats(Index) End If

Prontonho sistema de resetes pra vc^^

por Conteúdo patrocinado

Reset Automatico

Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico

Re: Reset Automatico