pileot Posted November 10, 2007 Share Posted November 10, 2007 (edited) expandcollapse popup#RequireAdmin #include <A3LProgress.au3> #region runone Global $AuthAgent="MoveQuest" If WinExists($AuthAgent)=1 Then Winclose($AuthAgent) ;msgbox(0,"Alert","Closed Previous Existance",0) EndIf AutoItWinSetTitle($AuthAgent) #endregion runone;This section is so the script only runs once, and it closes the previous existance before continuing running this one. Not my original design. Credit goes to some other genius, i cant remember who tho >.< #include <GUIConstants.au3> Global $Paused Global $test $desktop = wingetpos("Program Manager") if $desktop[2] < 770 Then MsgBox(0,"Error","Your screen size is too small for movequest! Err:" & @DesktopHeight,25) Exit EndIf sleep(1000) $Quest = "Map of Llirrem (English Province) You're at RestartNearTown" $MoveQuest = GUICreate("MoveQuest", 1024,768,-1,-1) $lastpos = WinGetPos ( "MoveQuest" ) $pos = WinGetPos ( "MoveQuest" ) winactivate($quest) do if wingetstate($quest) <= 23 then GUISetState(@SW_hide);@sw_hide if wingetstate($quest) > 23 then GUISetState(@SW_show);@sw_hide $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then endscript() endif $lastpos[0] = $pos[0];X $lastpos[1] = $pos[1];Y $lastpos[2] = $pos[2];Width $lastpos[3] = $pos[3];Hight $pos = WinGetPos ( "MoveQuest" ) If ControlCommand("Quest Settings","","ThunderRT6CommandButton2","IsVisible") = 1 then ControlClick("Quest Settings","","ThunderRT6CommandButton2", "Left") WinMove ( $quest, "", $pos[0]+3, $pos[1]+29, $pos[2]-6 , $pos[3]-32 ) Sleep(20) WinMove ( $quest, "", $pos[0]+3, $pos[1]+29, $pos[2]-6 , $pos[3]-32 ) Sleep(20) WinMove ( $quest, "", $pos[0]+3, $pos[1]+29, $pos[2]-6 , $pos[3]-32 ) Sleep(20) EndIf WinMove ( $quest, "", $pos[0]+3, $pos[1]+29, $pos[2]-6 , $pos[3]-32 ) if wingetstate("MoveQuest") = 15 then winactivate($quest) endif sleep(500) until 1 = 2 This program is designed to resize a game i play to 1024 x 768 instead of being fullscreen on my 1680 x 1050 res screen. It works awesome in XP, but doesnt seem to function in 98. Any ideas whats screwing it up so it can work? Edited November 10, 2007 by pileot Link to comment Share on other sites More sharing options...
Zedna Posted November 10, 2007 Share Posted November 10, 2007 "but doesnt seem to function in 98" What exactly doesn't work? Be more precise in description of problem. Try eliminating method to observe source of problem. Resources UDF ResourcesEx UDF AutoIt Forum Search Link to comment Share on other sites More sharing options...
pileot Posted November 11, 2007 Author Share Posted November 11, 2007 Sorry i cant... I had this program made for a friend, im using XP, he's using 98... He is not very computer literate... i had to walk him through how to download, unzip, and then run the program (i stored it online for easy transfer to many people if it worked) Anyways from what i could understand, it wouldnt even run... or maybe it would run and end itself? Either way, theres no way for me to tell. And i cant walk him through it, hes just not computer literate enough. Hopefully somone out there has a 98 machine they could help test this with? Link to comment Share on other sites More sharing options...
Zedna Posted November 11, 2007 Share Posted November 11, 2007 Add into your program logging logic: Create LOG file and write into it every script line activity. Then tell your friend to run your program and then send to you LOG file. You will see what's going on. Resources UDF ResourcesEx UDF AutoIt Forum Search 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