本帖最後由 stars80617 於 2012-9-11 22:08 編輯
首先,此腳本只適合練技能
若怪物過強會死亡(戰鬥中沒有任何補血語法)
請自己斟酌練技場所
我寫此腳本地點位於 哈啾島
語法中抓色 都是與場地景色無關的色彩
●除了戰鬥中 鎖怪是抓怪物底下的空白圓圈
所以只要地圖景色不要純白,基本上是全地圖通用
而語法內我重複了很多指令
延遲毫秒也用了很多
這是為了防止按鍵精靈處理速度過快
導致迴圈跑回最上層
另外,電腦黑屏過久以及視窗的轉化皆會影響腳本運行
請特別留意
本人也是最近剛學語法
有任何錯誤請各位多加指正
若是運行順暢也請留言鼓勵一下∼∼
謝謝
前置作業:(要運行此腳本必須完全符合以下幾點)
1.桌面解析度為1440*900
2.將童話開啟.視窗對齊最左上 (對齊的程度必須還看的到視窗邊框,要完全吻合)
3.小地圖關閉,最右上書本的圖案.一定要放置紅色那本 (以便分辨戰鬥和正常狀態)
4.所有特效關閉,只留跑步
5.必須要有一隻會回春及轉換的寵物,將它獸化。
6.人物技能:F5為祈禱,F6為要釋放的技能。寵物技能F7為回春術,F9為轉換。
以上幾點全部符合的話,就能夠運行腳本
本人用的是按鍵精靈9,其他版本適不適用就不清楚了
請將以下語法貼在原始檔案中
Rem start1
FindColor 100,41,111,51,"EFEBE7",intX,intY
If intX > 0 And intY > 0 Then
KeyPress "F5", 1
End If
Delay 5000
FindColor 100,41,111,51,"EFEBE7",intX,intY
If intX > 0 And intY > 0 Then
KeyPress "F5", 1
End If
Delay 5000
FindColor 100,41,111,51,"EFEBE7",intX,intY
If intX > 0 And intY > 0 Then
Goto start1
End If
Rem start2
FindColor 96,30,114,42,"DED7CE",intX,intY
If intX > 0 And intY > 0 Then
MoveTo 777, 568
Delay 500
LeftClick 1
Delay 500
KeyPress "F9", 1
Delay 500
KeyPress "F7", 1
Delay 500
MoveTo 752, 567
Delay 500
LeftClick 1
End If
Rem start3
FindColor 104, 30, 114, 41, "0014E7",intX,intY
If intX > 0 And intY > 0 Then
MoveTo 130, 460
Delay 500
LeftClick 1
Delay 500
LeftClick 1
Delay 500
LeftClick 1
MoveTo 735, 230
Delay 500
LeftClick 1
Delay 500
LeftClick 1
Delay 500
LeftClick 1
End If
FindColor 767,35,798,66,"2128EF",intX,intY
If intX > 0 And intY > 0 Then
Goto start3
End if
Rem start4
FindColor 30,30,188,46,"CE4908",intX,intY
If intX> 0 And intY> 0 Then
FindColor 0,95,461,457,"FFFBFF",X,Y
If X > 0 And Y > 0 Then
MoveTo x, y
KeyPress "F6", 1
Delay 500
KeyPress "F6", 1
LeftClick 1
KeyPress "F6", 1
Delay 500
KeyPress "F6", 1
LeftClick 1
End If
End IF
Delay 500
FindColor 183,26,206,51,"FFFFA5",intX,intY
If intX > 0 And intY > 0 Then
Goto start4
End If
Delay 500
FindColor 30,30,188,46,"CE4908",X1,Y1
If intX> 0 And intY> 0 Then
Goto start4
End IF
Delay 500
FindColor 0,117,616,423,"FFFBFF",X,Y
If intX > 0 And intY > 0 Then
Goto start4
End If
Delay 500
FindColor 30,30,188,46,"CE4908",intX,intY
If intX> 0 And intY> 0 Then
FindColor 0,95,461,457,"FFFBFF",X,Y
If X > 0 And Y > 0 Then
MoveTo x, y
KeyPress "F6", 1
Delay 500
KeyPress "F6", 1
LeftClick 1
KeyPress "F6", 1
Delay 500
KeyPress "F6", 1
LeftClick 1
End If
End IF
Delay 500
FindColor 183,26,206,51,"FFFFA5",intX,intY
If intX > 0 And intY > 0 Then
Goto start4
End If
Delay 500
FindColor 30,30,188,46,"CE4908",X1,Y1
If intX> 0 And intY> 0 Then
Goto start4
End IF
Delay 500
FindColor 0,117,616,423,"FFFBFF",X,Y
If intX > 0 And intY > 0 Then
Goto start4
End If
Delay 500
Goto start1
------------------------------------------------------------------------------------------------------
修改部分:
目前還有問題的地方就是戰鬥時鎖怪的部分
鎖怪的語法是下列這段
Rem start4
FindColor 30,30,188,46,"CE4908",intX,intY
If intX> 0 And intY> 0 Then
FindColor 0,95,461,457,"FFFBFF",X,Y
If X > 0 And Y > 0 Then
MoveTo x, y
KeyPress "F6", 1
Delay 500
KeyPress "F6", 1
LeftClick 1
KeyPress "F6", 1
Delay 500
KeyPress "F6", 1
LeftClick 1
End If
End IF
滑鼠會移動到白色FFFBFF部分,但有時會鎖不到框框
改善方式:
在這一整段後面完整的複製貼上同樣的語法
接著找到MoveTo x,y這行
將這行 改成MoveTo x-5,y-5 或是MoveTo x+5,y+5 (移動距離依照個人需求而定)
這樣一來.假設電腦讀了x,y的座標.鎖不到怪
會接著往左上移動.還是鎖不到的話會在往右下移動
可以改善鎖不到怪的情形
目前還有許多要更改的地方@@請大家指正,讓這語法更為實用
|