[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[特效代码] 点阵的特效,模仿批处理广告的。

本帖最后由 canyuexiaolang 于 2011-12-18 12:42 编辑

批处理广告的那个点阵。。。实在是无能为力了。。呵呵。。写着玩。

  1. @echo off & setlocal enabledelayedexpansion & mode con:cols=94 lines=14 & title 点阵特效 By Canyuexiaolang
  2. set "balck=50 5 21 7 13 1 5 1 20 1 6 1 11 1 27 1 7 1 10 1 27 1 7 1 10 1 27 1 7 1 10 1 10 3 3 1 1 2 7 1 7 1 3 3 4 1 9 1 3 1 2 2 2 1 6 1 7 1 2 1 3 1 3 1 8 1 4 1 2 1 3 1 6 1 7 1 2 1 3 1 3 1 8 1 4 1 2 1 3 1 6 1 7 1 2 1 3 1 4 1 5 1 1 1 3 2 2 1 3 1 6 1 6 1 3 1 3 1 5 5 3 3 2 1 1 1 3 1 6 7 5 3 50" & set "z=1"
  3. for %%i in (%balck%) do (set /a z+=1 & set /a int=z%%2
  4. if "!int!"=="0" (for /l %%j in (1 1 %%i) do set /p=■<nul&for /l %%z in (1 1 300) do ver>nul) else (for /l %%j in (1 1 %%i) do set /p=□<nul&for /l %%z in (1 1 300) do ver>nul))
  5. pause>nul
复制代码

黒方块和灰方块???

TOP

返回列表