Версия для печати темы Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Центр помощи > [.BAT]Как сделать счетчик в цикле??

Автор: xStorm 24.12.2007, 22:34

Код ... :endif2 FOR %%f IN (%z%) DO (   set d=0   FOR /F "tokens=*" %%i in (%%f) do (     set /a d=d+1     if "%%i"=="%string%" (     echo %%f contains %%i at %d% line >> %2      )   ) ) goto :eof ... Счетчик d не работает, я вообше не понимаю откуда значение берется в нем. Мне надо подсчитать на какой строке по номеру строка совпадает с введенной. Как мне этот тупой счетчик внутри цикла организовать?

Автор: SoWa 25.12.2007, 09:06

Ох давно я этим не занимался. 4 и 6 строки. В четвертой вроде не хватает перед переменной % В шестой присваивание думаю надо так делать: d >& d+1

Автор: xStorm 25.12.2007, 19:10

не варик, не пашет нифига

Автор: Akina 25.12.2007, 19:24

Цитата(xStorm @  24.12.2007,  23:34 ) Счетчик d не работает, я вообше не понимаю откуда значение берется в нем. Он работает... но вот одна фигня какая - эти изменения не видны внутри For... запустите вот это: Код @echo off set a=1 echo 1: a=%a% for %%b in (1, 2, 3) do (   echo 2: a=%a%   set /A a += 1 ) echo 3: a=%a% echo Done. Для обхода этой проблемы запустите CMD с ключом /V:ON ( значение этого ключа посмотрите в справке CMD /? ) и испытайте вот этот батник: Код @echo off set a=1 echo 1: a=%a% for %%b in (1, 2, 3) do (   echo 2: a=!a!   set /A a += 1 ) echo 3: a=%a% echo Done.

Автор: xStorm 28.12.2007, 18:06

Красавчик! Помогло, всё пашет теперь. Вот результат кому интересно: Код @echo off if /%1 == /  goto :SyntaxError if /%2 == /  goto :SyntaxError if "%1" == "1"  (   set /P string=Enter String:    goto :Search_ONE   goto :eof ) if "%1" == "2" (   set /P string=Enter String:    goto :Search_TWO   goto :eof ) goto :SyntaxError :Search_ONE   set z=*.*   goto :endif2 :Search_TWO   set z=*.bat *.txt   goto :endif2 :endif2 FOR %%f IN (%z%) DO (   set d=0   FOR /F "tokens=*" %%i in (%%f) do (     set /A d += 1     if "%%i"=="%string%" (     echo %%f contains %%i at !d! line >> %2     )   ) ) goto :eof :SyntaxError echo Usage: batfile (1 or 2), (output file name) Код robert.txt contains hello world at 1 line  robert.txt contains hello world at 5 line  haha.bat contains hello world at 4 line  hhss.txt contains hello world at 7 line

Автор: Akina 28.12.2007, 18:25

Цитата(xStorm @  28.12.2007,  19:06 ) if /%1 == /  goto :SyntaxError if /%2 == /  goto :SyntaxError А зачем проверять первый параметр? если второй пуст - не пофиг ли, есть там первый или нет...

Автор: 123456FD 21.9.2008, 23:21

