求大大帮添加

单身戒指 · 发表于 2012-9-15 12:15:37

.版本 2.支持库 EThread.支持库 spec
.子程序 _开始按钮_被单击
.如果真 (Cookie ＝ “”) 信息输出 (#红色, “请先登录！”) 返回 ().如果真结束.如果真 (贴吧编辑框.内容＝ “”) 信息输出 (#红色, “请填写贴吧！”) 返回 ().如果真结束开始按钮.禁止＝真停止按钮.禁止＝假贴吧＝ URL编码GBK (贴吧编辑框.内容)间隔＝到整数 (间隔编辑框.内容) × 1ID ＝ ID编辑框.内容原始内容＝内容编辑框.内容启动线程 (&抢二楼, , 线程句柄)
.子程序抢二楼, , 公开, 多线程.局部变量 svxml, SvXml.局部变量 retstream, 文本型.局部变量 left, 整数型.局部变量 right, 整数型.局部变量 tid, 文本型.局部变量 kw, 文本型.局部变量 fid, 文本型.局部变量 tbs, 文本型.局部变量内容, 文本型.局部变量 tmp, 文本型
svxml.置Cookie (Cookie).判断循环首 (真) retstream ＝ svxml.访问网页 (, “http://tieba.baidu.com/f?kw=” ＋贴吧) left ＝寻找文本 (retstream, “div title=” ＋ #引号＋ “0个回复”, , 假) .如果真 (left ＝ -1)       到循环尾 () .如果真结束信息输出 (#黄色, “发现目标...”) left ＝寻找文本 (retstream, “/p/”, left, 假) ＋ 3 right ＝寻找文本 (retstream, #引号, left, 假) tid ＝取文本中间 (retstream, left, right － left) retstream ＝ svxml.访问网页 (, “http://tieba.baidu.com/p/” ＋ tid) left ＝寻找文本 (retstream, “value=” ＋ #引号, , 假) ＋ 7 right ＝寻找文本 (retstream, #引号, left, 假) kw ＝取文本中间 (retstream, left, right － left) kw ＝ URL编码UTF8 (kw) left ＝寻找文本 (retstream, “,fid:'”, , 假) ＋ 6 right ＝寻找文本 (retstream, “'”, left, 假) fid ＝取文本中间 (retstream, left, right － left) retstream ＝ svxml.访问网页 (, “http://tieba.baidu.com/f/user/js ... &rs10=0&lm=” ＋ fid ＋ “&word=” ＋ kw ＋ “&tid=” ＋ tid, , , 8000) .如果真 (寻找文本 (retstream, “need” ＋ #引号＋ “:0”, , 假) ＝ -1)       ' 需要验证码       信息输出 (#红色, “需要验证码，已停止。”)       开始按钮.禁止＝假       停止按钮.禁止＝真       返回 () .如果真结束 ' 无需验证码内容＝ URL编码UTF8 (干扰码 (原始内容)) retstream ＝ svxml.访问网页 (, “http://tieba.baidu.com/dc/common/tbs”, , , 8000) left ＝寻找文本 (retstream, “:” ＋ #引号, , 假) ＋ 2 right ＝寻找文本 (retstream, #引号, left, 假) tbs ＝取文本中间 (retstream, left, right － left) retstream ＝ svxml.访问网页 (“POST”, “http://tieba.baidu.com/f/commit/post/add”, “tbs=” ＋ tbs ＋ “&tid=” ＋ tid ＋ “&fid=” ＋ fid ＋ “&floor_num=1&vcode_md5=&vcode=&rich_text=1&add_post_submit=%20%E5%8F%91%20%E8%A1%A8%20&content=” ＋内容＋ “&ie=1&kw=” ＋ kw ＋ “&useSignName=off”, , 8000) left ＝寻找文本 (retstream, “:”, , 假) ＋ 1 right ＝寻找文本 (retstream, “,”, left, 假) tmp ＝取文本中间 (retstream, left, right － left) 调试输出 (retstream) .如果 (tmp ＝ “0”)  ' 12:被封 2101:掉线 13:代理无效空:匿名无效       信息输出 (#绿色, “抢二楼成功！帖子号：” ＋ tid) .否则       信息输出 (#红色, “抢二楼失败！帖子号：” ＋ tid ＋ “ 错误信息：” ＋ tmp)       鸣叫 ()       .如果真 (退出＝真)          开始按钮.禁止＝假          停止按钮.禁止＝真          信息输出 (#红色, “已停止！”)          返回 ()       .如果真结束
.如果结束延迟 (间隔).判断循环尾 ()

这个是百度贴吧的

1：我想在这里面加上个指定抢某个人ID的帖子  只要他的帖子是0回复的

2：当没有填写指定抢某个人的ID时  就只要是0回复的都抢  ←这条上面的代码已经可以找到了
就差第一个问题没有解决就大大帮忙  我全部身价已经给你们了

ㄣ负二代 · 发表于 2012-9-15 12:33:48

我快晕倒

乱感觉 · 发表于 2012-9-15 12:41:38

龍孞 · 发表于 2012-9-15 12:45:29

代码太乱！看着头晕！

冷死了 · 发表于 2012-9-15 12:46:47

单身戒指 · 发表于 2012-9-15 13:46:53

╰ぷ☆龙?芯发表于 2012-9-15 12:45
代码太乱！看着头晕！

1.zip (47.24 KB, 下载次数: 24)

单身戒指 · 发表于 2012-9-15 14:24:48

小松鼠发表于 2012-9-15 12:33
我快晕倒

我已经把东西发上来了
这样就不晕了{:soso_e136:}

单身戒指 · 发表于 2012-9-15 15:43:04

没人愿意么{:soso_e135:}

单身戒指 · 发表于 2012-9-15 17:49:22

求帮助解决啊然后在交易市场以1下载点卖给你我全部的精币(帖子不给编辑改价格郁闷)

单身戒指 · 发表于 2012-9-15 20:53:26

算了等十天以后再问吧

		自动登录	找回密码
密码			注册

[求助] 求大大帮添加

点评

点评