最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

環(huán)形漸開找怪示例

 更新時間:2009年07月18日 15:53:42   作者:  
玩法,打開畫圖程序,選噴槍,然后運行此腳本就開始漸開畫圓了,如果改改就成找怪的腳本了,呵呵?。。?
無聊,寫個大家玩玩!??!
玩法,打開畫圖程序,選噴槍,然后運行此腳本就開始漸開畫圓了,如果改改就成找怪的腳本了,呵呵?。。?BR>
復制代碼 代碼如下:

dim Ttx,Tty
function main
Ttx=512
Tty=(768-42)/2
do
for r=1 to 10
rr=20*r
if ismonster(rr,x,y) then
//這寫找到怪后的動作
end if
next
loop
end function

function ismonster(pixelR,byref monsterX,byref monsterY)
ismonster=false
//CopyScreen()
for k=1 to 2
for j=-pixelR to pixelR step 2
if k=1 then
x=Ttx+j
y=Tty+Sqr(pixelR*pixelR-j*j)
else
x=Ttx-j
y=Tty-Sqr(pixelR*pixelR-j*j)
end if
//以下三行本來是寫怪物顏色判斷,這改成畫圖了,呵呵
MouseMove(x,y)
MouseLeftClick()
Wait(100)
next
next
end function

相關文章

最新評論

方正县| 衡南县| 翼城县| 安塞县| 鞍山市| 陆川县| 将乐县| 拜城县| 吉水县| 锦州市| 高州市| 宁晋县| 林甸县| 五莲县| 周宁县| 香港| 荣成市| 泌阳县| 鸡东县| 密云县| 来安县| 纳雍县| 莒南县| 阿坝县| 甘肃省| 唐山市| 阿合奇县| 长岛县| 云林县| 青州市| 宝应县| 沂南县| 荣成市| 新野县| 扬中市| 绥中县| 固阳县| 神木县| 昆明市| 道孚县| 冀州市|