黃易群俠傳M脫機外掛應用程式黃易神行
1416
3

請高手幫我改一下這個腳本....

pb220501 發表於 2009-7-24 14:51:33 | 只看該作者 回帖獎勵 |倒序瀏覽 |
這個是圓形漸開線掃瞄找變色怪的腳本
可是裡面包含了一些東西  所以我不知道該怎麼改
想我要讓他只要單純劃圈圈就好
有高手可以幫我改一下嗎~"~

VBS dim x0,n,y0,x,color0,color
//聲明變量
Rem start
//標記漸開線找怪開始
VBS x0=400:n=1:y0=300:x=400
//變量初始化
While x<800
    //限定橫坐標範圍不超過800
    VBS x=x0+4*(cos(n)+n*sin(n))
    //根據漸開線公式計算下一個點的橫坐標並賦值給x
    VBS y=y0+3*(sin(n)-n*cos(n))
    //根據漸開線公式計算下一個點的縱坐標並賦值給y
    VBSCall color0=GetPixelColor(x,y)
    //在鼠標移動之前,獲取目標點色值並賦值給color0
    VBSCall Call SetCursorPos(x,y)
    //馬上移動鼠標到目標點
    VBSCall color=GetPixelColor(x,y)
    //獲取鼠標移動後該點色值並賦值給color
    If color<>color0
        //同一點取得的兩次色值比較,不同,則執行以下的打怪腳本
        LeftClick 1
        //左鍵單擊
        Delay 3000
        //打怪延時
    EndIf
    //該點判斷結束
    Delay 10
    //循環延時
    VBS n=n+0.2
    //漸開線參數增量,其中0.2代表點間距,數值越小,漸開線散開點間距越小
EndFor
//一次漸開線取點判斷結束
Goto start
//跳轉到開始,重複漸開線搜索

[ 本帖最後由 pb220501 於 2009-7-24 14:54 編輯 ]
收藏收藏 分享分享 讚 幹 分享分享 FB分享
回覆

使用道具 舉報


金浪漫 當前離線
UID
498537
熱心
2155 值
嘉獎
0 次
違規
0 次
在線時間
2350 小時
經驗
1335 點
積分
86360
精華
0
最後登錄
2023-11-2
閱讀權限
60
註冊時間
2007-8-16
論壇幣
78185 幣
聯合幣
2324 枚
幸運鑽
833 顆
招待卷
0 點
查看詳細資料
Rank: 7Rank: 7Rank: 7
金浪漫 2009-7-24 17:06:30
VBS dim x0,n,y0,x
//聲明變量
Rem start
//標記漸開線找怪開始
VBS x0=400:n=1:y0=300:x=400
//變量初始化
While x<800
    //限定橫坐標範圍不超過800
    VBS x=x0+4*(cos(n)+n*sin(n))
    //根據漸開線公式計算下一個點的橫坐標並賦值給x
    VBS y=y0+3*(sin(n)-n*cos(n))
    //根據漸開線公式計算下一個點的縱坐標並賦值給y
    VBSCall Call SetCursorPos(x,y)
    //馬上移動鼠標到目標點
    Delay 10
    //循環延時
    VBS n=n+0.2
    //漸開線參數增量,其中0.2代表點間距,數值越小,漸開線散開點間距越小
EndFor
//一次漸開線取點判斷結束
Goto start
//跳轉到開始,重複漸開線搜索


如果只是要單純的漸開式畫圈

刪除偵測顏色那幾行就可以了
回覆

使用道具 舉報

pb220501 當前離線
UID
9835
熱心
254 值
嘉獎
0 次
違規
0 次
在線時間
729 小時
經驗
209 點
積分
4945
精華
0
最後登錄
2023-6-5
閱讀權限
55
註冊時間
2006-7-22
論壇幣
3696 幣
聯合幣
36 枚
幸運鑽
2 顆
招待卷
24676 點
查看詳細資料
Rank: 5Rank: 5Rank: 5
pb220501 2009-7-24 19:34:18
哦哦

原來如此
謝謝你YCT41B
回覆

使用道具 舉報

kowty 當前離線
UID
88810
熱心
33 值
嘉獎
0 次
違規
0 次
在線時間
15 小時
經驗
31 點
積分
79
精華
0
最後登錄
2015-4-14
閱讀權限
20
註冊時間
2006-11-21
論壇幣
234 幣
聯合幣
3 枚
幸運鑽
0 顆
招待卷
0 點
查看詳細資料
Rank: 2Rank: 2
kowty 2009-7-25 15:12:58
感謝大大YCT49B
回覆

使用道具 舉報

您需要登錄後才可以回帖 登錄 | 註冊


手機版 | Archiver | 外掛聯合國

GMT+8, 2024-11-28 07:39 , Processed in 0.052064 second(s), 16 queries , Memcache On.

版權說明:
  本站不會製作、經銷、代理外掛程式。僅免費提供外掛程式下載前之掃毒及掃木馬等安全檢測驗證,協助會員遠離盜號危險程式。本站所有資料均來自網際網路收集整理,說明文字暨下載連結轉載自原程 式開發站。站上出現之公司名稱、遊戲名稱、程式等,商標及著作權,均歸各公司及程式原創所有,本站程式所有權歸外掛聯合國所有。本程式所有權歸外掛聯合國所有.......

回頂部
第二步?
第三步?