Why doesn't this code work?

[hlstriker]

Please tell me why this code isn't working, it's supposed to move the window left by 1 each time left arrow is pushed...

HotKeySet("{LEFT}","left")

SplashImageOn("", $destination, 53, 34, 318, 224, 1)
$image = WinGetPos("")

Func left()
    WinMove("", -1, $image[0] - 1, $image[1])
EndFunc

Thanks in advance!

[Jos]

Please tell me why this code isn't working, it's supposed to move the window left by 1 each time left arrow is pushed...

HotKeySet("{LEFT}","left")

SplashImageOn("", $destination, 53, 34, 318, 224, 1)
$image = WinGetPos("")

Func left()
    WinMove("", -1, $image[0] - 1, $image[1])
EndFunc

Thanks in advance!

Your script ends after the 3rd line.

add A while-wend loop with a sleep(10) to keep the script running...

[hlstriker]

I think I already have that at the bottom? That was just a sliver of my code, I thought we could work it out from that... here is my whole code.

expandcollapse popup

$g_szVersion = "Test"
If WinExists($g_szVersion) Then Exit
AutoItWinSetTitle($g_szVersion)

$destination = @TempDir & "\x.bmp"
FileInstall("C:\x.bmp", $destination)

#include <GUIConstants.au3>
Global $Start

GUICreate ( "Test", 500, 153 )
GUISetState (@SW_SHOW)

$exitbutton = GUICtrlCreateButton( "Exit", 270, 102, 100, 22 )
HotKeySet("{HOME}","start")
HotKeySet("{LEFT}","left")
;HotKeySet("{RIGHT}","right")
;HotKeySet("{UP}","up")
;HotKeySet("{DOWN}","down")

SplashImageOn("", $destination, 53, 34, 318, 224, 1)
$image = WinGetPos("")

Func start()
    $Start = NOT $Start
    While $Start
        $coord = PixelSearch( $image[0] - 52, $image[1] - 33, $image[0] + 52, $image[1] + 33, 0xFF0000, 2, 2 )
        If not @error Then
            mouseclick( "left", $coord[0], $coord[1], 1, 0 )
            sleep(2000)
            mousemove( 710, 370, 3 )
            sleep(200)
            mouseclick( "right", 710, 370, 1, 1 )
            mousemove ( 710, 430, 3 )
            sleep(200)
            mouseclick( "left", 710, 430, 1, 1 )
            sleep(50)
            mousemove( $coord[0], $coord[1], 3 )
        Else
            sleep(50)
        EndIf
    WEnd
EndFunc

Func left()
    WinMove("", -1, $image[0] - 1, $image[1])
EndFunc

While 1
  $msg = GUIGetMsg()
  
  Select
  Case $msg = $GUI_EVENT_CLOSE
      Exitloop
      
  Case $msg = $exitbutton
      Exitloop
  EndSelect
WEnd

[BigDod]

Copy this line "$image = WinGetPos("")" to inside your loop and give your SplashImage a title and use it in the WinGetPos and WinMove commands. It worked for me.

Edit

Here is a copy that worked for me modified to remove fileinstall as I do not have your bitmap.

expandcollapse popup

$g_szVersion = "Test"
If WinExists($g_szVersion) Then Exit
AutoItWinSetTitle($g_szVersion)

$destination = @Systemdir & "\oobe\images\mslogo.jpg"
;FileInstall("C:\x.bmp", $destination)

#include <GUIConstants.au3>
Global $Start

GUICreate ( "Test", 500, 153 )
GUISetState (@SW_SHOW)

$exitbutton = GUICtrlCreateButton( "Exit", 270, 102, 100, 22 )
HotKeySet("{HOME}","start")
HotKeySet("{LEFT}","left")
;HotKeySet("{RIGHT}","right")
;HotKeySet("{UP}","up")
;HotKeySet("{DOWN}","down")

SplashImageOn("Splash", $destination, 53, 34, 318, 224, 1)
$image = WinGetPos("Splash")

Func start()
    $Start = NOT $Start
    While $Start
        $coord = PixelSearch( $image[0] - 52, $image[1] - 33, $image[0] + 52, $image[1] + 33, 0xFF0000, 2, 2 )
        If not @error Then
            mouseclick( "left", $coord[0], $coord[1], 1, 0 )
            sleep(2000)
            mousemove( 710, 370, 3 )
            sleep(200)
            mouseclick( "right", 710, 370, 1, 1 )
            mousemove ( 710, 430, 3 )
            sleep(200)
            mouseclick( "left", 710, 430, 1, 1 )
            sleep(50)
            mousemove( $coord[0], $coord[1], 3 )
        Else
            sleep(50)
        EndIf
    WEnd
EndFunc

Func left()
    WinMove("Splash", "", $image[0] - 1, $image[1])
EndFunc

While 1
    $image = WinGetPos("Splash")
  $msg = GUIGetMsg()
  
  Select
  Case $msg = $GUI_EVENT_CLOSE
      Exitloop
      
  Case $msg = $exitbutton
      Exitloop
  EndSelect
WEnd

Edited December 31, 2005 by BigDod

[SmOke_N]

give the splashimage a title.

Edit:

BigDod beat me to it!

Edited December 31, 2005 by SmOke_N

[hlstriker]

Thank you BigDod and Smoke for your great help I really appreciate it!

[DaveF]

That was just a sliver of my code, I thought we could work it out from that...