找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 19265|回复: 1

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

[复制链接]
发表于 2011-12-18 12:38:11 | 显示全部楼层 |阅读模式
本帖最后由 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
复制代码
发表于 2011-12-18 13:40:47 | 显示全部楼层
黒方块和灰方块???
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-18 12:47 , Processed in 0.016264 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表