❶ 熱血江湖私服登錄器源碼 PUDN麻煩幫忙下載一下
熱血江湖登陸器源碼和源碼模塊,可以進行易語言編譯修改,源碼代碼已經完善大部分,只需稍有修改和編譯調試就可以用的咯!
Yulgang landers source and source code moles that can be easily modified language compiler, source code has been improved much, just slightly modified and compiled debugging can be used to argue!
https://share.weiyun.com/
❷ 熱血江湖無敵自動掛機腳本
無敵那麼簡單的東西問問就弄到了,或者隨便+一個什麼江湖的群,群空間里絕對有。。
腳本給你個比較早的,自動打怪檢打轉
本腳本只適合掛主動區!自動檢物。
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停止
❸ 推薦幾個支持熱血江湖V20017版的掛,主要是免費,24小時全自動,能自己加輔助技能,全職業適用
熱血特輔:免費
網址:
www.166wg.com
絕對好用,全自動的。
❹ E語言做熱血江湖輔助誰會我已經做好模版,就部分代碼。
代碼錯誤的
❺ 求熱血江湖2.0版輔助工具
因該還沒出吧
沒見
等2.0有了
慢慢會出來的
❻ 跪求 熱血江湖輔助工具(最好免費 不要頂點打怪 可以自己買賣 自動換怪)
仔細分析一下樓主對掛的要求,我真想哈哈大笑。
熱血特輔免費版。非你莫屬。
1.它免費。
2.它剛好取消了定點打怪(因為這個我想笑)。
3.自動買賣。
4.自動換怪(這個估計任何一款都能滿足)
5.我用它應該有快一年了吧?第二次玩熱血就一直用這掛,至少目前自己沒被盜過。我是103的X醫和100的Z弓。其它都是三轉小徒弟。
最後一點,如果你在用的過程中有疑問,可以問我,這個太熟悉啦,再者現在比較閑哈。
祝游戲開心。
地址就是二樓給的:www.166g.net
我同意二樓的意見卻不同意一樓所說的TF會亂扔東西。
❼ 有沒人有會用易語言做熱血江湖輔助 只要加血加藍跟自動技能的
按鍵精靈就可以實現的
江湖有小助手的啊 平十指買就可以了
❽ 求熱血江湖(輔助工具)-熱血寶寶源碼~
源碼是不可能給你的 孩子! 除非你去找熱血寶寶的技術人員。 否則其他人是沒有的!
❾ 求熱血江湖掛機輔助或者是腳本 !你得交我怎麼用腳本!
這個簡單 玩熱血江湖的時候 你也許會經常看到有人在那掛機 他會時不時喊出一句什麼輔助之類的 順便吧下載網址也告訴你了 上吧 騷年 那個是好東西 好輔助 絕對牛叉的輔助
不過這類免費的輔助一般都有盜號的木馬 如果沒有防護措施的話你會再第二次上號的時候發現自己號被洗了 我以前經常被這樣洗號
後來學聰明了 搞了一個密保 每次登陸前都要是使用密保進行賬號解鎖雖然麻煩 但是號從來沒被洗過 再說說輔助 非常使用 自動刷掛 自動補血 必須物品用完後自動回城補給 自動返回刷怪地點繼續掛機 基本上可以說是全功能都有 掛機必備啊 說了這么多 樓主給點分吧
用法嗎 不用人教 自己琢磨琢磨就會了 一般都是設置刷怪的范圍 不用設太大 我玩熱血的時候貌似怪刷新速度很快的 還有就是就是自動補葯 如果在那種怪自動攻擊人而且打人很痛得地圖 最好把下限設置的高點 簡單的說就是設置當自己的血還剩大概百分之四十的時候使用消耗品 因為怕被怪群毆 如果設置下限太低 很容易被幾只怪同時攻擊秒掉 其他就自己琢磨 很簡單的啦
我以前就是上學的時候每天用輔助刷 掛個兩個小時左右 午睡起來一看 背包全滿 相當給力