环形渐开找怪示例

页面导航:首页 > 脚本专栏 > seraphzone > 环形渐开找怪示例

环形渐开找怪示例

来源:互联网 作者:脚本宝典 时间:2015-07-20 18:33 【

无聊,写个大家玩玩!!! 玩法,打开画图程序,选喷枪,然后运行此脚本就开始渐开画圆了,如果改改就成找怪的脚本了,呵呵!!! 复制代码 代码如下: dim Ttx,Tty function main Ttx=5

无聊,写个大家玩玩!!!
玩法,打开画图程序,选喷枪,然后运行此脚本就开始渐开画圆了,如果改改就成找怪的脚本了,呵呵!!!

复制代码代码如下:


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


Tags:

相关文章

文章评论

最 近 更 新
热 点 排 行
Js与CSS工具
代码转换工具

<