AlmarM Posted September 14, 2007 Share Posted September 14, 2007 This script will make some circles in Paint: Notice: That there is xxx in the script, place there the name of your paint Example: Dutch: naamloos - Paint English: untitled - Paint (Not sure about this one ) expandcollapse popup#cs ---------------------------------------------------------------------------- AutoIt Version: 3.2.6.0 Author: myName Script Function: Template AutoIt script. #ce ---------------------------------------------------------------------------- ; Script Start - Add your code below here HotKeySet('{ESC}', '_Exit') $Click = "Left" Run("mspaint.exe") WinWait("xxx") ;xxx = Name of paint when its activated If Not WinActive("xxx") Then WinActivate("xxx") Sleep(2000) MsgBox("64", "Miximized?", "Is MSPaint maximized??" & @CRLF & "Yes: Do nothing just wait" & @CRLF & "No: Maximize it" & @CRLF & "You got 5 seconds to maximize") Sleep(5000) Send("{ALT}") Sleep(1000) Send("{RIGHT 3}") Sleep(1000) Send("{DOWN 4}") Sleep(1000) Send("{ENTER}") Send("600") Sleep(500) Send("{TAB}") Sleep(500) Send("600") Sleep(1000) Send("{ENTER}") Sleep(1500) MouseClick($Click, 14, 189, 1, 30) Sleep(1500) MouseClick($Click, 32, 292, 1, 30) Sleep(1500) MouseClick($Click, 13, 240, 1, 30) Sleep(1500) MouseClick($Click, 247, 953, 1, 30) Sleep(1500) MouseClickDrag($Click, 112, 92, 562, 563, 30) Sleep(1500) MouseClick($Click, 88, 953, 1, 30) Sleep(1500) MouseClickDrag($Click, 114, 94, 564, 565, 30) Sleep(1500) MouseClick($Click, 247, 953, 1, 30) Sleep(1500) MouseClickDrag($Click, 118, 98, 568, 567, 30) Sleep(1500) MouseClick($Click, 88, 953, 1, 30) Sleep(1500) MouseClickDrag($Click, 120, 100, 570, 571, 30) Sleep(1500) MouseClick($Click, 247, 953, 1, 30) Sleep(1500) MouseClickDrag($Click, 122, 102, 572, 573, 30) Sleep(1500) MouseClick($Click, 88, 953, 1, 30) Sleep(1500) MouseClickDrag($Click, 124, 104, 574, 575, 30) Sleep(1500) MouseClick($Click, 247, 953, 1, 30) Sleep(1500) MouseClickDrag($Click, 126, 106, 576, 577, 30) Sleep(1500) Func _Exit() ;ToolTip(' '&@CRLF&' EXITING '&@CRLF&' ') Sleep(500) Exit EndFunc Minesweeper A minesweeper game created in autoit, source available. _Mouse_UDF An UDF for registering functions to mouse events, made in pure autoit. 2D Hitbox Editor A 2D hitbox editor for quick creation of 2D sphere and rectangle hitboxes. Link to comment Share on other sites More sharing options...
jvanegmond Posted September 14, 2007 Share Posted September 14, 2007 (edited) Does not work on my resolution. I'm on 1280x800 widescreen. It clicks the taskbar in stead of selecting a color. Edited September 14, 2007 by Manadar github.com/jvanegmond Link to comment Share on other sites More sharing options...
therks Posted September 14, 2007 Share Posted September 14, 2007 You know what you could have done? Instead of having 'xxx' multiple times in the script for someone to replace, you could try it like this: $PaintTitle = 'xxx' ;xxx = Name of paint when its activated Run("mspaint.exe") WinWait($PaintTitle) If Not WinActive($PaintTitle) Then WinActivate($PaintTitle) Then you just have to change one variable and the whole thing will work. My AutoIt Stuff | My Github Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now