您现在的位置是：网站首页> 编程资料编程资料
环形渐开找怪示例_seraphzone_
2023-05-26
419人已围观
简介 环形渐开找怪示例_seraphzone_
无聊，写个大家玩玩！！！
玩法，打开画图程序，选喷枪，然后运行此脚本就开始渐开画圆了，如果改改就成找怪的脚本了，呵呵！！！
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
玩法，打开画图程序，选喷枪，然后运行此脚本就开始渐开画圆了，如果改改就成找怪的脚本了，呵呵！！！
复制代码 代码如下:
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
相关内容
- 一个用SearchValidAddr搜索基址的例子_seraphzone_
- Seraph sp脚本运行软件下载_seraphzone_
- sp官方出品用Seraph不被封号方法(图文教程)_seraphzone_
- AutoIt脚本的反编译和代码格式化问题分析_autoit_
- 获取外网IP并发送到指定的邮箱的脚本_autoit_
- 使用AutoIT实现自动登录/退出客户端软件，删除日志_autoit_
- 飞信的CMD命令行接口批量发送信息_autoit_
- Au3截取腾讯天气的脚本_autoit_
- autoit 更改个人文件夹的小工具_autoit_
- AutoIt3和按键精灵的功能对比第1/2页_autoit_