Помогите, никак не могу сделать тест рабочим. Не считает кол-во ответов в итоге.  :test cls type a:\TEST\main.txt set q=%1 pause :q1 cls  type a:\TEST\q1.txt a:\qask  if errorlevel 52 goto q2 if errorlevel 51 goto q2 if errorlevel 50 goto q2 if errorlevel 49 goto q1t goto q1 :q1t  set q=%q%%1 goto q2 :q2 cls type a:\TEST\q2.txt a:\qask  if errorlevel 52 goto q3 if errorlevel 51 goto q3 if errorlevel 50 goto q3 if errorlevel 49 goto q2t goto q2 :q2t  set q=%q%%1 goto q3 :q3 cls type a:\TEST\q3.txt  a:\qask  if errorlevel 52 goto q4 if errorlevel 51 goto q4 if errorlevel 50 goto q4 if errorlevel 49 goto q3t goto q3 :q3t  set q=%q%%1 goto q4 :q4 cls type a:\TEST\q4.txt  a:\qask  if errorlevel 52 goto q5 if errorlevel 51 goto q5 if errorlevel 50 goto q5 if errorlevel 49 goto q4t goto q4 :q4t  set q=%q%%1 goto q5 :q5 cls type a:\TEST\q5.txt  a:\qask  if errorlevel 52 goto q6 if errorlevel 51 goto q6 if errorlevel 50 goto q6 if errorlevel 49 goto q5t goto q5 :q5t  set q=%q%1 goto q6 :q6 cls type a:\TEST\q6.txt  a:\qask  if errorlevel 52 goto q7 if errorlevel 51 goto q7 if errorlevel 50 goto q6t if errorlevel 49 goto q7 goto q6 :q6t  set q=%q%1 goto q7 :q7 cls type a:\TEST\q7.txt  a:\qask  if errorlevel 52 goto q8 if errorlevel 51 goto q8 if errorlevel 50 goto q7t if errorlevel 49 goto q8 goto q7 :q7t  set q=%q%1 goto q8 :q8 cls type a:\TEST\q8.txt  a:\qask  if errorlevel 52 goto q9 if errorlevel 51 goto q9 if errorlevel 50 goto q8t if errorlevel 49 goto q9 goto q8 :q8t  set q=%q%1 goto q9 :q9 cls type a:\TEST\q9.txt  a:\qask  if errorlevel 52 goto q10 if errorlevel 51 goto q10 if errorlevel 50 goto q9t if errorlevel 49 goto q10 goto q9 :q9t  set q=%q%1 goto q10 :q10 cls type a:\TEST\q10.txt a:\qask  if errorlevel 52 goto q11 if errorlevel 51 goto q11 if errorlevel 50 goto q10t if errorlevel 49 goto q11 goto q10 :q10t set q=%q%1 goto q11 :q11 cls type a:\TEST\q11.txt  a:\qask  if errorlevel 52 goto q12 if errorlevel 51 goto q11t if errorlevel 50 goto q12 if errorlevel 49 goto q12 goto q11 :q11t  set q=%q%1 goto q12 :q12 cls type a:\TEST\q12.txt  a:\qask  if errorlevel 52 goto q13 if errorlevel 51 goto q12t if errorlevel 50 goto q13 if errorlevel 49 goto q13 goto q12 :q12t  set q=%q%1 goto q13 :q13 cls type a:\TEST\q13.txt  a:\qask  if errorlevel 52 goto q14 if errorlevel 51 goto q13t if errorlevel 50 goto q14 if errorlevel 49 goto q14 goto q13 :q13t  set q=%q%1 goto q14 :q14 cls type a:\TEST\q14.txt  a:\qask  if errorlevel 52 goto q15 if errorlevel 51 goto q14t if errorlevel 50 goto q15 if errorlevel 49 goto q15 goto q14 :q14t  set q=%q%1 goto q15 :q15 cls type a:\TEST\q15.txt  a:\qask  if errorlevel 52 goto res if errorlevel 51 goto q15t if errorlevel 50 goto res if errorlevel 49 goto res goto q15 :q15t set q=%q%1 goto res :res cls type a:\TEST\res.txt if /%q%==/111111111111111 echo  15 Їа ўЁ«м­ле ®вўҐв®ў if /%q%==/11111111111111 echo  14 Їа ўЁ«м­ле ®вўҐв®ў if /%q%==/1111111111111 echo  13 Їа ўЁ«м­ле ®вўҐв®ў if /%q%==/111111111111 echo  12 Їа ўЁ«м­ле ®вўҐв®ў if /%q%==/11111111111 echo  11 Їа ўЁ«м­ле ®вўҐв®ў if /%q%==/1111111111 echo  10 Їа ўЁ«м­ле ®вўҐв®ў if /%q%==/111111111  echo  9 Їа ўЁ«м­ле ®вўҐв®ў if /%q%==/11111111   echo  8 Їа ўЁ«м­ле ®вўҐв®ў if /%q%==/1111111    echo  7 Їа ўЁ«м­ле ®вўҐв®ў if /%q%==/111111     echo  6 Їа ўЁ«м­ле ®вўҐв®ў if /%q%==/11111      echo  5 Їа ўЁ«м­ле ®вўҐв®ў if /%q%==/1111       echo  4 Їа ўЁ«м­ле ®вўҐв  if /%q%==/111        echo  3 Їа ўЁ«м­ле ®вўҐв  if /%q%==/11         echo  2 Їа ўЁ«м­ле ®вўҐв  if /%q%==/1          echo  1 Їа ўЁ«м­л© ®вўҐв if /%q%==/           echo  ЌҐв Їа ўЁ«м­ле ®вўҐв®ў pause goto start В чём сдесь ошибка? ВЫРУЧАЙТЕ!

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)