环形渐开找怪示例
环形渐开找怪示例
发布时间:2016-12-28 来源:查字典编辑
摘要:无聊,写个大家玩玩!!!玩法,打开画图程序,选喷枪,然后运行此脚本就开始渐开画圆了,如果改改就成找怪的脚本了,呵呵!!!复制代码代码如下:d...

无聊,写个大家玩玩!!!

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

复制代码 代码如下:

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

推荐文章
猜你喜欢
附近的人在看
推荐阅读
拓展阅读
相关阅读
网友关注
最新seraphzone学习
热门seraphzone学习
脚本专栏子分类