|
523066680
银牌会员
     SuperCleaner
积分 2362
发帖 1133
注册 2008-2-2
状态 离线
|
   『楼 主』:
[原创]批处理写大字效果--新年贺卡
使用 LLM 解释/回答一下
题目: 批处理写大字效果--新年贺卡
代码,文/523066680
blog: http://hi.baidu.com/523066680
首发于: http://www.cn-dos.net/forum/viewthread.php?tid=45411&fpage=1
啰嗦下:
好久没写自己满意的特效了,大家都劝我学点实用的,其实我的应用类作品也
写了一些的,只是感觉没啥特别的,不想发上来罢了。
制作:
自己写了一个 编辑写大字效果的批处理工具,已经完成的是:
对于直线,输入两端点坐标和附加"参数",可以直接描出.
因为一些功能还在修改... 所以下次才贴 (过年再说,期末考试x定了!拼小命拉!)
作品:
::made by 523066680@cn-dos.net 2008-12-25
::blog: hi.baidu.com/523066680
::首发于:
@set evern1= 35 4248x+ 53 64 57 66 7179x+ 9397x+ 75f5y+ f4 b3 c2 b7 c8 3e 4d 5c 5bcby+ db ea f9 7b7fx+ 7efey+
@set evern2= 2535y+ 44 5352x- 464dx+ 656cx+ 6595y+ a3adx+ 49g9y+
@set evern3= 62 71 24g4y+ 55 66 77 484ex+ 5e7ey+ 878gx+ 2bbby+ ca d9 e8 f7 cc dd ee ff fg
@set evern4= 2c 3b 4a49x- 5857x- 5655x- 6575y+ 84 93 939fx+ 6ahay+ h9 c6 d5 e4 cd de ef
@echo off&setLocal enabLedeLayedexpansion
title made by 523066680@cn-dos.net
mode con coLs=40 Lines=22
color 40
set end= cn-dos 523066680 祝 大 家
set "L0=" &set "str=■" &set "num=0123456789abcdefghi"
for /l %%a in (1,1,18) do (set L=!L!)
for /l %%a in (0,1,18) do (set n!num:~%%a,1!=%%a)
for /l %%n in (1,1,4) do (
for /l %%a in (1,1,18) do (set L%%a=%L%)
for %%a in (!evern%%n!) do (call :a %%a)
for /l %%a in (1,1,18) do (set "L%%n_%%a=!L%%a!")
ping -n 2 127.1>nul
)
color 4e
for /l %%a in (0,1,30) do (
set /p x=!end:~%%a,1!<nul
for /l %%b in (1,1,5) do (ping -n 1 127.0>nul)
)
mode con cols=75 lines=37
cls,
for /l %%a in (1,1,18) do (echo,!L1_%%a! !L2_%%a!)
for /l %%a in (1,1,18) do (echo,!L3_%%a! !L4_%%a!)
ping -n 5 127.1>nul
exit
:a
set n=%~1
if "%n:~3%"=="" (set "do=::") else (set "do=")
set /a ya=n%n:~0,1%,xa=n%n:~1,1%,xa2=xa+1
%do% set /a yb=n%n:~2,1%,xb=n%n:~3,1%,xb2=xb+1
%do% set "YorX=%n:~4,1%" &set "add=%n:~5,1%"
:a-1
set L%ya%=!L%ya%:~0,%xa%!%str%!L%ya%:~%xa2%!
call :echo call yes
%do% set /a %YorX%a%add%=1,xa2=xa+1
%do% if not !%YorX%a! equ !%YorX%b! (goto :a-1)
%do% set L%ya%=!L%ya%:~0,%xa%!%str%!L%ya%:~%xa2%!
:echo
if "%2"=="yes" (set for=3) else (set for=5)
for /l %%a in (1,1,%for%) do (ping -n 1 127.1>nul)
cLs
for /l %%a in (0,1,18) do (echo, !L%%a!)
goto :eof
代码内容讨论
2次ping1 不等于 1次ping2
http://www.cn-dos.net/forum/viewthread.php?tid=45410&fpage=1
%var%代替语句执行
http://www.cn-dos.net/forum/viewthread.php?tid=45240&fpage=1&highlight=%2B523066680
还在忧郁要不要修改的 写大字效果编辑器
批处理写大字特效编辑器
http://www.cn-dos.net/forum/viewthread.php?tid=45423&fpage=1
Last edited by 523066680 on 2008-12-28 at 14:18 ]
Title: Batch Writing Large Character Effect - New Year Greeting Card
Code, text/523066680
blog: http://hi.baidu.com/523066680
First published at: http://www.cn-dos.net/forum/viewthread.php?tid=45411&fpage=1
Rambling:
It has been a long time since I wrote a special effect that I am satisfied with. Everyone advises me to learn something practical. In fact, I have written some application - related works, but I just don't want to post them because I don't think they are particularly special.
Production:
I wrote a batch processing tool for editing and writing large character effects. What has been completed is: For a straight line, input the coordinates of the two endpoints and the additional "parameters", and it can be directly drawn. Because some functions are still being modified... so I will post it next time (wait until the New Year, the final exam is fixed! I have to work hard!)
Work:
::made by 523066680@cn-dos.net 2008 - 12 - 25
::blog: hi.baidu.com/523066680
::First published at:
@set evern1= 35 4248x+ 53 64 57 66 7179x+ 9397x+ 75f5y+ f4 b3 c2 b7 c8 3e 4d 5c 5bcby+ db ea f9 7b7fx+ 7efey+
@set evern2= 2535y+ 44 5352x- 464dx+ 656cx+ 6595y+ a3adx+ 49g9y+
@set evern3= 62 71 24g4y+ 55 66 77 484ex+ 5e7ey+ 878gx+ 2bbby+ ca d9 e8 f7 cc dd ee ff fg
@set evern4= 2c 3b 4a49x- 5857x- 5655x- 6575y+ 84 93 939fx+ 6ahay+ h9 c6 d5 e4 cd de ef
@echo off&setLocal enabLedeLayedexpansion
title made by 523066680@cn-dos.net
mode con coLs=40 Lines=22
color 40
set end= cn-dos 523066680 祝 大 家
set "L0=" &set "str=■" &set "num=0123456789abcdefghi"
for /l %%a in (1,1,18) do (set L=!L!)
for /l %%a in (0,1,18) do (set n!num:~%%a,1!=%%a)
for /l %%n in (1,1,4) do (
for /l %%a in (1,1,18) do (set L%%a=%L%)
for %%a in (!evern%%n!) do (call :a %%a)
for /l %%a in (1,1,18) do (set "L%%n_%%a=!L%%a!")
ping -n 2 127.1>nul
)
color 4e
for /l %%a in (0,1,30) do (
set /p x=!end:~%%a,1!<nul
for /l %%b in (1,1,5) do (ping -n 1 127.0>nul)
)
mode con cols=75 lines=37
cls,
for /l %%a in (1,1,18) do (echo,!L1_%%a! !L2_%%a!)
for /l %%a in (1,1,18) do (echo,!L3_%%a! !L4_%%a!)
ping -n 5 127.1>nul
exit
:a
set n=%~1
if "%n:~3%"=="" (set "do=::") else (set "do=")
set /a ya=n%n:~0,1%,xa=n%n:~1,1%,xa2=xa+1
%do% set /a yb=n%n:~2,1%,xb=n%n:~3,1%,xb2=xb+1
%do% set "YorX=%n:~4,1%" &set "add=%n:~5,1%"
:a-1
set L%ya%=!L%ya%:~0,%xa%!%str%!L%ya%:~%xa2%!
call :echo call yes
%do% set /a %YorX%a%add%=1,xa2=xa+1
%do% if not !%YorX%a! equ !%YorX%b! (goto :a-1)
%do% set L%ya%=!L%ya%:~0,%xa%!%str%!L%ya%:~%xa2%!
:echo
if "%2"=="yes" (set for=3) else (set for=5)
for /l %%a in (1,1,%for%) do (ping -n 1 127.1>nul)
cLs
for /l %%a in (0,1,18) do (echo, !L%%a!)
goto :eof
Code content discussion
2 pings of 1 are not equal to 1 ping of 2
http://www.cn-dos.net/forum/viewthread.php?tid=45410&fpage=1
%var% instead of statement execution
http://www.cn-dos.net/forum/viewthread.php?tid=45240&fpage=1&highlight=%2B523066680
Still hesitating whether to modify the large character effect editor
Batch Processing Large Character Special Effect Editor
http://www.cn-dos.net/forum/viewthread.php?tid=45423&fpage=1
Last edited by 523066680 on 2008 - 12 - 28 at 14:18 ]
此帖被 +79 点积分 点击查看详情 评分人:【 slore 】 | 分数: +4 | 时间:2008-12-27 17:44 | 评分人:【 pusofalse 】 | 分数: +13 | 时间:2008-12-27 18:28 | 评分人:【 yishanju 】 | 分数: +15 | 时间:2008-12-28 04:04 | 评分人:【 wxcute 】 | 分数: +4 | 时间:2008-12-28 11:37 | 评分人:【 s11ss 】 | 分数: +15 | 时间:2008-12-28 14:12 | 评分人:【 moniuming 】 | 分数: +15 | 时间:2008-12-28 15:16 | 评分人:【 luxipeng 】 | 分数: +2 | 时间:2008-12-28 19:04 | 评分人:【 hackate 】 | 分数: +4 | 时间:2009-1-1 14:04 | 评分人:【 netbenton 】 | 分数: +1 | 时间:2009-1-2 03:15 | 评分人:【 PPdos 】 | 分数: +6 | 时间:2009-1-28 07:00 |
|
|

