【练习-010】批处理实现文本最末列数值乘一个数

pusofalse

看错题意了啊。并不是最后一行末列数值乘7  每行都要乘以7。

第二个同是。

[ 本帖最后由 pusofalse 于 2008-8-8 14:05 编辑 ]

pusofalse

好绕啊。

1. @echo off&setlocal enabledelayedexpansion
   
2. for /f "delims=" %%a in (a.txt) do (
   
3. set "str=%%a"&set "a="&set "faith="&set "trust="&set "false="
   
4. set n=0
   
5. if "!str:~,1!" equ "#" set a=a
   
6. if "!str:~,1!" equ " " set a=a
   
7. call :lp
   
8. )
   
9. pause>nul&exit/b
   
10. :lp
    
11. set/a n+=1
    
12. if defined a call :lp1
    
13. 
    
14. for /f "tokens=%n%* delims=# " %%a in ("%str%") do (
    
15. set trust=trust
    
16. if "%%b" neq "" (
    
17. set var=!var!%%a
    
18. if defined a goto lp
    
19. ) else (
    
20. set c=%%a
    
21. ))
    
22. if defined a goto result
    
23. :lp1
    
24. for /f "tokens=%n%* delims=0123456789." %%a in ("%str%") do (
    
25. set false=false
    
26. if "%%b" neq "" (
    
27. set var=!var!%%a
    
28. if not defined a goto lp
    
29. ) else (
    
30. set d=%%a
    
31. ))
    
32. if defined faith goto :eof
    
33. if defined a goto :eof
    
34. :result
    
35. set/a c*=7
    
36. if defined a set faith=faith&set/a n+=1&call :lp1
    
37. if not defined trust echo %d%
    
38. if not defined false echo %c%
    
39. if defined trust if defined false echo %var%%c%%d%
    
40. set "var="

复制代码

[ 本帖最后由 pusofalse 于 2008-8-8 14:42 编辑 ]

huahua0919

楼上代码还是有问题啊
如果最后一行的数值是下面的三种形式就不行了

1. 4##59.71#3715.45##71

复制代码

1. 71##

复制代码

1. 71

复制代码

[ 本帖最后由 huahua0919 于 2008-8-8 14:25 编辑 ]

huahua0919

我看错题意了，但是效果一样。解决你的问题过程一样

pusofalse

多谢指出，已修改。

batman

我也来一个，从后向前截取字符的：

1. @echo off
   
2. for /f "delims=" %%i in (1.txt) do (
   
3.     set "str=%%i"&set "begin=a"
   
4. 　　setlocal enabledelayedexpansion
   
5.     call :lp
   
6.     echo !str!!a!!var!!last!
   
7. 　　endlocal
   
8. )
   
9. pause>nul&goto :eof
   
10. :lp
    
11. set "a=%str:~-1%"&set "str=%str:~,-1%"
    
12. if "%a%" geq "0" (
    
13.    if "%a%" leq "9" set "flag=a"&set "begin="
    
14. )
    
15. if defined flag (
    
16.    set var=%a%!var!&set "flag="
    
17.    ) else (
    
18.    if defined begin (
    
19.       set last=%a%!last!
    
20.       ) else (
    
21. 　 set /a var*=7&goto :eof
    
22.    )
    
23. )
    
24. goto lp

复制代码

[ 本帖最后由 batman 于 2008-8-9 12:38 编辑 ]

随风

也来一个
:

1. @echo off&setlocal EnableDelayedExpansion
   
2. for /l %%a in (0 1 9) do set .%%a=%%a
   
3. for /f "delims=" %%a in (a.txt) do (
   
4.    set flag=&set num=&set sun=&set "str=%%a"
   
5.    call :loop
   
6. )
   
7. pause
   
8. :loop
   
9. set "var=!str:~-1!"
   
10. if defined .!var! (set num=!var!!num!&set flag=a) else (set sun=!var!!sun!&set flag=)
    
11. if not defined num set str=!str:~0,-1!&goto loop
    
12. if defined flag set str=!str:~0,-1!&goto loop
    
13. set /a num*=7
    
14. echo !str!!num!!sun:~1!
    
15. goto:eof

复制代码