庄園釣魚腳本

Ⅰ 有會寫按鍵精靈腳本的嗎~求浪漫庄園挖礦釣魚腳本

絕對沒有，我知道你哪個，也不能補體力，叫咖啡伴侶

Ⅱ 浪漫庄園如何按鍵精靈製作腳本！！！

給你一個測試版的腳本 不過絕對好用本人已經使用過非常不錯http://d.namipan.com/d/ http://d.namipan.com/d/上面一個是釣魚的 下面一個是挖礦的 給分吧

Ⅲ 浪漫庄園釣魚腳本

//如果你不需要做小精靈，可以直接賦值add=0,1,2任意一個
UserVar add=DropList{不加餌:0|空餌報警:1|自動加餌:2}=0 加餌方式
//首先是獲取窗口句柄，注意2種方式獲得的句柄的區別：
Plugin hwnd2=window.foreground()
//上面這句獲得的窗口句柄可以移動窗口，但是無法在窗口點擊滑鼠
Plugin hwnd1=window.mousepoint()
//現在用這句得到的句柄，可以在窗口內點擊滑鼠，但是無法移動這個窗口
//所以，如果你需要移動窗口，使用的句柄應該是hwnd2，而點擊使用的是hwnd1
//當然，這2種方式取得的窗口，大小是一樣的，所以坐標的計算就無所謂了
//獲得窗口左上角的位置，用於自動加餌後窗口返回初始位置
Plugin Rect = Window.GetwindowRect(Hwnd1)
MyArray = Split(Rect, "|")
xleft = Cint(MyArray(0))
ytop = Cint(MyArray(1))
//獲得滑鼠位置，並轉換為窗口坐標
VBSCall GetCursorPos(xget,yget)
Plugin clixy=BGKM5.ScrToCli(hwnd1,xget,yget)
VBSCall MyArray1=split(clixy,"|",-1,1)
VBSCall x=CInt(MyArray1(0))
VBSCall y=CInt(MyArray1(1))
Rem 開始
Gosub 體力
//如果選擇的是不加餌，那麼就不需要執行魚餌判斷
If add<>0
Gosub 魚餌
EndIf
//選擇魚竿，然後在水面下桿
Plugin BGKM5.KeyClick(hwnd1,112)
Delay 100
Plugin BGKM5.LClick(hwnd1,x,y)
//7秒內不會出現魚，所以延遲7秒後再開始循環找，避免無意義的循環
Delay 7000
//確定找魚的次數，以及找魚的范圍
timelimit=60
zuoshangx=x-60
zuoshangy=y-100
youxiax=x+60
youxiay=y-40
//開始找魚,一共60次，每次間隔200毫秒
//如果一直沒有找到，會消耗12秒
//加上之前的7秒，整個釣魚過程的檢測時間是19秒
//不過測試中，找不到魚的幾率為0 ^_^
i=0
j=0
While i<timelimit and j=0
Plugin jt=BkgndColor.FindColor(hwnd1,zuoshangx,zuoshangy,youxiax,youxiay,"F0CC98")
If jt="-1|-1"
//如果沒有找到魚，延遲200毫秒，重新找
i=i+1
Delay 200
Else
//如果找到了魚（實際上是箭頭），點擊魚
jtarray=Split(jt,"|",-1,1)
VBSCall xjt=cint(jtarray(0))
VBSCall yjt=cint(jtarray(1))
Plugin BGKM5.LClick(hwnd1,xjt-2,yjt+30)
Delay 150
//令J=1，跳出循環
j=1
EndIf
EndWhile
Delay 200
//切換F8是為了干什麼我就不多說了，玩庄園的都知道
Plugin BGKM5.KeyClick(hwnd1,119)
Delay 200
Goto 開始
Sub 體力
Plugin color7=Bkgndcolor.GetPixelColor(hwnd1,90,62)
//如果顏色為黑，吃血
If color7=2106400
Delay 200
Plugin BGKM5.KeyClick(hwnd1,113)
Delay 200
Plugin BGKM5.LClick(hwnd1,570,507)
Delay 1800
Plugin BGKM5.KeyClick(hwnd1,113)
EndIf
Return 體力
Sub 魚餌
//判斷魚餌的量是否小於3%，截圖中發現，小於3%的魚餌量是無法繼續取色的了
//所以只能以3%來判斷，小於3%就認為是沒有魚餌了
Plugin color0=BkgndColor.GetPixelColor(hwnd1,531,553)
If color0=7864320
//如果顏色變黑，則說明需要加餌，根據變數選擇的不同而判斷
//選擇報警時，彈出提示
If add=1
msgbox "魚餌只剩3%，腳本會自動停止，請加餌後繼續"
EndScript
Else
//選擇自動加餌時，則自動加餌，自動加餌為前台操作
//先鎖定滑鼠
LockMouse
//窗口移動到左上，注意此處使用的窗口句柄
Plugin Window.Move(hwnd2,0,0)
Delay 500
//滑鼠移動到10，10的位置點擊一次是為了保證此窗口能前端顯示
//所以使用此功能時，請注意把屏幕左上角留出至少10x10的位置
//也就是說你的其他窗口不能最大化
MoveTo 10,10
Delay 100
LeftClick 1
Delay 200
//點擊釣竿的位置,可以用按鍵F1代替
MoveTo 519,539
Delay 100
LeftClick 1
Delay 1000
//點「添加魚餌」按鈕
MoveTo 584,503
Delay 500
LeftClick 1
Delay 500
MoveTo 10,10
Delay 500
//點擊魚餌(F3位置)，並按住魚餌移動到空格中
MoveTo 591,539
Delay 200
LeftDown 1
Delay 200
MoveTo 290,279
Delay 200
LeftUp 1
Delay 1000
//點擊「添加」按鈕
MoveTo 329,369
Delay 500
LeftClick 1
Delay 1000
//加餌完成，窗口移動回初始位置
Plugin window.Move(hwnd2,xleft,ytop)
Delay 500
//釋放滑鼠
UnlockMouse
EndIf
EndIf
Return 魚餌

