批处理如何将目录行索引切分为目录列索引 - BAT求助&讨论 - 批处理之家 BAT,CMD,批处理,PowerShell,VBS,DOS

Rank: 8 Rank: 8

帖子: 2339
积分: 9739
技术: 475
捐助: 0
注册时间: 2008-2-25

31楼 跳转到 »

发表于 2013-6-5 21:18 | 只看该作者

我的理解前面几个应该就是你所谓的3分法吧

Rank: 4

帖子: 172
积分: 403
技术: 2
捐助: 0
注册时间: 2008-5-11

32楼

发表于 2013-6-5 22:33 | 只看该作者

回复 31# terse

二十一楼就是三分法。

xxpinqz

中校

Rank: 6 Rank: 6

帖子: 491
积分: 2671
技术: 119
捐助: 0
注册时间: 2008-11-19

33楼

发表于 2013-6-5 22:37 | 只看该作者

按我理解，就是下面这意思：
假设总行数n,列数l,则行数h=n/l,余数y=n%%l
一、当余数y=0,则直接输出。
二、  余数y>0,则：
            1、l大于h，则前y列各加一行为h+1，后l-y列为h行
            2、l小于等于h，则前l-1列各加一行为h+1，余者为最后一列即n-(l-1)*(h+1)行

改下代码半小时不到，理解楼主的意思花了两天最后还是靠瞎猜出来的。

初学BAT，非专业。代码不适当之处还望前辈们多多指点。在此表示感谢！

Rank: 4

帖子: 172
积分: 403
技术: 2
捐助: 0
注册时间: 2008-5-11

34楼

发表于 2013-6-5 22:41 | 只看该作者

回复 33# xxpinqz

是这个意思。但我没有按写程序的方式来表达，让你费心了。请原谅。

Rank: 8 Rank: 8

帖子: 2339
积分: 9739
技术: 475
捐助: 0
注册时间: 2008-2-25

35楼

发表于 2013-6-5 22:44 | 只看该作者

回复 34# pan528
难道我26楼代码只能2分或者3分吗？
应该两则都兼容

Rank: 4

帖子: 172
积分: 403
技术: 2
捐助: 0
注册时间: 2008-5-11

36楼

发表于 2013-6-5 22:50 | 只看该作者

回复 35# terse

我试了一下，26楼的代码只能二分法，21楼的代码是三分法。

Rank: 8 Rank: 8

帖子: 2339
积分: 9739
技术: 475
捐助: 0
注册时间: 2008-2-25

37楼

发表于 2013-6-5 22:55 | 只看该作者

回复 36# pan528
26楼代码将if !j! leq 0 set j=n 改 set j=n 试下
应该这样了

CrLf

论坛巡查

Rank: 8 Rank: 8

帖子: 6388
积分: 18843
技术: 982
捐助: 100
注册时间: 2010-10-9

38楼

发表于 2013-6-6 02:32 | 只看该作者

我早先是靠测试弄懂了楼主的规则，但是没有好的思路，想法太繁琐，应该有更好的就题解题算法，目测 plp626 能手到擒来

链接：在线第三方命令行工具下载 bat、vbs、js 原生混编

Rank: 8 Rank: 8

帖子: 2339
积分: 9739
技术: 475
捐助: 0
注册时间: 2008-2-25

39楼

发表于 2013-6-6 11:47 | 只看该作者

我目前最直观的解 set /a 行=(总行+列-1)/列,余=(总行%%列)*行
得到行和余的值
只要在 FOR 循环判断总行和余关系应该够解了吧

xxpinqz

中校

Rank: 6 Rank: 6

帖子: 491
积分: 2671
技术: 119
捐助: 0
注册时间: 2008-11-19

40楼

发表于 2013-6-6 12:50 | 只看该作者

回复 39# terse
话说我的数学就是加减乘除

