|
523066680
银牌会员
SuperCleaner
积分 2362
发帖 1133
注册 2008-2-2
状态 离线
|
『楼 主』:
[特效]数字阵逐点显现，随机
使用 LLM 解释/回答一下
大家还记得08奥运会 开始典礼的视觉震撼吧！
这个帖子讨论 那个击缶的倒计时，数字阵一点点显现的效果。
并不要求全一样，可以逐步实现。
全凭兴趣回帖，觉得好的大家给分，一起挑战吧。
Last edited by 523066680 on 2009-3-14 at 22:18 ]
Everyone still remembers the visual shock of the opening ceremony of the 2008 Olympic Games!
This post discusses the countdown with the drum-beating and the effect of the digital formation gradually appearing.
It doesn't require being exactly the same, it can be achieved step by step.
Reply just for interest, everyone gives points if it's good, let's challenge together.
Last edited by 523066680 on 2009-3-14 at 22:18 ]
|
综合型编程论坛
我的作品索引 |
|
 2009-1-27 20:54 |
|
|
wxcute
中级用户
积分 458
发帖 211
注册 2006-7-26
状态 离线
|
『第 2 楼』:
[论坛的时间怎么有点不对阿，现在 20:42 ]
使用 LLM 解释/回答一下
用你的点阵代码一个个字来画 ^_^
Draw each character one by one with your dot matrix code ^_^
|
┌───────┐
├→学习→实践→┤
└───────┘ |
|
|
2009-1-27 21:55 |
|
|
523066680
银牌会员
SuperCleaner
积分 2362
发帖 1133
注册 2008-2-2
状态 离线
|
『第 3 楼』:
使用 LLM 解释/回答一下
体力活没人干耶…… 待。。。。。。
No translation needed as the content is in Chinese and not in English. So the output remains "体力活没人干耶…… 待。。。。。。"
|
综合型编程论坛
我的作品索引 |
|
|
2009-1-27 22:36 |
|
|
523066680
银牌会员
SuperCleaner
积分 2362
发帖 1133
注册 2008-2-2
状态 离线
|
『第 4 楼』:
使用 LLM 解释/回答一下
算了算了 娱乐一下 累也值得 很粗糙的做了一个 别骂哦
@echo off &setlocal enabledelayedexpansion
title CodeBy523066680
for /l %%x in (5,-1,1) do (
for /f "delims== tokens=1" %%a in ('set') do (set %%a=)
set "k= "
for /l %%a in (1,1,15) do (set l%%a=!k!)
for /f "delims=x" %%a in (%~snx0) do (
if "%%a"==":%%xend" (set "yes=")
if defined yes (set /a "n+=1" &set S!n!=%%a)
if "%%a"==":%%x" (set /a yes=1,n=0)
)
for /l %%a in (1,1,12) do (
for /l %%b in (0,1,15) do (
if "!S%%a:~%%b,1!"=="*" (set x_!random!_%%a_%%b_x=x)
)
)
for /f "delims=_ tokens=3,4" %%a in ('set x_') do (
set /a x=%%b+1
call set l%%a=!l%%a:~0,%%b!*%%l%%a:~!x!%%
call :a 50
cls
for /l %%a in (1,1,15) do (echo,!l%%a!)
)
call :a 500
)
pause
exit
:a
for /l %%a in (1,1,%1) do (echo,>nul)
goto :eof
:5
***************
***************
***
***
***
***************
***************
***
***
***
***************
***************
:5end
:4
*** ***
*** ***
*** ***
*** ***
*** ***
***************
***************
***
***
***
***
***
:4end
:3
***************
***************
***
***
***
***************
***************
***
***
***
***************
***************
:3end
:2
***************
***************
***
***
***
***************
***************
***
***
***
***************
***************
:2end
:1
***
***
***
***
***
***
***
***
***
***
***
***
:1end
Last edited by 523066680 on 2009-1-30 at 20:58 ]
Forget it. Just have some fun. It's worth being tired. I made it very roughly. Don't scold me哦
@echo off &setlocal enabledelayedexpansion
title CodeBy523066680
for /l %%x in (5,-1,1) do (
for /f "delims== tokens=1" %%a in ('set') do (set %%a=)
set "k= "
for /l %%a in (1,1,15) do (set l%%a=!k!)
for /f "delims=x" %%a in (%~snx0) do (
if "%%a"==":%%xend" (set "yes=")
if defined yes (set /a "n+=1" &set S!n!=%%a)
if "%%a"==":%%x" (set /a yes=1,n=0)
)
for /l %%a in (1,1,12) do (
for /l %%b in (0,1,15) do (
if "!S%%a:~%%b,1!"=="*" (set x_!random!_%%a_%%b_x=x)
)
)
for /f "delims=_ tokens=3,4" %%a in ('set x_') do (
set /a x=%%b+1
call set l%%a=!l%%a:~0,%%b!*%%l%%a:~!x!%%
call :a 50
cls
for /l %%a in (1,1,15) do (echo,!l%%a!)
)
call :a 500
)
pause
exit
:a
for /l %%a in (1,1,%1) do (echo,>nul)
goto :eof
:5
:5end
:4
:4end
:3
:3end
:2
:2end
:1
:1end
Last edited by 523066680 on 2009-1-30 at 20:58 ]
|
综合型编程论坛
我的作品索引 |
|
|
2009-1-30 16:28 |
|
|
523066680
银牌会员
SuperCleaner
积分 2362
发帖 1133
注册 2008-2-2
状态 离线
|
『第 5 楼』:
使用 LLM 解释/回答一下
顶自己的老贴，事实上根某个已经发的帖子有重复成分
Bumping my old post, in fact there are repetitive elements with a certain already posted thread
|
综合型编程论坛
我的作品索引 |
|
|
2009-10-28 21:25 |
|
|
Evangel
初级用户
积分 145
发帖 95
注册 2008-4-12
状态 离线
|
『第 6 楼』:
使用 LLM 解释/回答一下
很有激情的兄弟……总是有些创意的东西发出来
A very passionate brother... always some creative things are posted
|
|
|
2009-10-31 15:23 |
|
|
523066680
银牌会员
SuperCleaner
积分 2362
发帖 1133
注册 2008-2-2
状态 离线
|
『第 7 楼』:
使用 LLM 解释/回答一下
再刷一个效果
@echo off
title made by 523066680 2008-08-08
::这一版本由www.cn-dos.net & www.bathome.cn 成员523066680编辑
setlocal enabledelayedexpansion
set fu= ^/ ^\
set "kong= "
set "kong2=____________________________________________________________________________"
set /a a=0,b=0,e=2,tiao=0
:a
set /a b+=1,c=30-%b%+%e%
cls
echo, 仁有三急……狂奔厕所中……￥#……
for /l %%a in (1,1,6) do echo,
echo,!kong:~0,%b%!_ @
echo,!kong:~0,%b%! ^/
echo,!kong2:~0,%b%!!fu:~%a%,2!!kong2:~0,%c%!
ping -n>nul
if %a% equ 4 (set /a a=0) else (set /a a+=1)
if %a% leq 2 (set e=2)
if %a% equ 3 (set e=3)
if %a% equ 4 (set e=4)
if not %b% equ 30 goto :a else goto :b
set /a b=30,j=0,k=6
:b
if not %j% equ 6 (set /a j+=1,tiao=%j%) else (set /a k-=1,tiao=%k%)
set /a b+=1,up=6-%tiao%
cls
for /l %%a in (1,1,%up%) do echo,
echo,!kong:~0,%b%! @/ 偶跳
echo,!kong:~0,%b%!^<^/
echo,!kong:~0,%b%!!/^>
for /l %%a in (1,1,%tiao%) do echo,
echo,!kong2:~0,30!
ping -n>nul&ping -n>nul
if %a% equ 4 (set /a a=0) else (set /a a+=1)
if %k%==0 (goto :c1) else (goto :b)
:c1
set /a cc=0,dd=0
set call1=非礼勿视......
:c
if not %tiao% equ 10 set /a tiao+=1
if not %b% equ 60 set /a b+=1
if not "%cc%" == "31" (set /a cc+=1,num=30-%cc%)
if "%cc%"=="31" if not "%dd%"=="31" set /a dd+=1
cls
for /l %%a in (1,1,9) do echo,
echo,!kong2:~0,%num%!
for /l %%a in (1,1,%tiao%) do echo,
if %tiao% equ 10 echo,!kong:~0,%b%!!call1:~0,%dd%!
echo,!kong:~0,%b%!_ @
echo,!kong:~0,%b%! ^/\
echo,!kong:~0,%b%!!fu:~%a%,2!
if %tiao% lss 10 (ping -n>nul&ping -n>nul&ping -n>nul) else (ping -n>nul)
if %a% equ 4 (set /a a=0) else (set /a a+=1)
if "%dd%"=="30" (ping -n 2 127.1>nul &exit) else (goto :c)
Brush another effect
@echo off
title made by 523066680 2008-08-08
::This version is edited by member 523066680 from www.cn-dos.net & www.bathome.cn
setlocal enabledelayedexpansion
set fu= ^/ ^\
set "kong= "
set "kong2=____________________________________________________________________________"
set /a a=0,b=0,e=2,tiao=0
:a
set /a b+=1,c=30-%b%+%e%
cls
echo, There are three urgent things for people...Running to the toilet...￥#……
for /l %%a in (1,1,6) do echo,
echo,!kong:~0,%b%!_ @
echo,!kong:~0,%b%! ^/
echo,!kong2:~0,%b%!!fu:~%a%,2!!kong2:~0,%c%!
ping -n>nul
if %a% equ 4 (set /a a=0) else (set /a a+=1)
if %a% leq 2 (set e=2)
if %a% equ 3 (set e=3)
if %a% equ 4 (set e=4)
if not %b% equ 30 goto :a else goto :b
set /a b=30,j=0,k=6
:b
if not %j% equ 6 (set /a j+=1,tiao=%j%) else (set /a k-=1,tiao=%k%)
set /a b+=1,up=6-%tiao%
cls
for /l %%a in (1,1,%up%) do echo,
echo,!kong:~0,%b%! @/ I jump
echo,!kong:~0,%b%!^<^/
echo,!kong:~0,%b%!!/^>
for /l %%a in (1,1,%tiao%) do echo,
echo,!kong2:~0,30!
ping -n>nul&ping -n>nul
if %a% equ 4 (set /a a=0) else (set /a a+=1)
if %k%==0 (goto :c1) else (goto :b)
:c1
set /a cc=0,dd=0
set call1=Don't look at improper things......
:c
if not %tiao% equ 10 set /a tiao+=1
if not %b% equ 60 set /a b+=1
if not "%cc%" == "31" (set /a cc+=1,num=30-%cc%)
if "%cc%"=="31" if not "%dd%"=="31" set /a dd+=1
cls
for /l %%a in (1,1,9) do echo,
echo,!kong2:~0,%num%!
for /l %%a in (1,1,%tiao%) do echo,
if %tiao% equ 10 echo,!kong:~0,%b%!!call1:~0,%dd%!
echo,!kong:~0,%b%!_ @
echo,!kong:~0,%b%! ^/\
echo,!kong:~0,%b%!!fu:~%a%,2!
if %tiao% lss 10 (ping -n>nul&ping -n>nul&ping -n>nul) else (ping -n>nul)
if %a% equ 4 (set /a a=0) else (set /a a+=1)
if "%dd%"=="30" (ping -n 2 127.1>nul &exit) else (goto :c)
|
综合型编程论坛
我的作品索引 |
|
|
2009-10-31 22:58 |
|
|
BeeButterflyDos
新手上路
积分 17
发帖 16
注册 2009-10-16
状态 离线
|
『第 8 楼』:
使用 LLM 解释/回答一下
楼主，你好!
我是一个批处理的初学者，你的这段代码很有意思。我仔细研究了一下，但是还有一个地方不是很懂，望赐教，不胜感激。也希望看到这个问题的大虾们帮忙解答一下。
for /f "delims=_ tokens=3,4" %%a in ('set x_') do (
set /a x=%%b+1
call set l%%a=!l%%a:~0,%%b!*%%l%%a:~!x!%%
call :a 50
cls
在上面的代码中('set x_')起到什么作用呢？不是很理解。
LZ, hello!
I am a beginner of batch processing. Your code is very interesting. I have studied it carefully, but there is still one place I don't understand very well. I hope you can give me some advice, and I am very grateful. I also hope that the experts who see this problem can help solve it.
for /f "delims=_ tokens=3,4" %%a in ('set x_') do (
set /a x=%%b+1
call set l%%a=!l%%a:~0,%%b!*%%l%%a:~!x!%%
call :a 50
cls
What is the role of ('set x_') in the above code? I don't understand.
|
|
|
2009-11-17 01:14 |
|
|
523066680
银牌会员
SuperCleaner
积分 2362
发帖 1133
注册 2008-2-2
状态 离线
|
『第 9 楼』:
使用 LLM 解释/回答一下
直接set 将列出所有现有变量
set a 将列出所有a开头的现有变量 ，列出的时候变量是按名字先后排好的。
随机描点：
开始我读取自身，并把星号字符的坐标读取，赋给变量：x_随机数
一个个读取的时候，点是有顺序的读取的，当我再次用set x_ 列出所有x_开头
的变量的时候，把x_后的随机数给从头到尾排列了，导致顺序打乱
于是就等于乱序描出这些点，达到渐显的效果。
Directly using `set` will list all existing variables.
Using `set a` will list all existing variables starting with `a`, and the variables are listed in alphabetical order by name.
Random dot drawing:
Initially, I read myself and read the coordinates of the asterisk characters, assigning them to the variable `x_random number`. When reading one by one, the dots are read in order. When I then use `set x_` to list all variables starting with `x_`, the random numbers after `x_` are arranged from start to end, causing the order to be disrupted.
Thus, it is equivalent to randomly drawing these dots, achieving a gradual display effect.
|
综合型编程论坛
我的作品索引 |
|
|
2009-11-17 13:37 |
|
|
BeeButterflyDos
新手上路
积分 17
发帖 16
注册 2009-10-16
状态 离线
|
『第 10 楼』:
使用 LLM 解释/回答一下
受益匪浅，谢谢楼主 
Benefited a lot, thank you the building owner :)
|
|
|
2009-11-18 16:02 |
|
|
heixing
初级用户
积分 28
发帖 16
注册 2005-12-26
状态 离线
|
『第 11 楼』:
使用 LLM 解释/回答一下
蛮好看的，不错不错，学习
Quite nice to look at, not bad, learning
|
|
|
2009-12-30 23:16 |
|
|
qinchun36
高级用户
据说是李先生
积分 609
发帖 400
注册 2008-4-23
状态 离线
|
『第 12 楼』:
使用 LLM 解释/回答一下
啊啊啊，始终对DOS的“图像”不感冒，看着真费劲，有时间再好好研究，这两个例子都很好哇，先收藏了。
Ah, I've always been not into DOS "graphics", it's really hard to look at. I'll study it carefully when I have time. Both of these examples are really good, I'll bookmark them first.
|
┏━━━━━━┓
┃据说是李先生┃
┠──────┨
┃＊ｎｔＲＳＳ┃
┗━━━━━━┛ |
|
|
2009-12-31 10:13 |
|
|
sl543001
中级用户
积分 499
发帖 225
注册 2008-12-30
状态 离线
|
『第 13 楼』:
使用 LLM 解释/回答一下
有时间一起研究一下！
Let's study together when we have time!
|
|
|
2010-1-8 11:10 |
|
|
jarry0932
初级用户
积分 128
发帖 122
注册 2009-9-21
状态 离线
|
『第 14 楼』:
使用 LLM 解释/回答一下
4楼兄弟的效果真不错~
The effect of the brother on the 4th floor is really good~
|
|
|
2010-1-10 14:18 |
|
|
gudou
初级用户
积分 43
发帖 29
注册 2008-3-31
状态 离线
|
『第 15 楼』:
使用 LLM 解释/回答一下
太棒了！！但是那个54321倒数的在Visual Bat环境中居然运行错误，幸好我另存为后又试了下，真是极品！
Great! But that countdown from 54321 had an error when running in the Visual Bat environment. Fortunately, I saved it as another file and tried again, really a gem!
|
|
|
2011-1-4 12:02 |
|
|
