[ 新手练习题 10 ] 批处理实现文本行序重排

netbenton

确实我从论坛复制下来测试没有问题，所以。。。

原来是有时候复制和粘贴代码时会丢掉后面的空格。

不好意思，看来我要改掉不加双引号的习惯才行

keiamy

自己不怎么会做,都是参照楼上各高手的

1. 
   
2. @echo off&setlocal enabledelayedexpansion
   
3. for /f "tokens=1,2" %%i in (a.txt) do (
   
4. set "$%%i=%%i#%%j"
   
5. set "@%%j=%%i#%%j"
   
6. if defined @%%i (call set "str=%%str:!@%%i!=!$%%i! !@%%i!%%"
   
7. ) else (
   
8. if defined $%%j (call set "str=%%str:!$%%j!=!$%%j! !@%%j!%%"
   
9. ) else (
   
10. set "str=!str! !$%%i!")))
    
11. for %%i in (%str%) do (set "var=%%i"&echo !var:#= !)
    
12. pause
    

复制代码

慕夜蓝化

mark
----------------------------------
试着写了一下，然后又看了一下楼下的代码，果然、差的太多了，解析进行到一半就卡住了，完全不知道该怎么去想，特别是那个set 变量的，看的云里雾里，慢慢来吧。
---------------------------------

高飞高飞1111

回复 15# zhouyongjun


    for /f "tokens=2-3 delims== " %%a in ('set @') do  
我想问一下，set @是什么意思，怎么理解呢

772074834

回复 19# 高飞高飞1111


    set                    #显示目前所有可用的变量，包括系统变量和自定义的变量
set p                  #显示所有以p开头的变量，要是一个也没有就设errorlevel=1

772074834

这样对吗
zhouyongjun 发表于 2009-9-30 10:56

自己对大神代码的理解，希望能对跟我一样的新人有帮助
@echo off&setlocal enabledelayedexpansion
for /f "tokens=1-2" %%a in (a.txt) do (
        set #%%a=%%a %%b&set $%%b=%%a %%b&set _%%b=%%a&set "@%%a=%%a %%b"
        :: 该右侧字母是否存在对应的左侧字母，如果有 则当前行首次不展示，跟着重排
        if defined #%%b set "@%%a="
        :: 该左侧字母是否存在对应的右侧字母，如果有，找出右侧字母对应的行，则该行重排
        if defined $%%a set "@!_%%a!="
)
:: @字符开头的变量都是不需要重排的;set @ 展示 @开头的变量
for /f "tokens=2-3 delims== " %%a in ('set @') do (
        echo %%a %%b&set str=%%a&call :px
)
pause
:px
if defined $!str! (
        :: 展示重排的数据
        echo !$%str%!&set str=!$%str%!&set str=!str:~,1!&goto px
)

chenyucheng

sort不能用自定义规则排序……