Add pdl Depois de full ajuda aki fast
+3
60
BabyFusion
zedendagua
7 participantes
MMORPG Brasil :: OPEN SOURCE ENGINES :: Outras Engines :: Elysium :: Suporte e Pedidos :: Assuntos resolvidos
Página 1 de 1
Add pdl Depois de full ajuda aki fast
por zedendagua Sex 13 Jul 2012, 14:18
olha eu editei o comando de add força depois de full pra add pdl depois de full compativel com o tutorial do Cris alguem poderia falar oq tem de errado nece comando q eu fiz? vlw e q n ta dando pra add
- Spoiler:
- 'ADD PONTOS DEPOIS DE FULL!
'COMANDO DE ADICIONAR EM PDL!
If LCase(Trim(TextSay)) = "/addpdl" Then 'coloque o comando q vc quer...
If GetPlayerpdl(index) < 1000 Then 'aqui coloque o maximo de PDL do seu jogo...
Call BattleMsg(index, "Você Precisa Ser Full em Poder De Luta para usar Esse comando!", 12, 0) 'mensagen q fala se ele n ter os pontos full...
Else
If GetPlayerPOINTS(index) > 500000 Then 'pontos q vai usar ...
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 500000) 'pega os 50 e taka em pdl = 1...
Call SetPlayerstr(index, GetPlayerstr(index) + 500000)
Call SetPlayerdef(index, GetPlayerdef(index) + 500000)
Call SetPlayerspeed(index, GetPlayerspeed(index) + 500000)
Call SetPlayermagi(index, GetPlayermagi(index) + 500000)
Call SendStats(Index)
Call MsgBox(index, "Você adicionou 500000 ponto em pdl!", 15, 0) 'mensagen de quando add...
Exit Sub
End If
End If
End if
zedendagua- Membro Junior
- Mensagens : 52
Re: Add pdl Depois de full ajuda aki fast
por BabyFusion Sex 13 Jul 2012, 15:10
Voce tem certeza que mudou apenas o comando?
Me manda o tuto que você seguiu?
Você colocou no lugar certo?
Eu não intendi muito bem sua dúvida
Me manda o tuto que você seguiu?
Você colocou no lugar certo?
Eu não intendi muito bem sua dúvida
BabyFusion- Membro Sênior
- Mensagens : 339
Re: Add pdl Depois de full ajuda aki fast
por zedendagua Sex 13 Jul 2012, 17:43
e q eu quero um comando pra add poder de luta compativel com o sistema de pdl do Cris~
http://www.mmorpgbr.com/t1778-allpoder-de-lutaquer-adicionar-outro-status
http://www.mmorpgbr.com/t1778-allpoder-de-lutaquer-adicionar-outro-status
zedendagua- Membro Junior
- Mensagens : 52
Re: Add pdl Depois de full ajuda aki fast
por 60 Seg 16 Jul 2012, 20:43
use
- Código:
':Distribuição de pontos depois de FULL!
'COMANDOS DO STATUS "FORÇA"
If LCase(Trim(TextSay)) = "/addpdl" Then
If GetPlayerstr(index) < 1000000 Then
Call BattleMsg(index, "Você Precisa Ser Full Em PDL! para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 150 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 150)
Call SetPlayerstr(index, GetPlayerstr(index) + 1)
Call SendStats(Index)
Call BattleMsg(index, "Você adicionou 1 ponto em PDL!", 15, 0)
Exit Sub
End If
End If
End if
If LCase(Trim(TextSay)) = "/addpdl1" Then
If GetPlayerstr(index) < 1000000 Then
Call BattleMsg(index, "Você Precisa Ser Full Em PDL! para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 1500 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 1500)
Call SetPlayerstr(index, GetPlayerstr(index) + 10)
Call SendStats(Index)
Call BattleMsg(index, "Você adicionou 10 pontos em PDL!", 15, 0)
Exit Sub
End If
End If
End if
If LCase(Trim(TextSay)) = "/addpdl2" Then
If GetPlayerstr(index) < 1000000 Then
Call BattleMsg(index, "Você Precisa Ser Full Em PDL! para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 15000 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 15000)
Call SetPlayerstr(index, GetPlayerstr(index) + 100)
Call SendStats(Index)
Call BattleMsg(index, "Você adicionou 100 pontos em PDL!", 15, 0)
else
Call BattleMsg(index, "Você Precisa de 15.000 de pontos para usar esse Comando!!", 15, 0)
Exit Sub
End If
End If
End if
If LCase(Trim(TextSay)) = "/addpdl3" Then
If GetPlayerstr(index) < 1000000 Then
Call BattleMsg(index, "Você Precisa Ser Full Em PDL para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 150000 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 150000)
Call SetPlayerstr(index, GetPlayerstr(index) + 1000)
Call SendStats(Index)
Call BattleMsg(index, "Você adicionou 1000 pontos em PDL!", 15, 0)
else
Call BattleMsg(index, "Você Precisa de 150.000 de pontos para usar esse Comando!!", 15, 0)
Exit Sub
End If
End If
End if
If LCase(Trim(TextSay)) = "/addpdl4" Then
If GetPlayerstr(index) < 1000000 Then
Call BattleMsg(index, "Você Precisa Ser Full Em PDL! para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 1000000 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 1000000)
Call SetPlayerstr(index, GetPlayerstr(index) + 10000)
Call SendStats(Index)
Call BattleMsg(index, "Você adicionou 10000 pontos em PDL!", 15, 0)
else
Call BattleMsg(index, "Você Precisa de 1000000 de pontos para usar esse Comando!!", 15, 0)
Exit Sub
End If
End If
End if
'COMANDOS DO STATUS "DEFESA"
If LCase(Trim(TextSay)) = "/adddef1" Then
If GetPlayerDEF(index) < 100000 Then
Call BattleMsg(index, "Você Precisa Ser Full Em Defesa para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 150 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 150)
Call SetPlayerDEF(index, GetPlayerDEF(index) + 1)
Call SendStats(Index)
Call BattleMsg(index, "Você adicionou 1 ponto em Defesa!", 15, 0)
Exit Sub
End If
End If
End if
If LCase(Trim(TextSay)) = "/adddef10" Then
If GetPlayerDEF(index) < 100000 Then
Call BattleMsg(index, "Você Precisa Ser Full Em Defesa para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 1500 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 1500)
Call SetPlayerDEF(index, GetPlayerDEF(index) + 10)
Call SendStats(Index)
Call BattleMsg(index, "Você adicionou 10 pontos em Defesa!", 15, 0)
Exit Sub
End If
End If
End if
If LCase(Trim(TextSay)) = "/adddef100" Then
If GetPlayerDEF(index) < 100000 Then
Call BattleMsg(index, "Você Precisa Ser Full Em Defesa para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 15000 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 15000)
Call SetPlayerDEF(index, GetPlayerDEF(index) + 100)
Call SendStats(Index)
Call BattleMsg(index, "Você adicionou 100 pontos em Defesa!", 15, 0)
Exit Sub
End If
End If
End if
'COMANDOS DO STATUS "VELOCIDADE"
If LCase(Trim(TextSay)) = "/addvel1" Then
If GetPlayerSPEED(index) < 100000 Then
Call BattleMsg(index, "Você Precisa Ser Full Em Velocidade para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 150 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 150)
Call SetPlayerSPEED(index, GetPlayerSPEED(index) + 1)
Call SendStats(Index)
Call BattleMsg(index, "Você adicionou 1 ponto em Velocidade!", 15, 0)
Exit Sub
End If
End If
End if
If LCase(Trim(TextSay)) = "/addvel10" Then
If GetPlayerSPEED(index) < 100000 Then
Call BattleMsg(index, "Você Precisa Ser Full Em Velocidade para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 1500 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 1500)
Call SetPlayerSPEED(index, GetPlayerSPEED(index) + 10)
Call SendStats(Index)
Call BattleMsg(index, "Você adicionou 10 pontos em Velocidade!", 15, 0)
Exit Sub
End If
End If
End if
If LCase(Trim(TextSay)) = "/addvel100" Then
If GetPlayerSPEED(index) < 100000 Then
Call BattleMsg(index, "Você Precisa Ser Full Em Velocidade para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 15000 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 15000)
Call SetPlayerSPEED(index, GetPlayerSPEED(index) + 100)
Call SendStats(Index)
Call BattleMsg(index, "Você adicionou 100 pontos em Velocidade!", 15, 0)
Exit Sub
End If
End If
End if
'COMANDOS DO STATUS "Magia"
If LCase(Trim(TextSay)) = "/addmag1" Then
If GetPlayerMAGI(index) < 100000 Then
Call BattleMsg(index, "Você Precisa Ser Full Em Magia para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 1500 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 150)
Call SetPlayerMAGI(index, GetPlayerMAGI(index) + 1)
Call SendStats(Index)
Call BattleMsg(index, "Você adicionou 10 pontos em Magia!", 15, 0)
Exit Sub
End If
End If
End if
If LCase(Trim(TextSay)) = "/addmag10" Then
If GetPlayerMAGI(index) < 100000 Then
Call BattleMsg(index, "Você Precisa Ser Full Em Magia para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 1500 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 1500)
Call SetPlayerMAGI(index, GetPlayerMAGI(index) + 10)
Call SendStats(Index)
Call BattleMsg(index, "Você adicionou 10 pontos em Magia!", 15, 0)
Exit Sub
End If
End If
End if
If LCase(Trim(TextSay)) = "/addmag100" Then
If GetPlayerMAGI(index) < 100000 Then
Call BattleMsg(index, "Você Precisa Ser Full Em Magia para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 15000 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 15000)
Call SetPlayerMAGI(index, GetPlayerMAGI(index) + 100)
Call SendStats(Index)
Call BattleMsg(index, "Você adicionou 100 pontos em Magia!", 15, 0)
Exit Sub
End If
End If
End if
60- Membro
- Mensagens : 102
Re: Add pdl Depois de full ajuda aki fast
por RichieSambora Ter 17 Jul 2012, 15:18
Em casa eu testo, mas parece que é isso msm, +1 de cred man o/
RichieSambora- Membro
- Mensagens : 141
Re: Add pdl Depois de full ajuda aki fast
por zedendagua Qua 26 Set 2012, 20:54
tipo eu qro um comando q add os pontos de atk e defesa em 1 so comando tipo /addpl ai add em atk e em defesa
zedendagua- Membro Junior
- Mensagens : 52
Re: Add pdl Depois de full ajuda aki fast
por Pablo Qua 26 Set 2012, 21:02
Utilize o código:
Atenciosamente,
Pablo
- Código:
'COMANDO DE ADICIONAR EM PDL!
If LCase(Trim(TextSay)) = "/addpdl" Then
Call BattleMsg(index, "Você Precisa Ser Full em Poder De Luta para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 500000 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 500000)
Call SetPlayerstr(index, GetPlayerstr(index) + 500000)
Call SetPlayerdef(index, GetPlayerdef(index) + 500000)
Call SendStats(Index)
Call MsgBox(index, "Você adicionou 500000 ponto em pdl!", 15, 0)
Exit Sub
End If
End if
Atenciosamente,
Pablo
Pablo- Moderador Global
- Mensagens : 1371
Re: Add pdl Depois de full ajuda aki fast
por Gu1lh3rm3 Qui 27 Set 2012, 02:11
acho que nao vai da nao Pablo porque tipo, o servidor vai lêr até ums 1000 pontos adicionados, quebrano ums 30.000 se ele arrumo do geitinho saushaus, mais é por script o-ó, intão seila kkk' --', só que do geito do Pablo ta certinho!, só não tenho certesa se vai funfar por causa dos 500000 adicionando
Gu1lh3rm3- Membro de Honra
- Mensagens : 1232
-
Re: Add pdl Depois de full ajuda aki fast
por Pablo Qui 27 Set 2012, 10:06
Bom vai funcionar sim só que ira ter que haver grande numero de ponto que no caso poderá haver bug serio se não arrumar algumas coisas.
Atenciosamente,
Pablo
Atenciosamente,
Pablo
Pablo- Moderador Global
- Mensagens : 1371
Re: Add pdl Depois de full ajuda aki fast
por zedendagua Qui 27 Set 2012, 11:29
ae aki n deu quando eu digito /addpl da esse erro ai eu dei uma edita no comando... os pontos add mais da esse erro ai quando eu entro denovo os pontos tao add sabe informar pq? da o erro
- Spoiler:
- 'COMANDO DE ADICIONAR EM PDL!
If LCase(Trim(TextSay)) = "/addpdl" Then
Call BattleMsg(index, "Você Precisa Ser Full em Poder De Luta para usar Esse comando!", 12, 0)
Else
If GetPlayerPOINTS(index) > 500000 Then
Call SetPlayerPOINTS(index, GetPlayerPOINTS(index) - 500000)
Call SetPlayerstr(index, GetPlayerstr(index) + 500000)
Call SetPlayerdef(index, GetPlayerdef(index) + 500000)
Call SetPlayerSPEED(index, GetPlayerSPEED(index) + 500000)
Call SetPlayerMAGI(index, GetPlayerMAGI(index) + 500000)
Call SendStats(Index)
Call MsgBox(index, "Você adicionou 500000 ponto em pdl!", 15, 0)
Exit Sub
End If
End if
zedendagua- Membro Junior
- Mensagens : 52
Re: Add pdl Depois de full ajuda aki fast
por Gu1lh3rm3 Qui 27 Set 2012, 12:30
Amigo zedendagua tenta faser com menos ponto para ver se funciona perfeitamente '-', coloca para adicionar 1000 pontos, e retirar 10000 pontos ;D
Gu1lh3rm3- Membro de Honra
- Mensagens : 1232
-
Re: Add pdl Depois de full ajuda aki fast
por zedendagua Qui 27 Set 2012, 12:33
fiz como vc falou guilherme o erro continuo '-'
zedendagua- Membro Junior
- Mensagens : 52
Re: Add pdl Depois de full ajuda aki fast
por Gu1lh3rm3 Qui 27 Set 2012, 12:36
você tem Visual Basic aii???, se tiver, execute o game por ele, ai vai cair na linha do erro
Gu1lh3rm3- Membro de Honra
- Mensagens : 1232
-
zedendagua- Membro Junior
- Mensagens : 52
Re: Add pdl Depois de full ajuda aki fast
por Gu1lh3rm3 Qui 27 Set 2012, 12:59
o-ó, cara se ta tentano faser sistema de pdl? sasuhsa
Gu1lh3rm3- Membro de Honra
- Mensagens : 1232
-
Re: Add pdl Depois de full ajuda aki fast
por zedendagua Qui 27 Set 2012, 13:15
nao ja tem o sistema de pdl do Cris~
zedendagua- Membro Junior
- Mensagens : 52
Re: Add pdl Depois de full ajuda aki fast
por Gu1lh3rm3 Qui 27 Set 2012, 13:16
mais foi você que implantou ele na engine certo?
e o sistema de poder de luta que você quer é estilo do forces certo?
e o sistema de poder de luta que você quer é estilo do forces certo?
Gu1lh3rm3- Membro de Honra
- Mensagens : 1232
-
Re: Add pdl Depois de full ajuda aki fast
por zedendagua Qui 27 Set 2012, 13:22
sim e do estilo do forces '-'
zedendagua- Membro Junior
- Mensagens : 52
Re: Add pdl Depois de full ajuda aki fast
por Gu1lh3rm3 Qui 27 Set 2012, 13:37
fica esperto no MP '-', vou te manda um sistema melhorado '-'
Gu1lh3rm3- Membro de Honra
- Mensagens : 1232
-
Re: Add pdl Depois de full ajuda aki fast
por zedendagua Qui 27 Set 2012, 13:39
consegui vlw ai pode fexar '-'
zedendagua- Membro Junior
- Mensagens : 52
Re: Add pdl Depois de full ajuda aki fast
por RenanR Qui 27 Set 2012, 19:20
zedendagua escreveu:consegui vlw ai pode fexar '-'
Tópico Fechado e movido para 'Assuntos resolvidos'.
RenanR- Membro Veterano
- Mensagens : 1048
Tópicos semelhantes» [ADD]Pontos depois de full
» Adicionar pontos depois de Full, por CommandButton
» [ALL]Adicionar pontos depois que tiver full (main.txt)
» COMO ADICIONAR DEPOIS DE FULL( TIPO VICIADOS) POR COMANDO BUTTON
» Ajuda fast ?
» Adicionar pontos depois de Full, por CommandButton
» [ALL]Adicionar pontos depois que tiver full (main.txt)
» COMO ADICIONAR DEPOIS DE FULL( TIPO VICIADOS) POR COMANDO BUTTON
» Ajuda fast ?
MMORPG Brasil :: OPEN SOURCE ENGINES :: Outras Engines :: Elysium :: Suporte e Pedidos :: Assuntos resolvidos
Página 1 de 1
Permissões neste sub-fórum
Não podes responder a tópicos
» Ojkjeeeee
» Naruto Great Ninja Batle
» Recrutamento de um Designer para jogo de CDZ.
» Serviços de suporte maker( Programação , Design , PixelArt ) E Vendas de Jogos
» Serviços de suporte maker( Programação , Design , PixelArt ) E Vendas de Jogos
» Serviços de suporte maker( Programação , Design , PixelArt ) E Vendas de Jogos
» Projeto Dbz
» Avaliação - Sprites Naruto
» [Sprites] DBZ (Plix)
» Super Pack - Bleach V.2
» [PEDIDO][PROJETO][RECRUTAMENTO] DYNISTYGAMES
» [PEDIDO][PROJETO][RECRUTAMENTO] DYNISTYGAMES
» [PEDIDO][PROJETO][RECRUTAMENTO] DYNISTYGAMES
» [Pedido] Contador de resets na FrmMain
» [Recrutamento]
» Ajuda erro no Cliente e Servidor do EEB 2.6!
» Como criar tilesets para Eclipse Origins 3.0 (POKÉMON)
» Recursos Pokemons
» erro frm flash
» Pedido - Pack de star wars
» [Ajuda] Sobre como por o servidor on por ip fixo
» Illusion Dimension - O Misterio do ID: BETA TESTE ONLINE
» [NSME] Naruto Shinobi Maker Engine
» Script /base,/casa Igual DBZ Forces
» [Pedido]Colar Tsunade item sprite eclipse origin
» [Pedido] Elysium
» Naruto - Recruta
» [Avaliação] - Kirito from Sword Art Online; Red and Pikachu from Pokemon.
» [Avaliação] - Kenpachi Zaraki from Bleach; Libra Shiryu From Saint Seiya.
» Demonstração de Sprites (Á VENDA!)
» [Sistema de Reset]Para Eclipse .
» Cada Guild Nascer em Certo Mapa
» Dragon Ball z Fusion A Grande Volta
» Ajuda com Ip fixo
» Como Fazer um GUI no Eclipse Origins
» Shisui Susanoo
» Fantasy Art Online
» Ajuda !!
» como passar o usuário e senha para o MainMenu?
» Ru time ero 13 Type mismatch
» Jarvis 1.3 Download
» [Avaliação/Disponibilização]Árvore 64x64
» Mlk's Zikas Signatures
» Pedido de Sistemas
» [AjudaEEB]Gerador de EXP
» [Avaliar] Base, Humano e Goblin.
» Fabrica do Tio Cronos!
» [PixelArt] Minion - Meu malvado favorito
» [Avaliar] Goku Dragon Ball Z