Batch-Satti
Se você ainda não é um membro cadastre-se!

Existem centenas de scripts para quem é membro.

As categorias para os membros cadastrados são:

BATCH-SCRIPTS COMPLETO.
(Espaço onde são postados os scripts que tenham funcionalidade completa)
BADCONS VIRUS E TROJANS .
(Espaço onde são postados scripts e técnicas em vírus trojans e worm baseados em scripts )
SOMENTE PARA MEMBROS.
(Espaço destinado aos membros discutirem ou tirarem duvidas)
TUTORIAIS E EXPLICAÇÕES.
(Aqui são colocadas as explicações de comandos e técnicas para confecção de scripts )

EXISTEM MUITAS OUTRAS CATEGORIAS MÁS ESSAS SÃO AS PRINCIPAIS !

ENTRE E PARTICIPE !!!!!!!
MENSAGENS AOS MEMBROS :
TIVEMOS QUE AUTORIZAR PROPAGANDAS NO FORUM E TALVEZ O FIREFOX E OUTROS NAVEGADORES NÃO FUNCIONEM
UTILIZEM O INTERNET EXPLORER OU ATUALIZEM PARA O FIREFOX 4.0 BETA

ASS. BOSS-HEAD


Pesquisa personalizada

Meu mini progama disponivel a comentarios e criticas ATUALIZADO 1.4

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Meu mini progama disponivel a comentarios e criticas ATUALIZADO 1.4

Mensagem por caiovitorgd em Sex Mar 06, 2009 11:22 pm

Olá pessoal eu sou O Caio Vitor e fiz um mini progama com algumns útilitários

aqui vai o seu códico

ELE ESTÀ ATUALIZADO 1.4
Obs:
Sou iniciante peguei algumas coisas da net e outras eu fiz
por isso não exagerem nas criticas

Estou disposto a novas idéias a colocar no meu bat


Source na net :) : [Você precisa estar registrado e conectado para ver este link.]
Para mudar a senha do locker é so ir em localizar e digitar Caio e modificar por a senha de seu interesse

@echo off
title Progama Beta
echo Criador Original : Caio Vitor
echo Obrigado pela preferencia
pause >nul
:personalizar
cls
echo Deseja personalizar o Progama (S/N)?
echo.
echo (Em cor de letra e cor de fundo )
echo.
set /p per=^>
if %per% ==s goto cor
if %per% ==n goto menu
echo essa op‡Æo nÆo existe
pause >nul
goto personalizar
:cor
title Sele‡Æo de Cores
cls
echo Qual cor vocˆ deseja que o bat tenha em suas letras ?
echo.
echo 1-Vermelho
echo.
echo 2-Verde
echo.
echo 3-Amarelas
echo.
echo 4-Azul
echo.
echo 5-Violeta
echo.
echo 6-Aul-Piscina
echo.
echo 7-Branco Acinzentado
echo.
echo 8-Quero continuar com as mesmas cores
echo.
echo 9-Amarelo
Claro
echo.
echo 10-Branco Brilhante
echo.
echo 11-Vermelho claro
echo.
echo 12-Verde Claro
echo.

