Digital matrix appears point by point, random - China DOS Union Forum

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 ]

Draw each character one by one with your dot matrix code ^_^

No translation needed as the content is in Chinese and not in English. So the output remains "体力活没人干耶…… 待。。。。。。"

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 ]

Bumping my old post, in fact there are repetitive elements with a certain already posted thread

A very passionate brother... always some creative things are posted

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)

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.

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.

Benefited a lot, thank you the building owner

Quite nice to look at, not bad, learning

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.

Let's study together when we have time!

The effect of the brother on the 4th floor is really good~

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!

Floor1　523066680	Posted 2009-01-27 20:54
银牌会员　Posts 1,133　Credits 2,362
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 ]

Floor2　wxcute	Posted 2009-01-27 21:55
中级用户　Posts 211　Credits 458
Draw each character one by one with your dot matrix code ^_^

Floor3　523066680	Posted 2009-01-27 22:36
银牌会员　Posts 1,133　Credits 2,362
No translation needed as the content is in Chinese and not in English. So the output remains "体力活没人干耶…… 待。。。。。。"

Floor4　523066680	Posted 2009-01-30 16:28
银牌会员　Posts 1,133　Credits 2,362
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 ]

Floor5　523066680	Posted 2009-10-28 21:25
银牌会员　Posts 1,133　Credits 2,362
Bumping my old post, in fact there are repetitive elements with a certain already posted thread

Floor6　Evangel	Posted 2009-10-31 15:23
初级用户　Posts 95　Credits 145
A very passionate brother... always some creative things are posted

Floor7　523066680	Posted 2009-10-31 22:58
银牌会员　Posts 1,133　Credits 2,362
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)

Floor8　BeeButterflyDos	Posted 2009-11-17 01:14
新手上路　Posts 16　Credits 17
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.

Floor9　523066680	Posted 2009-11-17 13:37
银牌会员　Posts 1,133　Credits 2,362
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.

Floor10　BeeButterflyDos	Posted 2009-11-18 16:02
新手上路　Posts 16　Credits 17
Benefited a lot, thank you the building owner

Floor11　heixing	Posted 2009-12-30 23:16
初级用户　Posts 16　Credits 28
Quite nice to look at, not bad, learning

Floor12　qinchun36	Posted 2009-12-31 10:13
高级用户　Posts 400　Credits 609
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.

Floor13　sl543001	Posted 2010-01-08 11:10
中级用户　Posts 225　Credits 499
Let's study together when we have time!

Floor14　jarry0932	Posted 2010-01-10 14:18
初级用户　Posts 122　Credits 128
The effect of the brother on the 4th floor is really good~

Floor15　gudou	Posted 2011-01-04 12:02
初级用户　Posts 29　Credits 43
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!