autoit pro
写了个小程序,用来做压力测试;是加了UI的哦!
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiComboBox.au3>
#include <GuiButton.au3>
#include <GuiEdit.au3>
HotKeySet("{ESC}", "Terminate")
;$iRand = Random(0, 5, 1)
Local $sFileOpenDialog1,$sFileOpenDialog2
Local $FactorToolName
Local $CoordX = 1610, $CoordY = 285 ;Get Point By Line
_Main()
Func _Main()
Local $msg
Local $sMessage = "open"
$hWndWinD = GUICreate("Stress Test",500,200) ; will create a dialog box that when displayed is centered
; GUISetState(@SW_SHOW) ; will display an empty dialog box
GUICtrlCreateLabel ( "exe Path", 30, 32,80, 20)
GUICtrlCreateLabel ( "file Path", 30,60,80,20 )
GUICtrlCreateLabel ( "factor tool", 30, 90,80, 20)
GUICtrlCreateLabel ( "operator", 30,120,80,20 )
$hWndEdit1 = GUICtrlCreateEdit("",150,32,300,20,$ES_AUTOHSCROLL)
$hWndEdit2 = GUICtrlCreateEdit("",150,60,300,20,$ES_AUTOHSCROLL)
$hWndCombo1 = GUICtrlCreateCombo("",150,90,200,20,$CBS_DROPDOWNLIST)
_GUICtrlComboBox_AddString($hWndCombo1, "Get Point By Line")
_GUICtrlComboBox_AddString($hWndCombo1, "Get Point By Circle")
_GUICtrlComboBox_AddString($hWndCombo1, "Get Point By Arc")
_GUICtrlComboBox_AddString($hWndCombo1, "Peak Line")
_GUICtrlComboBox_AddString($hWndCombo1, "Peak Circle")
_GUICtrlComboBox_AddString($hWndCombo1, "Peak Arc")
_GUICtrlComboBox_AddString($hWndCombo1, "Middle Line")
_GUICtrlComboBox_AddString($hWndCombo1, "MaxMinPoint By Circle")
_GUICtrlComboBox_AddString($hWndCombo1, "MaxMinPoint By Rect")
_GUICtrlComboBox_AddString($hWndCombo1, "MaxMinPoint By Arc")
_GUICtrlComboBox_AddString($hWndCombo1, "Get Line")
_GUICtrlComboBox_AddString($hWndCombo1, "Get Circle")
_GUICtrlComboBox_AddString($hWndCombo1, "Get Arc")
_GUICtrlComboBox_AddString($hWndCombo1, "ExtractContour")
$hWndCombo2 = GUICtrlCreateCombo("",150,120,200,20)
$hWndBtn1 = GUICtrlCreateButton ( "...", 455, 32,25, 20)
$hWndBtn2 = GUICtrlCreateButton ( "...", 455, 60,25, 20)
$hWndBtnOK = GUICtrlCreateButton ( "OK", 150, 160,25, 20)
$hWndBtnCancel = GUICtrlCreateButton ( "Cancel", 200,160,60,20 )
GUISetState(@SW_SHOW)
While 1
Switch GUIGetMsg()
Case $hWndBtn1
$sFileOpenDialog1 = FileOpenDialog($sMessage, @WindowsDir & "\", "(*.exe)", $FD_FILEMUSTEXIST)
GUICtrlSetData($hWndEdit1,$sFileOpenDialog1,' ')
Case $hWndBtn2
$sFileOpenDialog2 = FileOpenDialog($sMessage, @WindowsDir & "\", "(IMAGE.bmp)",$FD_PATHMUSTEXIST )
GUICtrlSetData($hWndEdit2,$sFileOpenDialog2)
Case $hWndCombo1
Local $factorToolindex = _GUICtrlComboBox_GetCurSel($hWndCombo1)
_GUICtrlComboBox_GetLBText($hWndCombo1,$factorToolindex,$FactorToolName)
Case $hWndBtnOK
GUIDelete()
BeginExecute()
; Exit
Case $hWndBtnCancel
ExitLoop
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
EndFunc
Func BeginExecute()
ConsoleWrite($FactorToolName& @CRLF)
Run($sFileOpenDialog1,"",@SW_SHOWMAXIMIZED)
WinWaitActive("[CLASS:Qt5QWindowIcon]")
Opt("MouseCoordMode", 1)
MouseClick("left",27,38)
Sleep(500)
Send("{DOWN 2}")
Sleep(500)
Send("{ENTER}")
Sleep(500)
WinWaitActive("Open Image")
Sleep(1000)
Local $hWnd = WinWait("Open Image", "", 10)
ControlSetText($hWnd, "", "Edit1", $sFileOpenDialog2)
ControlClick("Open Image","","Button1")
Sleep(500)
MouseClick("left",1692, 191) ;page "insert"
Sleep(500)
While 1
Switch $FactorToolName
Case "Get Point By Line"
MouseClick("left",$CoordX, $CoordY)
Sleep(500)
MouseClickDrag($MOUSE_CLICK_LEFT,954,592,1107,545)
Case "Get Point By Circle"
MouseClick("left",$CoordX+100, $CoordY)
Sleep(500)
MouseClickDrag($MOUSE_CLICK_LEFT,954,592,1025,468)
Case "Get Point By Arc"
MouseClick("left",$CoordX+200, $CoordY)
Sleep(500)
MouseClickDrag($MOUSE_CLICK_LEFT,949,554,956,576)
Case "Peak Line"
MouseClick("left",$CoordX, $CoordY+100)
Sleep(500)
MouseClickDrag($MOUSE_CLICK_LEFT,954,592,1107,545)
Case "Peak Circle"
MouseClick("left",$CoordX+100, $CoordY+100)
Sleep(500)
MouseClickDrag($MOUSE_CLICK_LEFT,954,592,1025,468)
Case "Peak Arc" ;;;修改座标到此处
MouseClick("left",$CoordX+200, $CoordY+100)
Sleep(500)
MouseClickDrag($MOUSE_CLICK_LEFT,954,592,1107,545)
Case "Middle Line"
MouseClick("left",$CoordX, $CoordY+200)
Sleep(500)
MouseClickDrag($MOUSE_CLICK_LEFT,954,592,1107,545)
Case "MaxMinPoint By Circle"
MouseClick("left",$CoordX+100, $CoordY+200)
Sleep(500)
MouseClickDrag($MOUSE_CLICK_LEFT,954,592,1107,545)
Case "MaxMinPoint By Rect"
MouseClick("left",$CoordX+200, $CoordY+200)
Sleep(500)
MouseClickDrag($MOUSE_CLICK_LEFT,954,592,1107,545)
Case "MaxMinPoint By Arc"
MouseClick("left",$CoordX, $CoordY+300)
Sleep(500)
MouseClickDrag($MOUSE_CLICK_LEFT,954,592,1107,545)
Case "Get Line"
MouseClick("left",$CoordX+100, $CoordY+300)
Sleep(500)
MouseClickDrag($MOUSE_CLICK_LEFT,954,592,1107,545)
Case "Get Circle"
MouseClick("left",$CoordX+200, $CoordY+300)
Sleep(500)
MouseClickDrag($MOUSE_CLICK_LEFT,954,592,1107,545)
Case "Get Arc"
MouseClick("left",$CoordX, $CoordY+400)
Sleep(500)
MouseClickDrag($MOUSE_CLICK_LEFT,954,592,1107,545)
Case "ExtractContour"
MouseClick("left",$Coord+100, $CoordY+400)
Sleep(500)
MouseClickDrag($MOUSE_CLICK_LEFT,954,592,1107,545)
Case Else
Exit
EndSwitch
Sleep(500)
MouseClick("left",1717, 960) ;"OK" button
Sleep(500)
MouseClick("left",1644, 992) ;"Execute" button
Sleep(500)
WEnd
EndFunc
Func Terminate()
Exit
EndFunc
autoit pro相关推荐
- 使用AutoIt实现UI自动化上传附件
1.下载AutoIt,https://www.autoitscript.com/site/autoit/downloads/(这个地址下载下来的不好使的话,自行搜索下载,CSDN上有很多) 2.找到安 ...
- CUDA Pro:通过向量化内存访问提高性能
CUDA Pro:通过向量化内存访问提高性能 许多CUDA内核受带宽限制,而新硬件中触发器与带宽的比率不断提高,导致带宽受限制的内核更多.这使得采取措施减轻代码中的带宽瓶颈非常重要.本文将展示如何在C ...
- 荣耀30pro系统_荣耀30 pro:正式再见!
但随着市场竞争加剧,最近荣耀在价格上再次妥协,也是为了给新机开始让步,马上就是荣耀V40系列的发布会了,迭代荣耀30 pro+也不再坚挺,笔者从第三方平台上看到数据,荣耀30pro+这款手机大降520 ...
- windows mobile设置插移动卡没反应_ipad pro外接移动硬盘ipados
ipad pro外接移动硬盘ipados ********ipad pro更新ipad os后就可以外接移动硬盘.********* 相信很多在用ipad的人都想尽办法把优盘,移动硬盘接上ipad p ...
- 华为手机连电脑_手机装进电脑里 华为MateBook X Pro 2020款升级多屏协同
移动互联网时代,日常生活拥有多项便利的同时,工作也发生了一些微妙的变化.比如:咱们移动端设备接收的信息越来越多,甚至部分功能连电脑都不能及(譬如:小程序).因此,在办公过程中经常需要电脑与手机的交替使 ...
- android 蓝牙 鼠标 app_Razer 雷蛇 那伽梵蛇 Pro 专业版 无线蓝牙鼠标 899元
Razer 雷蛇 那伽梵蛇 Pro 专业版 无线蓝牙鼠标 [PConline 聚超值] 那伽梵蛇 Pro 专业版升级为蓝牙双模无线游戏鼠标,针对MMO/MOBA/RTS等游戏玩家,保留了侧裙整个按键面 ...
- Unity Pro builder创建模块化仓库建筑学习教程
Unity内部的专业3D编辑工作室 你会学到: 直接在Unity内部学习3D建模 使用专业构建器的专业方法 为您的游戏创建模块化资产 了解如何为您的三维模型设置纹理 三维资产的模块化布局 专业后期制作 ...
- SketchUp Pro 2021基础入门学习视频教程
SketchUp Pro 2021基础入门学习视频教程 1280X720 MP4 |视频:h264,1280×720 |音频:AAC,44.1 KHz,2 Ch 流派:电子学习|语言:英语+中文字幕( ...
- Lumion模型库 Unique Pro Lumion Library 2021
Lumion模型库 Unique Pro Lumion Library 2021 独特的专业图书馆2021 大小:12G 云桥网络 平台获取素材 这些包包括: 01–集总效果–准备渲染的外部设置 用 ...
最新文章
- 合种侧柏、油松专车3天4000能量领证
- 三十一、Vue框架赶紧来了解一下
- Android之使用IDA Pro静态分析so文件
- 我的飞鸽传书程序,很好!!!
- 数据结构实验 寻找数组主元素(2013考研题)
- WCF分布式开发常见错误(3):客户端调用服务出错
- 2008服务器修改ipv4,Windows 2008/2012/2016如何添加配置多IP
- UVA10179 Irreducable Basic Fractions【欧拉函数+数论】
- 【数据结构】二叉搜索树的python实现
- MATLAB Win10分辨率低的蜜汁改进方法
- 【可收藏】3W字,Docker 从入门到精通
- 语音识别(Speech Recognition)
- CMake mingw 编译glm
- 李开复给大学生的第6封信:选择的智慧
- Unreal - Environment Query System(EQS)
- 如何在云栖社区显示一个QAP DEMO
- JAVA应该怎么学?
- Ubuntu Windows双系统切换最简方法!!!
- Jetson Nano 人工智能计算
- flutter 右滑手势
热门文章
- Linux之fdisk -l命令
- Tasker Android系统增强神器,Tasker(系统增强神器)
- 激活office python
- unity生成预制体_【Unity·月之泪复刻】Bloom+摇曳+可交互草地
- iOS 8.4.1完美越狱工具发布:老设备福音
- 一条线直销,一条线循环简析
- 小程序笔记(二)另一种方便获取wxapkg方法
- 人生的意义-见克林顿,李东生,熊晓鸽,李孟贤和硅谷创业项目
- hpprobook440g1拆机_惠普HP ProBook 440 G4拆机图解
- talk show: 发泄不满的表达。