@echo off
set "str=i like the bathome,because here is the batch of the world."
set "code=A B C D E F G H I J K L N M O P Q R S T U V W X Y Z"
for %%i in (%code%) do call,set "str=%%str:%%i=%%i%%"
:lp
set /p=%str:~,1%<nul&set "str=%str:~1%"
for /l %%i in (1,1,200) do echo>nul
if defined str goto lp
pause>nul
复制代码

@echo off &setlocal enabledelayedexpansion
color 0a
set hang= i like the batman,because he is the hero of the world.
set /a a=0,b=0
for %%a in (A B C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (
set /a a+=1 
set n!a!=%%a
)
for %%a in (a b c d e f g h i j k l m n o p q r s t u v w x y z) do (
set /a b+=1 
call,set zimu=%%n!b!%%
call,set hang=%%hang:%%a=!zimu!%%
)

:a
set /a c+=1
ping -n>nul
set /p=!hang:~%c%,1!<nul
if not "!hang:~%c%,1!"=="" goto :a
echo,
pause
复制代码

@echo off&setlocal EnableDelayedExpansion
set "str=i like the bathome,because here is the batch of the world."
for %%i in (A B C D E F G H I J K L M N O P Q R S T U V W X Y Z) do set str=!str:%%i=%%i!
:lp
set/p=!str:~%n%,1!<nul
set/a n+=1
for /l %%j in (1,1,500) do ver>nul
if not "!str:~%n%,1!"=="" goto lp
pause>nul
复制代码

@echo off&setlocal enabledelayedexpansion
set "SmallNum=i like the bathome,because here is the batch of the world"
set "ChangeSmallNum=%SmallNum% "
set "BigNum=A B C D E F G H I J K L M N O P Q R S T U V W X Y Z"
:lp
set frist=%SmallNum:~,1%
for %%i in (%BigNum%) do (
   for /l %%m in (1 1 5) do (for %%x in (a b c d e f) do color %%x)
  if /i "%frist%"=="%%i" set /p=%%i<nul
)
if "%frist%"=="," set /p=,<nul
if "%frist%"==" " set /p= <nul
set SmallNum=%SmallNum:~1%
if defined SmallNum goto :lp
pause>nul
复制代码

@echo off&setlocal enabledelayedexpansion&color 5c
set "SmallNum=i like the bathome,because here is the batch of the world"
set "ChangeSmallNum=%SmallNum% "
set "BigNum=A B C D E F G H I J K L M N O P Q R S T U V W X Y Z"
for %%i in (%BigNum%) do (
 set ChangeSmallNum=!ChangeSmallNum:%%i=%%i!
)
::echo %SmallNum%
::echo %ChangeSmallNum%
:lp
for /l %%m in (1 1 5) do (for %%x in (a b c d e f) do color %%x)
set Frist=%ChangeSmallNum:~,1%
set ChangeSmallNum=%ChangeSmallNum:~1%
if defined ChangeSmallNum set /p=%Frist%<nul&ping -n 1. localhost >nul &goto :lp
pause>nul
复制代码

%老刘制作——字符串转大写（只改动英文字母）%
%由于DOS子系统的限制，汉字将会丢失，变作两个英文问号%
@Echo off
IF /i "%PROCESSOR_ARCHITECTURE%" EQU "AMD64" (
	Echo DEBUG和8086_ASM不支持64位的系统。
	Pause&Exit
)
IF "%*" NEQ "" (Set "Str=%*") Else GOTO :EOF
For /F "DELIMS=" %%. in (
	'^(Echo E 20:0 "%Str:"=%",0^&MORE +18 "%~0"^)^|DEBUG'
) Do (
	IF "%%." NEQ "Program terminated normally" (
		Set "转换后字符=%%."
	) Else (
		CALL ECHO %%转换后字符%%
		GOTO :EOF
	)
)
R DS
	20
R AX
	200
A 100
	;汇编代码开始——————————————
	MOV	DL,[BX]	;得到BX指向字符的Ascii码
	CMP	DL,00	;检测是否为字符串末端
	JE	11B	;如果为末端，跳到INT指令处退出
	;分割————————————————————
	CMP	DL,61	;检测是否是小写字母
	JB	114
	CMP	DL,7A
	JA	114
	;分割————————————————————
	AND	DL,5F	;转换为大写字符
	INT	21H	;显示字符
	INC	BX	;BX指向下一个字符
	JMP	100	;循环读取
	;分割————————————————————
	MOV	AH,0	;退出
	INT 20H
	;汇编代码结束——————————————
	;注意：下方的空行不能移除

G
Q
老刘制作～
复制代码