當前位置:首頁 » 網頁前端 » 武林軟體腳本合集
擴展閱讀
webinf下怎麼引入js 2023-08-31 21:54:13
堡壘機怎麼打開web 2023-08-31 21:54:11

武林軟體腳本合集

發布時間: 2023-03-29 05:02:24

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