1. 求一个武林外传的挂机挂脚本，自动打满血怪的，急求要免费的可以用SF的、
建议朋友您用传奇凌霜辅助免费版功能比如有：普通服一键设置,智能走田字位,刺杀暗杀,过魔法超速,锁定魔法位置,自动捡取物品,自动合击,智能攻击,一键传送,等功能。支持目前所有的主流登录器！
2. 求武林群侠传的按键精灵自动挖矿脚本和自动打猎脚本 自动钓鱼脚本
zjkl19的空间
请自己下载吧
ht（删掉我）tp://zjkl19.ys168.c（删掉我）om/
3. 武林外传脚本
设F6为快捷拣物，1为普通攻击，挂机地点在一个四周的怪打你只掉一格血的地方，回城前千万要推出按键精灵，非常危险切记，否则后果子妇，最好地方偏僻一点，以免被人举报，
打开按键精灵，新建一个脚本，把下面的代码复制到原文件编辑模式里，然后保存并退出就好了，这个脚本升级有点慢，但比较安全，见于武林的几个免费挂机挂都已经收费了，用按键精灵挂机不为一个最好的方法，
Rem ==========以下是按键精灵录制的内容==========
MoveTo 397,336
Delay 594
KeyDown 9,1
Delay 141
KeyUp 9,1
Delay 953
KeyDown 49,1
Delay 187
KeyUp 49,1
Delay 3125
MoveTo 397,336
Delay 5000
MoveTo 397,336
Delay 172
KeyDown 117,1
Delay 313
KeyUp 117,1
Delay 781
KeyDown 117,1
Delay 516
KeyUp 117,1
Delay 1234
KeyDown 117,1
Delay 281
KeyUp 117,1
Delay 500
KeyDown 9,1
Delay 172
KeyUp 9,1
Delay 500
KeyDown 49,1
Delay 266
KeyUp 49,1
Delay 265
MoveTo 397,336
Delay 5000
MoveTo 397,336
Delay 4235
KeyDown 117,1
Delay 250
KeyUp 117,1
Delay 1484
KeyDown 117,1
Delay 219
KeyUp 117,1
Delay 2047
KeyDown 9,1
Delay 172
KeyUp 9,1
Delay 609
KeyDown 49,1
Delay 234
KeyUp 49,1
Delay 750
MoveTo 397,336
Delay 5000
MoveTo 397,336
Delay 2907
KeyDown 117,1
Delay 312
KeyUp 117,1
Delay 1235
KeyDown 117,1
Delay 265
KeyUp 117,1
Delay 297
MoveTo 397,336
Delay 1578
KeyDown 9,1
Delay 141
KeyUp 9,1
Delay 750
KeyDown 49,1
Delay 219
KeyUp 49,1
Delay 2312
MoveTo 397,336
Delay 4984
MoveTo 397,336
Delay 1282
KeyDown 117,1
Delay 250
KeyUp 117,1
Delay 1359
KeyDown 117,1
Delay 250
KeyUp 117,1
Delay 1469
KeyDown 9,1
Delay 140
KeyUp 9,1
Delay 250
MoveTo 397,336
Delay 360
KeyDown 49,1
Delay 187
KeyUp 49,1
Delay 4453
MoveTo 397,336
Delay 4688
KeyDown 117,1
Delay 266
KeyUp 117,1
Delay 1734
KeyDown 117,1
Delay 250
KeyUp 117,1
Delay 1250
KeyDown 9,1
Delay 234
KeyUp 9,1
Delay 1578
MoveTo 397,336
Delay 219
KeyDown 49,1
Delay 235
KeyUp 49,1
Delay 4546
MoveTo 397,336
Delay 4407
KeyDown 117,1
Delay 203
KeyUp 117,1
Delay 390
MoveTo 397,336
Delay 1235
KeyDown 117,1
Delay 297
KeyUp 117,1
Delay 1437
KeyDown 9,1
Delay 172
KeyUp 9,1
Delay 844
KeyDown 49,1
Delay 187
KeyUp 49,1
Delay 828
MoveTo 397,336
Delay 5016
MoveTo 397,336
Delay 3297
KeyDown 117,1
Delay 266
KeyUp 117,1
Delay 1437
MoveTo 397,336
Delay 563
KeyDown 117,1
Delay 281
KeyUp 117,1
Delay 1109
Rem ==========以上是按键精灵录制的内容==========
4. 武林外传挂机脚本
用按键模拟类脚本来挂机，本质上说最安全！
由于官方网站现已全面封杀《按键精灵》绝大部分版本及《按键大师》的挂机脚本，所以一个老外编写的软件——《AutoIt V3.0》就成了现时的最佳选择！
用AutoIt做的脚本可以自己下载源码，自己修改，真正的DIY！绝对的免费！绝对的安全！
既玩了游戏，又学到了脚本编写技术，何乐而不为呢？
分享提供一个《武林外传》挂机脚本资源下载，功能完善，V1.3版新增在挂机的同时聊天、看电影，游戏、工作、娱乐样样不耽误！
国内AutoIt脚本游戏编写独此一家：易游互动!!!
论坛访问网址：http://bbs.1uww.com
http://www.1uww.com/bbs/
最新武林外传挂机 v1.3 下载
http://www.1uww.com/bbs/viewthread.php?tid=68&extra=page%3D1
武林外传自动登录器 下载
http://www.1uww.com/bbs/viewthread.php?tid=70&extra=page%3D1
5. 那位大虾告诉个武林秘籍抓麒麟的脚本啊谢谢急用
//这是我自己写的脚本，希望对大家有帮助，我是独孤九剑 招魂使。看懂了这个脚本，能用起来的人基本别人抓不到什么麒麟了。4开 太湖2个 辽西2个。
// 初始化
//下面这句是遍历符合窗口标题("武林秘籍")的句柄保存到数组(HwndEx)里
x = Plugin.Sys.GetScRX
y = Plugin.Sys.GetScRY
x1 = (x - 1024) / 2
y1 = (y - 768) / 2
death_num = 0
find_num = 0
kick_num = 0
drop_num = 0
offline_num = 0
HwndEx = Plugin.Window.Search("武林秘籍")
Dim hwdarray
Dim bb_time(3)
Dim text1
hwdarray = Split(HwndEx, "|")
//初始化结束
Rem catch_begin
If UBound(hwdarray)>=0 Then
i = 0
text1=""
For UBound(hwdarray)
Call Plugin.Window.Active(Clng(hwdarray(i)))
Call Plugin.Window.Show(Clng(hwdarray(i)))
Delay 300
MoveTo x1+800, y1+180
// RightClick 1
KeyPress "8", 1
Call findbb
bb_time_last_time=bb_time(i)
bb_time(i) = cstr(now)
if s2<2 then '重复时间偏移
bb_time(i)=cstr(DateAdd("s",-1,now))
end if
// Hwnd0 = Plugin.Window.MousePoint()
// MsgBox "得到鼠标指向的窗口句柄为：" & Hwnd0
//report msg
If find_num mod 100 = 0 Then
MoveTo 500, 180
Delay 100
RightClick 1
Delay 100
KeyPress "Enter", 1
KeyPress "BackSpace", 3
SayString "/大号的名字 find_num:"&find_num &"|drop_num:"&drop_num&"|death_num :"&death_num &"|offline_num:"&offline_num&"|kick_num :"&kick_num&"|time:"&now
KeyPress "Enter", 1
Delay 100
End If
//report end
// text1 = text1&"|"&hwdarray(i)&":"&bb_time(i)
i=i+1
Next
Else
MessageBox "empty"
End If
Call catch_order
Goto catch_begin
Sub catch_order
//按时间排捕捉顺序
For i = LBound(bb_time) To UBound(bb_time)
bb_time_conferm_i=DateDiff("s",bb_time(0),bb_time(i))
while bb_time_conferm_i>60
bb_time(i) = DateAdd("n",-1,bb_time(i))
bb_time_conferm_i=DateDiff("s",bb_time(0),bb_time(i))
Wend
For j = i + 1 To UBound(bb_time)
bb_time_conferm_j=DateDiff("s",bb_time(0),bb_time(j))
while bb_time_conferm_j>60
bb_time(j) = DateAdd("n",-1,bb_time(j))
bb_time_conferm_j=DateDiff("s",bb_time(0),bb_time(j))
Wend
If bb_time(i) > bb_time(j) Then '小到大排序
t = bb_time(i)
t2= hwdarray(i)
bb_time(i) = bb_time(j)
hwdarray(i) = hwdarray(j)
bb_time(j) = t
hwdarray(j)=t2
End If
Next
Next
End Sub
Sub findbb
try_num = 0
s1=second(now)
For 30000
s2 = second(now) - s1
If s2 < 0 Then
s2 = s2 + 60
End If
If s2 > 50 Then
goto findover '招BB 超过1分钟 结束当前窗口召唤
End If
try_num=try_num+1
FindPic x1+300,y1+200,x1+820,y1+570,"bb.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
find_num = find_num + 1
intx=intx+25
inty=inty+45
MoveTo intx, inty
rightClick 1
Delay 50
Goto findover
Else
try_num2 = try_num mod 100
If try_num2 = 0 Then
Call 掉线登陆
Call 死亡回点
End if
Call 宠物选择
End If
Next
Rem findover
End Sub
Sub 宠物选择
FindPic x1,y1,x1+1024,y1+768,"cw.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
intxc = intx+158 '定位放生按钮坐标
intyc = inty+459
intx = intx + 43
inty = inty + 53
intxb = intx
intyb = inty
For 4
GetColor=GetPixelColor(intxb,intyb)
// MessageBox getcolor
If getcolor = 101408 Then
Else
MoveTo intxb, intyb
Delay 100
LeftClick 1
Delay 300
Call 宠物处理
Delay 100
End If
intxb=intxb-40
Next
Delay 100
KeyPress "W", 1
End If
End Sub
sub 宠物处理
FindPic x1,y1,x1+1024,y1+768,"xl.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
Else
FindPic x1,y1,x1+1024,y1+768,"cwxx.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intx,inty
Delay 100
LeftClick 1
Delay 300
End If
drop_num = drop_num +1
MoveTo intxc, intyc
Delay 100
LeftClick 1
Delay 200
KeyPress "Enter", 1
End If
End Sub
Sub 死亡回点
FindPic x1,y1,x1+1024,y1+768, "辽西.bmp", 0.9, intX, intY
If intX > 0 And intY > 0 Then
mapname="辽西"
FindPic x1,y1,x1+1024,y1+768,"辽西捕捉点1.BMP",0.9,intX,intY
If intX > 0 And intY > 0 Then
Goto 误判
End If
FindPic x1,y1,x1+1024,y1+768,"辽西捕捉点2.BMP",0.9,intX,intY
If intX > 0 And intY > 0 Then
Goto 误判
End If
FindPic x1,y1,x1+1024,y1+768,"辽西捕捉点3.BMP",0.9,intX,intY
If intX > 0 And intY > 0 Then
Goto 误判
End If
Else
mapname="太湖"
FindPic x1,y1,x1+1024,y1+768,"捕捉点.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
Goto 误判
End If
FindPic x1,y1,x1+1024,y1+768,"捕捉点2.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
Goto 误判
End If
FindPic x1,y1,x1+1024,y1+768,"捕捉点3.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
Goto 误判
End If
FindPic x1,y1,x1+1024,y1+768,"捕捉点4.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
Goto 误判
End If
FindPic x1,y1,x1+1024,y1+768,"捕捉点5.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
Goto 误判
End If
FindPic x1,y1,x1+1024,y1+768,"捕捉点6.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
Goto 误判
End If
End If
Call 回城复活
Delay 1000
Call 地图跑路
Rem 误判
Delay 500
Call 回城复活
End Sub
Sub 地图跑路
FindPic x1,y1,x1+1024,y1+768,"cw.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
KeyPress "W", 1
Delay 500
End If
FindPic x1,y1,x1+1024,y1+768,"太湖复活点.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
mapname="太湖"
End If
FindPic x1,y1,x1+1024,y1+768,"辽西复活点.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
mapname="辽西"
End If
MoveTo x1+20, y1+331
Delay 500
RightClick 1
Delay 500
FindPic x1,y1,x1+1024,y1+768,"世界地图.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
Else
KeyPress "M", 1
End If
Delay 500
FindPic x1,y1,x1+1024,y1+768,"世界地图.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
intxa = intx
intya = inty
If mapname="辽西" Then
intxa = intxa + 138
intya = intya + 378
Delaytime=20000
MoveTo x1+580, y1+600
Delay 100
RightDown 1
Delay 100
MoveR -300, -300
Delay 300
RightUp 1
Delay 300
Else
intxa = intxa - 136
intya = intya + 145
Delaytime=5000
End If
MoveTo intxa,intya
Delay 500
LeftClick 1
Delay 2000
KeyPress "M", 1
Delay Delaytime
KeyPress "T", 1
End If
End Sub
Sub 回城复活
FindPic x1,y1,x1+1024,y1+768,"回城复活.bmp",0.9,intXa,intYa
If intXa > 0 And intYa > 0 Then
death_num =death_num +1
MoveTo intxa, intya
Delay 300
LeftClick 1
Delay 5200
End If
End Sub
Sub 掉线登陆
FindPic x1,y1,x1+1024,y1+768,"人物在线确定.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intx, inty
Delay 500
LeftClick 1
Delay 30000
Call kickout
End If
FindPic x1,y1,x1+1024,y1+768,"服务器选择确定.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intx, inty
Delay 500
LeftClick 1
Delay 500
Call kickout
End If
FindPic x1,y1,x1+1024,y1+768,"掉线确定.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
Delay 1000
KeyPress 13,1
Delay 1000
KeyPress 13,1
Delay 3000
call kickout
End If
FindPic x1,y1,x1+1024,y1+768,"登录确定.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
offline_num =offline_num +1
MoveTo x1+514,y1+442
Delay 1000
LeftClick 1
Delay 1000
KeyPress "BackSpace", 5
Delay 1000
SayString "555555"
KeyPress 13,1
Delay 5000
MoveTo x1+450, y1+617
Delay 500
LeftClick 1
Delay 2500
End If
End Sub
Sub kickout
FindPic x1,y1,x1+1024,y1+768,"系统设置.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intx+5, inty+5
Delay 500
LeftClick 1
Delay 500
FindPic x1,y1,x1+1024,y1+768,"返回登录.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intx, inty+3
Delay 500
LeftClick 1
Delay 500
End If
FindPic x1,y1,x1+1024,y1+768,"返回登录确定.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intx, inty+3
Delay 500
LeftClick 1
kick_num=kick_num+1
Delay 6000
End If
End If
End Sub
6. 武林外传刷怪脚本
我写的脚本
//自动打怪捡物品打坐 不抢怪
//1普通攻击
//2技能攻击
//3捡物品
//0打坐
//800*600窗口模式
//ABCDIJ几个点的坐标颜色最好自己抓一下
//EFGH四个点 只需要坐标不需要颜色
Sub 自动打怪
Delay 500
Rem 开始
Gosub 判断自己HP
Rem 继续1
Delay 100
Gosub 判断自己MP
Rem 继续2
KeyPressH 27,1
Delay 200
Gosub 判断是否被攻击
Delay 100
Rem 继续3
Gosub 找怪
Delay 100
Rem 捡物品
KeyPressH 51,2
Delay 100
Goto 开始
Return
Sub 判断自己HP
//抓点A
Rem 判断自己HP
IfColor 211 124 354BFF 2
Goto 继续1
Else
KeyPressH 48,2
Delay 3000
Gosub 判断是否被查
EndIf
Goto 判断自己HP
Return
Sub 判断自己MP
//抓点B
Rem 判断自己MP
IfColor 211 133 F0C831 2
Goto 继续2
Else
KeyPressH 48,2
Delay 3000
Gosub 判断是否被查
Delay 100
EndIf
Goto 判断自己MP
Return
Sub 找怪
//抓点C
Delay 1000
Rem 找怪
Delay 100
KeyPressH 9,1
Delay 300
KeyPressH 9,1
Delay 300
IfColor 446 125 566BFF 2
Goto 打怪
Else
KeyPressH 27,1
EndIf
Goto 找怪
Return
Sub 攻击
Rem 打怪
//抓点D
Delay 1000
IfColor 357 150 6F3410 2
KeyPressH 50,2
Delay 500
KeyPressH 49,1
Delay 200
//此处你可以添加其他攻击技能,记得加延时
Else
Goto 捡物品
EndIf
Goto 打怪
Return
Sub 判断是否被攻击
Rem 打怪2
//抓点D
IfColor 357 150 6F3410 2
KeyPressH 50,2
Delay 1000
KeyPressH 49,1
Delay 500
//此处你可以添加其他攻击技能,记得加延时
Else
Goto 继续3
EndIf
Goto 打怪2
Return
Sub 判断是否被查
Delay 1000
// 抓点I
IfColor 211 133 F0C831 2
Goto 继续2
Else
Goto 继续检测
EndIf
Rem 继续检测
// 抓点J
IfColor 211 133 F0C831 2
Goto 继续2
Else
Goto 小退
EndIf
Return
Sub 小退
Rem 小退
Delay 2000
// 抓点E
MoveTo 891 681
Delay 2000
LeftClick 1
Delay 2000
// 抓点F
MoveTo 881 642
Delay 2000
LeftClick 1
Delay 1000
// 抓点G
MoveTo 447 418
Delay 1000
LeftClick 1
Delay 10000
// 抓点H
MoveTo 507 658
Delay 1000
LeftClick 1
Delay 20000
Goto 开始
Return