1489495009 发表于 2020-4-30 20:44:23

QQ骂人器

.版本 2
.支持库 shellEx
.支持库 xplib
.支持库 eAPI

.程序集 窗口程序集1
.程序集变量 FUCK, 整数型

.子程序 __启动窗口_创建完毕

七夜_雷蛇绿光 ()
奥姆时钟.时钟周期 ＝ 1
组合框1.现行选中项 ＝ -1
注册热键 (取窗口句柄 (), 透明标签2.取窗口句柄 (), 0, #F8键)
XP风格 (2)

.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型

FUCK ＝ 取鼠标所在窗口句柄 ()

.子程序 按键状态, 整数型
.参数 键值, 整数型

.判断开始 (状态 (键值) ＝ #拉拉啦)
    返回 (1)
.默认
    返回 (0)
.判断结束


.子程序 _奥姆时钟_周期事件


.如果真 (按键状态 (#F9键) ＝ 1)
    _潘多拉按钮_被单击 ()
.如果真结束
.如果真 (按键状态 (#F10键) ＝ 1)
    _按钮2_被单击 ()
.如果真结束


.子程序 _潘多拉按钮_被单击

可可时钟.时钟周期 ＝ (101 － 控制栏1.位置) × 50


.子程序 _可可时钟_周期事件
.局部变量 备用文本, 字节集
.局部变量 Q, 整数型


组合框1.现行选中项 ＝ 取随机数 (1, 56)
备用文本 ＝ 到字节集 (组合框1.内容)
.计次循环首 (取字节集长度 (备用文本), Q)
    发送消息_ (FUCK, 258, 备用文本 , 0)
.计次循环尾 ()
置剪辑板文本 (组合框1.内容)
模拟按键 (#Ctrl键, #V键, )
模拟按键 (#回车键, , )

.子程序 _按钮2_被单击

可可时钟.时钟周期 ＝ 0

.子程序 __启动窗口_托盘事件
.参数 操作类型, 整数型

.如果真 (操作类型 ＝ 2)
    _启动窗口.可视 ＝ 真
    置托盘图标 ({}, )
.如果真结束
.如果真 (操作类型 ＝ 3)
    弹出菜单 (菜单, , )
.如果真结束


.子程序 _打开_被选择

_启动窗口.可视 ＝ 真
置托盘图标 ({}, )

.子程序 _最小化_被选择

置托盘图标 (#哇哈哈, “大白鲨”)
_启动窗口.可视 ＝ 假

.子程序 _关闭_被选择

置托盘图标 ({}, )
结束 ()

.子程序 _帮助_被选择

信息框 (“按F8锁定鼠标所在窗口”, 0, )
信息框 (“QQ群：暂无”, 0, , )

1489495009 发表于 2020-4-30 20:45:14

如有违反，请原谅，然后联系我

小风铃 发表于 2020-5-1 20:48:16

楼主发贴辛苦了，谢谢楼主分享！我觉得易语言吧是注册对了！

鑫的skr 发表于 2020-5-10 22:24:59

DLL在哪

28649616 发表于 2020-6-1 17:01:26

目睹F**K:)

yzz110299 发表于 2020-6-1 17:40:55

1489495009 发表于 2020-4-30 20:45
如有违反，请原谅，然后联系我

66666666666666666666666666666666666666666

yzz110299 发表于 2020-6-1 17:41:36

28649616 发表于 2020-6-1 17:01
目睹F**K

666666666666666666666666666666666666666666

花藤 发表于 2020-6-25 23:21:20

这东西有啥用啊

19907120716 发表于 2020-6-28 15:29:21

楼主发贴辛苦了，谢谢楼主分享！我觉得易语言吧是注册对了！

zcx9900 发表于 2020-7-3 20:14:09

666666666666666666666666666666666666666666666666666
页: [1] 2
查看完整版本: QQ骂人器