中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 文本输出加分题(15分)：

bat-zw
金牌会员

永远的学习者

积分 3105
发帖 1276
注册 2008-3-8
状态离线

『楼主』: 文本输出加分题(15分)：

如下：

==<'\~!|#%

*)$""(#':"

$)#~<&<\~$

^<'!"|'@*:

<~<#"|^@#'

>"==:"@>=*

*>*>"@!@'$

:^=\<~*\\(

&!||&)=)!'

>:*))<<'(=

)'&|~(^$^\

>!^@%%)!:|

()^~\<\~<#

(:)':@=^'&

^!|!~(@:@*

<@>"~&*^~%

:$!^'|)\'^

@)'"@<$@#(

^::)%'(%*|

^(#)!*'*#@

要求通过批处理(vbs等不来)不生成临时文件输出20行由特列字符(^&%!$#><:=~*()@"'\|)随机组成的10位字符串。
----------------------------------------------------------------------------------------------------------
是时候公布本人的答案了：

@echo off

set code=^^^&%%%^:!$#^>^<:=~*()@"'\|

setlocal enabledelayedexpansion

:begin

set /a a=%random%%%19

set var=!code:~%a%,1!&set str=!str!!var!

set /a n+=1

if !n! lss 10 goto begin

echo !str!

set /a m+=1

if !m! lss 20 set str=&set n=0&goto begin

pause>nul

[ Last edited by zw19750516 on 2008-5-24 at 06:27 PM ]

批处理之家新域名：www.bathome.net

2008-5-24 14:37

(841615149)

slore
铂金会员

积分 5212
发帖 2478
注册 2007-2-8
状态离线

『第 2 楼』:

@echo off
set slore=^^^&%%%^:!$#^>^<:=~*()@"'\|

echo ^%slore:~0,1%
echo ^%slore:~1,1%
echo ^%slore:~2,1%
echo ^%slore:~3,1%
echo ^%slore:~4,1%
echo ^%slore:~5,1%
echo ^%slore:~6,1%
echo ^%slore:~7,1%
echo ^%slore:~8,1%
echo ^%slore:~9,1%
echo ^%slore:~10,1%
echo ^%slore:~11,1%
echo ^%slore:~12,1%
echo ^%slore:~13,1%
echo ^%slore:~14,1%
echo ^%slore:~15,1%
echo ^%slore:~16,1%
echo ^%slore:~17,1%
echo ^%slore:~18,1%

pause>nul

[ Last edited by slore on 2008-5-24 at 03:11 PM ]

S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore

2008-5-24 15:09

bat-zw
金牌会员

永远的学习者

积分 3105
发帖 1276
注册 2008-3-8
状态离线

『第 3 楼』:

Quote:

Originally posted by slore at 2008-5-24 15:09:
@echo off
set slore=^^^&%%%^:!$#^>^<:=~*()@"'\|

echo ^%slore:~0,1%
echo ^%slore:~1,1%
echo ^%slore:~2,1%
echo ^%slore:~3,1%
echo ^%slore:~4,1%
echo ^%slore:~5,1%
echo ^%slo ...

我知道老兄是故意不写完，还是请老兄写完整看看。

批处理之家新域名：www.bathome.net

2008-5-24 15:20

(841615149)

slore
铂金会员

积分 5212
发帖 2478
注册 2007-2-8
状态离线

『第 4 楼』:

既然可以输出每一位……哪么随机和20*10的表格

有点懒+有点晕~

就是那列的0,1,2,3,4,5……用变量代替貌似没有输出成功。。。

不过用set /p似乎可以……

我大概写写嘛~

S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore

2008-5-24 15:27

slore
铂金会员

积分 5212
发帖 2478
注册 2007-2-8
状态离线

『第 5 楼』:

@echo off

setlocal enabledelayedexpansion

set slore=^^^^^&%%%^:^$#^>^<:=~*()@"'\|^!

for /l %%i in (0,1,19) do call :sline

pause>nul

:sline

set outs=

for /l %%j in (0,1,10) do (

set /a bit=!RANDOM!%%19

call :linkltr !bit!

)

echo !outs:~1!

:linkltr

set outs=!outs!!slore:~%1,1!

此帖被 +19 点积分

点击查看详情

S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore

2008-5-24 16:02

WANKOILZ
初级用户

积分 198
发帖 89
注册 2007-9-6
来自重庆
状态离线

『第 6 楼』:

楼上的如果把 set slore=^^^^^&%%%^:^$#^>^<:=~*()@"'\|^!
中的感叹号插到中间就会出错。所以把setlocal enabledelayedexpansion放到set后面:

@echo off

set slore=^^^&^:!$#^>^<:=~*()@"'\|%%%

setlocal enabledelayedexpansion

for /l %%i in (1,1,20) do (

  for /l %%j in (1,1,10) do (

  call :out

  )

echo !mystr!&set mystr=

)

pause>nul

:out

set/a var=%random%%%20

set mystr=!mystr!!slore:~%var%,1!

此帖被 +4 点积分

点击查看详情

2008-5-24 16:55

slore
铂金会员

积分 5212
发帖 2478
注册 2007-2-8
状态离线

『第 7 楼』:

其实习惯吧

1.@echo off和变量延迟写一行……

2.因为要随机……所以就没有必要注意顺序了。

S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore

2008-5-24 17:39

slore
铂金会员

积分 5212
发帖 2478
注册 2007-2-8
状态离线

『第 8 楼』:

发现你把！移动到前面去了？把%%%放到后面啦……

不开变量延迟是可以按顺序的……不过好像删除了……算了……
感觉P还是不适合……

S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore

2008-5-24 18:06

WANKOILZ
初级用户

积分 198
发帖 89
注册 2007-9-6
来自重庆
状态离线

『第 9 楼』:

顺序换不换都能显示，呵呵。

2008-5-24 20:56

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: