TC官方合作论坛
标题:
小玩意
[打印本页]
作者:
冷月无痕
时间:
2012-4-15 19:55
标题:
小玩意
昨天晚上听嚣张说了一个小脚本,功能是开启两个记事本,一个大的一个小的,运行脚本以后无论把大记事本移动到什么位置,小的记事本会围绕着大记事本的边框不停旋转!今天无聊就用TC写了一个,现在发出来博大家一笑!也许能给大家一点启发,应用到游戏脚本的制作中!
脚本界面就一个开始和退出,点击开始自动打开两个记事本并设置大小,修改窗口标题为"我是地球"和"我是月亮",然后月亮当然会围绕着地球转啦,无论把地球移动到屏幕的什么位置,月亮依然围绕着地球转!点击退出,脚本自动关闭两个记事本窗口和脚本!
应用到的技术:
1.通过窗口a的位置和大小,设置窗口b的位置
2.利用线程的扩展开启关闭进程
3.利用窗口标题关闭进程
4.自定义ico图标(大家看看我的ico图标怎么样撒,和我的论坛头像一样滴,哈哈)
下面是代码:
空间 小玩意
整型 顶层句柄1,顶层句柄2,循环线程
功能 整型 生成()
整型 x,y
辅助.命令("notepad",真)
辅助.等待(500)
顶层句柄1=窗口.顶层窗口句柄()
窗口.设置大小(顶层句柄1,500,500)
窗口.设置位置(顶层句柄1,100,100)
窗口.设置标题(顶层句柄1,"我是地球")
辅助.命令("notepad",真)
辅助.等待(500)
顶层句柄2=窗口.顶层窗口句柄()
窗口.设置大小(顶层句柄2,50,50)
窗口.设置标题(顶层句柄2,"我是月亮")
窗口.设置位置(顶层句柄2,600,100)
返回 0
功能结束
功能 整型 转圈()
整型 起点
循环(真)
整型 x,y,小x,小y,移动
窗口.获取位置(顶层句柄1,x,y)
窗口.获取位置(顶层句柄2,小x,小y)
循环(小x==x+500&&小y<y+500)
窗口.获取位置(顶层句柄1,x,y)
小x=x+500
移动=移动+1
小y=y+移动
窗口.设置位置(顶层句柄2,小x,小y)
窗口.置顶(顶层句柄2,真)
循环结束
移动=0
循环(小y==y+500&&小x>x-120)
窗口.获取位置(顶层句柄1,x,y)
小y=y+500
移动=移动+1
小x=x+500-移动
窗口.设置位置(顶层句柄2,小x,小y)
窗口.置顶(顶层句柄2,真)
循环结束
移动=0
循环(小x==x-120&&小y>y-50)
窗口.获取位置(顶层句柄1,x,y)
小x=x-120
移动=移动+1
小y=y+500-移动
窗口.设置位置(顶层句柄2,小x,小y)
窗口.置顶(顶层句柄2,真)
循环结束
移动=0
循环(小y==y-50&&小x<x+500)
窗口.获取位置(顶层句柄1,x,y)
小y=y-50
移动=移动+1
小x=x-120+移动
窗口.设置位置(顶层句柄2,小x,小y)
窗口.置顶(顶层句柄2,真)
循环结束
移动=0
循环(小x==x+500&&小y<y)
窗口.获取位置(顶层句柄1,x,y)
小x=x+500
移动=移动+1
小y=y-50+移动
窗口.设置位置(顶层句柄2,小x,小y)
窗口.置顶(顶层句柄2,真)
循环结束
循环结束
返回 0
功能结束
功能 整型 线程销毁()
整型 进程1=进程.获取进程句柄("我是月亮")
整型 进程2=进程.获取进程句柄("我是地球")
进程.关闭进程(进程1)
进程.关闭进程(进程2)
辅助.退出()
返回 0
功能结束
功能 逻辑型 开始_点击()
小玩意.生成()
循环线程=线程.扩展开启("小玩意.转圈","","小玩意.线程销毁","")
返回 真
功能结束
功能 逻辑型 退出_点击()
线程.关闭(循环线程)
返回 真
功能结束
功能 逻辑型 销毁()
线程.关闭(循环线程)
返回 真
功能结束
空间结束
复制代码
[attach]2791[/attach]
备注:代码是3.0版本的,大家用别版本注意线程扩展开启的命令格式!
作者:
bacsj118
时间:
2012-4-15 19:59
:smoke 应用在什么地方
作者:
冷月无痕
时间:
2012-4-15 20:02
回复
2楼
bacsj118
的帖子
比如你的游戏脚本主界面和副界面窗口的拼接之类的
当然不仅仅如此,看你的思想能有多远啦!:D
作者:
978249858
时间:
2012-4-15 20:16
看看
作者:
cylhb
时间:
2012-4-15 20:18
3.0
期待3.0使用
作者:
冷月无痕
时间:
2012-4-15 20:21
回复
5楼
cylhb
的帖子
别的版本也能用吖 改下扩展开启的命令格式就好了
作者:
cylhb
时间:
2012-4-15 20:26
-.-你误会了
这个功能实现还是不难得
我只是期待3.0的出现而已
作者:
jianyuanit
时间:
2012-4-15 22:03
下载试试................
作者:
zhangopg
时间:
2012-4-16 06:46
额!我看到帖子就知道是你小子发的.
作者:
TC兔子
时间:
2012-4-16 07:41
扩展开启,把多余的那两个双引号去掉就能用了~~
作者:
冷月无痕
时间:
2012-4-16 16:14
回复
9楼
zhangopg
的帖子
嘿嘿 测试了没 效果是不是和你说的那个差不多?
作者:
a389099459
时间:
2012-4-20 15:08
好东西
作者:
shuisister
时间:
2012-4-23 17:23
新手顶一个1
作者:
597585225
时间:
2012-4-23 17:51
:)//////////////////////////////////////
欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)
Powered by Discuz! X3.1