返回列表 发帖
本帖最后由 hanyeguxing 于 2011-5-3 23:25 编辑
@echo off&setlocal enabledelayedexpansion
set n=3
for /f %%a in (a.txt) do (
set/ax+=1,y=a-4&set #!x!=%%a
if !y! geq 1 set #!y!=
if defined c if !x! geq 4 (
set/a z=x-3
for %%b in (!z!) do (
set/aa=!#%%b!,b_=b,d=%%a,f=b-%%a
                        if !f! lss 0 set f=!f:~1!
>>b.txt echo;!b!---!c!---%%a    !f!
set c=
))
if %%a==%n% (set c=%%a) else set b=%%a
)
set/a g=a-b_
>>c.txt echo;%a%-%b_%=%g%
for /l %%a in (-2,1,2) do (
set/a e=f+%%a,e1=a+e,e2=a-e,g0=g+%%a,g1=d+g0,g2=d-g0&set e3=&set g3=
if !g1! geq 0 set "g3=!g1!(%d%+!g0!)  "
if !g1! geq 0 set "g3=!g3!!g2!(%d%-!g0!)"
if !e1! geq 0 set "e3=!e1!(%a%+!e!)  "
if !e2! geq 0 set "e3=!e3!!e2!(%a%-!e!)"
>>b.txt echo;!e3!
>>c.txt echo;!g3!
)COPY
1

评分人数

寒夜孤星:在没有说明的情况下,本人所有代码均运行在 XP SP3 下 (有问题请发贴,QQ临时会话已关闭)

TOP

返回列表