積分 7
角色名稱 歌岸似聲
Discord 帳號
最後登入 2019-11-12
         
棉被會員
積分: 7
楓幣: 13
活動兌換幣: 4
花絮幣: 0
簽到幣: 0
活動95折券: 0
角色名稱: 歌岸似聲
Discord 帳號:
|
本帖最後由 TzYiGa 於 2016-7-16 01:11 編輯
哈囉大家好
我是幹幹
今天要來發布很久以前就寫好的腳本
這個腳本經過我上百次的試調還有矯正
基本上沒有遇上什麼太大的困難
所以就當作腳本練習發放給大家囉
---> 影片介紹<---
詳細的使用方法跟腳本介紹我都放在影片裡面了
如果還有任何問題 可以再論壇留言告訴我
我會進行腳本更新
有BUG一定要回覆 不然BUG只會一直錯下去
這是影片中提到的程式碼
適用於2014以上版本 不清楚以下的版本是否相符
- ----------/*主程式*/---------
- Rem c
- Delay 200
- FindPic 10,50,170,80,"Attachment:\特殊.bmp",1.0,intX,intY
- If intX > 0 And intY > 0 Then
- MoveTo intX+10,intY+5
- Delay 100
- LeftClick 3
- Delay 300
- Else
- Goto c
- End If
- FindPic 0,0,1024,768,"Attachment:\星石方塊.bmp",0.9,intX,intY
- If intX > 0 And intY > 0 Then
- MoveTo intX + 10, intY + 5
- Delay 100
- LeftDoubleClick 1
- Delay 100
- End If
- FindPic 10,50,170,80,"Attachment:\裝飾.bmp",0.9,intX,intY
- If intX > 0 And intY > 0 Then
- MoveTo intX+10,intY+5
- Delay 100
- LeftClick 1
- Delay 100
- End If
- FindPic 0,0,1024,768,"Attachment:\D.bmp",0.9,intX,intY
- If intX > 0 And intY > 0 Then
- Call 判斷成功
- End If
- FindPic 0,0,1024,768,"Attachment:\C.bmp",0.9,intX,intY
- If intX > 0 And intY > 0 Then
- Call 判斷成功
- End If
- FindPic 0,0,1024,768,"Attachment:\B.bmp",0.9,intX,intY
- If intX > 0 And intY > 0 Then
- Call 判斷成功
- End If
- FindPic 0,0,1024,768,"Attachment:\A.bmp",0.9,intX,intY
- If intX > 0 And intY > 0 Then
- Call 判斷成功
- End If
- ----------/*副程式*/----------
- Sub 判斷成功
- MoveTo intX + 10, intY + 5
- Delay 100
- LeftClick 1
- Delay 100
- Call 星石方塊內
- Call OK
- Goto c
- End Sub
- Sub 星石方塊內
- FindPic 0,0,1024,768,"Attachment:\星石方塊內.bmp",0.9,intX,intY
- If intX > 0 And intY > 0 Then
- MoveTo intX + 20, intY + 60
- Delay 100
- LeftClick 1
- Delay 100
- End If
- End Sub
- Sub OK
- FindPic 467,470,521,500,"Attachment:\OK.bmp",0.9,intX,intY
- If intX > 0 And intY > 0 Then
- MoveTo intX + 5, intY + 5
- Delay 100
- LeftClick 1
- Delay 100
- Else
- FindPic 363,390,402,409,"Attachment:\OK.bmp",0.9,intX,intY
- If intX > 0 And intY > 0 Then
- MoveTo intX + 5, intY + 5
- Delay 100
- LeftClick 1
- Delay 100
- End If
- End If
- End Sub
複製代碼
---> 【幹幹】洗星石腳本V0.1]<---
各位有什麼想學的 都可以再下面留言喔
我會盡量滿足觀眾需求
有問題我都會回覆
或者在下部影片裡再多做更多的介紹
謝謝大家啦^^
相關連結
--- 【幹幹】腳本教學1. 基本抓圖---
|
|