紫菀论坛 - Powered by Discuz! Board

标题: 过神医自动加血小退归位脚本 [打印本页]

作者: kunkid 时间: 2008-8-19 03:05 标题: 过神医自动加血小退归位脚本

VBS dim hong,lan,Var1.Var2，Var3
UserVar hong=DropList{5%:5|10%:10|15%:15|20%:20|25%:25|30%:30|35%:35|40%:40|45%:45|50%:50|55%:55|60%:60|65%:65|70%:70|75%:75|80%:80|85%:85|90%:90|95%:95}=70 <%自动喝红
UserVar lan=DropList{5%:5|10%:10|15%:15|20%:20|25%:25|30%:30|35%:35|40%:40|45%:45|50%:50|55%:55|60%:60|65%:65|70%:70|75%:75|80%:80|85%:85|90%:90|95%:95}=30 <%自动喝蓝
UserVar Var1=DropList{F1:112|F2:113|F3:114|F4:115|F5:116|F6:117|F7:118|F8:119|F9:120|F10:121}=112 补血技能快捷键
UserVar Var2=DropList{F1:112|F2:113|F3:114|F4:115|F5:116|F6:117|F7:118|F8:119|F9:120|F10:121}=113 补蓝技能快捷键
UserVar Var3=DropList{F1:112|F2:113|F3:114|F4:115|F5:116|F6:117|F7:118|F8:119|F9:120|F10:121}=114 当血量少于%时使用的技能(如盾)
VBSCall Call FindPic(0,0,1280,767,"Attachment:\主确定.bmp",0.9,qdx,qdy)
If zx>=0 and zy>=0
Else
msgbox "无法检测到QQ幻想窗口@.@!",16,"检测错误"
EndScript
EndIf
Delay 200
MoveTo 901,92
Delay 200
LeftClick 1
EndIf
Delay 3000
Rem 记录挂机点
MoveTo qdx qdy
Delay 200
KeyDown 18,1
Delay 200
KeyPress 77,1
Delay 200
KeyUp 18,1
Delay 800
VBSCall FindPic(qdx,qdy,qdx+800,qdy+600,"Attachment:\人物.bmp",0.8,gwzx,gwzy)
//找到人物在地图上的位置，记录挂机点
Delay 300
If gwzx>=0 and gwzy>=0
MoveTo gwzx+6 gwzy+6
Delay 3000
KeyDown 18,1
Delay 200
KeyPress 77,1
Delay 200
KeyUp 18,1
Delay 200
KeyDown 18,1
Delay 200
KeyPress 87,1
Delay 200
KeyUp 18,1
Delay 200
MoveTo qdx qdy
Goto search
Else
Goto 记录挂机点
EndIf
Rem search
Delay 1000
IfColor 143,166,889090,2
Gosub 过神医
EndIf
IfColor hong/100*(282-192)+192 125,189420,2
Else
KeyPress Var1,1
Delay 200
KeyPress Var3,1
EndIf
IfColor lan/100*(275-181)+181 136,c84c08,2
Else
KeyPress Var2,1
EndIf
Goto search
Sub 过神医
Delay 5000
IfColor 143,165,808488,2
      VBSCall FindPic(0,0,1023,767,"Attachment:\sy.bmp",0.9,syx,syy)
      Delay 1000
      MoveTo syx+135,syy+50
      Delay 1000
      LeftClick 1
      Delay 5000
      MoveTo qdx qdy
EndIf
IfColor 143,166,2884f0,2
      Goto search
Else
EndIf
IfColor 143,165,808488,2
      VBSCall FindPic(0,0,1023,767,"Attachment:\sy.bmp",0.9,syx,syy)
      Delay 1000
      MoveTo syx+135,syy+50
      Delay 1000
      LeftClick 1
      Delay 3000
      MoveTo qdx qdy
Else
      Delay 3000
EndIf
IfColor 143,166,2884f0,2
      Goto search
Else
      Delay 1000
      MoveTo 511,66
      LeftClick 1
      Rem 摆脱战斗
      For 6
         KeyDown 18,1
         KeyPress 82,1
         Delay 1000
         KeyUp 18,1
      EndFor
EndIf
VBSCall Call FindPic(qdx,qdy,qdx+800,qdy+600,"Attachment:\状态.bmp",0.7,ztx,zty)
If ztx>=0 and zty>=0
      Goto 摆脱战斗
Else
EndIf
Rem 返回角色
KeyPress 27,1
Delay 500
IfColor 519,400,d87c50,2
      MoveTo 519,400
      LeftDoubleClick 1
Else
      Goto 返回角色
EndIf
Rem 登陆角色
Delay 6000
IfColor 501,582,48a8d8,2
      KeyPress 13,2
Else
      Delay 3000
      Goto 登陆角色
EndIf
Delay 5000
IfColor 143,166,1878e8,2
      Delay 5000
Else
      Goto 登陆角色