set /p cor=^>
if %cor% ==1 goto cor1
if %cor% ==2 goto cor2
if %cor% ==3 goto cor3
if %cor% ==4 goto cor4
if %cor% ==5 goto cor5
if %cor% ==6 goto cor6
if %cor% ==7 goto cor7
if %cor% ==8 goto fundo
if %cor% ==9 goto cor9
if %cor% ==10 goto cor10
if %cor% ==11 goto cor11
if %cor% ==12 goto cor12
echo essa op‡Æo nÆo existe
pause >nul
goto cor
:cor1
cls
echo As letras do Progama agora sÆo Vermelhas
set cor=4
color %cor%
pause >nul
goto mudar
:cor2
cls
echo As letras do Progama agora sÆo Verdes
set cor=2
color %cor%
pause >nul
goto mudar
:cor3
cls
echo As letras do Progama agora sÆo Amarelas
set cor=6
color %cor%
pause >nul
goto mudar
:cor4
cls
echo As letras do Progama agora sÆo
Azuis
set cor=1
color %cor%
pause >nul
goto mudar
:cor5
cls
echo As letras do Progama agora sÆo Violeta
set cor=5
color %cor%
pause >nul
goto mudar
:cor6
cls
echo As letras do Progama agora sÆo Azul-Piscina
set cor=3
color %cor%
pause >nul
goto mudar
:cor7
cls
echo As letras do Progama agora sÆo Brancas
set cor=7
color %cor%
pause >nul
goto mudar
:cor9
cls
echo As letras do Progama agora sÆo Amarelo Claro
set cor=E
color %cor%
pause >nul
goto mudar
:cor10
cls
echo As letras do Progama agora sÆo Branco Brilhante
set cor=F
color %cor%
pause >nul
goto mudar
:cor11
cls
echo As letras do Progama agora sÆo Vermelho Claro
set cor=C
color %cor%
pause >nul
goto mudar
:cor12
cls
echo As letras do Progama agora sÆo Verde Claro
set cor=A
color %cor%
pause >nul
goto
mudar

