标题:
过神医,供参考交流
[打印本页]
作者:
diudiu1118
时间:
2008-8-20 08:59
标题:
过神医,供参考交流
//***********检查神医*****************//
Rem 检查神医
Delay 2000
MoveTo 142,151
Delay 1000
LeftClick 1
Delay 1000
VBSCall FindColor(547,609,641,631,"ffffff",x,y)
If x>0
VBSCall FindColor(549,516,602,564,"0000fd",dx,dy)
If dx>0
Goto 过神医
EndIf
EndIf
//***********过神医*******//
Rem 过神医
Delay 2000
If m=1
Goto 神医一
ElseIf m=2
Goto 神医二
Else
Goto 小退
EndIf
Else
Goto 开工
EndIf
Rem 神医一
Delay 500
MoveTo 724,561 //选第一项
Delay 1000
LeftClick 1
Delay 4000
VBSCall FindColor(547,609,641,631,"ffffff",x,y)
If x>0
// SayString "神医1未过"
m=2
Goto 过神医
Else
m=1
Delay 20
Plugin t=GetSysInfo.GetTime()
Delay 20
Plugin Window.SendString(hwnd,"1次神医过了---")
Delay 20
Plugin Window.SendKeyPress(hwnd,13)
Delay 200
Goto 开工
EndIf
Rem 神医二
Delay 1000
//SayString "到神医2"
MoveTo 724,561 //选第一项
Delay 1000
LeftClick 1
Delay 5000
VBSCall FindColor(547,609,641,631,"ffffff",x,y)
If x>0
// SayString "神医2未过"
m=3
Goto 过神医
Else
m=1
Delay 20
Plugin t=GetSysInfo.GetTime()
Delay 20
Plugin Window.SendString(hwnd,"2次过神医---")
Delay 20
Plugin Window.SendKeyPress(hwnd,13)
Delay 200
Goto 开工
EndIf
//*********小退*******//
Rem 小退
Delay 1000
m=1
//alt+o
Delay 100
KeyDown 18
Delay 100
KeyPress 79
Delay 100
KeyUp 18
Delay 200
//返回角色选择
Rem 返回
Delay 200
VBSCall FindColor(444,349,572,361,"552211",x,y)
If x>0 and y>0
Delay 300
MoveTo x,y
Delay 1000
LeftClick 1
Delay 200
Else
Goto 返回
EndIf
Delay 100
//重新进入游戏
Rem 进入
Delay 200
VBSCall FindColor(770,502,896,516,"552211",x,y)
If x>0
Delay 300
KeyPress 13,1
Delay 300
Else
Goto 进入
EndIf
Delay 200
//回到游戏
Rem 回游戏
Delay 200
IfColor 816,263,"00fefe",0
Delay 2000
Plugin t=GetSysInfo.GetTime()
Delay 20
KeyPress 122,1
Delay 500
KeyPress 122,1
Delay 500
KeyPress 122,1
Delay 500
Goto 检查神医
Else
Goto 回游戏
EndIf
作者:
PCI点点
时间:
2008-8-20 09:04
这 是什么啊?
作者:
414307771
时间:
2008-8-20 09:08
火星文吧.....
作者:
LITUTU
时间:
2008-8-20 09:10
根本看不懂
作者:
狼`很安靜
时间:
2008-8-20 09:12
不行。试了一下。。
首先他按出神医的坐标有点不是很准,还是出来了,然后点不中
弹出菜单,就卡住了,没有小退到
作者:
yhshi_zq
时间:
2008-8-20 09:13
太深奥了,好像是编程似的,看不懂
作者:
endyzhengjie
时间:
2008-8-20 09:17
我是电脑白痴`完全看不懂
作者:
再生的教练
时间:
2008-8-20 09:17
不知道是什么
作者:
chenyongqq
时间:
2008-8-20 09:38
貌似一个VB做的程序。没有告诉具体的运行需要的参数。
作者:
狼`很安靜
时间:
2008-8-20 09:42
这是个按键精灵的源文件。。。把它导入按键精灵就可以了
作者:
mybe
时间:
2008-8-21 08:46
有VB的函数好象
作者:
狼`很安靜
时间:
2008-8-21 10:25
按键精灵本来就可以插入VB语言的。。
作者:
libin
时间:
2008-10-13 19:06
看到就头疼!!
作者:
hyl715
时间:
2008-10-16 07:15
就是要按键精灵才能用
作者:
weimin7927
时间:
2008-10-16 09:55
不懂,还是不懂
作者:
178311022
时间:
2008-10-16 10:50
怪我以前英语没学好,现在想学编程好象很难啊
作者:
绝地苍狼
时间:
2008-10-19 01:17
请问你们做的全是用VB吗,用VC吗
作者:
libin
时间:
2008-10-24 09:44
没有做过呢,但是 很死板的去选择吧!
作者:
goldfish21c
时间:
2008-10-27 17:18
试了一下,不知道怎么运行
欢迎光临 紫菀论坛 (http://bbs.szyin.com/)
Powered by Discuz! 7.1