EndIf
EndIf
Gosub 回挂机点
Return 过神医  Rem s
Sub 回挂机点
//回挂机原点，同时也可防止卡人
Delay 200
KeyDown 18,1
Delay 200
KeyPress 77,1
Delay 200
KeyUp 18,1
Delay 600
MoveTo gwzx+8 gwzy+4
Delay 400
For 10
      RightClick 1
      Delay 1000
EndFor
KeyDown 18,1
Delay 200
KeyPress 77,1
Delay 200
KeyUp 18,1
EndIf
Rem 回挂机点结束
Delay 200
KeyDown 18,1
Delay 200
KeyPress 87,1
Delay 200
KeyUp 18,1
MoveTo qdx qdy
Return 回挂机点

以上是过神医的脚本  脚本所需要的图片在附件那里不会弄的联系我

[ 本帖最后由 kunkid 于 2008-8-19 21:39 编辑 ]

附件: 附件.rar (2008-8-19 03:05, 2.38 KB) / 下载次数 686
http://bbs.szyin.com/attachment.php?aid=11402&k=92bc18e6b45fed1345c7b86c5158ce4c&t=1719168324&sid=3qY1pM

图片附件: 11.jpg (2008-8-19 21:39, 55.72 KB) / 下载次数 236
http://bbs.szyin.com/attachment.php?aid=11437&k=879bd20a58715bdabc10887eda6ace94&t=1719168324&sid=3qY1pM

作者: 郁闷药师 时间: 2008-9-10 10:03

不懂..我搞不定神医自己去点.出来了它不会动的

作者: lsmurder 时间: 2008-9-10 14:44

niu ~~~~~~~~~~~~~~~

作者: sky520wzg 时间: 2008-10-7 12:49

可不可以用啊，这个，我怎么用不了啊

作者: sky520wzg 时间: 2008-10-7 12:49

晕哦，
回帖招雷霹拉

作者: sky520wzg 时间: 2008-10-7 13:04

忘记问了，
如果游戏更新了，
这个脚本还可以用吗

作者: bandaojun 时间: 2008-10-7 22:00

哇塞，这么机密的东东都共享了啊。狼吞虎咽中。。。

作者: allenzxyqk 时间: 2008-10-8 19:32

好好玩4楼好倒霉

作者: hh27203064 时间: 2008-10-12 19:05

脚本的程序好复杂

作者: bnmbi 时间: 2008-10-13 17:10

和挖矿差不多没什么的不过还是支持

作者: oncityce 时间: 2008-10-22 13:47

测试下，谢谢楼主

作者: oncityce 时间: 2008-10-22 14:34

请问楼主是什么模式下的？

作者: libin 时间: 2008-10-24 09:41

看的好晕啊！！支持楼主！！

作者: oncityce 时间: 2008-10-25 14:21

好用了，谢谢楼主，我能用了

作者: CAVEL1314 时间: 2008-10-27 00:29

用什么来搞的啊.......我都不会啊....LZ能说吓吗

作者: goldfish21c 时间: 2008-10-29 11:42

昨天用你的图片去找东西还能找到，今天不知道怎么样就找不到了，郁闷中

作者: andyno01 时间: 2008-11-1 13:43

用不了

作者: tg100410151 时间: 2008-12-1 03:31

支持一下.空了我也学习学习下.

作者: supermhw 时间: 2008-12-19 15:35

收藏研究下·

作者: sxlcc 时间: 2008-12-23 14:42

谢谢楼主，研究一下

作者: 蕥。 时间: 2008-12-25 13:08

乱码一样...

作者: 影子的传说 时间: 2008-12-25 13:09

我晕！小丫头真来了！标记二，这是源码

作者: 蕥。 时间: 2008-12-25 13:10

我来怎么？

作者: 蕥。 时间: 2008-12-25 13:11

只允许你来我就不能来么..

作者: 蕥。 时间: 2008-12-25 13:11

标记有什么？想删掉还是扣？

作者: 蕥。 时间: 2008-12-25 13:12

今天高兴..随便你啦

能扣的话把偶所有的花花都拿去

作者: 影子的传说 时间: 2008-12-25 13:12

我看能发多少

作者: 影子的传说 时间: 2008-12-25 13:13

保持低调

作者: 蕥。 时间: 2008-12-25 13:13

随便你了...

作者: 影子的传说 时间: 2008-12-25 13:15

我才不扣，我有我的目标

作者: 蕥。 时间: 2008-12-25 13:40

目标？

作者: 蕥。 时间: 2008-12-25 13:41

怎么个目标？想什么坏主意？

作者: 蕥。 时间: 2008-12-25 13:44

就等着看吧..

作者: BJBS19861121 时间: 2009-1-1 23:51

有药师自动打怪脚本么

作者: 森林恋曲 时间: 2009-1-4 17:32

楼主很强大的说!口水下,就是有点疑惑...归位就一定要点小地图吗?不能改成自动走到指定的 X Y点吗?
主要是人物移动的情况下,小地图的位子也在相应的移动,所以归位一直都不在一个位子上.
就提点小意见,希望楼主能更加完善这个脚本...3Q