综合型编程论坛
我的作品索引 |
|
2008-12-27 17:31 |
|
|
kaikai163
初级用户
 
积分 107
发帖 60
注册 2007-11-7
状态 离线
|
『第 2 楼』:
使用 LLM 解释/回答一下
太神奇了,牛人,学习了!
So amazing, awesome person, learned it!
|
|
2008-12-27 18:21 |
|
|
itljl
新手上路

积分 13
发帖 7
注册 2007-10-21
状态 离线
|
|
2008-12-27 19:36 |
|
|
holucan
初级用户
 
积分 26
发帖 25
注册 2008-11-7
状态 离线
|
『第 4 楼』:
使用 LLM 解释/回答一下
呵呵,这何止是神奇可以说的过了,很强大,请问lz,那新年快乐,可以自行修改吗?
Hehe, this is more than just amazing. It's very powerful. May I ask the LZ, then happy new year, can it be modified by oneself?
|
|
2008-12-27 23:40 |
|
|
yishanju
银牌会员
     [b]看你妹啊[/b]
积分 1488
发帖 1357
注册 2006-5-20
状态 离线
|
『第 5 楼』:
使用 LLM 解释/回答一下
光看你贴的代码真看不出你是怎么实现的
说说呗
Just from looking at the code you posted, it's really hard to tell how you implemented it. Tell me about it, please.
|

