
批處理特效之“看我倒背如流”最后由 batman 于 -8-17 00:02&&相信大家都知道倒背如流的意思吧,下面我們就用批來模擬對文本的倒背特效:
暫只適用于每行少于80個字符的純英文文本,測試文本a.txt如下:nclick="copycode($('code0'));">復制代碼
- @echo off&setlocal enabledelayedexpansion
- rem 因論壇處理不了制表符,請將下面tab=后面的空格替換為制表符再運行代碼
- set tab=
- for /l %%a in (10000,1,11000) do (
- set tg=!tg!&set k=!k!
- set str=%%a&set code=!str:~1!!code!
- )
- echo,&echo,┌────────────────────┐
- echo,&echo,└────────────────────┘
- echo,%tab%%tg:~,24%
- for /l %%a in (1,1,20) do (
- set /a bf=%%a*5,n=40-2*%%a
- set /p=!tg!│<nul
- for /l %%b in (1,1,%%a) do set /p=■<nul
- for %%i in (!n!) do set /p=!k:~,%%i!│文本閱讀中,請稍等...!bf!%%<nul
- for /l %%c in (1,1,2000) do echo,>nul
- )
- cls&&echo,&echo,下面且看我倒背如流:&echo,
- for /f tokens=1* delims=: %%a in ('findstr /n .* a.txt') do (
- set _%%a=%%b&set /a n=%%a&echo,
- )
- for /l %%a in (%n%,-1,1) do (
- set /a s=n-%%a+1,m=s*10+12
- for /l %%b in (1,1,!s!) do echo,
- for %%b in (!m!) do echo,%tab%!tg:~,%%b!
- if defined _%%a (
- set str=!_%%a!!_%%a!!_%%a!!_%%a!%code%
- set /a sw=1!str:~4000,4! %% 10000
- for /l %%b in (1,1,!sw!) do (
- set /a kw=sw-%%b
- for %%c in (!kw!) do set /p=!k:~,%%c!!_%%a:~-%%b,%%b!<nul
- for /l %%c in (1,1,200) do echo,>nul
- set /p=!tg!<nul
- )
- )
- )
- pause>nul
nclick="copycode($('code1'));">復制代碼
- I loved you, and I probably still do,
- And for a while the feeling may remain...
- But let my love no longer trouble you,
- I do not wish to cause you any pain.
- I loved you; and the hopelessness I knew,
- The jealousy, the shyness - though in vain -
- Made up a love so tender and so true