作者: yj103703522 时间: 2009-1-7 00:29

怎么联系兄弟..向你请教..QQ多少..我的103703522有空教下..麻烦咯

作者: suiemail 时间: 2009-1-8 16:52

先用用喝红的哪个了呵呵

作者: 563626235 时间: 2009-1-15 11:24

顶你一下
看看是不是能过神医

作者: vino 时间: 2009-1-18 23:04

顶顶努力学习中...

作者: tjp199 时间: 2009-2-9 23:16

下下来学习下！谢谢分享！

作者: oceanroy 时间: 2009-2-12 07:51

现在都改了神医，还能用不？

作者: zengweir 时间: 2009-2-12 20:45

看不懂，，，但还是谢谢了

作者: chengqixuan2 时间: 2009-2-23 22:53

过神医好难。。。

作者: larrylongbin 时间: 2009-3-15 10:46

这个好象是自由的吧

作者: 小雨123 时间: 2009-3-19 09:59

还是好难。这个好用么啊。能用到吗、

作者: 飘逸007 时间: 2009-3-19 14:29

楼主辛苦了,我用不上

作者: wwtaolun 时间: 2009-3-20 19:39

呃半成品啊
试了试不怎么好用啊

作者: s8871319 时间: 2009-3-21 04:27

有人试用了没啊

作者: trtrcui 时间: 2009-3-23 12:58

杀毒软件经常误报呀郁闷

作者: tq057cc 时间: 2009-11-10 08:44

能用哇。。

作者: total 时间: 2009-11-10 23:49

看不懂啊是不是要下按键精灵呢

作者: dick981 时间: 2010-1-14 17:51

不知道怎么用

作者: a66670957 时间: 2010-1-18 20:56

感谢分享。

我去试试。

作者: a66670957 时间: 2010-1-18 21:31

怎么不能用啊，

LZ。怎么回事呢。

作者: dick981 时间: 2010-1-19 09:23

可能是现在不能用吧

作者: 624569822 时间: 2010-1-19 23:03

这要怎么用啊？

作者: qq68826718 时间: 2010-1-20 19:21

是不是真的哦先看看再说

作者: zoejohna 时间: 2010-1-22 00:54

试了但是没用啊？
我就站原地不动

作者: zijujian 时间: 2010-1-25 20:15

强帖
看不懂

作者: 2216186 时间: 2010-5-17 02:17

附件放哪

作者: a3034613 时间: 2010-6-8 22:32

不懂额还得从简单的学

作者: hwh12388 时间: 2010-6-14 14:36

怎么用啊

作者: a13758888250 时间: 2010-6-19 11:09

还是不会弄麻烦发下我邮箱吧

287933231@qq.com

作者: bellehjh 时间: 2010-6-20 09:21

汗、用不了、、

作者: wythkil 时间: 2010-6-22 10:28

楼主，怎么用啊我的邮箱wythkil1981@126.com,拜托教下。

作者: emily_gmg 时间: 2010-6-30 10:45

看不懂呀

作者: li8077 时间: 2010-7-5 15:33

ddddddddddddddd

作者: 小罗宾亲亲 时间: 2010-7-29 11:06

这脚本咋用啊？？

作者: Q123456Q 时间: 2010-7-29 16:37

顶顶顶顶顶顶顶

作者: zw251314jbh 时间: 2010-7-30 15:16

厉害

作者: 蔬菜包子皮 时间: 2010-12-21 12:45

编程序好难!!!

作者: 稻草人 时间: 2011-4-15 07:10

收藏一下，慢慢研究~

作者: tiyoung 时间: 2011-6-23 06:55

发现无累成兄弟

作者: ffo2011 时间: 2011-6-29 14:29

好复杂的代码你们厉害

作者: yunji 时间: 2011-7-16 20:28

好东西就是不知道怎么弄哦。楼主可以直接给个脚本吗

作者: arvane 时间: 2011-7-22 09:36

支持下，试试看

作者: ageq 时间: 2011-8-15 08:00

好东西，可惜不会弄，弄不好，哎

作者: q7894703 时间: 2011-10-7 20:45

不知道这东西还可不可以用了。

作者: QQ452781358 时间: 2011-11-17 17:14

哇靠不是吧这么牛一定要收藏

作者: 58216098 时间: 2011-12-6 19:11

一眼看不懂，下载下来好好研究透了。。

作者: a34804656 时间: 2012-9-26 00:00

哎，不知道能不能用啊

作者: yishion468 时间: 2012-10-4 01:00

111111111111111111

作者: zhaoxiaofei 时间: 2012-10-8 23:46

怎么弄啊我不懂哦可以直接制作个软件给我吗加我qq315941930 告诉我把谢谢啦嘿嘿

作者: linapeace 时间: 2012-10-9 19:58

存起来有空自己研究

欢迎光临紫菀论坛 (http://bbs.szyin.com/)