收藏本站 收藏本站
积木网首页 - 技术学院 - 软件测试 - 网站黄页 - 常用手册 - 站长工具 - 技术社区
首页 > DOS命令 > 正文

首页 - PHP - 数据库 - 操作系统 - 游戏开发 - JS - Android - MySql - Redis - MongoDB - Win8 - Shell编程 - DOS命令 - jQuery - CSS样式 - Python - Perl

Access - Oracle - DB2 - SQLServer - MsSql2008 - MsSql2005 - Sqlite - PostgreSQL - node.js - extjs - JavaScript vbs - Powershell - Ruby

批处理实现乱雨纷飞(黑客帝国特效)

废话少说,直接先上一个特效代码

@echo off&mode con cols=42 lines=20&color 02
set m=1&set v=1
set code==^^^&%%%^:!$#^>^<:=~*()@"'`;|-_+?,.ghijklmnopqrstuvwxyz0123456789abcdef
setlocal enabledelayedexpansion
:begin
set /a num=%random%%%40+1,num1=num,num=200/num
title 乱雨纷飞,当前雨量:%num1%
:lp
set /a a=%random%%%63,b=%random%%%%num%
set a=!code:~%a%,1!
if %b% equ 0 (set "b=!a!") else (set "b= ") 
set str%m%=!str%m%!!b!
set /a n+=1
if %n% lss 40 goto lp
set /a x+=1,w+=1
if %x% equ 40 call :lop
cls&for /l %%i in (%m%,-1,%v%) do echo.!str%%i!
set /a m+=1
if %m% geq 20 set /a v+=1
if %w% equ 100 (set w=0&goto begin) else (set n=0&goto lp)
:lop
set /a a=%random%%%15+1
set a=!code:~-%a%,1!
color 0!a!&set x=0

有小伙伴说了,为什么不把它改成下落 101010 的呢?那样的话不是像黑客帝国里的画面了码???

好吧,我们来把他实现

@echo off&mode con cols=42 lines=20&color 02
setlocal enabledelayedexpansion
set code=123456789abcdef
set m=1&set v=1
title 黑客帝国数码雨 by bat-zw19750516
:begin
set /a a=%random%%%2,b=%random%%%3
if %b% neq 0 (set b=%a%) else (set "b= ") 
set str=%str%%b%
set /a n+=1
if %n% lss 40 goto begin
set /a m+=1,x+=1
if %m% geq 20 set /a v+=1 
set str%m%=%str%
cls&for /l %%i in (%m%,-1,%v%) do echo.!str%%i!
if %x% equ 20 call :lp
set str=&set n=0
goto begin
:lp
set /a a=%random%%%15,x=0
set a=!code:~%a%,1!
color 0%a%

当然上面的是高手写的,我们来看个新手简单完成的样子

@echo off
title 黑客帝国数码雨效果
color 02
setlocal ENABLEDELAYEDEXPANSION
for /l %%i in (1,1,80) do (
set Down%%i=0
)
:heike
for /l %%j in (1,1,80) do (
set /a guxing%%j-=1
if !guxing%%j! LSS 0 (
set /a hanye%%j=!random!%%4
set /a guxing%%j=!random!%%15+10
)
if "!hanye%%j!" == "1" (
set /a shu=!random!%%2
set /p=!shu!<NUL
) else (
set /p= <NUL
)
)
goto heike

是不是对这种特效有了新的认识了呢,是不是立刻就想精通批处理了呢,努力吧,小伙子们。

批处理实现过滤重复行
a.txt内容如下:123456789123123789获取重复的行,并且重复的行只保留一次,处理后得到b.txt内容如下:123789方法1:@echooffREM缺点1:无法处理特别大的文件REM

批处理完美实现FTP远程备份数据
经过再次努力,终于完成了自己的比较满意的版本,大家多批评……批处理功能:输入几个参数,让批处理代你完成烦琐的工作吧!远程FTP文件到本地

批处理制作二维码生成器
这个程序不能直接支持Unicode,同样不能直接支持任何双字节或多字节字符(包括汉字),但可以用十六进制转码的方式生成包含Unicode(或其他任何编码)字符的

本周排行

更新排行

强悍的草根IT技术社区,这里应该有您想要的! 友情链接:b2b电子商务
Copyright © 2010 Gimoo.Net. All Rights Rreserved  京ICP备05050695号