當前位置:首頁 » 網頁前端 » 熱血江湖神器採集腳本
擴展閱讀
webinf下怎麼引入js 2023-08-31 21:54:13
堡壘機怎麼打開web 2023-08-31 21:54:11

熱血江湖神器採集腳本

發布時間: 2022-05-27 08:54:52

❶ 熱血江湖掛機腳本

家等了好久````

很多人都想要這個腳本!今天我發布出來與大家分享```希望大家能用的習慣

本腳本只適合掛主動區!自動檢物。

VBS dim mX1,mY1,mX2,mY2
Gosub 補紅藍
Gosub 讀取坐標
VBS mX1=MapX
VBS mY1=MapY
SayExpression "("+CStr(mX1)+","+CStr(mY1)+")"+".准備好了沒"
Rem 掛機開始
Gosub 補紅藍
Gosub 判斷坐標
Gosub 找怪開始
KeyPress 120 1
Delay 100
Goto 掛機開始
Sub 找怪開始
Rem 繼續
Gosub 補紅藍
KeyDown 120 1
Delay 80
KeyUp 120 1
MoveTo 1300 460
Delay 150
MoveTo 1300 460
Delay 140
MoveTo 513 460
Delay 20
LeftClick 1
Delay 100
KeyDown 114 1
Delay 100
KeyUp 114 1
Delay 50
Gosub 補紅藍
VBSCall Call FindColor(150,150,750,650,"1028FF",x1,y1)
If x1<0 and y1<0
Delay 50
Goto 繼續
Else
Gosub 打怪
EndIf
Return 找怪開始
Sub 打怪
Rem KG
KeyDown 120 1
Delay 80
KeyUp 120 1
Gosub 補紅藍
KeyDown 114 1
Delay 100
KeyUp 114 1
Delay 50
Gosub 補紅藍
VBSCall Call FindColor(150,150,750,650,"00107B",x1,y1)
If x1<0 and y1<0
Gosub 補紅藍
Delay 200
MoveTo 1300 460
Delay 150
MoveTo 513 460
Delay 200
Goto 掛機開始
Else
Goto KG
EndIf
Return 打怪
Sub 判斷坐標
Gosub 讀取坐標
VBS mX2=MapX
VBS mY2=MapY
VBS MuBiaoY=mY1
VBS MuBiaoX=mX1
If Abs(mX1-mX2)+Abs(mY1-mY2)>20
Gosub 自動行走
EndIf
Return 判斷坐標
Sub 讀取坐標
VBS MapX,MapY
VBS x=876:y=24
VBS MapXY=""
VBS i=0:j=0:k=0
For 12
Delay 16
Gosub 讀取數字
Rem 讀取完畢
If txt="]"
Goto 輸出坐標
EndIf
VBS MapXY=MapXY&txt
VBS x=x+6
EndFor
Rem 輸出坐標
VBS i=InStr(MapXY, ".")
If txt="]" and i>1
VBS MapX=Clng(Left(MapXY, i - 1))
VBS MapY=Clng(Mid(MapXY, i + 1))
EndIf
Return 讀取坐標
Sub 讀取數字
IfColor x+1 y+4 0002BD 2
IfColor x+3 y+4 0002BD 2
IfColor x+5 y+4 0002BD 2
VBS txt="-"
Goto 讀取完畢
EndIf
EndIf
EndIf
IfColor x+2 y+8 0002BD 2
IfColor x+3 y+8 0002BD 2
Else
VBS txt="."
Goto 讀取完畢
EndIf
EndIf
IfColor x+2 y 0002BD 2
VBS txt="]"
Goto 讀取完畢
EndIf
IfColor x+1 y+4 0002BD 2
IfColor x+1 y+5 0002BD 2
IfColor x+5 y+4 0002BD 2
VBS txt="0"
Goto 讀取完畢
EndIf
EndIf
EndIf
IfColor x+2 y+2 0002BD 2
VBS txt="1"
Goto 讀取完畢
EndIf
IfColor x+1 y+8 0002BD 2
IfColor x+5 y+8 0002BD 2
VBS txt="2"
Goto 讀取完畢
EndIf
EndIf
IfColor x+1 y+7 0002BD 2
IfColor x+2 y+4 0002BD 2
Else
IfColor x+3 y+4 0002BD 2
VBS txt="3"
Goto 讀取完畢
EndIf
EndIf
EndIf
IfColor x+2 y+3 0002BD 2
IfColor x+4 y+3 0002BD 2
VBS txt="4"
Goto 讀取完畢
EndIf
EndIf
IfColor x+1 y+1 0002BD 2
IfColor x+1 y+7 0002BD 2
VBS txt="5"
Goto 讀取完畢
EndIf
EndIf
IfColor x+4 y+2 0002BD 2
IfColor x+4 y+3 0002BD 2
Else
VBS txt="6"
Goto 讀取完畢
EndIf
EndIf
IfColor x+1 y+1 0002BD 2
IfColor x+4 y+3 0002BD 2
VBS txt="7"
Goto 讀取完畢
EndIf
EndIf
IfColor x+1 y+4 0002BD 2
Else
IfColor x+1 y+5 0002BD 2
IfColor x+5 y+5 0002BD 2
VBS txt="8"
Goto 讀取完畢
EndIf
EndIf
EndIf
IfColor x+1 y+4 0002BD 2
IfColor x+2 y+7 0002BD 2
IfColor x+5 y+4 0002BD 2
VBS txt="9"
Goto 讀取完畢
EndIf
EndIf
EndIf
Return 讀取數字
Sub 自動行走
VBS FangX=0
VBS YDR=160
Gosub 補紅藍
MoveTo 512 460
Delay 100
Gosub 讀取坐標
VBS JuLi1=sqr((MapX-MuBiaoX)^2+(MapY-MuBiaoY)^2)
Rem 移動
Gosub 補紅藍
If JuLi1>20
Rem 方向右
If FangX=0
MoveTo 512+YDR 460
LeftClick 1
Delay 20
Gosub 補紅藍
Delay 200
KeyDown 120 1
Delay 50
KeyUp 120 1
Delay 200
Gosub 補紅藍
Gosub 讀取坐標
VBS JuLi2=sqr((MapX-MuBiaoX)^2+(MapY-MuBiaoY)^2)
If JuLi2<JuLi1
VBS FangX=0
VBS JuLi1=JuLi2
Goto 移動
Else
VBS FangX=1
VBS JuLi1=JuLi2
Goto 移動
EndIf
EndIf
Rem 方向下
If FangX=1
MoveTo 512 460+YDR
LeftClick 1
Delay 20
Gosub 補紅藍
Delay 200
KeyDown 120 1
Delay 50
KeyUp 120 1
Delay 200
Gosub 補紅藍
Gosub 讀取坐標
VBS JuLi2=sqr((MapX-MuBiaoX)^2+(MapY-MuBiaoY)^2)
If JuLi2<JuLi1
VBS FangX=1
VBS JuLi1=JuLi2
Goto 移動
Else
VBS FangX=2
VBS JuLi1=JuLi2
Goto 移動
EndIf
EndIf
Rem 方向左
If FangX=2
MoveTo 512-YDR 460
LeftClick 1
Delay 20
Gosub 補紅藍
Delay 200
KeyDown 120 1
Delay 50
KeyUp 120 1
Delay 200
Gosub 補紅藍
Gosub 讀取坐標
VBS JuLi2=sqr((MapX-MuBiaoX)^2+(MapY-MuBiaoY)^2)
If JuLi2<JuLi1
VBS FangX=2
VBS JuLi1=JuLi2
Goto 移動
Else
VBS FangX=3
VBS JuLi1=JuLi2
Goto 移動
EndIf
EndIf
Rem 方向上
If FangX=3
MoveTo 512 460-YDR
LeftClick 1
Delay 20
Gosub 補紅藍
Delay 200
KeyDown 120 1
Delay 50
KeyUp 120 1
Delay 200
Gosub 補紅藍
Gosub 讀取坐標
VBS JuLi2=sqr((MapX-MuBiaoX)^2+(MapY-MuBiaoY)^2)
If JuLi2<JuLi1
VBS FangX=3
VBS JuLi1=JuLi2
Goto 移動
Else
VBS FangX=0
VBS JuLi1=JuLi2
Goto 移動
EndIf
EndIf
EndIf
Return 自動行走
Sub 補紅藍
IfColor 81 10 42415A 2
KeyPress 112 1
Delay 400
EndIf
Delay 10
IfColor 46 24 524139 2
KeyPress 115 1
Delay 400
EndIf
Delay 10
Return 補紅藍

我的取名是綜合掛機

F1紅,F3技能,F4藍,F9撿東西
F11啟動,F12停止

❷ 熱血江湖 編輯腳本問題

1、抓點時要想保存按 ctrl+alt+0(或其他數字或字母,看抓點窗口的左邊就知道了)。
2、在抓點時抓點窗口右邊會出現滑鼠所在位置的坐標和顏色代碼。
3、在使用抓點坐標時可以把剛剛保存的滑鼠坐標插入腳本編輯框內。

熱血江湖掛機小兔版:http://vip2.6to23.com/xygzs/wyzw/rjxz/rxjhgjjb.html

本軟體為按鍵精靈5.92未注冊版本,共含有10個熱血江湖掛機腳本,下載後殺毒解壓即可使用。
按鍵精靈5.92未注冊版本是不存在木馬或其他病毒的,放心使用!有問題請聯系本網站。

掛機腳本:
1、醫生群療隊散無蘭回城自動退游戲關機1.0
2、醫生群療掛機隊散無蘭回城1.0
3、醫生群療掛機無蘭回城1.0
4、醫生自動群療補紅蘭1.0
5、組隊補血蘭
6、單刷PK補紅蘭
7、打手組隊掛機回城自動退游戲關機1.0
8、群刀(打手)組隊掛機無蘭回城1.0
9、群刀定點單刷掛機撿物無葯回城1.0
10、自動喊話2.0版

我自己做的,不放心的話復制粘貼我的腳本也一樣用。

❸ 熱血江湖熱血神器怎麼設置自動採集

神器官網有自動採集腳本你去找一下

❹ 熱血江湖腳本怎麼做

進一個有腳本的群 在共享裡面下載一個腳本。

下載一個十六進制編輯器(最好中文版的)。

進游戲 然後退出。

把你的SCS文件放到編輯器里 然後用編輯器對照你下載的腳本修改(是修改你下載的腳本 不是修改你的SCS文件) 最後把你修改的另存為Client文件里。

熱血江湖是韓國Mgame開發的一款網路游戲,於2005年4月20日在韓國發售。中國地區由17game公司代理發行,最新為熱血江湖V19037 。

熱血江湖擺脫了傳統武俠網路游戲陰暗血腥的游戲風格,提倡一種「明朗而愉快的武俠」精神。畫面上即不會太隨意又不會過於沉重,畫面干凈清馨。活潑可愛的人物造型,並在外觀上採用角色的Avatar系統,按身份的不同變換著多樣的衣裳和修飾。

熱血江湖V20.0「橫刀立馬」於2021年7月8日上線。

玩家在第一次登錄賬號時即進入角色創建界面,玩家可自由選擇職業,游戲職業有刀客、劍士、醫生、槍客、弓手、刺客、樂師、韓飛官、譚花靈、格鬥師、梅柳真、盧風郎、東陵神女13個職業角色。

又分為普通職業、英雄職業。刀客、劍士、醫生、槍客、弓手、刺客為普通職業,韓飛官、譚花靈、樂師、格鬥師、梅柳真、盧風郎、東陵神女為英雄職業。

❺ 熱血江湖腳本

你下個熱血超輔180版本就解決了你的問題裡面有旋轉找怪。
內存設置如下,一般下了不設置好的
生命:044021E0
最大生命:044021EC
內力:044021E4
最大內力:044021F0
歷練:0440220C
血色:1028FF
最好就是直接下新的1.8版的超輔

❻ 求:熱血江湖 一鍵精靈 腳本

KeyPress 114 1
Delay 1
IfColor 58 24 5a4542 0
KeyPress 115 1
Delay 850
EndIf
IfColor 91 8 393c42 0
KeyPress 113 1
Delay 300
EndIf
KeyPress 117 1
Delay 300

F2紅 3技能 4藍 6揀東西 F11開始 12結束

❼ 求一個按鍵精靈自動揀東西的腳本!熱血江湖用的

下載一個簡單游輔助器就有下載好以後,有說明一看就懂,,而且上面有很多游戲的輔助外掛。。

❽ 熱血江湖九泉腳本怎麼錄制腳本

因為不知道你在九泉多少層刷怪,所以沒辦法給你腳本,下面教你怎麼錄制腳本。按著順序一步步來,保證你成功。
1:人物站在九泉買葯那裡,打開掛裡面的返回掛機點,點開始錄制腳本。
2:手動操作人物跑到
張大成
那裡,點他飛100層,(這里就要看你在多少層掛機了,比如在408層)飛到100層後再點開那裡的NPC繼續飛,一直飛到400層,飛到400層後就跑到牆邊的傳送點(比較亮那裡是向下跑的)一層一層跑到408。到了3:到了408點停止錄制腳本,保存腳本。腳本就錄制好了。
4:掛機的時候就把腳本選擇出來按照腳本跑就可以了,就是錄制腳本上面有一個選項勾上。
免費的只有這樣了,比較麻煩點,是沒有收費的快。

❾ 熱血江湖編輯腳本

沒分不給

❿ 熱血江湖 腳本 怎麼用

.告訴你以後什麼腳本都沒的用了 掛都收費了