设为首页收藏本站亲,今天是2018年01月20日,离还有-17550.666666667天。

易源码

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 78|回复: 0

易语言动态射线源码

[复制链接]

3188

主题

7949

帖子

1万

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
19393
发表于 2017-11-27 09:07:05 | 显示全部楼层 |阅读模式
链接:http://pan.baidu.com/s/1o7WBTUy 密码:o7wh

  
窗口程序集名保 留  保 留备 注
窗口程序集1   
变量名类 型数组备 注
横向位置_程序集整数型  
纵向位置_程序集整数型  

子程序名返回值类型公开备 注
_画板1_鼠标位置被移动逻辑型 
参数名类 型参考可空数组备 注
横向位置整数型   
纵向位置整数型   
功能键状态整数型   
' --========  易语言资源网  ([url]www.wodesoft.com[/url])  ======--
' 努力创建完善、持续更新的易语言学习例程源码资源站
' --================   [url]www.wodesoft.com[/url]  ===========--
' --==================   易语言资源网注意事项  ================--
' * 易语言资源网为易语言官方站、易语言官方论坛提供辅助资源站;
' 本易语言资源网( [url]www.wodesoft.com[/url])所有软件和资料均为软件作者提
' 供和网友推荐发布而来,其版权归该软件和程序源码的合法拥有者所
' 有,本站易语言资源网整理收集仅供易语言用户学习和易语言技术研
' 究探讨使用,不得用于任何商业用途。如果由于以上原因造成的版权
' 纠纷本站概不负责!
' * 本站资源未经许可,任何网站不得非法盗链及抄袭本站资源;如引用
' 页面,请注明来自易语言资源网,谢谢合作!
' --=====================   [url]www.wodesoft.com[/url]  ================--
横向位置_程序集 = 横向位置
纵向位置_程序集 = 纵向位置
' 调试输出 (横向位置)
' 调试输出 (纵向位置)
子程序名返回值类型公开备 注
子程序1  
变量名类 型静态数组备 注
x整数型 画板宽
y整数型 画板高
i整数型  
半径整数型  
x = 画板1.宽度
y = 画板1.高度
画板1.画直线 (0, 0, 横向位置_程序集, 纵向位置_程序集)
画板1.画直线 (x ÷ 2, 0, 横向位置_程序集, 纵向位置_程序集)
画板1.画直线 (x, 0, 横向位置_程序集, 纵向位置_程序集)
画板1.画直线 (x, y ÷ 2, 横向位置_程序集, 纵向位置_程序集)
画板1.画直线 (x, y, 横向位置_程序集, 纵向位置_程序集)
画板1.画直线 (x ÷ 2, y, 横向位置_程序集, 纵向位置_程序集)
画板1.画直线 (0, y, 横向位置_程序集, 纵向位置_程序集)
画板1.画直线 (0, y ÷ 2, 横向位置_程序集, 纵向位置_程序集)
. ' 变量循环首 (1, 350, 5, i)
' 画板1.画直线 (y × 求余弦 (i × #pi ÷ 180), x × 求正弦 (i × #pi ÷ 180), 横向位置_程序集, 纵向位置_程序集)
' ' x + r × 求余弦 (i × #pi ÷ 180), y + r × 求正弦 (i × #pi ÷ 180)
. ' 变量循环尾 ()
' 本源码来自易语言资源网([url]www.wodesoft.com[/url])
子程序名返回值类型公开备 注
_时钟1_周期事件  
画板1.清除 (, , , )
画板1.画笔颜色 = 取颜色值 (取随机数 (0, 255), 取随机数 (0, 255), 取随机数 (0, 255))
画板1.画笔粗细 = 取随机数 (1, 3)
' 画板1.画板背景色 = 取颜色值 (取随机数 (0, 255), 取随机数 (0, 255), 取随机数 (0, 255))
子程序1 ()
子程序名返回值类型公开备 注
__启动窗口_创建完毕  
置随机数种子 ()
子程序名返回值类型公开备 注
__启动窗口_位置被改变  
画板1.移动 (6, 6, _启动窗口.取用户区宽度 () - 12, _启动窗口.取用户区高度 () - 12)
子程序名返回值类型公开备 注
_画板1_鼠标右键被按下逻辑型 
参数名类 型参考可空数组备 注
横向位置整数型   
纵向位置整数型   
功能键状态整数型   
信息框 (“哈哈!这个效果是参照一个网页里面的效果做成的。。。”#换行符#换行符“                                      by 习惯沉默”, 0, )
' 本源码来自易语言资源网([url]www.wodesoft.com[/url])





上一篇:易语言动画录制播放源码
下一篇:易语言动态文字效果
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|易源码论坛 ( 123456  

GMT+8, 2018-1-20 01:41 , Processed in 0.089114 second(s), 10 queries , File On.

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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