有问题请发论坛或者自行搜索,再短消息问我的统统是SB |
|
2008-12-28 04:06 |
|
|
BC
中级用户
  
积分 338
发帖 175
注册 2007-10-21
状态 离线
|
『第 6 楼』:
使用 LLM 解释/回答一下
貌似是用点阵来实现的?
话说是如何用搞一个大字出来,然后得到坐标?
It seems to be implemented with dots?
How to create a large character and then get its coordinates?
|

C:\
C:\Del BC |
|
2008-12-28 09:55 |
|
|
523066680
银牌会员
     SuperCleaner
积分 2362
发帖 1133
注册 2008-2-2
状态 离线
|
|
2008-12-28 13:43 |
|
|
holucan
初级用户
 
积分 26
发帖 25
注册 2008-11-7
状态 离线
|
『第 8 楼』:
使用 LLM 解释/回答一下
哦哦,太棒了,期待中!
Oh, that's great, looking forward to it!
|
|
2008-12-28 13:54 |
|
|
523066680
银牌会员
     SuperCleaner
积分 2362
发帖 1133
注册 2008-2-2
状态 离线
|
|
2009-1-1 10:57 |
|
|
caobei
新手上路
 炽天使
积分 14
发帖 8
注册 2008-7-13
状态 离线
|
|
2009-1-1 13:42 |
|
|
winxos
新手上路

积分 3
发帖 3
注册 2007-10-20
状态 离线
|
『第 11 楼』:
写的很传神
使用 LLM 解释/回答一下
赞一个,颜色搭配可以改进一下。
Give a thumbs up, but the color scheme could be improved.
|
|
2009-1-1 15:35 |
|
|
523066680
银牌会员
     SuperCleaner
积分 2362
发帖 1133
注册 2008-2-2
状态 离线
|
『第 12 楼』:
使用 LLM 解释/回答一下
过新年啦! 绝对要自己顶一个!
■■
■■■■■■■■
■■■■
■■■
■■■■■■■■■■■■■■
■■■
■■■■■■■
■■■
■■■■■
■■■■■
■■■
■■■
■■■■
■
■
■■■■■■■■■
■■■
■■■■■■■■
■■
■■
■■
■■■■■■■■■■■
■
■
■
■
■
■
■■
■■
■■■■■■■■
■■■■
■■■■■
■■■■■
■■■■■■■■■■■
■■
■■
■■
■■■
■■■
■■■
■■■■
■
■
■
■■
■■■■
■■
■■
■■
■■■■■■■■■■■■
■
■
■■■
■■■
■■■
■
■
■■
Last edited by 523066680 on 2009-1-25 at 22:31 ]
Happy New Year! Definitely need to bump it myself!
Last edited by 523066680 on 2009-1-25 at 22:31 ]
|

综合型编程论坛
我的作品索引 |
|
2009-1-25 22:28 |
|
|
yishanju
银牌会员
     [b]看你妹啊[/b]
积分 1488
发帖 1357
注册 2006-5-20
状态 离线
|
『第 13 楼』:
使用 LLM 解释/回答一下
Originally posted by 523066680 at 2008-12-28 13:43:
即将发布 写打字效果的制作批处理 wait....
时间就这么过去了
你的文章却不见发表
扣的分太少了,呆会再扣
Originally posted by 523066680 at 2008-12-28 13:43:
About to be released Making a batch file for typing effect wait....
Time has passed like this
But your article is not seen to be published
The points deducted are too few, I'll deduct more later
|

有问题请发论坛或者自行搜索,再短消息问我的统统是SB |
|
2009-1-26 01:15 |
|
|
m72131
新手上路

积分 10
发帖 7
注册 2008-8-8
状态 离线
|
|
2009-1-27 14:25 |
|
|
gudou
初级用户
 
积分 43
发帖 29
注册 2008-3-31
状态 离线
|
『第 15 楼』:
使用 LLM 解释/回答一下
出现的有些慢啊,在XP中……
It's a bit slow to appear in XP...
|
|
2011-1-4 12:05 |
|