中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net  论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
« [1] [2] »
作者:
标题: [小效果]彩色蜿蜒曲线 上一主题 | 下一主题
523066680
银牌会员

SuperCleaner


积分 2362
发帖 1133
注册 2008-2-2
状态 离线
『楼 主』:  [小效果]彩色蜿蜒曲线

很久没有发帖了 找个机会发一帖:彩色蜿蜒曲线
@echo off
::code by 523066680 / if_exist
setlocal enabledelayedexpansion
for /l %%a in (1,1,80) do (set k= !k!)
set /a a=7,b=-6,color=0
set /p= <nul>OO
:a
  set /a color+=1
  if %a% gtr -6 (set /a a-=1,x=a*a) else (set /a b+=1,x=72-b*b)
  if %b% equ 6 (set /a a=6,b=-6)
  for %%a in (a b) do (
     set /p a=!k:~0,%x%!<nul
     findstr /a:%color%  "OO*"
     echo,
  )
  ping -n 1 127.1>nul
if %color% leq 200 goto :a
pause
就试发一次,看有没有人看………

[ Last edited by 523066680 on 2009-8-14 at 10:21 ]

   此帖被 +20 点积分         点击查看详情   
评分人:【 netbenton 分数: +15  时间:2009-8-20 08:08
评分人:【 zouzhxi 分数: +4  时间:2009-10-5 21:13
评分人:【 Evangel 分数: +1  时间:2009-11-9 00:40




综合型编程论坛

我的作品索引
  
2009-8-14 10:09
查看资料  发送邮件  访问主页  发短消息 网志  OICQ (523066680)  编辑帖子  回复  引用回复
qinchun36
高级用户

据说是李先生


积分 609
发帖 400
注册 2008-4-23
状态 离线
『第 2 楼』:  

跟哪个小人脸一样无法运行,难道是机器问题 ?

2009-8-14 12:34
查看资料  发送邮件  发短消息 网志  OICQ (182484135)  编辑帖子  回复  引用回复
Michale
初级用户




积分 52
发帖 27
注册 2006-10-6
来自 ☆逍遥宫☆
状态 离线
『第 3 楼』:  

测试通过。。
关键是学习楼主代码的思维。。。
楼上的“无法运行”是什么意思。。



爱!
2009-8-15 04:05
查看资料  访问主页  发短消息 网志   编辑帖子  回复  引用回复
matlan
初级用户




积分 87
发帖 63
注册 2008-8-23
状态 离线
『第 4 楼』:  

好精彩

2009-8-15 04:28
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
knoppix7
银牌会员





积分 1287
发帖 634
注册 2007-5-2
来自 cmd.exe
状态 离线
『第 5 楼』:  

正弦?

2009-8-16 21:10
查看资料  发短消息 网志   编辑帖子  回复  引用回复
523066680
银牌会员

SuperCleaner


积分 2362
发帖 1133
注册 2008-2-2
状态 离线
『第 6 楼』:  

不是正弦~



综合型编程论坛

我的作品索引
  
2009-8-18 07:16
查看资料  发送邮件  访问主页  发短消息 网志  OICQ (523066680)  编辑帖子  回复  引用回复
lrbin50
新手上路





积分 10
发帖 5
注册 2009-7-11
状态 离线
『第 7 楼』:  

很强大的啊,楼主能一行一行的解释一下就好了。

2009-8-18 07:48
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
523066680
银牌会员

SuperCleaner


积分 2362
发帖 1133
注册 2008-2-2
状态 离线
『第 8 楼』:  

还是喜欢这里的氛围啊  知道吗 这个帖子在某个地方看都没人看啊。

应楼上的 我先简单说一下:做这个之前是觉得在批处理画 x=y^2 的曲线还
挺漂亮的  所以就把函数改成了循环的,而且在适当的时候反向。就构成了蜿蜒的曲线

  Quote:
                                     #
                         #
                #
         #
    #
#
#
#
    #
         #
                #
                         #
                                    #
                                               #

[ Last edited by 523066680 on 2009-8-18 at 09:33 ]



综合型编程论坛

我的作品索引
  
2009-8-18 09:27
查看资料  发送邮件  访问主页  发短消息 网志  OICQ (523066680)  编辑帖子  回复  引用回复
zouzhxi
中级用户

蝴蝶之吻


积分 430
发帖 177
注册 2006-9-20
来自 广东深圳
状态 离线
『第 9 楼』:  

如果是横着走的话,会更好看的。哈哈,学习中。。。



Butterfly Kiss Blog
计算机DIY联盟论坛
2009-8-21 23:28
查看资料  发送邮件  访问主页  发短消息 网志  OICQ (234693993)  编辑帖子  回复  引用回复
523066680
银牌会员

SuperCleaner


积分 2362
发帖 1133
注册 2008-2-2
状态 离线
『第 10 楼』:  

可以做啊,不过这样的话。每次要刷屏 可能机子都会卡了……

而要加上彩色,效果就差多。

用tc试着写过,感觉效果差一些。毕竟是刷全屏再补上……



综合型编程论坛

我的作品索引
  
2009-8-22 00:07
查看资料  发送邮件  访问主页  发短消息 网志  OICQ (523066680)  编辑帖子  回复  引用回复
kirov
版主

Pfc.YangZJ


积分 412
发帖 223
注册 2008-12-31
来自 上海杨浦
状态 离线
『第 11 楼』:  

不错。。不过就是为什么会生成个临时文件??



以牙还牙,加倍奉还。

----BH4EAW 杨志杰

Blog:我的blog
2009-9-19 10:43
查看资料  发送邮件  访问主页  发短消息 网志  OICQ (837806894)  编辑帖子  回复  引用回复
tj051181
新手上路





积分 5
发帖 4
注册 2009-9-9
状态 离线
『第 12 楼』:  

很漂亮

不过代码现在还看不懂。。

继续学习

2009-9-19 10:43
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
523066680
银牌会员

SuperCleaner


积分 2362
发帖 1133
注册 2008-2-2
状态 离线
『第 13 楼』:  

真高兴,又有人看了 ^_^



综合型编程论坛

我的作品索引
  
2009-9-19 12:15
查看资料  发送邮件  访问主页  发短消息 网志  OICQ (523066680)  编辑帖子  回复  引用回复
Evangel
初级用户





积分 145
发帖 95
注册 2008-4-12
状态 离线
『第 14 楼』:  

眼睛花了……

2009-11-9 00:41
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
vsbat
新手上路




积分 8
发帖 8
注册 2009-9-5
状态 离线
『第 15 楼』:  

好看的很----------
学习学习---

2009-11-10 15:18
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
« [1] [2] »
请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: