VKILL 真牛，实验下效果..................^_^...............
中国DOS联盟
联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 论坛色彩渐变代码生成器.bat
查看 6,683 回复 52
第 31 楼
发表于 2007-03-14 21:22 · 中国 广东 东莞 电信
第 32 楼
发表于 2007-03-16 01:39 · 中国 甘肃 张掖 电信
zh159 兄的很不错
第 33 楼
发表于 2007-03-16 06:33 · 中国 四川 成都 联通
看看是什么啊!~
第 34 楼
发表于 2007-04-04 11:29 · 中国 广东 湛江 廉江市 电信
不错不错，这么好的贴子顶上来让大家学习下！！！
不错不错，这么好的贴子顶上来让大家学习下！！！
[ Last edited by qasa on 2007-4-3 at 10:41 PM ]
κχυμγνξοθπρωψιαδλεηφβτζσ┬╀┾┳┞┯┰┱┣┲┳╂╁│├┟┭┠这是什么？？这就是我的人生
第 35 楼
发表于 2007-04-04 14:17 · 中国 吉林 吉林市 电信
挺有意思啊，收下这个了，大家一起来顶
第 36 楼
发表于 2007-04-04 14:23 · 中国 河北 保定 联通
我也玩一把试试看……呵呵——_
我也玩一把试试看……呵呵——^_^
[ Last edited by baomaboy on 2007-4-4 at 02:25 PM ]
我也玩一把试试看……呵呵——^_^
[ Last edited by baomaboy on 2007-4-4 at 02:25 PM ]
第 37 楼
发表于 2007-04-08 09:30 · 中国 湖南 长沙 电信
@echo off
setlocal EnableDelayedExpansion
set Num=1
for /l %%i in (1,1,6) do (
if !Num! LEQ 16 for %%n in (0 1 2 3 4 5 6 7 8 9 a b c d e f) do set color!Num!=ff%%n%%n00&set /a Num+=1
if !Num! GTR 16 if !Num! LEQ 31 for %%n in (e d c b a 9 8 7 6 5 4 3 2 1 0) do set color!Num!=%%n%%n!color16:~-4!&set /a Num+=1
if !Num! GTR 31 if !Num! LEQ 46 for %%n in (1 2 3 4 5 6 7 8 9 a b c d e f) do set color!Num!=!color31:~0,4!%%n%%n&set /a Num+=1
if !Num! GTR 46 if !Num! LEQ 61 for %%n in (e d c b a 9 8 7 6 5 4 3 2 1 0) do set color!Num!=!color46:~0,2!%%n%%n!color46:~-2!&set /a Num+=1
if !Num! GTR 61 if !Num! LEQ 76 for %%n in (1 2 3 4 5 6 7 8 9 a b c d e f) do set color!Num!=%%n%%n!color61:~-4!&set /a Num+=1
if !Num! GTR 76 if !Num! LEQ 90 for %%n in (e d c b a 9 8 7 6 5 4 3 2 1) do set color!Num!=!color76:~0,4!%%n%%n&set /a Num+=1
)
:Main
cls
echo.
set Num=
set input=
set /p Num= 输入开始颜色(红绿蓝):
for %%n in (R G B) do if /i "%Num%" == "%%n" goto input
goto Main
:input
set /p input= 输入文字:
if not defined input exit
if /i "%Num%" == "R" set Num=0
if /i "%Num%" == "G" set Num=30
if /i "%Num%" == "B" set Num=60
cd.>test.txt
:loop
set /a Num+=1
>>test.txt set /p=%input:~0,1%<nul
set "input=%input:~1%"
if %num% GEQ 90 set Num=
if not "%input%" == "" goto loop
start test.txt
goto Main
exit
setlocal EnableDelayedExpansion
set Num=1
for /l %%i in (1,1,6) do (
if !Num! LEQ 16 for %%n in (0 1 2 3 4 5 6 7 8 9 a b c d e f) do set color!Num!=ff%%n%%n00&set /a Num+=1
if !Num! GTR 16 if !Num! LEQ 31 for %%n in (e d c b a 9 8 7 6 5 4 3 2 1 0) do set color!Num!=%%n%%n!color16:~-4!&set /a Num+=1
if !Num! GTR 31 if !Num! LEQ 46 for %%n in (1 2 3 4 5 6 7 8 9 a b c d e f) do set color!Num!=!color31:~0,4!%%n%%n&set /a Num+=1
if !Num! GTR 46 if !Num! LEQ 61 for %%n in (e d c b a 9 8 7 6 5 4 3 2 1 0) do set color!Num!=!color46:~0,2!%%n%%n!color46:~-2!&set /a Num+=1
if !Num! GTR 61 if !Num! LEQ 76 for %%n in (1 2 3 4 5 6 7 8 9 a b c d e f) do set color!Num!=%%n%%n!color61:~-4!&set /a Num+=1
if !Num! GTR 76 if !Num! LEQ 90 for %%n in (e d c b a 9 8 7 6 5 4 3 2 1) do set color!Num!=!color76:~0,4!%%n%%n&set /a Num+=1
)
:Main
cls
echo.
set Num=
set input=
set /p Num= 输入开始颜色(红绿蓝):
for %%n in (R G B) do if /i "%Num%" == "%%n" goto input
goto Main
:input
set /p input= 输入文字:
if not defined input exit
if /i "%Num%" == "R" set Num=0
if /i "%Num%" == "G" set Num=30
if /i "%Num%" == "B" set Num=60
cd.>test.txt
:loop
set /a Num+=1
>>test.txt set /p=%input:~0,1%<nul
set "input=%input:~1%"
if %num% GEQ 90 set Num=
if not "%input%" == "" goto loop
start test.txt
goto Main
exit
第 38 楼
发表于 2007-04-08 09:36 · 中国 广西 玉林 博白县 电信
LS的干啥？
第 39 楼
发表于 2007-04-09 05:51 · 中国 广东 肇庆 电信
bbs.cn-dos.net 爱你~
第 40 楼
发表于 2007-04-09 05:52 · 中国 广东 肇庆 电信
5456ga4ds56fg4asd564fg56asd4gf
第 41 楼
发表于 2007-04-09 05:54 · 中国 广东 肇庆 电信
56dag4564sg564asd6g
第 42 楼
发表于 2007-04-09 07:45 · 中国 甘肃 平凉 电信
Originally posted by flamey at 2007-4-9 05:54:
56dag456
貌似兄的sed有问题
第 43 楼
发表于 2007-04-12 20:36 · 中国 广东 惠州 电信
123345
第 44 楼
发表于 2007-04-25 06:08 · 中国 广西 南宁 电信
我爱你啊
第 45 楼
发表于 2007-04-30 06:14 · 中国 上海 徐汇区 电信
试验下。哈哈
论坛跳转: