Sign in to follow this  
Followers 0
Korruption

XP64 problems?

4 posts in this topic

#1 ·  Posted (edited)

When I run this I get a dll error I think is related to windows xp 64

Opt("TrayIconDebug",1)

dim $oldpos[2]

dim $pos[2]

#include <Misc.au3>

HotKeySet("{Esc}","_Exit")

Dim $s_keys[117] = [116, _

"01","02","04","05","06","08","09","0C","0D","10", _

"11","12","13","14","1B","20","21","22","23","24", _

"25","26","27","28","29","2A","2B","2C","2D","2E", _

"30","31","32","33","34","35","36","37","38","39", _

"41","42","44","45","46","47","48","49","4A","4B","4C", _

"4D","4E","4F","50","51","52","53","54","55","56","57","58","59", _

"5A","5B","5C","60","61","62","63","64","65","66", _

"67","68","69","6A","6B","6C","6D","6E","6F","70", _

"71","72","73","74","75","76","77","78","79","7A", _

"7B","7C","7D","7E","7F","80H","81H","82H","83H","84H", _

"85H","86H","87H","90","91","A0","A1","A2","A3","A4","A5"]

$dll = DllOpen("user32.dll")

$pos = MouseGetPos()

$start = TimerInit()

While 1

Sleep ( 100 )

For $y = 1 To $s_keys[0]

If _IsPressed($s_keys[$y], $dll) Then

$start = TimerInit()

EndIf

Next

$oldpos[0] = $pos[0]

$oldpos[1] = $pos[1]

$pos = MouseGetPos()

if Not $oldpos[1] = $pos[1] Or not $oldpos[0] = $pos[0] Then

$start = TimerInit()

EndIf

if TimerDiff($start) > 10000 Then

MsgBox(0,"inactive","you have not pressed any keys or used your mouse for 10 seconds")

$start = TimerInit()

Else

EndIf

WEnd

Func _Exit()

DllClose($dll)

Exit

EndFunc

When I run this I get

Line 64 (File "C\Program Files (x86)\Autoit3\Include\Misc.au3")

Local $p = DllStructCreate ($struct)

Local $p = ^ERROR

and I am at a loss. how do i fix this anyone know?

Edited by Korruption

Share this post


Link to post
Share on other sites



make sure you are running the beta.

I am

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  
Followers 0