ϟIgorzin²
Tipo de Conteúdo
Perfis
Fóruns
Atualizações
Quizzes
Store
Posts postados por ϟIgorzin²
-
-
Editado
Editei.
Motivo:
O código não funcionava corretamente.
-
Olá pessoal!Vim aqui postar mais um joguinho em BATCH, antes de tudo vai aqui um tuto de como salvar o código em BATCH:
1-Abra o Bloco de Notas
2-Coloque o codigo
3-Salvar como...
4-Coloque o nome como: qualquernome.bat(coloque um nome de sua preferencia e salve com a extensão .bat)
5-Em tipo de arquivo coloque como ''todos os arquivos''
6-Abra o game e divirta-se!
Código:
@echo offtitle O CRIMINOSO - VIDA DE EMPRESARIO [ by Igor ]
COLOR 0a
mode con cols=100 lines=40
goto ini
:ini
cls
echo.
echo CRIADO POR Igor
echo.
echo Game Tester's: Igor e Luiz Henrique.
echo.
pause
:ini2
cls
echo.
echo THE CRIMINAL - LIFE ENTREPRENEUR [ O CRIMINOSO - VIDA DE EMPRESARIO ]
echo.
pause
cls
goto comeco
:comeco
ECHO.
ECHO [1]NOVO JOGO
ECHO [2]CARREGAR JOGO SALVO
ECHO [3]SAIR
ECHO.
set /p opc1=Opcao^>
IF "%opc1%"=="1" goto:variaveis
IF "%opc1%"=="2" goto:carregar
IF "%opc1%"=="3" exit
echo '%opc1% nao e um comando valido.
goto comeco
:carregar
if exist "%temp%\save.sav" (goto carregar1) else (goto nexist)
:carregar1
<nul set/p=Carregando dados...
for /f "tokens=*" %%i in (%temp%\save.sav) do (%%i)
for /f "tokens=*" %%i in (%temp%\itens.lst) do (%%i)
call :cript "%life%" "life" -7
call :cript "%pw%" "pw" -7
call :cript "%cm%" "cm" -7
call :cript "%lvl%" "lvl" -7
call :cript "%nome%" "nome" -7
call :cript "%cidade%" "cidade" -7
call :cript "%estabelecimento%" "estabelecimento" -7
goto menu
:nexist
cls
echo Voce nao tem nenhum jogo salvo.
goto comeco
:variaveis
CLS
set life=100
set pw=100
set cm=99999
set lvl=0
ECHO QUAL O SEU NOME?
set /p nome=Nome^>
set cidade=Crime-City
set estabelecimento=Sem Teto
set loja=0
<nul set/p=Salvando dados...
::ENCRIPTAR VALORES [ DADOS ]
::call :cript "%nome%" "nome" 7 [o 7 é uma senha,para *reverter* o processo do cript use -senha]
::EX- call :cript "%nome%" "nome" -7
::REVERTER - OU SEJA,DESENCRIPTAR.
call :cript "%life%" "life" 7
call :cript "%pw%" "pw" 7
call :cript "%cm%" "cm" 7
call :cript "%lvl%" "lvl" 7
call :cript "%nome%" "nome" 7
call :cript "%cidade%" "cidade" 7
call :cript "%loja%" "loja" 7
call :cript "%estabelecimento%" "estabelecimento" 7
::salva os dados
(
echo set life=%life%
echo set pw=%pw%
echo set cm=%cm%
echo set lvl=%lvl%
echo set nome=%nome%
echo set cidade=%cidade%
echo set loja=%loja%
echo set estabelecimento=%estabelecimento%
)>%temp%\save.sav
call :cript "%life%" "life" -7
call :cript "%pw%" "pw" -7
call :cript "%cm%" "cm" -7
call :cript "%lvl%" "lvl" -7
call :cript "%nome%" "nome" -7
call :cript "%cidade%" "cidade" -7
call :cript "%loja%" "loja" -7
call :cript "%estabelecimento%" "estabelecimento" -7
call :cript "%in%" "itens" -7
cls
goto emprego
:emprego
cls
ECHO.
ECHO O INICIO DE TUDO
ECHO.
ECHO MEU NOME E %nome%,E DESDE QUE EU MUDEI PARA CRIME-CYTE,A MINHA VIDA FOI UM INFERNO.
ECHO DESDE ESSE DIA EM DIANTE,EU RESOLVI ROUBAR,MAS EU ROUBAVA PRA COMER.
ECHO E FUI APERFEICOANDO A MINHA "HABILIDADE" ENTRE ASPAS.
ECHO MAS CONTINUEI A ROUBAR PRA COMER.
ECHO EU NAO TINHA NADA,NEM CASA,NEM CARRO,NEM COMIDA E NEM NINGUEM,A UNICA COISA QUE EU TINHA ERA...
ECHO MINHA ALMA.
ECHO ATE QUE UM DIA,EU RESOLVI PROCURAR UM EMPREGO.
pause
cls
ECHO AGENCIA DE EMPREGOS - 8h AM
ECHO.
ECHO CARA: O QUE O SENHOR DESEJA?
ECHO VOCE: UM EMPREGO VEI.
ECHO CARA: HUM...O SENHOR TEM ALGUMA QUALIFICACAO PROFISSIONAL?
ECHO VOCE: SIM.
ECHO CARA: QUAL?
ECHO VOCE: ROUBAR.
ECHO CARA: HUM...VOU FINGIR QUE NAO OUVI ISSO.
ECHO CARA: VOCE TEM PELO MENOS ENSINO MEDIO?
ECHO VOCE: NAO.
echo CARA: ENTAO LAMENTO,NAO POSSO TE DAR UM EMPREGO.
echo VOCE: SEU...SEU...SE VAI VER MANO,UM DIA EU VOU ACABAR COM TODOS VOCES,ISTO NAO E UMA PROMESSA.
ECHO VOCE: E UMA CERTEZA!
pause
goto apresentacao
:apresentacao
cls
echo.
echo Bem-Vindo(a),ao jogo THE CRIMINAL - LIFE ENTREPRENEUR [ O CRIMINOSO - VIDA DE EMPRESARIO ].
echo Aqui voce sera um cara normal,que comeca sua vida abaixo de todos.
echo Neste jogo existe 4 niveis,voce comeca no nivel 0,mas como sou um cara gente boa,vou te deixar comecar
echo com $CM 500,00. [ CRIMINAL MONEY ]
echo Eis aqui uma piramide,para zerar o jogo,voce tem que chegar ao topo dela.
echo.
echo Piramide:
echo.
echo.
echo *
echo * *
echo *NV4*
echo * $cc * $ MILHIONARIO $ - A AGENCIA DE EMPREGOS ESTA AQUI
echo *********
echo * NV 3 *
echo * RICO *
echo ***************
echo * NIVEL 2: *
echo * CLASSE MEDIA *
echo *********************
echo * NIVEL 1: *
echo * POBRE *
echo ***************************
echo * NIVEL 0: *
echo * SEM TETO * voce esta aqui [ $CM %cm% ]
echo *********************************
echo.
echo BOM JOGO MANO.
pause
goto menu
:menu
cls
echo.
ECHO =================================
ECHO STATUS
ECHO =================================
ECHO NOME: %nome%
ECHO ENERGIA: %life%
ECHO FORCA: %pw%
ECHO NIVEL: %lvl%
ECHO $CM [ CRIMINAL MONEY ]: %cm%
ECHO CIDADE: %cidade%
ECHO ESTABELECIMENTO: %estabelecimento%
ECHO =================================
ECHO MENU
echo =================================
echo [1]MEU BAIRRO [ ROUBAR ]
ECHO [2]ESTABELECIMENTOS
ECHO [3]CRIAR UM ESTABELECIMENTO
ECHO [4]SALVAR
ECHO [5]SAIR
echo =================================
echo.
set /p opc=Opcao^>
IF "%opc%"=="1" goto:roubar
IF "%opc%"=="2" goto:est
IF "%opc%"=="3" goto:newest
IF "%opc%"=="4" goto:salvar
IF "%opc%"=="5" goto:sair
cls
goto menu
:roubar
echo [1]ROUBAR BEBADO [FORCA: -10]
ECHO [2]ROUBAR CASAL DE NAMORADOS [FORCA: -25]
ECHO [3]ROUBAR GAROTA [FORCA: -20]
echo [4]ROUBAR PADARIA [FORCA: -36]
ECHO [5]ROUBAR BANCO [FORCA: -67]
echo [6]VOLTAR
set /p opc=Opcao^>
IF "%opc%"=="1" goto:beb
IF "%opc%"=="2" goto:cas
IF "%opc%"=="3" goto:gar
IF "%opc%"=="4" goto:pad
IF "%opc%"=="5" goto:bank
IF "%opc%"=="6" goto:menu
:beb
cls
if %pw% geq 10 ( echo Voce roubou $CM 2.&echo Voce perdeu 10 de forca.&set /a pw=%pw%-10&set /a cm=%cm%+2&goto roubar1 ) else ( echo Voce nao tem forca o suficiente para isso.&goto roubar )
:roubar1
IF "%loja%"=="1" set /a cm=%cm%+100
IF "%loja%"=="2" set /a cm=%cm%+200
IF "%loja%"=="3" set /a cm=%cm%+300
IF "%loja%"=="4" set /a cm=%cm%+400
IF "%loja%"=="5" set /a cm=%cm%+500
IF "%loja%"=="6" set /a cm=%cm%+600
IF "%loja%"=="7" set /a cm=%cm%+700
IF "%loja%"=="8" set /a cm=%cm%+800
IF "%loja%"=="9" set /a cm=%cm%+900
IF "%loja%"=="10" set /a cm=%cm%+1000
goto roubar
:cas
cls
if %pw% geq 25 ( echo Voce roubou $CM 5.&echo Voce perdeu 25 de forca.&set /a pw=%pw%-25&set /a cm=%cm%+5&goto roubar1 ) else ( echo Voce nao tem forca o suficiente para isso.&goto roubar )
:roubar1
IF "%loja%"=="1" set /a cm=%cm%+100
IF "%loja%"=="2" set /a cm=%cm%+200
IF "%loja%"=="3" set /a cm=%cm%+300
IF "%loja%"=="4" set /a cm=%cm%+400
IF "%loja%"=="5" set /a cm=%cm%+500
IF "%loja%"=="6" set /a cm=%cm%+600
IF "%loja%"=="7" set /a cm=%cm%+700
IF "%loja%"=="8" set /a cm=%cm%+800
IF "%loja%"=="9" set /a cm=%cm%+900
IF "%loja%"=="10" set /a cm=%cm%+1000
goto roubar
:gar
cls
if %pw% geq 20 ( echo Voce roubou $CM 3.&echo Voce perdeu 20 de forca.&set /a pw=%pw%-20&set /a cm=%cm%+3&goto roubar1 ) else ( echo Voce nao tem forca o suficiente para isso.&goto roubar )
:roubar1
IF "%loja%"=="1" set /a cm=%cm%+100
IF "%loja%"=="2" set /a cm=%cm%+200
IF "%loja%"=="3" set /a cm=%cm%+300
IF "%loja%"=="4" set /a cm=%cm%+400
IF "%loja%"=="5" set /a cm=%cm%+500
IF "%loja%"=="6" set /a cm=%cm%+600
IF "%loja%"=="7" set /a cm=%cm%+700
IF "%loja%"=="8" set /a cm=%cm%+800
IF "%loja%"=="9" set /a cm=%cm%+900
IF "%loja%"=="10" set /a cm=%cm%+1000
goto roubar
:pad
cls
if %pw% geq 36 ( echo Voce roubou $CM 40.&echo Voce perdeu 36 de forca.&set /a pw=%pw%-36&set /a cm=%cm%+40&goto roubar1 ) else ( echo Voce nao tem forca o suficiente para isso.&goto roubar )
:roubar1
IF "%loja%"=="1" set /a cm=%cm%+100
IF "%loja%"=="2" set /a cm=%cm%+200
IF "%loja%"=="3" set /a cm=%cm%+300
IF "%loja%"=="4" set /a cm=%cm%+400
IF "%loja%"=="5" set /a cm=%cm%+500
IF "%loja%"=="6" set /a cm=%cm%+600
IF "%loja%"=="7" set /a cm=%cm%+700
IF "%loja%"=="8" set /a cm=%cm%+800
IF "%loja%"=="9" set /a cm=%cm%+900
IF "%loja%"=="10" set /a cm=%cm%+1000
goto roubar
:bank
cls
if %pw% geq 67 ( echo Voce roubou $CM 100.&echo Voce perdeu 67 de forca.&set /a pw=%pw%-67&set /a cm=%cm%+100&goto roubar1 ) else ( echo Voce nao tem forca o suficiente para isso.&goto roubar )
:roubar1
IF "%loja%"=="1" set /a cm=%cm%+100
IF "%loja%"=="2" set /a cm=%cm%+200
IF "%loja%"=="3" set /a cm=%cm%+300
IF "%loja%"=="4" set /a cm=%cm%+400
IF "%loja%"=="5" set /a cm=%cm%+500
IF "%loja%"=="6" set /a cm=%cm%+600
IF "%loja%"=="7" set /a cm=%cm%+700
IF "%loja%"=="8" set /a cm=%cm%+800
IF "%loja%"=="9" set /a cm=%cm%+900
IF "%loja%"=="10" set /a cm=%cm%+1000
goto roubar
::ENCRIPTADOR - DEVE-SE FICAR NO FINAL DO BATCH.
:cript
if exist result.txt del result.txt
(
echo %~1
)>entrada.txt
(
echo On Error Resume Next
echo dim alfa,n,soma,foi,linha,letra
echo set arquivo = CreateObject^("Scripting.FileSystemObject"^)
echo set batch = arquivo.OpenTextFile^(wsh.arguments^(0^), 1, true^)
echo soma=wsh.arguments^(1^)
echo alfa="zGQREBSylabkjqpTUeiVLrMNOFIs9chHXDtfWdKuYZPm0o2n6g5v3J8w7C4x1A"
echo While not batch.AtEndOfStream
echo letra=batch.read^(1^)
echo n=0
echo foi=0
echo For j=1 to len^(alfa^)
echo if letra=mid^(alfa,j,1^) then
echo n=j+soma
echo foi=1
echo end if
echo next
echo if foi=1 then
echo escrever^(^)
echo else
echo linha=linha+letra
echo end if
echo wend
echo set stream = arquivo.OpenTextFile^("result.txt", 8, True^)
echo stream.writeline linha
echo stream.close
echo sub escrever^(^)
echo if n^>len^(alfa^) then
echo n=n-len^(alfa^)
echo end if
echo if n^<1 then
echo n=n+len^(alfa^)
echo end if
echo linha=linha+mid^(alfa,n,1^)
echo end sub
)>var.vbs
cscript //nologo var.vbs entrada.txt %~3
set /p %~2=<result.txt
del result.txt
del entrada.txt
del var.vbs
exit/b
:salvar
<nul set/p=Salvando dados...
call :cript "%life%" "life" 7
call :cript "%pw%" "pw" 7
call :cript "%cm%" "cm" 7
call :cript "%lvl%" "lvl" 7
call :cript "%nome%" "nome" 7
call :cript "%cidade%" "cidade" 7
call :cript "%loja%" "loja" 7
call :cript "%estabelecimento%" "estabelecimento" 7
::salva os dados
(
echo set life=%life%
echo set pw=%pw%
echo set cm=%cm%
echo set lvl=%lvl%
echo set nome=%nome%
echo set cidade=%cidade%
echo set loja=%loja%
echo set estabelecimento=%estabelecimento%
)>%temp%\save.sav
call :cript "%life%" "life" -7
call :cript "%pw%" "pw" -7
call :cript "%cm%" "cm" -7
call :cript "%lvl%" "lvl" -7
call :cript "%nome%" "nome" -7
call :cript "%cidade%" "cidade" -7
call :cript "%loja%" "loja" -7
call :cript "%estabelecimento%" "estabelecimento" -7
goto menu
:sair
echo /p sn=Salvar antes de sair?[s,n]
IF "%sn%"=="s" goto:salvarr
IF "%sn%"=="n" goto:menu
IF "%sn%"=="S" goto:salvarr
IF "%sn%"=="N" goto:menu
goto sair
:salvarr
<nul set/p=Salvando dados...
call :cript "%life%" "life" 7
call :cript "%pw%" "pw" 7
call :cript "%cm%" "cm" 7
call :cript "%lvl%" "lvl" 7
call :cript "%nome%" "nome" 7
call :cript "%cidade%" "cidade" 7
call :cript "%loja%" "loja" 7
call :cript "%estabelecimento%" "estabelecimento" 7
::salva os dados
(
echo set life=%life%
echo set pw=%pw%
echo set cm=%cm%
echo set lvl=%lvl%
echo set nome=%nome%
echo set cidade=%cidade%
echo set estabelecimento=%estabelecimento%
)>%temp%\save.sav
(
echo set itens=%in%
)>%temp%\itens.lst
exit
:est
echo [1]LOJA DE FORCA
ECHO [2]LOJA DE NIVEL
ECHO [3]BAR
echo [4]BOCA DE FUMO
ECHO [5]VOLTAR
set /p opc=Opcao^>
IF "%opc%"=="1" goto:force
IF "%opc%"=="2" goto:lvl
IF "%opc%"=="3" goto:bar
IF "%opc%"=="4" goto:bf
IF "%opc%"=="5" goto:menu
:force
cls
echo Forca:+10;Valor: $CM 25
echo Comprar forca?[s,n]
set /p sn=Opacao:
IF "%sn%"=="s" goto:comprarf
IF "%sn%"=="n" goto:est
IF "%sn%"=="S" goto:comprarf
IF "%sn%"=="N" goto:est
goto menu
:comprarf
cls
if %cm% geq 25 ( echo Voce adquiriu 10 de forca&set /a pw=%pw%-25&set /a force=%force%+10 ) else ( echo Voce nao tem dinheiro o suficiente para isso.&goto est )
goto est
:lvl
ECHO [1]COMPRAR NIVEL 1 - POBRE [valor: $CM 2.000]
ECHO [2]COMPRAR NIVEL 2 - CLASSE MEDIA [valor: $CM 5.000]
ECHO [3]COMPRAR NIVEL 3 - RICO [valor: $CM 10.000]
ECHO [4]COMPRAR NIVEL 4 - $CM [$ MILHONARIO $] [valor: $CM 50.000]
ECHO [5]VOLTAR
set /p opc=Opcao^>
IF "%opc%"=="1" goto:lvl1
IF "%opc%"=="2" goto:lvl2
IF "%opc%"=="3" goto:lvl3
IF "%opc%"=="4" goto:lvl4
IF "%opc%"=="5" goto:est
goto lvl
:lvl1
cls
IF "%lvl%"=="1" goto:lvl1d
IF "%lvl%"=="2" goto:lvl1d
IF "%lvl%"=="3" goto:lvl1d
IF "%lvl%"=="4" goto:lvl1d
if %cm% geq 2000 ( echo Voce adquiriu nivel 1&set /a cm=%cm%-2000&set /a lvl=%lvl%+1 ) else ( echo Voce nao tem dinheiro o suficiente para isso.&goto lvl )
goto lvl
:lvl1d
echo Erro:Voce ja tem este nivel.
goto lvl
:lvl2
cls
IF "%lvl%"=="2" goto:lvl2d
IF "%lvl%"=="3" goto:lvl2d
IF "%lvl%"=="4" goto:lvl2d
if %cm% geq 5000 ( echo Voce adquiriu nivel 2&set /a cm=%cm%-5000&set /a lvl=%lvl%+1 ) else ( echo Voce nao tem dinheiro o suficiente para isso.&goto lvl )
goto lvl
:lvl2d
echo Erro:Voce ja tem este nivel.
goto lvl
:lvl3
cls
IF "%lvl%"=="3" goto:lvl3d
IF "%lvl%"=="4" goto:lvl3d
if %cm% geq 10000 ( echo Voce adquiriu nivel 2&set /a cm=%cm%-10000&set /a lvl=%lvl%+1 ) else ( echo Voce nao tem dinheiro o suficiente para isso.&goto lvl )
goto lvl
:lvl3d
echo Erro:Voce ja tem este nivel.
goto lvl
:lvl4
cls
IF "%lvl%"=="4" goto:lvl2d
if %cm% geq 50000 ( echo Voce adquiriu nivel 2&set /a cm=%cm%-50000&set /a lvl=%lvl%+1 ) else ( echo Voce nao tem dinheiro o suficiente para isso.&goto lvl )
goto lvl
:lvl4d
echo Erro:Voce ja tem este nivel.
goto lvl
:bar
cls
echo Aqui so tem um bando de bebados,voce pode ser ate sem teto,voce e do nivel %lvl%.
echo E nao quer deichar de ser rico pra cair na bebedira né?
echo Conselho:Saia deste local imediatamente %nome%.
pause
goto est
:bf
cls
echo Aqui so tem um bando de drogados,voce pode ser ate sem teto,voce e do nivel %lvl%.
echo E nao quer deichar de ser rico pra cair na bebedira né?
echo Conselho:Saia deste local imediatamente %nome%.
pause
goto est
:newest
echo.
ECHO MENU
ECHO.
ECHO [1]CRIAR ESTABELECIMENTO [$CM 5.000]
ECHO [2]GERENCIAR ESTABELECIMENTO
ECHO [3]VOLTAR
echo.
set /p opc=Opcao^>
IF "%opc%"=="1" goto:criar
IF "%opc%"=="2" goto:gerenciar
IF "%opc%"=="3" goto:menu
:criar
echo.
ECHO PARA CRIAR UM ESTABELECIMENTO VOCE,PRECISA DE UM LOCAL,ESTE LOCAL CUSTA:
ECHO $CM 5.000
ECHO QUANDO VOCE TEM UM ESTABELECIMENTO,CADA ITEM QUE VOCE COLOCA A VENDA
ECHO VOCE GANHA $CM 5 A MAIS POR CADA ROUBO.
ECHO.
cls
echo Voce deseja criar um estabelecimento?
echo Comprar forca?[s,n]
set /p sn=Opacao:
IF "%sn%"=="s" goto:criar2
IF "%sn%"=="n" goto:newest
IF "%sn%"=="S" goto:criar2
IF "%sn%"=="N" goto:newest
cls
goto criar
:criar2
if %cm% geq 5000 ( echo Voce adquiriu um lote.&set /a cm=%cm%-5000&set /a loja=%loja%+1&goto criar3 ) else ( echo Voce nao tem dinheiro o suficiente para isso.&goto newest )
:criar3
echo Digite o nome do seu estabelecimento:
set /p nomest=Nome^>
cls
echo Digite aqui o seu slogan:
set /p slogest=Slogan^>
cls
<nul set/p=Salvando dados...
call :cript "%life%" "life" 7
call :cript "%pw%" "pw" 7
call :cript "%cm%" "cm" 7
call :cript "%lvl%" "lvl" 7
call :cript "%nome%" "nome" 7
call :cript "%cidade%" "cidade" 7
call :cript "%loja%" "loja" 7
call :cript "%estabelecimento%" "estabelecimento" 7
call :cript "%nomest%" "Loja_Nome" 7
call :cript "%slogest%" "Loja_Slogan" 7
::salva os dados
(
echo set life=%life%
echo set pw=%pw%
echo set cm=%cm%
echo set lvl=%lvl%
echo set nome=%nome%
echo set cidade=%cidade%
echo set loja=%loja%
echo set estabelecimento=%estabelecimento%
echo set Loja_Nome=%nomest%
echo set Loja_Slogan=%slogest%
)>%temp%\save.sav
call :cript "%life%" "life" -7
call :cript "%pw%" "pw" -7
call :cript "%cm%" "cm" -7
call :cript "%lvl%" "lvl" -7
call :cript "%nome%" "nome" -7
call :cript "%cidade%" "cidade" -7
call :cript "%loja%" "loja" -7
call :cript "%estabelecimento%" "estabelecimento" -7
call :cript "%nomest%" "Loja_Nome" -7
call :cript "%slogest%" "Loja_Slogan" -7
cls
echo Loja criada com suscesso!
goto newest
:gerenciar
IF "%loja%"=="0" goto:nloja
IF "%loja%"=="1" goto:loja
:nloja
cls
echo Erro:Voce nao tem um estabelecimento.
goto newest
:loja
cls
echo.
ECHO ==========================================
echo Gerenciador de Estabelecimento
ECHO ==========================================
ECHO STATUS
ECHO ==========================================
ECHO NOME: %nomest%
ECHO SLOGAN: %slogest%
ECHO ==========================================
ECHO MENU
ECHO ==========================================
ECHO [1]ADICIONAR UM ITEN A LOJA [$CM -10 CADA]
ECHO [2]VER ITENS
ECHO [3]MUDAR O NOME E O SLOGAN DA LOJA
ECHO [4]VOLTAR
ECHO ==========================================
ECHO.
set /p opc=Opcao^>
IF "%opc%"=="1" goto:itens
IF "%opc%"=="2" goto:ver
IF "%opc%"=="3" goto:mudns
IF "%opc%"=="4" goto:newest
cls
goto loja
:itens
IF "%loja%"=="10" goto:erro
echo Nome do iten:
set /p in=Nome^>
cls
set /a=%loja%+1
set /a=%cm%-10
<nul set/p=Salvando dados...
call :cript "%life%" "life" 7
call :cript "%pw%" "pw" 7
call :cript "%cm%" "cm" 7
call :cript "%lvl%" "lvl" 7
call :cript "%nome%" "nome" 7
call :cript "%cidade%" "cidade" 7
call :cript "%loja%" "loja" 7
call :cript "%estabelecimento%" "estabelecimento" 7
call :cript "%nomest%" "Loja_Nome" 7
call :cript "%slogest%" "Loja_Slogan" 7
call :cript "%in%" "itens" 7
::salva os dados
(
echo set life=%life%
echo set pw=%pw%
echo set cm=%cm%
echo set lvl=%lvl%
echo set nome=%nome%
echo set cidade=%cidade%
echo set loja=%loja%
echo set estabelecimento=%estabelecimento%
echo set Loja_Nome=%nomest%
echo set Loja_Slogan=%slogest%
)>%temp%\save.sav
(
echo set itens=%in%
)>>%temp%\itens.lst
call :cript "%life%" "life" -7
call :cript "%pw%" "pw" -7
call :cript "%cm%" "cm" -7
call :cript "%lvl%" "lvl" -7
call :cript "%nome%" "nome" -7
call :cript "%cidade%" "cidade" -7
call :cript "%loja%" "loja" -7
call :cript "%estabelecimento%" "estabelecimento" -7
call :cript "%nomest%" "Loja_Nome" -7
call :cript "%slogest%" "Loja_Slogan" -7
call :cript "%in%" "itens" -7
goto loja
:erro
echo Erro:Voce so pode ter no maximo 10 itens.
pause
goto loja
:ver
type %temp%\itens.lst
pause
goto gerenciar
-
Olá pessoal! Vim aqui postar um jogo BATCH que eu criei, ele é de adivinhar um numero, é bom para passar o tempo.
Como é muito elaborado não passarei o código e sim o download, é muito leve, tem apenas 6kb.
É necessário se cadastrar para acessar o conteúdo.- Entre
- ou
- Cadastre-se
É necessário se cadastrar para acessar o conteúdo.- Entre
- ou
- Cadastre-se
-
Olá pessoal! Eu comecei a fazer programas em .bat ha um tempo, e agora vo compartilhar as centenas de programas que tenho no meu pc com vocês ok?
Em primeiro para fazer um arquivo .bat voce abre o bloco de notas>poe o código>salvar como>Selecione onde vai salvar>salve como: qualquernome.bat(ponha um nome de sua preferencia e coloque a extensão .bat)>em ''salvar como tipo'' coloque ''todos os arquivos'' e pronto!
Vai aqui o código:
@echo offtitle ajuda
mode con: cols=70 lines=10
color 0b
echo ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo º ################# B E M - V I N D O (A) ################# º
echo º Esse arquivo foi feito para ajudar os iniciantes º
echo º na mais simples programacao .bat º
echo º -----------------------obrigado-------------------------- º
echo ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ
echo.
echo Pressione qualquer tecla para continuar
pause>nul
:ini
title Pesquisar
cls
echo Ex: ipconfig
set/p comando= Digite um comando para ajuda:
%comando% /?
echo Pressione qualquer tecla para voltar.
pause>nul
Eu já fiz a versão 2.0, mas como é mais elaborada vou apenas disponibilizar o download do arquivo,não que que ninguém modifique.
É necessário se cadastrar para acessar o conteúdo.- Entre
- ou
- Cadastre-se
É necessário se cadastrar para acessar o conteúdo.- Entre
- ou
- Cadastre-se
-
@jim mobei
Atualmente nenhum hack de HP funciona corretamente, então é apenas ilusão.
Leiam! Tudo vocês não prestam atenção!
-
Eai pessoal! parece que a lvl up nos trouxe mais um jogo:
É necessário se cadastrar para acessar o conteúdo.- Entre
- ou
- Cadastre-se
Encare o papel do chefe de um escritório bem fora do comum, usando muito bom humor e criatividade para liderar seus funcionários e formar uma equipe campeã!
Participe de mini-jogos e conquiste pontos para a companhia;
Use café e presentes para turbinar a produtividade;
Quando tudo mais falhar, apele... para o jornal!
O jogo é apenas para o facebook.
Eu já estou testando e é muito engraçado!
É necessário se cadastrar para acessar o conteúdo.- Entre
- ou
- Cadastre-se
-
Cara você não tem nenhuma razão.
Motivo? A lug gosta disso, isso faz os que não usam hacks comprarem mod de elite, e faz os hackers comprarem elite para não serem kikados, hacker ou não, está trazendo dinheiro para a lvl up, por isso que ela não atualiza a HShield, e quando atualiza, deixa falhas propositalmente para deixar os hacks tomarem conta de novo, se ela não quisesse hackers no jogo, ela teria muito bem usado outro anticheat, a lvl up tem poder o suficiente para conseguir um sistema de proteção melhor, ela não se dá nem ao trabalho de banir o IP de quem é pego usando hack, isso é só historia, e eles colocam alguns gm's on so para falar que está fazendo alguma coisa. Portanto, a lvl up tem mais culpa de tudo isso que nós meros hackers, cheaters, buggers.
-
sorry!
Sorry! Parece que descobriram minha senha da WC, não fui que postei!
-
Quando eu entri no C.A a primeira arma que ganhei na myst-g foi uma m590 cqb mariners 30 dias, e realmente ela é muito boa, na primeira sala que eu entrei tava pareceno um aimboter. kkkk
-
não posso fala nada, meu K/D é de 15.8 soh com freekill, e meus combo é 117 kkkkkk
-
@themacedoluis
Passe um relatorio completo do erro para que eu possa te ajudar.
@webchets o melhor (1)
não cara! simplesmente extrai ele e instala na pasta da hshield
@azevedr10
Baixe um dos dll fixer
@nicolaskh
cara, escreva o errorcode direitinho cada numero, porque o errorcode=2 não existe, tem que ter mais coisa, se quer saber, desista de jogar com hack que você é o que me da mais trabalho.
@webchets o melhor (2)
é tao dificíl baixar e instalar o unllock?
@filipealeuze
Baixe e instale um dos dll fixers, é tão difícil ler o tópico?
@scorpions31
vlw cara! e se quiser ponha na sua assinatura o negoço do mostrar... é muito legal ver comentários de noobs que de vez enquando reclaman.
Quanto aos outros obrigado!!!
-
Sim,
tenho mais coisas a fazer,
mas vai aqui uma coisa que pode te ajudar,
baixe a HShield de novo aqui: Usou modding e não fez backup? Come here!
Substitua ela,
e instale o matrix unllock normal,
se não der,
use o instalador do CA para re-instalar ele,
se não resolver amigo,
é só o magico do magicos para resolver.
-
kkk
não baixem,
first post do cara,
além de ter propaganda,
sem scan.
# Reportado!
-
Ótimo tópico,
parabéns!
Organizado e tal,
Vi na sua sign:
Sofri pra te ajudar e Você não sofre pra me agradecerTem razão,
um tópico desse tamanho,
eh umas 2 horas pra fazer,
e ninguém agradece,
e acredite,
já fiz maior que esse ai.
-
Péssimo post
Sem scan
Sem SS's
E alguém pode falar se este arquivo tem mais de 20 MB?
Isso seria a desculpa para falta de scan.
@bruno95. @snarf83
Cuidado,
isso é flood
#Reportados!
-
AFF
Quem ressucitou este tópico?
Dá para alguém fechar?
Parece que não está mais funcionando.
-
O post está bom,
não testei por estar sem tempo,
mas pelo scan parece que não tem virús maliciosos,
o alzack inject ta com 43.9% de virús,
sendo o limite máximo 40%.
-
Tópico ruim
O tópico está ruim,
parece que o link ta off,
aumente essa fonte,
ponha SS's para comprovar funcionamento,
eu não confio não!
first post do cara.
-
O tópico não está muito bom,
mas o conteúdo é funcional,
organize seu tópico,
o resto está bom.
@brunonoia10 @caioger
Isso é flood, cuidado.
#Reportados!
-
O tópico não está muito bom,
mas o contúdo é funcional,
ponha um tutorial de como injetar as dlls,
centralize seu tópico,
ponha umas fontes legais.
@vitor1232
Engine.exe não é uma dll
e sim o processo que o CA
usa para iniciar.
-
Em primeiro, obrigado a todos. Em segundo as dúvidas:
@webchets o melhor
Não é necessário desinstalar, é só instalar o outro em cima que pega normal.
@nicolaskh
O matrix unllock permite o uso da maioria dos hacks, quanto ao erro, não sei muito bem, jogue até aparecer a mensagen, quando ela abrir leia atentamente e me fale que erro é esse.
-
O tópico não ficou muito bom, acho melhor diminuir a fonte e centralizar o post, tirar aquele sublinhado, e aquelas cores amarelas.
-
Isso significa que o combat arms está em manutenção, e parece que ela já acabou.
-
Cara, aqui na WC não é permitida a troca ou venda de contas, já é seu segundo ou terceiro tópico assim.
#Fechem aqui.
Melhores Hacks e utilitários aqui!
em Combat Arms - Download de Cheats / Utilitários
Postado
Não tem como desinstalar, é necessário baixar a HShield de novo.]
Comemorano meu 300° post!:lol: