恶作剧小程序,自己写的第一个autoit程序

For $i = 1 to 200

 $x = Random(10,1000)
 $y = Random(20,900)

 MouseMove($x, $y)  ;鼠标位置随机移动
HotKeySet("{Esc}", "captureEsc") ;接收键盘输入
Next

 


Func captureEsc();
MsgBox(0,"knifewei","this is a joke");提示并退出
Exit
EndFunc

 

程序运行后,你的鼠标会不受控制的移动,如果不做按esc键的话,会在移动200次后停止;

如果按esc会提示并退出。

程序很简单,一个for循环,让鼠标随机移动200次,然后再循环中接受键盘输入,设置事件触发;

当按下esc键时,提示是一个玩笑,并退出。

  第一次写autoit的程序,当个恶作剧的小程序吧,呵呵,

程序我已经测试通过,不过不要做坏事哦,

如果你有更好的autoit方面的小程序也教教我,我也是刚开始玩。

 

http://blog.youkuaiyun.com/knifewei/archive/2011/04/07/6308063.aspx 

 

刚刚又添加了对桌面和工具栏隐藏、和防止程序多次运行的代码,算是一个比较完整一点的恶作剧程序了,

详见我发的最新下载;

 http://download.youkuaiyun.com/source/3171528

 

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值