欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

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

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

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
//這寫找到怪后的動(dòng)作
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

相關(guān)文章

最新評(píng)論