Recommend a simple and interesting webmaster to promote animation

Source: Internet
Author: User
Keywords Website promotion

Intermediary transaction http://www.aliyun.com/zixun/aggregation/6858.html ">seo diagnose Taobao guest cloud host technology Hall

This is an interesting, animated batch. Today in the red and black found, 211.html "> feel very interesting can be used to watch the website to promote or can!" The following small modification of the original!

The following are the referenced contents:

@echo off


setlocal enabledelayedexpansion


set fu= ^/^\


set "kong="


set "kong2=____________________________________________________________________________"


set/a a=0,b=0,e=2,tiao=0


: A


set/a b+=1,c=30-%b%+%e%


CLS


Echo, I'm on my way to find the Web site ...-


for/l%%a in (1,1,6) do Echo,


echo,!kong:~0,%b%!_ @


echo,!kong:~0,%b%! ^/


echo,!kong2:~0,%b%!! fu:~%a%,2!! kong2:~0,%c%!


Ping-n>nul


if%a% equ 4 (set/a a=0) Else (set/a a+=1)


if%a% Leq 2 (set e=2)


if%a% equ 3 (set e=3)


if%a% equ 4 (set e=4)


if not%b% equ goto:a else goto:b


set/a b=30,j=0,k=6


: b


if not%j% equ 6 (set/a j+=1,tiao=%j%) Else (set/a k-=1,tiao=%k%)


set/a b+=1,up=6-%tiao%


CLS


for/l%%a in (1,1,%up%) do Echo,


echo,!kong:~0,%b%! @/


echo,!kong:~0,%b%!^<^/


echo,!kong:~0,%b%!! /^>


for/l%%a in (1,1,%tiao%) do Echo,


echo,!kong2:~0,30!


Ping-n>nul&ping-n>nul


if%a% equ 4 (set/a a=0) Else (set/a a+=1)


if%k%==0 (goto:c1) Else (goto:b)


: C1


set/a cc=0,dd=0


set call1= Hey, got it!


: C


if not%tiao% equ set/a tiao+=1


if not%b% equ set/a b+=1


if not "%cc%" = = "(set/a cc+=1,num=30-%cc%)


if "%cc%" = = "" If not "%dd%" = = "set/a dd+=1


CLS


for/l%%a in (1,1,9) do Echo,


echo,!kong2:~0,%num%!


for/l%%a in (1,1,%tiao%) do Echo,


if%tiao% equ echo,!kong:~0,%b%!! call1:~0,%dd%!


echo,!kong:~0,%b%!_ @


echo,!kong:~0,%b%! ^/\ 


echo,!kong:~0,%b%!! fu:~%a%,2!


if%tiao% LSS (Ping-n>nul&ping-n>nul&ping-n>nul) Else (Ping-n>nul)


if%a% equ 4 (set/a a=0) Else (set/a a+=1)


If "%dd%" = "=" (ping-n 2 127.1>nul &goto:d 1) Else (GOTO:C)


:d 1


Set name= 7 7 5 9. C o m


set/a a=0


CLS


Color 02


:d D


if%time:~10,1% LSS 3 set/a a+=1


Set an=%random%%random%%random%%random%%random%%random%%random%%random%%random%


Set an=%an:~0,20%!name:~0,%a%!%an:~20%


if%a% equ set an= 7 7 5 9. C o m &color 0a


CLS


Echo.&echo.&echo.


Echo.


Echo.


Echo.


Echo.


Echo.


Echo.


Echo.


Echo.


Echo.


Echo.


Echo.


Echo.


Echo.


Echo. %an%


Echo.&echo.&echo.


Echo. @ Wow Legendary ww.7759.com[most practical Web site encyclopedia]


echo.^<^|\


echo./\


Ping-n>nul


if%a% lss (goto:d D) Else (goto:end)


: End


Pause>nul

Copy the code in the reference to Notepad to save the file format. txt rename to. bat file! Let's test and then revise the contents.

Related Article

Contact Us

The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion; products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the content of the page makes you feel confusing, please write us an email, we will handle the problem within 5 days after receiving your email.

If you find any instances of plagiarism from the community, please send an email to: info-contact@alibabacloud.com and provide relevant evidence. A staff member will contact you within 5 working days.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.