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

Separando as sílabas

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

Separando as sílabas

Mensagem por Luiz Henrique em Ter Set 28, 2010 10:58 pm

[Você precisa estar registrado e conectado para ver este link.]
avatar
Luiz Henrique

Idade : 21

http://www.tudopragalera.tk

Voltar ao Topo Ir em baixo

Re: Separando as sílabas

Mensagem por NeoqJav em Qui Set 30, 2010 9:20 am

Posta o código no site msmo... porque no momento o paste.ubuntu está fora
avatar
NeoqJav

Idade : 28

http://neoqjav.dihitt.com.br

Voltar ao Topo Ir em baixo

Re: Separando as sílabas

Mensagem por Luiz Henrique em Qui Set 30, 2010 6:52 pm

[Você precisa estar registrado e conectado para ver este link.]
Código:
@echo off
title Separando as silabas
setlocal enabledelayedexpansion
:inicio
cls
echo Entre com a palavra:
set /p palavra=">"
if "%palavra:"=%"=="" goto inicio
set "palavra=%palavra:"=%"
set n=0
set result=
set tipos=
:loop
set ativado=1
set aceito=1
set "letra=%palavra:~,1%"
if "%anterior%"=="%letra%" (
set "result=%result%-%letra%"
set "palavra=%palavra:~1%"
set tipos=
goto loop
)
set anterior=%letra%
call :ver
echo %tipos%|find "vcs" >nul
if %errorlevel%==0 ( set aceito=0 )
echo %tipos%|find "vsc" >nul
if %errorlevel%==0 ( set aceito=0 )
echo %tipos%|find "svc" >nul
if %errorlevel%==0 ( set aceito=0 )
echo %tipos%|find "svvc" >nul
if %errorlevel%==0 ( set aceito=0 )
echo %tipos%|find "svvs" >nul
if %errorlevel%==0 ( if not "%letra%"=="%palavra:~1,1%" (
set tipos=%tipos:~-2%
set "result=%result:~,-1%-%result:~-1%%letra%"
set aceito=2
) )
echo %tipos%|find "cvvc" >nul
if %errorlevel%==0 ( if not "%letra%"=="%palavra:~1,1%" (
set tipos=%tipos:~-2%
set "result=%result:~,-1%-%result:~-1%%letra%"
set aceito=2
) )
echo %tipos%|find "cvc" >nul
if %errorlevel%==0 ( set aceito=0 )
echo %tipos%|find "cvsc" >nul
if %errorlevel%==0 ( if not "%letra%"=="%palavra:~1,1%" (set aceito=0) )
echo %tipos%|find "cvss" >nul
if %errorlevel%==0 ( if not "%letra%"=="%palavra:~1,1%" (set aceito=0) )
echo %tipos%|find "cvsv" >nul
if %errorlevel%==0 ( if not "%letra%"=="%palavra:~1,1%" (
set tipos=%tipos:~-2%
set "result=%result:~,-1%-%result:~-1%%letra%"
set aceito=2
) )
echo %tipos%|find "svsc" >nul
if %errorlevel%==0 ( if not "%letra%"=="%palavra:~1,1%" (set aceito=0) )
echo %tipos%|find "svss" >nul
if %errorlevel%==0 ( if not "%letra%"=="%palavra:~1,1%" (set aceito=0) )
echo %tipos%|find "svsv" >nul
if %errorlevel%==0 ( if not "%letra%"=="%palavra:~1,1%" (
set tipos=%tipos:~-2%
set "result=%result:~,-1%-%result:~-1%%letra%"
set aceito=2
) )
if %aceito%==0 (
set tipos=%tipos:~-1%
set "result=%result%-%letra%"
) else (
if %aceito%==1 (
set "result=%result%%letra%"
))
set "palavra=%palavra:~1%"
if "%palavra%"=="" goto fim
goto loop
:ver
if "%letra%"==" " exit/b
set atual=s
for %%i in (R S M N L w Z) do (
call :verificar %%i
if !ativado!==0 exit/b
)
set atual=v
for %%i in (A E I O U) do (
call :verificar %%i
if !ativado!==0 exit/b
)
set "tipos=%tipos%c"
exit/b
:fim
set "result=%result: -= %"
if "%result:~,1%"=="-" ( set "result=%result:~1%" )
echo Resultado:%result:- = %
pause>nul
goto inicio
:verificar
set "t=%*"
echo %letra%|find /i "%t%" >nul
if %errorlevel%==0 (
set "tipos=%tipos%%atual%"
set ativado=0
)
exit/b
avatar
Luiz Henrique

Idade : 21

http://www.tudopragalera.tk

Voltar ao Topo Ir em baixo

Re: Separando as sílabas

Mensagem por 'Rick em Qua Out 06, 2010 2:38 pm

o resultado da palavra olha esta saindo assim:
ol-ha
avatar
'Rick

Idade : 21

http://info-size.blogspot.com

Voltar ao Topo Ir em baixo

Re: Separando as sílabas

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