Jump to content
Sign in to follow this  
pileot

Autoit with Windows 9x

Recommended Posts

pileot

#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 by pileot

Share this post


Link to post
Share on other sites
pileot

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?

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.