Ajuda transformação por comando

por davischramm Ter 28 Fev 2012, 18:23

Galera,
eu coloco o codigo no main.exe e simplismente quando ativo ele(script)escrevo /ssj e nao aparece nada nem uma frase tem algum segredo ?
Ajuda aew !

por Gu1lh3rm3 Ter 28 Fev 2012, 20:57

se fez errado pq bugou o codigo, ve se nao falta nenhuma End If '-'

por DeliciaDeJadieL Ter 28 Fev 2012, 23:19

Você deve ter feito algo Errado poderia passar as Informaões do SadScript ? Que Level pode usar o SSJ? tenta criar outra acc...

por Gu1lh3rm3 Qua 29 Fev 2012, 00:06

'-', foi oque eu disse em cima amigo D:

por davischramm Qua 29 Fev 2012, 10:46

são quantas end if ?
no meu tem 4

por RenanR Qua 29 Fev 2012, 12:34

Depende de quantos Ifs tem no código.

Se passar o código que vc usou, e onde colocou poderemos ajuda-lo a concertar!

por Ian Qua 29 Fev 2012, 13:02

RenanR escreveu:Depende de quantos Ifs tem no código.

Se passar o código que vc usou, e onde colocou poderemos ajuda-lo a concertar!

se não estiver disposto a postar seu codigo voce mesmo pode verificar no seu sistema ou codigo de transformação oque esta faltando exemplo:

Código:: If transformar then codigo trans formar 1 else codigo transformar 2 end if

bom esse e um exemplo bem simples mesmo mais e simplis voce verificar se tem o enf if para finalizar seu codigo bom boa sorte e comente no topico para falar se seu problema foi resolvido

por davischramm Qua 29 Fev 2012, 16:28

Código:: Ki = GetPlayerSTR(index) + GetPlayerDef(index) + GetPlayerSPEED(index) + GetPlayerMAGI(index) If Lcase(Trim(TextSay)) = "/ki" Then Call BattleMsg(index, "Seu Ki é de: " & Ki & "!", 14, 0) Call BattleMsg(index, "Voce tem " & GetPlayerResets(Index) & " Resets", 14, 0) Exit Sub End If

ainda nao consegui...

por Thales12 Qua 29 Fev 2012, 16:36

Isso nao e comando de trans e comando para ver o ki e resets --'

no main.txt ou principal.txt procura por:

Código:: TextSay = GetVar("Scripts\Command.ini", "TEMP", "Text" & index)

em baixo add:

Código:: If Lcase(Trim(TextSay)) = "/ssj" Then ' o comando a usar If GetPlayerClass (index) = 1 Then ' a classe do player If GetPlayerLevel(index) => 50 Then ' o level do player If GetPlayerSprite(index) = 1 Then ' a sprite do player Call SetPlayerSprite(index, 2) ' a sprite q ele vai virar Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 50) ' quanto de str ele vai ganhar Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 50) ' quanto de defesa ele vai ganhar Call PlaySound(Index, "ssjtransform.wav") ' o som q vai fazer Call PlayerMsg(index, "Você é um Super Saiyajin!", 4) ' e a menssagem Call PlayerWarp (index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index),False) Exit Sub End If End If End If End If

fim.

por RenanR Qua 29 Fev 2012, 16:42

Thales12 escreveu:Isso nao e comando de trans e comando para ver o ki e resets --'

no main.txt ou principal.txt procura por:

Código:
TextSay = GetVar("Scripts\Command.ini", "TEMP", "Text" & index)

em baixo add:

Código:
If Lcase(Trim(TextSay)) = "/ssj" Then ' o comando a usar If GetPlayerClass (index) = 1 Then ' a classe do player If GetPlayerLevel(index) => 50 Then ' o level do player If GetPlayerSprite(index) = 1 Then ' a sprite do player Call SetPlayerSprite(index, 2) ' a sprite q ele vai virar Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 50) ' quanto de str ele vai ganhar Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 50) ' quanto de defesa ele vai ganhar Call PlaySound(Index, "ssjtransform.wav") ' o som q vai fazer Call PlayerMsg(index, "Você é um Super Saiyajin!", 4) ' e a menssagem Call PlayerWarp (index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index),False) Exit Sub End If End If End If End If

fim.

Exatamente .

por davischramm Qua 29 Fev 2012, 17:54

ops coloquei errado é esse

Código:: If Lcase(Trim(TextSay)) = "/ssj" Then If GetPlayerClass (index) = 1 Then If GetPlayerLevel(index) => 50 Then If GetPlayerSprite(index) = 1 Then Call SetPlayerSprite(index, 2) Call SetPlayerSTR(Index, GetPlayerSTR(Index) * 2) Call SetPlayerDEF(Index, GetPlayerDEF(Index) * 2) Call PlaySound(Index, "ssjtransform.wav") Call PlayerMsg(index, "Você é um Super Saiyajin!", 4) Call PlayerWarp (index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index),False) Exit Sub End If End If End If End If

por Rufus Lenhador Qua 29 Fev 2012, 23:21