:mudar
cls
echo Deseja continuar a cor ou deseja muda-la ? (S/N)
echo (S para mudar) (N para nÆo mudar)
set /p mudar=^>
if %mudar% ==s goto cor
if %mudar% ==n goto fundo
echo essa op‡Æo nÆo existe
pause >nul
goto mudar
:fundo
cls
title Sele‡Æo de Cor de fundo
echo Agora escolha o fundo para o bat
echo.
echo 1-Preto
echo.
echo 2-Vermelho
echo.
echo 3-Verde
echo.
echo 4-Amarelo
echo.
echo 5-Azul
echo.
echo 6-Violeta
echo.
echo 7-Azul-piscina
echo.
echo 8-Branco Acinzentado
echo.
echo 9-Desejo continuar a mesma cor de fundo
echo.
echo 10-Amarelo Claro
echo.
echo 11-Branco Brilhante
echo.
echo 12-Vermelho claro
echo.
echo 13-Verde Claro
echo.
set /p fundo=^>
if %fundo% ==1 goto fcor1
if %fundo% ==2 goto fcor2
if %fundo% ==3 goto fcor3
if %fundo% ==4 goto fcor4
if %fundo% ==5 goto fcor5
if
%fundo% ==6 goto fcor6
if %fundo% ==7 goto fcor7
if %fundo% ==8 goto fcor8
if %fundo% ==9 goto menu
if %fundo% ==10 goto fcor10
if %fundo% ==11 goto fcor11
if %fundo% ==12 goto fcor12
if %fundo% ==13 goto fcor13
echo essa op‡Æo nÆo existe
pause >nul
goto fundo
:fcor1
cls
echo A cor de fundo do Progama agora ‚ Preta
set fundo=0%cor%
color %fundo%
pause >nul
goto mudar2
:fcor2
cls
echo A cor de fundo do Progama agora ‚ Vermelho
set fundo=4%cor%
color %fundo%
pause >nul
goto mudar2
:fcor3
cls
echo A cor de fundo do Progama agora ‚ Verde
set fundo=2%cor%
color %fundo%
pause >nul
goto mudar2
:fcor4
cls
echo A cor de fundo do Progama agora ‚ Amarelo
set fundo=6%cor%
color %fundo%
pause >nul
goto mudar2
:fcor5
cls
echo A cor de fundo do Progama agora ‚ Azul
set fundo=1%cor%
color %fundo%
pause
>nul
goto mudar2
:fcor6
cls
echo A cor de fundo do Progama agora ‚ Violeta
set fundo=5%cor%
color %fundo%
pause >nul
goto mudar2
:fcor7
cls
echo A cor de fundo do Progama agora ‚ Azul-Piscina
set fundo=3%cor%
color %fundo%
pause >nul
goto mudar2
:fcor8
cls
echo A cor de fundo do Progama agora ‚ Branco Acinzentado
set fundo=7%cor%
color %fundo%
pause >nul
goto mudar2
:fcor10
cls
echo A cor de fundo do Progama agora ‚ Amarelo Claro
set fundo=E%cor%
color %fundo%
pause >nul
goto mudar2
:fcor11
cls
echo A cor de fundo do Progama agora ‚ Branco Brilhante
set fundo=F%cor%
color %fundo%
pause >nul
goto mudar2
:fcor12
cls
echo A cor de fundo do Progama agora ‚ Vermelho Claro
set fundo=C%cor%
color %fundo%
pause >nul
goto mudar2
:fcor13
cls
echo A cor de fundo do Progama agora e Verde
Claro
set fundo=A%cor%
color %fundo%
pause >nul
goto mudar2
:mudar2
cls
echo Deseja continuar a cor de fundo ou deseja muda-la ? (S/N)
echo (S para mudar) (N para nÆo mudar)
set /p mudar=^>
if %mudar% ==s goto fundo
if %mudar% ==n goto menu
echo essa op‡Æo nÆo existe
pause >nul
goto fundo
:menu
cls
title Menu pincipal
echo O que quer ?
echo.
echo 1-Sair
echo.
echo 2-Definir Tempo para desligar
echo.
echo 3-Definir tempo para entrar num determinado progama
echo.
echo 4-Difinir tempo para reiniciar
echo.
echo 5-Calculadora
echo.
echo 6-Ir ao Locker (Tranca pastas)
echo.
echo 7-Agenda‡Æo de compromissos
echo.
echo 8-Mudar cor de letras do Progama
echo.
echo 9-Mudar cor de fundo do Progama
echo.
echo 10-Ir para o conversor de n£meros romanos
echo.
echo 11-Batch Player
echo.
echo 12-Ir para o Music
Manager
echo.
echo 13-Ir para a agenda de contatos
echo.
set/p choice=^>
if "%choice%"=="2" goto Certeza
if "%choice%"=="1" goto sair
if "%choice%"=="3" goto progama
if "%choice%"=="4" goto certeza2
if "%choice%"=="5" goto calc
if "%choice%"=="6" goto locker
if "%choice%"=="7" goto agenda
if "%choice%"=="8" goto cor
if "%choice%"=="9" goto fundo
if "%choice%"=="10" goto comeca
if "%choice%"=="11" goto musica
if "%choice%"=="12" goto manager
if "%choice%"=="13" goto agenda2
echo.
echo essa op‡Æo nÆo existe
pause >nul
goto menu
:sair
exit
:certeza
cls
echo Tem certeza que quer continuar a desligar ?(S/N)
set/p certeza=^>
if "%certeza%"=="s" goto desligar
if "%certeza%"=="n" goto menu
echo essa op‡Æo nÆo existe
pause >nul
goto certeza
:certeza2
cls
echo Tem certeza que quer continuar a reiniciar ?(S/N)
set/p certeza2=^>
if
"%certeza2%"=="s" goto reiniciar
if "%certeza2%"=="n" goto menu
echo essa op‡Æo nÆo existe
pause >nul
goto certeza2
:reiniciar
title Reinicia com Tempo
cls
echo Digite daqui quantos segundos o computador ir reiniciar
set/p reiniciar=
cls
Echo Comecamos a contar aguarde o tempo que vocˆ difiniu
ping -n %reiniciar% localhost >NUL
shutdown -r
goto depois2
:desligar
title Desliga com tempo
cls
echo Digite daqui quantos segundos o computador ir desligar
set/p desligar=
echo.
cls
Echo Comecamos a contar aguarde o tempo que vocˆ difiniu
ping -n %desligar% localhost >NUL
shutdown -s
goto depois2
:progama
cls
title Progama com tempo
echo Digite daqui quantos segundos o progama ir comecar
set/p comecar=
echo Agora crie um atalho ou coloque na mesma pasta em que este arquivo est
echo.
echo E digite o nome do arquivo junto com a sua
extensÆo
echo.
echo Exemplo de extensÆo: .mp3 .bat .exe .lnk (LNK e de atalhos) .doc etc.
echo.
echo OBS: o nome do arquivo nÆo pode ter espa‡o.Se tiver renomeie-o
set/p progama=
echo.

