Board logo

标题: [已结]字符串中含相同字符个数大于指定数量的代码 [打印本页]

作者: ka56     时间: 2008-12-16 18:56    标题: [已结]字符串中含相同字符个数大于指定数量的代码
搜索字符串中含相同字符个数大于指定数量的代码.
思路:找QQ或UC的A多的相对好号.比如号码中"A"大于或等于5个的号,举例(号中的"0"大于等于5个,"8"大于等于5个...):

符合要求的:
1005060010----123456
158888818----123456
1001700040----123456
366648666----123456
138555515----123456
22221428----123456

不符合要求的:
1090487775----123456
1051680197----123456
742767156----123456
771913147----123456
1093111484----123456
1097254048----123456
1019047607----123456

每行前面是号,"----"后面是密码,只需分析横杠前面的

谢谢!!<img src="images/smilies/face-raspberry.png" align="absmiddle" border="0">

Last edited by ka56 on 2008-12-16 at 20:11 ]

作者: s11ss     时间: 2008-12-16 19:29
@echo off & setlocal
for /f "tokens=1* delims=-" %%a in (test.txt) do call :deal %%a&&echo.%%a----%%b
pause
goto:eof

:deal
setlocal enabledelayedexpansion
set "s=%~1"
set n=0
:c
set "o=!s:~%n%,1!"
if "%o%" equ "" exit /b 1
set /a i%o%+=1
if !i%o%! equ 5 exit /b 0
set /a n+=1
goto c

作者: ka56     时间: 2008-12-16 19:50
感谢s11ss大大,无聊申请一QQ号,想从垃圾堆里找出一些稍好的.找号的效率还行,有空多学学您的代码,,,有需要新申请的垃圾QQ联系我,我发一些让您选,呵呵~~