davischramm escreveu:ops coloquei errado é esse

Código:
If Lcase(Trim(TextSay)) = "/ssj" Then If GetPlayerClass (index) = 1 Then If GetPlayerLevel(index) => 50 Then If GetPlayerSprite(index) = 1 Then Call SetPlayerSprite(index, 2) Call SetPlayerSTR(Index, GetPlayerSTR(Index) * 2) Call SetPlayerDEF(Index, GetPlayerDEF(Index) * 2) Call PlaySound(Index, "ssjtransform.wav") Call PlayerMsg(index, "Você é um Super Saiyajin!", 4) Call PlayerWarp (index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index),False) Exit Sub End If End If End If End If

Neste código em específico não tem nada errado. Provavelmente seu erro está em outro local. Verifique os últimos lugares que você mexeu, talvez encontre.

por Ian Qui 01 Mar 2012, 06:25

um dos varios motivos para eu não utilizar mais elysium e isso

por Gu1lh3rm3 Qui 01 Mar 2012, 16:55

vou fazer um codigo aqui já edito o poste '-'

::Editado::

segue esse tutorial, espero que funcione com você '-'

::Tutorial::
abra teu Main.txt ou ate mesmo o Principal.txt, e proucure por

::ED::

Código:: If LCase(Trim(TextSay)) = "/help" Then

::EEB::

Código:: If LCase(Trim(TextSay)) = "/ajuda" Then

acima desse codigo ai, adicione

Código:: If LCase(Trim(TextSay)) = "/ssj" Then 'comando da trans If GetPlayerClass(index) = 1 Then 'classe da trans If GetPlayerLevel(index) => 50 Then 'level da trans If GetPlayerSprite(index) = 1 Then 'sprite que começa If GetPlayerAccess(index) => 0 Then 'acesso da trans para virar ssj Call SetPlayerSprite(index, 35) 'sprite que muda, é o ssj Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 50) 'pontos que add em atk Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 50) 'pontos que add em def Call PlayerMsg(index, "Você virou Super Saiyajins!", 4) 'msg que manda quando vira ssj Call SavePlayer(index) Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False) Exit Sub End If End If End If End If End If If LCase(Trim(TextSay)) = "/ssj2" Then If GetPlayerClass(index) = 1 Then If GetPlayerLevel(index) => 100 Then If GetPlayerSprite(index) = 35 Then If GetPlayerAccess(index) => 0 Then Call SetPlayerSprite(index, 36) Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 100) Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 100) Call PlayerMsg(index, "Você virou Super Saiyajins 3!", 4) Call SavePlayer(index) Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False) Exit Sub End If End If End If End If End If If LCase(Trim(TextSay)) = "/goku" Then 'comando pra voltar ao normal Select Case GetPlayerSprite(index) Case 35 'essa case 35 = 35 o numero do ssj, se o ssj fosse 37 eu colocaria Case 37 Call SetPlayerSprite(index, 1) 'sprite que vai voltar Call SetPlayerSTR(Index, GetPlayerSTR(Index) - 50) 'pontos que diminue quando destrtans Call SetPlayerDEF(Index, GetPlayerDEF(Index) - 50) 'def que diminue quando destrans Call PlayerMsg(index, "Agora você está normal.", 4) 'msg que manda Call SavePlayer(index) Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False) Case 36 Call SetPlayerSprite(index, 1) Call SetPlayerSTR(Index, GetPlayerSTR(Index) - 150) Call SetPlayerDEF(Index, GetPlayerDEF(Index) - 150) Call PlayerMsg(index, "Agora você está normal.", 4) Call SavePlayer(index) Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False) End Select Exit sub End If

bom é isso ai, teste esse codigo se nao der, fale para nois, '-'

::OBS::
o codigo das trans ta encinano como faz!, e tambem tem apenas 2 transformação...

Desculpe pelo erro de Português.

por davischramm Qui 01 Mar 2012, 20:19

Não funfo.
Vou esclarecer o erro...
é assim quando o script ta OFF da invalid command
e quando ta on não aparece nada escrito...
ja to cansado desse erro tem como vcs mandarem o main.txt por download ?

por Ian Sex 02 Mar 2012, 06:42

aconselho fazer um test pega o main da sua engine fazer uma copia e colocar outro limpo no local para ver aonde esta o problema

por Gu1lh3rm3 Sex 02 Mar 2012, 10:49

Amigo, mais facil postar teu main.txt aqui para gente ver oque a de errado nele, bom mais se nao quiser não é obrigatorio, por que as veses você tem sistemas que não quer compartilhar, mais caso queira postar o seu main.txt aqui para gente, tentaremos ajuda-lo.

por joni130 Sáb 25 Jan 2014, 12:34

NO MEU TABEM TA DANDO ERRO

por Frozen Dom 26 Jan 2014, 06:58

Olha data do tópico neh meu filho?
2012. -.-'
- Leia as regras também.

por Conteúdo patrocinado

Ajuda transformação por comando

Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando

Re: Ajuda transformação por comando