处理缺省值的问题

quya

我最近编了个批处理， 从文本中读取缺省值并且由用户按键改变缺省值， 然后继续处理的例子。

以下是文本内容保存为setting.txt， 文本内容可以随意更改增删：

1. 分区类型:GPT:MBR/GPT
   
2. 系统分区:80G:60G/80G/100G
   
3. 操作人员:王五:张三/李四/王五
   
4. 恢复路径:\\xxx\c
   
5. 恢复类型:普通

复制代码

第一个分隔符是":", 分割成 内容，缺省值，可选值
第二个分割符是“/”， 将可选内容分割开来

我的设想是当用户按数字键的时候，缺省值在可选择的值里面变动，按 0 则表示设好了值并继续， 按键的时候无需按回车键

以下是我的代码，编了差不多一整天，比较啰嗦。 我的问题是 1. 代码能否再简洁点？  2. 继续的键能否换成回车键？（第二个问题已解决）

1. @echo off
   
2. 
   
3. setlocal EnableDelayedExpansion
   
4. 
   
5. 
   
6. :menuloop
   
7. 
   
8. set /a number=1
   
9. set /a sum=0
   
10. 
    
11. cls
    
12. 
    
13. for /f "tokens=1-3 delims=:" %%i in (setting.txt) do (
    
14. 
    
15. set /a sum+=!number!
    
16. 
    
17. set "Options=%%k"
    
18. 
    
19. if not defined de!sum! set "de!sum!=%%j"
    
20. 
    
21. set "optemp=%%k"
    
22. 
    
23. set optemp="!optemp:/=" "!"
    
24. 
    
25. if defined Options (set "op!sum!=!optemp!") else set "op!sum!="%%j""
    
26. 
    
27. if defined Options (call echo !sum!. %%i %%de!sum!%% ^(可选：%%k^)) else call echo !sum!. %%i %%de!sum!%%
    
28. 
    
29. )
    
30. 
    
31. for /l %%a in (1,1,%sum%) do (
    
32. 
    
33. set /a number=1
    
34. set /a len%%a=0
    
35. 
    
36. call set "optemp=%%op%%a%%"
    
37. call set "detemp=%%de%%a%%"
    
38. 
    
39. for %%i in (!optemp!) do (
    
40. 
    
41. set /a len%%a+=!number!
    
42. 
    
43. if "!detemp!"==%%i set num%%a=!len%%a!
    
44. 
    
45. )
    
46. )
    
47. 
    
48. 
    
49. echo.
    
50. 
    
51. <nul set /p key=请按数字 1-%sum% 改变设置，0 继续
    
52. 
    
53. echo.
    
54. 
    
55. call :GetKey
    
56. 
    
57. if %key%==0 goto :next
    
58. 
    
59. if not defined len%key% goto :menuloop
    
60. 
    
61. call set "lentemp=%%len%key%%%"
    
62. call set "numtemp=%%num%key%%%"
    
63. call set "optemp=%%op%key%%%"
    
64. 
    
65. set/a mod=(%numtemp%+1)%%%lentemp%
    
66. 
    
67. if %mod%==0 set/a mod=%lentemp%
    
68. 
    
69. 
    
70. set /a number=1
    
71. 
    
72. set /a sum=0
    
73. 
    
74. 
    
75. for %%i in (%optemp%) do (
    
76. 
    
77. set /a sum+=!number!
    
78. 
    
79. if %mod%==!sum! set detemp=%%i
    
80. 
    
81. )
    
82. 
    
83. set de%key%=%detemp:"=%
    
84. 
    
85. goto :menuloop
    
86. 
    
87. 
    
88. :GetKey
    
89. set "key="
    
90. for /F "usebackq delims=" %%i in (`xcopy /w . 2^>NUL`) do (
    
91.   if not defined key set "key=%%i"
    
92. )
    
93. set "key=%key:~-1%"
    
94. goto :eof
    
95. 
    
96. :next
    
97. 
    
98. echo.
    
99. echo 继续运行其他
    
100. echo.
     
101. echo 设定的值如下：
     
102. for /l %%a in (1,1,%sum%) do call echo %%de%%a%%
     
103. 
     
104. 
     
105. pause
     
106. 
     
107. goto :eof

复制代码

tjmcl

junyee

嫌 choce 不够灵活,那就别用批处理吧.

还有 变量判断要加上符号比较好,如:

1. if '%key%'=='' dosmt

复制代码

quya

junyee 发表于 2018-1-29 13:16
choice.exe

choice不灵活，而且也不支持空值回车。 还要用“errorlevel”值来判断。

我这个Key子程序是参考了老外的替换choice的程序， 号称可以支持任何键包括回车，TAB等等， 但我试下来也不行， 可能是我姿势不对。

另， 刚才运行的时候直接敲了下回车，虽然key值取不到出错了，但却解决了我的第二个问题。

把代码

1. if %key%==0 goto :next

复制代码

换成了

1. if not defined key goto :next

复制代码

junyee

choice.exe