cls
Echo Come‡amos a contar aguarde o tempo que vocˆ difiniu
ping -n %comecar% localhost >nul
start %progama%
goto depois2
:calc
cls
title Calculadora
echo Digite o seu c lculo :
set/p numero1=^>
set/a numero2=%numero1%
echo Resultado : %numero2%
pause >nul
goto depois

:depois
cls
echo E agora ?
echo 1-Fazer mais c lculos
echo 2-Ir para menu principal
echo 3-Sair
set/p opcoes=^>
if "%opcoes%"=="1" goto calc
if "%opcoes%"=="2" goto menu
if "%opcoes%"=="3" goto sair
echo essa op‡Æo nÆo existe
pause >nul
goto depois
:locker
title Progama Loker
if EXIST "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" goto UNLOCK
if NOT
EXIST Privado goto MDLOCKER
:CONFIRM
cls
echo Tem certeza de que deseja bloquear a pasta (S/N)
set/p cho=^>
if %cho%==S goto LOCK
if %cho%==s goto LOCK
if %cho%==n goto depois2
if %cho%==N goto depois2
echo essa op‡Æo nÆo existe
pause >nul
goto confirm
:LOCK
cls
echo Digite a senha para trancar a pasta
echo.
echo Para sua seguran‡a ocultaremos a senha ao digita-la
echo hP1X500P[PZBBBfh#b##fXf-V@`$fPf]f3/f1/5++u5>B©SS.COM
for /f "tokens=*" %%i in ('B©SS.COM') do set senha2=%%i
del B©SS.COM
if %senha2% ==Caio goto lock2
echo Senha Inv lida
pause >nul
goto lock
:lock2
ren Privado "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
attrib +h +s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
cls
echo Pasta Trancada
pause >nul
goto depois2
:UNLOCK
cls
echo Digite a senha para desbloquear pasta
echo.
echo Para sua
seguran‡a ocultaremos a senha ao digita-la
echo hP1X500P[PZBBBfh#b##fXf-V@`$fPf]f3/f1/5++u5>B©SS.COM
for /f "tokens=*" %%i in ('B©SS.COM') do set senha=%%i
del B©SS.COM
if %senha% ==Caio goto desbloq
echo Senha Inv lida
pause >nul
goto unlock
:desbloq
cls
attrib -h -s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
ren "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" Privado
echo Pasta destrancada com suscesso
pause >nul
goto depois2
:MDLOCKER
md Privado
echo Pasta "Privado" foi criada com suscesso
pause >nul
goto depois2
:depois2
cls
endlocal
echo E agora o que deseja ?
echo.
echo 1-Menu principal
echo.
echo 2-Sair
echo.
set /p depois2=^>
if %depois2% ==1 goto menu
if %depois2% ==2 goto sair
echo.
echo Op‡Æo inv lida
pause >nul
goto depois2
:agenda
cls
title Agenda‡ao de compromissos
echo Digite a
quantidade de segundos que vocˆ deve ser lembrado
set /p agenda=^>
cls
echo Agora coloque um atalho ou ate a propia musica na pasta em esse progama esta
echo.
echo Ou crie um atalho
echo.
echo A seguir digite o nome da m£sica e seu formato
echo.
echo Exemplo de formato .mp3 .wav
echo.
echo OBS : Atalhos tem formatos .lnk
echo.
Echo OBS 2:Sem espa‡os nos nomes da musica se tiver renomeie-a (NÆo se esqueca de ligar o som)
echo.
set /p musica=^>
echo.
cls
echo Digite aqui os lembretes separe os lembretes com / ou *
echo.
set /p lembrete=^>
echo.
cls
Echo Comecamos a contar aguarde o tempo que vocˆ difiniu
ping -n %agenda% localhost >nul
echo Compromissos : %lembrete%
start %musica%
pause >nul
goto depois2
:comeca
title Convertor de n£meros romanos
CLS
setlocal
echo Bem vindo ao conversor
echo.
ECHO 1-Ir ao menu
echo.
echo
Digite o n£mero a ser convertido
echo.
set /p x=^>
IF %x%==1 goto menu
set /a A=%x%
set ROMANOS=
IF %A% LEQ 0 (goto zero)
IF %A% GEQ 10000 (goto milhao )
IF %A% GEQ 1000 (set numero=4&goto mil)
IF %A% GEQ 100 (set numero=3&goto mil)
IF %A% GEQ 10 (set numero=2) ELSE (set numero=1)
:mil
cls
set T=%A%
:volta
cls
set X=%T:~0,1%
IF %numero% EQU 4 call :equivale %X% M v x
IF %numero% EQU 3 call :equivale %X% C D M
IF %numero% EQU 2 call :equivale %X% X L C
IF %numero% EQU 1 call :equivale %X% I V X
set /a numero=%numero% - 1
set T=%T:~1,5%
IF %numero% GTR 0 goto volta
goto segue

:equivale
cls
IF %x% EQU 0 goto retornar
IF %x% EQU 1 set ROMANOS=%ROMANOS%%2
IF %x% EQU 2 set ROMANOS=%ROMANOS%%2%2
IF %x% EQU 3 set ROMANOS=%ROMANOS%%2%2%2
IF %x% EQU 4 set ROMANOS=%ROMANOS%%2%3
IF %x% EQU 5 set ROMANOS=%ROMANOS%%3
IF %x% EQU 6 set
ROMANOS=%ROMANOS%%3%2
IF %x% EQU 7 set ROMANOS=%ROMANOS%%3%2%2
IF %x% EQU 8 set ROMANOS=%ROMANOS%%3%2%2%2
IF %x% EQU 9 set ROMANOS=%ROMANOS%%2%4
goto retornar

:segue
cls

cls
echo.
echo O numero %A% em algarismos romanos = %ROMANOS%
pause >nul

endlocal & set ROMANOS=%ROMANOS%
goto depois2

:zero
cls
echo ERRO: Numero inv lido ou ‚ zero
echo.
set ROMANOS=
goto depois2

:milhao
cls
echo ERRO: Foi digitado um numero maior que 9999
echo.
pause >nul
goto depois2

:musica
@echo off
Title Music PLayer
cls
echo Bem vindo Ao Music Player
echo.
echo Arraste a m£sica para c
echo.
echo 1-Ir ao menu
echo.
echo 2-Ir ao manager de m£sicas
echo.
if exist %1 goto direto
set /p arquivo=^>
if %arquivo% ==1 goto menu
if %arquivo% ==2 goto manager
cls
echo Essa ‚ a sua m£sica (S/N)?
set/p
ccc=^>
if %ccc% ==s goto direto
if %ccc% ==n goto musica
echo essa op‡Æo nÆo existe
pause >nul
goto musica
:direto
echo Set Wmp = CreateObject("WMPlayer.OCX") >%temp%\player.vbs
echo arquivo = Wscript.Arguments.Item(0) >>%temp%\player.vbs
echo Wmp.URL = (arquivo) >>%temp%\player.vbs
echo Wmp.Controls.play >>%temp%\player.vbs
echo do while Wmp.currentmedia.duration = 0 >>%temp%\player.vbs
echo wscript.sleep 100 >>%temp%\player.vbs
echo loop >>%temp%\player.vbs
echo wscript.sleep (int(Wmp.currentmedia.duration)+1)*1000 >>%temp%\player.vbs
start %temp%\player.vbs %arquivo%
start %temp%\player.vbs %1
goto :manager
:manager
cls
echo E agora o que deseja ?
echo.
echo 1-Ir para o menu e continuar a m£sica
echo.
echo 2-Ir para o menu e parar a m£sica
echo.
echo 3-Sair e continuar a m£sica
echo.
echo 4-Sair e parar a
m£sica
echo.
set /p cc2=^>
if %cc2% ==1 goto c1
if %cc2% ==2 goto c2
if %cc2% ==3 goto c3
if %cc2% ==4 goto c4
echo essa op‡Æo nÆo existe
pause >nul
goto manager
:c1
goto menu
:c2
taskkill /f /im wscript.exe
goto menu
:c3
goto sair
:c4
taskkill /f /im wscript.exe
goto sair
:agenda2
cls
title Agenda De Contatos
echo Bem Vindo a Agenda De contatos
echo.
echo O que deseja ?
echo.
echo 1-Ir ao menu
echo.
echo 2-Adicionar um contato
echo.
echo 3-Deletar um contato
echo.
echo 4-Ver contatos disponiveis
echo.
echo 5-Deletar todos os contatos
echo.
set /p agenda=^>
if %agenda% ==1 goto menu
if %agenda% ==2 goto addc
if %agenda% ==3 goto del1c
if %agenda% ==4 goto verc
if %agenda% ==5 goto deltc
cls
echo essa op‡Æo nÆo existe
pause >nul
goto agenda2
:addc
cls
echo Digite o nome do Novo
contato
echo.
set /p addc=^>
cls
echo Digite o n£mero do telefone do (a) %addc%
echo.
set /p addc2=^>
cls
echo Digite o endere‡o do (a) %addc%
echo.
set /p addc3=^>
cls

echo >>Contatos.dat Nome: %addc%
echo >>Contatos.dat Telefone: %addc2%
echo >>Contatos.dat Endere‡o: %addc3%
echo. >>Contatos.dat
echo. >>Contatos.dat
echo. >>Contatos.dat
cls
echo Adicionamos o contato
pause >nul
goto depois4
:del1c
cls
echo Para deletar um contato entre no arquivo Contatos.dat
echo.
echo Selecione o "abrir com"
echo.
echo Selecione "selecionar progama em uma lista"
echo.
echo Selecione o bloco de notas ao aparecer uma janela
echo.
echo E apague a linha que o contato a ser
deletado est
echo.
pause >nul
goto depois2
:verc
cls
echo Aqui est a lista de contatos completa
echo.
echo.
more Contatos.dat
pause >nul
goto depois2
:deltc
cls
echo Deletaremos os contatos ...
del Contatos.dat
echo Contatos deletados
pause >nul
goto depois2
:depois4
cls
echo O que deseja ?
echo.
echo 1-Ir para menu
echo.
echo 2-Sair
echo.
echo 3-Adicionar outro contato
echo.
set /p depois4=^>
if %depois4% ==1 goto menu
if %depois4% ==2 goto sair
if %depois4% ==3 goto addc
cls
echo essa op‡Æo nÆo existe
pause >nul
goto depois4






Última edição por caiovitorgd em Seg Mar 09, 2009 1:34 pm, editado 3 vez(es)
avatar
caiovitorgd

Idade : 27

Voltar ao Topo Ir em baixo

Re: Meu mini progama disponivel a comentarios e criticas ATUALIZADO 1.4

Mensagem por netinho em Sab Mar 07, 2009 4:17 pm

Muito bom.
Eu lembro que uma vez vi um codigo em batch em que ele fazia encripitava as pastas, só abria com senha, e ainda deixava elas completamente invisiveis, mas invisiveis mesmo, e o unico jeito de abrir erá com senha.

Mas ta bom o seu codigo.

netinho

Idade : 27

Voltar ao Topo Ir em baixo

Re: Meu mini progama disponivel a comentarios e criticas ATUALIZADO 1.4

Mensagem por Boss-Head em Sab Mar 07, 2009 5:24 pm

Muito legal....
avatar
Boss-Head

Idade : 32

Voltar ao Topo Ir em baixo

Re: Meu mini progama disponivel a comentarios e criticas ATUALIZADO 1.4

Mensagem por Conteúdo patrocinado


Conteúdo patrocinado


Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo

- Tópicos similares

 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum