后使用快捷导航没有帐号？
查看: 2266|回复: 10
新人欢迎积分1 阅读权限30积分96精华0UID帖子金钱1528 威望0
Lv.3, 积分 96, 距离下一级还需 154 积分
UID帖子威望0 多玩草0 草
22:42:35 上传
求大神指点
2 u$ F# ]8 i$ _7 m' z6 T+ M* ~
吃遍节操的伪叔
新人欢迎积分1 阅读权限70积分9841精华0UID3816970帖子金钱25034 威望2
切的啥？节操？
Lv.7, 积分 9841, 距离下一级还需 159 积分
UID3816970帖子威望2 多玩草542 草
凯利啊 还能这么用 武器不就是 用来找凯利的吗 &&D1 ?- k2 e) H' |
顺便 等 版主（天蝎座） 下沉& &不下沉 版主不是人1 u8 K0 |) Z' [
本帖最后由 切切 切鸡 于
14:45 编辑
多玩常务CEO
新人欢迎积分0 阅读权限90积分26016精华0UID4657437帖子金钱19713 威望0
多萬执行CEO
Lv.9, 积分 26016, 距离下一级还需 8984 积分
UID4657437帖子威望0 多玩草67 草
不放技能是不是增加50伤害？
新人欢迎积分1 阅读权限70积分7122精华0UID帖子金钱8419 威望1
时间会改变一切
真的是一切
Lv.7, 积分 7122, 距离下一级还需 2878 积分
UID帖子威望1 多玩草30 草
&&买个土豪键盘&&自带一键宏
广西一区出一把+12真虫矛有意者私密
新人欢迎积分1 阅读权限30积分96精华0UID帖子金钱1528 威望0
Lv.3, 积分 96, 距离下一级还需 154 积分
UID帖子威望0 多玩草0 草
不开玩笑,那么多人刷手搓武器,不可能都是键盘流,技术帝吧..只想求个插件..
新人欢迎积分1 阅读权限30积分96精华0UID帖子金钱1528 威望0
Lv.3, 积分 96, 距离下一级还需 154 积分
UID帖子威望0 多玩草0 草
永夜之森丶 发表于
买个土豪键盘&&自带一键宏$ r& x% O7 B6 t
我用的雷蛇
时崎★狂三
新人欢迎积分1 阅读权限50积分2266精华0UID帖子金钱6493 威望0
Lv.5, 积分 2266, 距离下一级还需 234 积分
UID帖子威望0 多玩草30 草
卤煮且行且珍惜& &按键精灵在腾讯眼泪也是小三
威武霸气屌四叔
新人欢迎积分1 阅读权限70积分7001精华0UID帖子金钱27734 威望0
Lv.7, 积分 7001, 距离下一级还需 2999 积分
UID帖子威望0 多玩草50 草
我只想说，大叔为何木有手挫武器？
：你好歹有呀，有便胜无&
&行了行了，他大爷的鬼用的就一个光剑，你让我剑宗怎么玩？要是钝器的话我只留一个幻剑术，这带劲的，弄得我只能用渣渣米斯特汀&
：四叔可以手挫呀，驱魔和金身好像也无压力&
&蓝拳也来手搓武器吗
打完一盘地狱级手不得抽筋啊&
亡者之庇佑 6/9不完美　炼狱6/9不完美&&末日3/6不完美 灵魂猎者 1/2& & 唉，转区重修中 0/1
【外部图片】努力吧
新人欢迎积分1 阅读权限30积分96精华0UID帖子金钱1528 威望0
Lv.3, 积分 96, 距离下一级还需 154 积分
UID帖子威望0 多玩草0 草
我真的不相信有那么多技术帝............
新人欢迎积分1 阅读权限30积分96精华0UID帖子金钱1528 威望0
Lv.3, 积分 96, 距离下一级还需 154 积分
UID帖子威望0 多玩草0 草
小清新丶提莫 发表于
22:45 6 r( Y, a& n3 i! A+ ^: _
不放技能是不是增加50伤害？
全技能,全伤害增加百分之60
新人欢迎积分1 阅读权限50积分1032精华0UID帖子金钱2108 威望0
Lv.5, 积分 1032, 距离下一级还需 1468 积分
UID帖子威望0 多玩草0 草
不需要按键精灵，楼主只需要单身30年即可永远拥有这个技术
爆肝中.......
元宝专属一阶勋章。已绝版
马年新春勋章
手机APP马年迎春，马上有钱！
需要金钱：1100
Powered by
手机盒子客户端点击或扫描下载你的位置：
求教,怎么用按键精灵做一个自动换号的脚本
来源: 按键精灵资源站
先把帐号存在txt里,然后可以自动依次往下登录.怎么做,求教你的位置：
QQ华夏后台种植自己用的源码
来源: 按键精灵资源站
[i=s] 本帖最后由 袋/抱拳子 于
11:54 编辑
谢谢大漠老师，谢谢361老师
我的电脑是单核1。86GCPU，能完美运行，每次可收228，一直是自己用，别人用不用的了，就看你们的了
sTime = Plugin.Sys.GetTime()
Call Plugin.Sys.SetSc() //这句是设置屏幕分辨率()/颜色质量(32位)
Set dm = createobject(&dm.dmsoft&)
PutAttachment &F:\新建文件夹\3.1221&,&*.txt&
dm_ret = dm.SetPath(&F:\新建文件夹\3.1221&)
dm_ret = dm.SetDict(0, &dm_soft.txt&)
hwnd = dm.GetMousePointWindow()
dm_ret = dm.BindWindow(hwnd, &gdi&, &dx&, &dx&, 0)
If dm_ret = 1 Then
& & Call Plugin.bgkms6_10.FakeWindowState(hwnd, 1)//没有这行，不能后台。。谢谢361大大的无私奉献
& & Call Plugin.Msg.Tips(&绑定成功&)
& & Goto 绑定
X = 0 : Y = 0 : a = 0 : c = 0 : jj = 0
dm.KeyDown 17
dm.keypress 90
dm.keyup 17
s = dm.Ocr(100, 568, 126, 598, &00ffff-000000&, 1.0)
If s & 0 Then
& & Goto kaiaa
Rem 种下一个
dm.KeyPress 50//种子放在2键，，懒的搞了，想搞好点自己改
For b = 1 To 10
& & dm_ret = dm.FindColor(270,148,530,364, &000&, 1.0, 0, intX2, intY2)//找血条的，记得把自己的血条关了，找个没人的角落数种子去嘿嘿
& & Delay 30
& & If dm_ret = 1 Then
& && &&&b = 10
& && &&&b = b + 1
& & End If
If intX2 &= 0 and intY2 &= 0 Then
& & dm.moveto intX2 + 22, intY2 + 61
& & Delay 10
& & dm.RightClick
& & Delay 10
& & For b = 1 To 12
& && &&&Delay 20
& && &&&dm_ret = dm.FindPic(51,163,794,489, &种地.bmp&, &000&, 0.9, 3, X, Y)
& && &&&Delay 20
& && &&&If dm_ret = 0 Then
& && && && &b = 12
& && &&&Else
& && && && &b = b + 1
& && &&&End If
& & If X &= 0 and Y &= 0 Then
& && &&&dm_ret0 = dm.CmpColor(X + 47, Y - 92, &a5ff00&, 1.0)
& && &&&Delay 10
& && &&&dm_ret3 = dm.CmpColor(X + 47, Y - 157, &ff0000&, 1.0)
& && &&&Delay 10
& && &&&dm_ret4 = dm.CmpColor(X + 47, Y - 125, &ff0000&, 1.0)
& && &&&Delay 10
& && &&&dm_ret5 = dm.CmpColor(X + 47, Y - 157, &ffff00&, 1.0)
& && &&&Delay 10
& && &&&dm_ret6 = dm.CmpColor(X + 47, Y - 125, &ffff00&, 1.0)
& && &&&Delay 10
& && &&&dm_ret1 = dm.CmpColor(X + 102, Y - 156, &a5ff00&, 1.0)
& && &&&Delay 10
& && &&&dm_ret2 = dm.CmpColor(X + 102, Y - 124, &a5ff00&, 1.0)
& && &&&Delay 10
& && &&&If dm_ret0 = 1 Then
& && && && &dm.moveto X + 97, Y - 39
& && && && &Delay 20
& && && && &dm.leftclick
& && && && &Goto 开始
& && &&&ElseIf dm_ret3 = 0 Then
& && && && &dm.moveto X + 11, Y - 40
& && && && &Delay 20
& && && && &dm.leftclick
& && && && &Goto 开始
& && &&&ElseIf dm_ret4 = 0 Then
& && && && &dm.moveto X + 53, Y - 39
& && && && &Delay 20
& && && && &dm.leftclick
& && && && &Goto 开始& && &&&
& && &&&ElseIf dm_ret5 = 0 Then
& && && && &dm.moveto X + 11, Y - 40
& && && && &Delay 20
& && && && &dm.leftclick
& && && && &Goto 开始& &
& && &&&ElseIf dm_ret6 = 0 Then
& && && && &dm.moveto X + 53, Y - 39
& && && && &Delay 20
& && && && &dm.leftclick
& && && && &Goto 开始&&
& && &&&ElseIf dm_ret1 = 1 Then
& && && && &dm.moveto X + 11, Y - 40
& && && && &Delay 20
& && && && &dm.leftclick
& && && && &Goto 开始
& && &&&ElseIf dm_ret2 = 1 Then
& && && && &dm.moveto X + 53, Y - 39
& && && && &Delay 20
& && && && &dm.leftclick
& && && && &Goto 开始
& && &&&End If
& && &&&Goto 开始
& && &&&Delay 200
& && &&&b = 0
& && &&&For b = 1 To 10
& && && && &dm_ret = dm.FindPic(33,139,790,370, &收割.bmp&, &000&, 0.9, 2, X1, Y1)
& && && && &Delay 40
& && && && &If dm_ret = 0 Then
& && && && && & b = 10
& && && && &Else
& && && && && & b = b + 1
& && && && &End If
& && &&&Next
& && &&&If X1 &= 0 and Y1 &= 0 Then
& && && && &dm.moveto X1 + 16, Y1 + 14
& && && && &dm.leftclick
& && && && &a = a + 1
& && && && &If a = 12 Then
& && && && && & Goto 结束
& && && && &End If
& && && && &Goto 开始
& && &&&End If
& && &&&Goto 开始
& & End If
//下面的是判断结束的，纠结了好久，还是不会，但马马虎虎可行了
& & Delay 500
& & jj = jj + 1
& & If jj &= 20 Then
& && &&&Goto 结束
& & End If& &
& & sTime3 = Plugin.Sys.GetTime()
& & Delay 200
& & dd = sTime3 - sTime
& & dd = int(dd / 1000 / 60)
& & If dd &= 15 Then
& && &&&Goto 结束
& & End If
& & Rem kaia
& & Delay 100
& & sb = dm.Ocr(100, 568, 126, 598, &00ffff-000000&, 1.0)
& & Delay 200
& & If sb & 0 Then
& && &&&Goto kaia
& && &&&hg = s - sb
& && &&&If hg = 0 and hg = 12 Then
& && && && &Goto 结束
& && &&&End If
& & End If
& & Goto 种下一个
dm_ret = dm.UnBindWindow()
sTime1 = Plugin.Sys.GetTime()
s = sTime1 - sTime
xs = int(s / 1000 / 60 / 60)
fz = int(s / 1000 / 60) - xs * 60
m = Clng(s / 1000) - fz * 60 - xs * 60 * 60
Msgbox &种植了& & hg & &个种子，收了& & a & &个农作物！！用时：& & xs & &小时& & fz & &分钟& & m & &秒&
//如果没有大漠~361度插件，这代码就废了！！！自己用的东东，不做任何解释，俺是新手，大虾别笑按键精灵VIP视频！！ - 按键精灵视频 - 爱拍原创