标题: [原创]应ppdos的要求，发一个画正弦的bat [打印本页]
作者: scriptor 时间: 2007-1-13 22:22 标题: [原创]应ppdos的要求，发一个画正弦的bat
@echo off
:lp
for /l %%a in (1,1,4) do (
for /l %%i in (0,1,%%a) do (
>>con set/p= <nul)
echo *
ping -n 0 127.1>nul
)
for /l %%a in (4,-1,1) do (
for /l %%k in (0,1,%%a ) do (>>con set/p= <nul)
echo *
ping -n 0 127.1>nul
)
goto :lp
可惜只能竖着输出，你们改进一下。
[ Last edited by scriptor on 2007-1-13 at 09:34 AM ]
作者: everest79 时间: 2007-1-13 22:30
这样子来
@ECHO OFF
SETLOCAL ENABLEDELAYEDEXPANSION
SET P1=A&SET P2=_&SET XYZ=1,2,19&SET ZYX=20
:TOP
FOR /L %%a IN (%XYZ%) DO (
FOR /L %%b IN (1,1,78) DO (
SET /A xyz1=%ZYX%-%%a,xyz2=%ZYX%+%%a
IF %%b EQU !xyz1! (
SET /P=%P1%<nul) ELSE (
IF %%b EQU !xyz2! (
SET /p=%P1%<nul) ELSE (
IF %%a%%b EQU 1977 (
SET /P=%P1%<nul) ELSE (
SET /p=%P2%<nul)
)
)
)
ECHO.)
IF NOT %XYZ:~-1% EQU 1 (SET XYZ=17,-2,1&&SET ZYX=58&&GOTO TOP)
pause>nul
SETLOCAL ENABLEDELAYEDEXPANSION
SET P1=A&SET P2=_&SET XYZ=1,2,19&SET ZYX=20
:TOP
FOR /L %%a IN (%XYZ%) DO (
FOR /L %%b IN (1,1,78) DO (
SET /A xyz1=%ZYX%-%%a,xyz2=%ZYX%+%%a
IF %%b EQU !xyz1! (
SET /P=%P1%<nul) ELSE (
IF %%b EQU !xyz2! (
SET /p=%P1%<nul) ELSE (
IF %%a%%b EQU 1977 (
SET /P=%P1%<nul) ELSE (
SET /p=%P2%<nul)
)
)
)
ECHO.)
IF NOT %XYZ:~-1% EQU 1 (SET XYZ=17,-2,1&&SET ZYX=58&&GOTO TOP)
pause>nul
作者: scriptor 时间: 2007-1-13 22:33
你的想法我试过了
我不能解决的是，怎么让他一个接一个的输出
所以就弄了一个竖直输出的
呵呵
作者: scriptor 时间: 2007-1-13 22:33
你的很有意思
呵呵
收藏了
作者: boluor 时间: 2007-1-13 22:47
收藏了
作者: everest79 时间: 2007-1-13 23:30
原来想弄个画字的出来，结果太复杂没搞好，不过这个还可以
作者: 9527 时间: 2007-1-13 23:56
这样会更好玩，修改楼主的
@echo off&setlocal&cls
:lp
for /l %%a in (1,1,4) do (
for /l %%i in (0,1,%%a) do (
set/p= <nul)
if %%a equ 1 echo * ^│^│
if %%a equ 2 echo * ^│
if %%a equ 3 set/p=<nul&echo ^│ *
if %%a equ 4 set/p=<nul&echo ^│^│ *
ping -n 0 127.1>nul
)
for /l %%a in (4,-1,1) do (
for /l %%k in (0,1,%%a ) do (set/p= <nul)
if %%a equ 1 echo * ^│^│
if %%a equ 2 echo * ^│
if %%a equ 3 set/p=<nul&echo ^│ *
if %%a equ 4 set/p=<nul&echo ^│^│ *
ping -n 0 127.1>nul
)
goto :lp
纯属灌水，注意，像发廊的标志啊:lp
for /l %%a in (1,1,4) do (
for /l %%i in (0,1,%%a) do (
set/p= <nul)
if %%a equ 1 echo * ^│^│
if %%a equ 2 echo * ^│
if %%a equ 3 set/p=<nul&echo ^│ *
if %%a equ 4 set/p=<nul&echo ^│^│ *
ping -n 0 127.1>nul
)
for /l %%a in (4,-1,1) do (
for /l %%k in (0,1,%%a ) do (set/p= <nul)
if %%a equ 1 echo * ^│^│
if %%a equ 2 echo * ^│
if %%a equ 3 set/p=<nul&echo ^│ *
if %%a equ 4 set/p=<nul&echo ^│^│ *
ping -n 0 127.1>nul
)
goto :lp
作者: everest79 时间: 2007-1-14 00:00
若是每隔一段就用|来代替对应的会有旋转的视觉效果吧
作者: vkill 时间: 2007-1-14 03:03
我觉得这个样子不怎么好
作者: PPdos 时间: 2007-1-14 06:51
哈哈 虽然是纵向显示 还是不错~ 此题还在研究中 加分+
作者: learner0 时间: 2008-3-4 16:15
大狭真有才．．．．
作者: zljzsm 时间: 2008-5-12 06:09
学习了~~~~~~~~~~~~~~~~
作者: kk12369 时间: 2008-5-17 01:24
不错向你学习