加群与加好友模块（伪开源）

墨影0620

加群部分代码【绝大部分是搬运自某益友的开源】

  

子程序名	返回值类型	公开	备 注
执行加群
参数名	类 型	参考	可空	数组	备 注
要加入的QQ群	长整数型
要加群的QQ号	长整数型				要加群的QQ，留空默认使用当前在线的QQ

变量名	类 型	静态	数组	备 注
预定文本	文本型
临时文本	文本型
最终文本	文本型
循环次数	整数型
文本长度	整数型
欲加入QQ群	文本型
欲执行QQ号	文本型

欲加入QQ群 ＝ 到文本 (要加入的QQ群)
判断 (要加群的QQ号 ＝ 0)
欲执行QQ号 ＝ “”
欲执行QQ号 ＝ 到文本 (要加群的QQ号)
预定文本 ＝ “{” ＋ #引号 ＋ “groupUin” ＋ #引号 ＋ “:” ＋ 欲加入QQ群 ＋ “}”  ' {"ExtParam":{"appId": "21"},"groupUin":' + g + ',"visitor":1}
文本长度 ＝ 取文本长度 (预定文本)
循环次数 ＝ 1
判断循环首 (文本长度 ≥ 循环次数)
临时文本 ＝ 取十六进制文本 (取代码 (预定文本, 循环次数))
循环次数 ＝ 循环次数 ＋ 1
判断循环首 (取文本长度 (临时文本) ＜ 2)
最终文本 ＝ 最终文本 ＋ 临时文本
临时文本 ＝ “0” ＋ 临时文本
判断循环尾 ()
最终文本 ＝ 最终文本 ＋ 临时文本
判断循环尾 ()
' 调试输出 (最终文本)
打开指定网址 (“tencent://groupwpa/?subcmd=all¶m=” ＋ 到大写 (最终文本) ＋ “&fuin=” ＋ 欲执行QQ号)

i支持库列表	支持库注释
eAPI	应用接口支持库

.版本 2<br /> .支持库 eAPI<br /> <br /> .子程序 执行加群, , 公开<br /> .参数 要加入的QQ群, 长整数型<br /> .参数 要加群的QQ号, 长整数型, 可空, 要加群的QQ，留空默认使用当前在线的QQ<br /> .局部变量 预定文本, 文本型<br /> .局部变量 临时文本, 文本型<br /> .局部变量 最终文本, 文本型<br /> .局部变量 循环次数, 整数型<br /> .局部变量 文本长度, 整数型<br /> .局部变量 欲加入QQ群, 文本型<br /> .局部变量 欲执行QQ号, 文本型<br /> <br /> 欲加入QQ群 ＝ 到文本 (要加入的QQ群)<br /> .判断开始 (要加群的QQ号 ＝ 0)<br />     欲执行QQ号 ＝ “”<br /> .默认<br />     欲执行QQ号 ＝ 到文本 (要加群的QQ号)<br /> .判断结束<br /> 预定文本 ＝ “{” ＋ #引号 ＋ “groupUin” ＋ #引号 ＋ “:” ＋ 欲加入QQ群 ＋ “}”  ' {"ExtParam":{"appId": "21"},"groupUin":' + g + ',"visitor":1}<br /> 文本长度 ＝ 取文本长度 (预定文本)<br /> 循环次数 ＝ 1<br /> .判断循环首 (文本长度 ≥ 循环次数)<br />     临时文本 ＝ 取十六进制文本 (取代码 (预定文本, 循环次数))<br />     循环次数 ＝ 循环次数 ＋ 1<br />     .判断循环首 (取文本长度 (临时文本) ＜ 2)<br />         最终文本 ＝ 最终文本 ＋ 临时文本<br />         临时文本 ＝ “0” ＋ 临时文本<br />     .判断循环尾 ()<br />     最终文本 ＝ 最终文本 ＋ 临时文本<br /> .判断循环尾 ()<br /> ' 调试输出 (最终文本)<br /> 打开指定网址 (“tencent://groupwpa/?subcmd=all&#182;m=” ＋ 到大写 (最终文本) ＋ “&fuin=” ＋ 欲执行QQ号)

加好友部分源码，摘自论坛某个加好友与加群源码【他那个会报错超出数组成员】

  

子程序名	返回值类型	公开	备 注
执行加QQ
参数名	类 型	参考	可空	数组	备 注
要加的QQ	长整数型
使用的QQ	长整数型				要加群的QQ，留空默认使用当前在线的QQ

变量名	类 型	静态	数组	备 注
toQQ	文本型
useQQ	文本型

toQQ ＝ 到文本 (要加的QQ)
如果 (使用的QQ ＝ 0)
useQQ ＝ “”
useQQ ＝ 到文本 (使用的QQ)
打开指定网址 (“tencent://AddContact/?fromId=45&fromSubId=1&subcmd=all&uin=” ＋ toQQ ＋ “&fuin=” ＋ useQQ)

i支持库列表	支持库注释
eAPI	应用接口支持库

.版本 2<br /> .支持库 eAPI<br /> <br /> .子程序 执行加QQ, , 公开<br /> .参数 要加的QQ, 长整数型<br /> .参数 使用的QQ, 长整数型, 可空, 要加群的QQ，留空默认使用当前在线的QQ<br /> .局部变量 toQQ, 文本型<br /> .局部变量 useQQ, 文本型<br /> <br /> toQQ ＝ 到文本 (要加的QQ)<br /> .如果 (使用的QQ ＝ 0)<br />     useQQ ＝ “”<br /> .否则<br />     useQQ ＝ 到文本 (使用的QQ)<br /> .如果结束<br /> 打开指定网址 (“tencent://AddContact/?fromId=45&fromSubId=1&subcmd=all&uin=” ＋ toQQ ＋ “&fuin=” ＋ useQQ)

感谢广大易友开源！


补充内容 (2018-7-5 09:46):
打开指定网址在静态编译时候回出点问题

补充内容 (2018-7-7 16:12):
解决方法：编译为exe程序执行，使用超级模块的写共享和读共享来把数据共享给这个软件来执行。
使用窗口程序集执行，执行完毕后自动结束程序，这样看起来和直接调用似得。

补充内容 (2018-7-13 18:38):
可用易语言的窗口组件来解决静态编译不能用的问题。

momo123

持开源~！感谢分享

momo123

66666666666

墨影0620

qq945224099 发表于 2018-7-11 11:05
兄弟你没用过QQ么，用过QQ的话你去群里问群号在哪里找。。。 估计没几个不知道的

额？我问过群号在哪么？

清风漫月

前来学习，期待开源，不敢用

gaoqing

好像不错谢谢

墨影0620

竹席 发表于 2018-7-5 09:32
毫无意义

还有，我懒得取弄加群链接。可以用这个【貌似都差不多。。。】

不过这个逼格能高点，那个先跳转到浏览器在打开QQ，另外哪一个貌似没有办法指定使用某个QQ添加。

譬如我做了个机器人插件，要求必须用机器人的号加群。

Relieved

兄弟你没用过QQ么，用过QQ的话你去群里问群号在哪里找。。。 估计没几个不知道的

墨影0620

yinrui 发表于 2018-7-5 11:18
加群和加好友可以直接用QQ自带的加好友链接搞定呀。要搞个模块么

打开网页还要跳转到浏览器，没有逼格。
这一个直接打开添加界面2333

墨影0620

xxoo618 发表于 2018-7-6 15:51
哪群号在哪里找？

兄弟你没用过QQ么，用过QQ的话你去群里问群号在哪里找。。。
估计没几个不知道的

8238574

6666666666666666