A. 求一個小米2S天天酷跑世界對戰中的進擊模式自動砍怪腳本
現在天天酷跑誰還用腳本來刷啊？你落伍了，現在最流行的是燒餅修改器，不封號高效率！我來教你一下怎麼用吧！
燒餅天天酷跑刷分刷金幣教程，18183小編為您帶來燒餅修改器天天酷跑輔助刷分刷金幣不包郵教程，希望對大家能夠有所幫助。
刷分步驟：
1、打開燒餅修改器，然後進游戲!開始時不要吃金幣!盡量不要吃.吃了也沒事。
2、等吃到第一個沖刺時暫停游戲搜1繼續游戲!等效果結束後暫停游戲搜0!
3、然後繼續游戲!
文章太長了，懶得復制，自己看吧：http://bbs.18183.com/thread-1888073-1-1.html
B. 魔域自動打怪腳本
按鍵精靈
Rem start
While true // 或者 for 9999
VBS x=x+50
VBSCall FindColorEx(60,160,780,600,"0303B8",1,1,x,y)
//區域模煳找色 60,160,780,600為區域范圍 "FFFFFF"為顏色 1為查找方式(中間向外) 1為模煳值 x,y為找到顏色後的坐標變數
If x>60 and y>160
//如果找到顏色 比如找到顏色就會賦值給坐標變數 通過判斷坐標變數可以知道有沒有找到怪
MoveTo x+12,y+20
//把滑鼠移動到該色的坐標 如果找的是怪名字或血條 可能移動不到怪身上 這時就要用滑鼠偏移 如：MoveTo x+10 y+10
Delay 50
//延時
LeftClick 5 //左鍵單擊進行攻擊
VBS y=y+50
VBS x=100
Goto start
Endif // 少了一句
EndIf
Delay 5000 //延時5秒
EndWhile // endfor
C. 傳奇砍怪加經驗腳本怎麼弄
簡單游裡面有呢，你可以去找一個。
D. 誅仙簡單自動打怪腳本，我只要能自動打怪的就行了！！哪位高手給個
誅仙 自動打怪 外掛 按鍵精靈 腳本代碼
實現誅仙裡面類似法寶天人和一 自動喝葯打怪練級的
F4 大紅 f5 大藍 f6 揀東西 設置好後
簡單代碼如下 :
[General]
Description=自動練級
BeginHotkey=122
BeginHotkeyMod=0
RunOnce=0
Enable=1
[Repeat]
Type=1
Number=9699696
[Script]
KeyPress 9 1
Delay 1000
KeyPress 49 1
Delay 1000
KeyPress 49 1
Delay 10000
KeyPress 115 1
KeyPress 116 1
KeyPress 117 1
ScriptOption]
Description=誅仙自動打怪
BeginHotkey= 122
BeginHotkeyMod= 0
EndHotKey= 123
EndHotKeyMod= 0
RunOnce= 0
Enable= 1
Type= 1
Number= 1
ScriptFormat= 0
[Comment]
誅仙
[InitVar]
UserVar=基址|VarName=Var19|Type=String|Value=8ec0f4
UserVar=精靈工作方式|VarName=Var30|Type=DownList|Value= 0|Enum=掛機;輔助
UserVar=拾物時間(毫秒)|VarName=Var32|Type=Long|Value= 500
UserVar=紅瓶|VarName=Var6|Type=DownList|Value= 8|Enum=自定義
UserVar=加紅百分比(1-100)|VarName=Var13|Type=Long|Value= 60
UserVar=藍瓶|VarName=Var7|Type=DownList|Value= 9|Enum=自定義
UserVar=加藍百分比(1-100)|VarName=Var14|Type=Long|Value= 30
UserVar=運氣|VarName=Var9|Type=DownList|Value= 7|Enum=自定義
UserVar=是否運氣回血，1=是，0=否|VarName=Var12|Type=DownList|Value= 0|Enum=否;是
UserVar=拾取|VarName=Var8|Type=DownList|Value= 10|Enum=自定義
UserVar=普通攻擊|VarName=Var1|Type=DownList|Value= 0|Enum=自定義
UserVar=技能一|VarName=Var2|Type=DownList|Value= 17|Enum=自定義
UserVar=技能二|VarName=Var3|Type=DownList|Value= 17|Enum=自定義
UserVar=技能三|VarName=Var50|Type=DownList|Value= 17|Enum=自定義
UserVar=輔助一|VarName=Var11|Type=DownList|Value= 17|Enum=自定義
UserVar=輔助一施放間隔(毫秒)|VarName=Var24|Type=Long|Value= 1800000
UserVar=輔助二|VarName=Var4|Type=DownList|Value= 16|Enum=自定義
UserVar=輔助二施放間隔(毫秒)|VarName=Var25|Type=Long|Value= 1800000
UserVar=輔助三|VarName=Var5|Type=DownList|Value= 17|Enum=自定義
UserVar=輔助三施放間隔(毫秒)|VarName=Var26|Type=Long|Value= 1800000
[VBSScriptCode]
[Main]
Dim HPSetup
Dim MPSetup
Dim fzjnSetup1
Dim fzjnSetup2
Dim fzjnSetup3
Dim hxSetup
Dim hpTime 'HP葯的延遲
Dim mpTime 'MP葯的延遲
Dim fzjn1 '輔助技能延遲
Dim fzjn2 '輔助技能延遲
Dim fzjn3 '輔助技能延遲
Dim nowTime '當前時間
Dim i
Dim NewLoop '新循環
Dim chucktime '扔東西再揀東西的間隔時間
Dim guaicode '怪的代碼
Dim gxfs
Dim neicun,base_3,base_2,base_1,base_0,base
Dim dxue,dlan,mxue,mlan,bug,tmph
Dim hwnd,CTime,CTK,CTB,JTime,Bug_CDX,Bug_CDY,CDX_Ptr,CDY_Ptr,CDX_Base,CDY_Base
Dim mxue1,mlan1,dxue1,dlan1,gwid1,gwid2
Sub Main()
Call GetSetup
chucktime=0
hptime=GetTime
mptime=GetTime
fzjn1=GetTime-fzjnSetup1
fzjn2=GetTime-fzjnSetup2
fzjn3=GetTime-fzjnSetup3
newloop=0
hwnd=HWindow.getForeground
Call SetupMEM
gwid1=HMEM.ReadMEMEX(hwnd,bug,3)
gwid2=gwid1
Do While 1=1
Call UseAssistSkill '使用輔助技能
If gxfs="掛機" Then
Call FindObject '找怪
js=0
'----------------打怪----------------
CTK = GetTime
Do While HMEM.ReadMEMEX(hwnd,bug,3)<>0 And GetTime - CTK < 180000
'-------------先砍怪一下-------------
If js=0 Then
HApp.SendKeyPress hwnd,Var1 '第一技能按鍵，我的是按鍵<1>
Delay 400
js=1
End If
'------------------------------------
'--------------施放技能1-------------
HApp.SendKeyPress hwnd,Var2 '第一技能按鍵，我的是按鍵<F4>
Delay 400
'------------------------------------
'--------------施放技能2-------------
HApp.SendKeyPress hwnd,Var3 '第二技能按鍵，我的是按鍵<F5>
Delay 400
'------------------------------------
'--------------施放技能3-------------
HApp.SendKeyPress hwnd,Var50 '第三技能按鍵，我的是按鍵<F6>
Delay 200
Call SupplyHP '補血
Call SupplyMP '補藍
Delay 200
'------------------------------------
Loop
gwid1=gwid2
'-----------------------------------
Delay 200
Call CullArticle '揀東西
End If
If gxfs="輔助" Then
Call SupplyHP '補血
Call SupplyMP '補藍
End If
If newloop=0 Then
Call RenewVitality '運氣回復
End If
Delay 200
Loop
End Sub
Sub GetSetup() '設置變數初始值
HPSetup = Var13 '加紅設置，單位為百分比，但請不要設置為22至68之間，該區域被有可能被文字遮擋，無法取血條顏色
MPSetup = Var14 '加藍設置，單位為百分比，但請不要設置為22至68之間，該區域被有可能被文字遮擋，無法取藍條顏色
fzjnSetup1 = Var24 '輔助技能施放間隔，單位為毫秒，1秒=1000毫秒
fzjnSetup2 = Var25 '輔助技能施放間隔，單位為毫秒，1秒=1000毫秒
fzjnSetup3 = Var26 '輔助技能施放間隔，單位為毫秒，1秒=1000毫秒
hxSetup = Var12 '是否運氣回血，1=是，0=否
gxfs=Var30
End Sub
Sub UseAssistSkill() '使用輔助技能
nowtime=GetTime
If nowtime-fzjn1>fzjnSetup1 Then
For j=1 To 2
HApp.SendKeyPress hwnd,Var11 '
Delay 300
Next
fzjn1=GetTime
End If
nowtime=GetTime
If nowtime-fzjn2>fzjnSetup2 Then
For j=1 To 2
HApp.SendKeyPress hwnd,Var4 '
Delay 300
Next
fzjn2=GetTime
End If
nowtime=GetTime
If nowtime-fzjn3>fzjnSetup3 Then
For j=1 To 2
HApp.SendKeyPress hwnd,Var5 '
Delay 300
Next
fzjn3=GetTime
End If
End Sub
Sub FindObject() '找怪
CTime = GetTime
Do While HMEM.ReadMEMEX(hwnd,bug,3)=0 And gwid1=gwid2
HApp.SendKeyPress hwnd,"Tab" '找怪
Delay 300
gwid2=HMEM.ReadMEMEX(hwnd,bug,3)
Loop
End Sub
Sub SupplyHP() '補血
nowtime=GetTime
If nowtime-hptime>3000 Then
dxue1 = HMEM.ReadMEMEX(hwnd,dxue,3)
If dxue1<(mxue1*HPSetup/100)-1 Then
hptime=GetTime
HApp.SendKeyPress hwnd,Var6 '
Delay 100
End If
End If
End Sub
Sub SupplyMP() '補藍
nowtime=GetTime
If nowtime-mptime>3000 Then
dlan1 = HMEM.ReadMEMEX(hwnd,dlan,3)
If dlan1<(mlan1*MPSetup/100)-1 Then
mptime=GetTime
HApp.SendKeyPress hwnd,Var7 '
Delay 100
End If
End If
End Sub
Sub CullArticle() '揀東西
CTB = GetTime
Do While HMEM.ReadMEMEX(hwnd,bug,3)=0 And GetTime - CTB < Var32 '用1000MS揀東西
HApp.sendKeyPress hwnd,Var8
Delay 100
Loop
End Sub
Sub RenewVitality() '運氣回復
If hxSetup="是" Then
dxue1 = HMEM.ReadMEMEX(hwnd,dxue,3)
If dxue1<(mxue1*70/100)-1 Then
HApp.SendKeyPress hwnd,Var9 '氣功回血，我的是按鍵<0>
Do While dxue1<(mxue1*90/100)-1
Delay 500
'假如回復過程中被攻擊則中斷回血
If HMEM.ReadMEMEX(hwnd,bug,3)<>0 Then
newloop=1
Exit Do
End If
'------------------------------
dxue1 = HMEM.ReadMEMEX(hwnd,dxue,3)
Loop
End If
End If
End Sub
Sub SetupMEM()
Dim memstr
memstr=Var19
memstr = CLng("&h" & memstr)
memstr = gethex(hex(memstr))
base = HMEM.ReadMEMEX(Hwnd,memstr,3)
base = base + 40
base = gethex(hex(base))
base = HMEM.ReadMEMEX(Hwnd,base,3)
base = base + 596
dxue = gethex(hex(base))
dlan = gethex(hex(base + 4))
mxue = gethex(hex(base + 24))
mlan = gethex(hex(base + 28))
bug = gethex(hex(base + 1376))
mxue1 = HMEM.ReadMEMEX(hwnd,mxue,3) '最大化xue值
mlan1 = HMEM.ReadMEMEX(hwnd,mlan,3) '最大化lan值
End Sub
Function gethex(hexstr)
Dim tempstr
tempstr=string(8-len(hexstr),"0")
gethex="&H"& tempstr & hexstr
End Function
[MainEnd]
[VBSLib]
\MyLib\Default.Txt
[EndVBSLib]
[PublicVar]
[EndPublicVar]
E. 劍三自動打怪腳本
只是自動掛機刷怪腳本，絕對不可能有打副本的腳本，自動打副本那種已經算開掛了肯定會被封的。
F. 問下關於武器砍怪 一定幾率無敵 該怎麼寫腳本
利用技能觸發吧，比如設置列火Q-Function.txt中[@MagSelfFunc26]#IFrandom 3#ACTChangeModeEx 1 60
G. 按鍵精靈怎麼製作打怪腳本
你得告訴腳本該執行什麼然後執行什麼，通過代碼的命令來操作
你就這么簡單的一句：這么製作打怪腳本。。。
H. 怎麼製作一個定點打怪腳本
站刷怪地點開啟自動打怪，補滿法就OK了
I. 5s 觸摸精靈 無限砍怪腳本
【iOS】《天天酷跑》v1.0.7.0 觸動精靈/觸摸精靈 自動跳腳本分享--【肥x教程分享】
http://bbs.25pp.com/thread-162455-1-1.html
樓主可參照此帖子！
-- 猴島游戲論壇為您解答
J. 按鍵精靈【高級】自動打怪實戰腳本(2D網游篇)上
intX=(從屏幕左邊0 到！（小地圖）內怪物位置的距離)
UX=（屏幕左邊0 到游戲窗口的距離）
已經知道游戲窗口到（小地圖）內角色的位置是 724
那麼 （小地圖）內角色位置到怪物的距離也就是a 是 intX-(UX+724)=a
而 地圖內怪物位置 很容易定位坐標的如果是句柄來定位的話 QX就是 怪物的橫坐標加UX了
地圖怪物坐標-地圖人物坐標= 距離 /a得到比例（16：1）這是例子