，所以算法吃不透，目测26楼代码是按输完一列再接着输下一列的按顺序输出
所以判断是否所谓三分也应该要用n/l来判断，而非0。
扯了3页，就下面两句是亮点：
8楼的set /a 行数=(n+列数-1)/ 列数
26楼的set /a "m=(%%i--~j)%%_i+1"
向两位高手致敬~~

初学BAT，非专业。代码不适当之处还望前辈们多多指点。在此表示感谢！

Rank: 8 Rank: 8

帖子: 2339
积分: 9739
技术: 475
捐助: 0
注册时间: 2008-2-25

41楼

发表于 2013-6-6 13:33 | 只看该作者

回复 40# xxpinqz
再仔细回看前面猜真这次应该理解了
先粗糙一个
感觉代码写得太啰嗦等下再看有优化的可能不

@echo off&setlocal enabledelayedexpansion
%1 %0 REM|more /t32 >n.txt
set L=5
set "file=a1.txt"
for /f "delims=U" %%a in ('cmd /u /c echo 唉') do set "tab=%%a"
for /f "usebackq tokens=*" %%i in ("%file%") do set /a N+=1&set #!N!=%%i
set /a h=(n+l-1)/l,j=n,i=1
if !h! lss !l! set /a j=(n%%l)*H
for /l %%i in (1 1 %n%) do (
    set /a "t=^!^!(~-%%i/j)"
    set /a "m=(~-%%i-(t*j))%%(~-H+i*^!t)+1"
    for %%j in (!m!) do set "$%%j=!$%%j!%tab%!#%%i!"
)
for /l %%i in (1 1 %h%) do for /f "tokens=*" %%j in ("!$%%i!") do echo %%j
复制代码

Rank: 8 Rank: 8

帖子: 2339
积分: 9739
技术: 475
捐助: 0
注册时间: 2008-2-25

42楼

发表于 2013-6-6 13:36 | 只看该作者

唉惭愧我的理解力但楼主的表达也太那个了
都和我一样国语学得不好

Rank: 4

帖子: 172
积分: 403
技术: 2
捐助: 0
注册时间: 2008-5-11

43楼

发表于 2013-6-6 16:51 | 只看该作者

回复 41# terse

测试通过！是三分法。不过最后多了一个回车，不知问题出在哪？

Rank: 8 Rank: 8

帖子: 2339
积分: 9739
技术: 475
捐助: 0
注册时间: 2008-2-25

44楼

发表于 2013-6-6 23:36 | 只看该作者

你是指最后的回车行是MORE留下的吧
代码再少点变量
另补上exit

@echo off&setlocal enabledelayedexpansion
%1 %0 :|more /t32 >n.txt&exit
set L=9
set "file=a.txt"
for /f "delims=U" %%a in ('cmd /u /c echo 唉') do set "tab=%%a"
for /f "usebackq tokens=*" %%i in ("%file%") do set /a N+=1&set #!N!=%%i
set /a h=(n+l-1)/l,j=n
if !h! lss !l! set /a j=(n%%l)*h 
for /l %%i in (1 1 %n%) do (
    set /a "i=^!(~-%%i/j),m=(~-%%i-(^!i*j))%%(~-H+i)+1"
    for %%j in (!m!) do set "$%%j=!$%%j!%tab%!#%%i!"
)
for /l %%i in (1 1 %h%) do for /f "tokens=*" %%j in ("!$%%i!") do echo %%j
复制代码

Rank: 4

帖子: 172
积分: 403
技术: 2
捐助: 0
注册时间: 2008-5-11

45楼

发表于 2013-6-7 21:11 | 只看该作者

回复 44# terse

回车没有剔除，我还发现一个新问题：所有代码在34/9时都变成了二分法！即：
1 5 9 13 17 21 25 29 32
2 6 10 14 18 22 26 30 33
3 7 11 15 19 23 27 31 34
4 8 12 16 20 24 28
而三分法应为：
1 5 9 13 17 21 25 29 33
2 6 10 14 18 22 26 30 34
3 7 11 15 19 23 27 31
4 8 12 16 20 24 28 32
我怀疑是算法有问题。
各位高手找找原因吧。