|
发表于 2013-7-22 23:21:31
|
显示全部楼层
河南省平顶山市
.版本 2
.子程序 窗口抖动, , 公开, 经过了多次改善,效果自己试试
.参数 窗口, 窗口, , 如:_启动窗口
.参数 速度, 整数型, 可空, 默认为:100 可空 速度自己调整
.参数 抖动频率, 整数型, 可空, 默认为5 可空 数值越大抖动的效果越大
.如果真 (是否为空 (速度))
速度 = 20
.如果真结束
.如果真 (是否为空 (抖动频率))
抖动频率 = 5
.如果真结束
窗口.左边 = 窗口.左边 + 抖动频率 ÷ 2
延时 (速度)
窗口.左边 = 窗口.左边 + 抖动频率 ÷ 2
延时 (速度)
窗口.顶边 = 窗口.顶边 - 抖动频率 ÷ 2
延时 (速度)
窗口.顶边 = 窗口.顶边 - 抖动频率 ÷ 2
延时 (速度)
窗口.左边 = 窗口.左边 - 抖动频率 ÷ 2
延时 (速度)
窗口.左边 = 窗口.左边 - 抖动频率 ÷ 2
延时 (速度)
窗口.顶边 = 窗口.顶边 + 抖动频率 ÷ 2
延时 (速度)
窗口.顶边 = 窗口.顶边 + 抖动频率 ÷ 2
处理事件 () ' 没有这个电脑会吃不消
|
|