Ⅳ 浪漫庄園自動釣魚腳本，最簡單的是什麼

VBSCall GetCursorPos(x1,y1)
//跑到水邊`把滑鼠放在要扔鉤的位置再開始運行角本`這里會取得當前滑鼠點坐標
Rem 開始
IfColor 73,45,de5d9c,1
//這是我判斷HP的語句`如果顏色不對就吃東西`根據需要自己改下`
Goto 吃
EndIf
KeyPress 112,1
//F1``把竿放在F1
MoveTo x1,y1
//向之前取得的點扔竿``
LeftClick 1
MoveTo 1233,307
//盡量把滑鼠移開`以便不影響圖象判斷
yx=0
yy=0
For 150
Rem begin

VBSCall Call FindPic(x1-150,y1-200,x1+150,y1+50,"咬.BMP",0.5,yx,yy)
//在扔鉤范圍附近搜索圖片``我搜索的是那個向下的箭頭``圖片自己去抓好了``由於是在漂上方出現`所以下方判斷范圍只加了50`
If yx>0 and yy>0
cy=yy+50
MoveTo yx,cy
LeftClick 1
Goto 開始
Else
Delay 100
Goto begin
EndIf
EndFor
Beep
//超過15秒沒有釣到`可能是出了驗證```發出警報``不過好象無效``不知道為什麼`可能循環有問題`
Goto 開始
Rem 吃
KeyPress 113,1
//吃東西`這里是F2鍵``
Delay 100
MoveTo 1048,929
//F2位置上`吃那個字的位置`具體的自己抓下點`
LeftClick 1
Delay 1700
Goto 開始

Ⅳ 求按鍵精靈8浪漫庄園後台挖礦，釣魚，種植腳本！！19英寸顯示器，1440*900分瓣率！！有的發[email protected]

直接下載咖啡伴侶吧。

Ⅵ 哪位高手有4399浪漫庄園的免費挖礦，釣魚腳本或掛 可以送的加分

[General]
Description=前台挖礦
BeginHotkey=13
BeginHotkeyMod=2
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=45
StopHotkeyMod=0
RunOnce=1
EnableWindow=浪漫庄園
Enable=1
AutoRun=0
[Repeat]
Type=1
Number=1
[Relative]
SetupOCXFile=
[Comment]
Content=

[Script]
UserVar abc=7000 挖礦時間
Plugin Hwnd = Window.Find(0, "浪漫庄園")
Plugin Window.Max(Hwnd)
KeyPress 112,1
VBSCall GetCursorPos(ab,ac)
LeftClick 1
Delay abc
MoveR ab,ac
LeftClick 1
KeyPress 113,1
IfColor 18,5,0,0
MoveR 795,644
LeftClick 1
EndIf

以上是挖礦腳本 導入即可使用

Ⅶ 求一個浪漫庄園自動挖礦和一個釣魚的腳本（主要是挖礦的），會補體力，加魚餌，不要求會過意外

發了

Ⅷ 有人能幫忙寫個浪漫庄園自動釣魚的腳本不呢好用的再多給分

用按鍵精靈應該就可以了~~
建個腳本後，重復就好了~~~

Ⅸ 求新版浪漫庄園自動挖礦+釣魚+自動補體力腳本源碼

我給你 我浪漫庄園80 天秤

Ⅹ 我的世界按鍵精靈的釣魚腳本怎麼做

延遲0.45秒就行