Jump to content

Problem with windows 7 x64


Recommended Posts

Hello to start sorry for my english.

I use this script to automate a task with a single button

#Include <Misc.au3> ;
$dll = DllOpen("user32.dll");

Opt('SendKeyDelay', 1)
Opt('SendKeyDownDelay', 1)
Opt('MouseClickDownDelay', 1)




While 1
$couleur1 = PixelGetColor(587,692)
$couleur2 = PixelGetColor(15,56)
$couleur3 = PixelGetColor(600,579)
$couleur4 = PixelGetColor(1145,241)
$couleur5 = PixelGetColor(567,664)
$couleur6 = PixelGetColor(462,662)
$couleur7 = PixelGetColor(611,612)
$couleur8 = PixelGetColor(983,782)
$couleur9 = PixelGetColor(983,807)
$couleur10 = PixelGetColor(984,818)
$couleur11 = PixelGetColor(710,707)
$couleur12 = PixelGetColor(102,49)
$couleur13 = PixelGetColor(54,54)
$couleur14 = PixelGetColor(1113,768)
$couleur15 = PixelGetColor(710,707)
$couleur16 = PixelGetColor(1109,767)
$couleur17 = PixelGetColor(14,623)
If Not _IsPressed(10) And Not _IsPressed(11) And Not _IsPressed(12) And _IsPressed(74) Then
Send("a")
EndIf
If Not _IsPressed(10) And Not _IsPressed(11) And Not _IsPressed(12) And _IsPressed(74) And $couleur17 = 0x7A7F7F Then
Send("z")
EndIf
If Not _IsPressed(10) And Not _IsPressed(11) And Not _IsPressed(12) And _IsPressed(74) And $couleur13 = 0x360909 And $couleur14 = 0xFFFFFF And $couleur15 = 0xE5E5E5 Then
Send("e")
EndIf
If Not _IsPressed(10) And Not _IsPressed(11) And Not _IsPressed(12) And _IsPressed(74) And $couleur12 = 0x860000 Then
Send("e")
EndIf
If Not _IsPressed(10) And Not _IsPressed(11) And Not _IsPressed(12) And _IsPressed(74) And $couleur1 = 0x7FA1A1 Then
Send("e")
EndIf
If Not _IsPressed(10) And Not _IsPressed(11) And Not _IsPressed(12) And _IsPressed(74) And $couleur2 = 0x360909 And $couleur11 = 0xE5E5E5  Then
Send("p")
EndIf
If Not _IsPressed(10) And Not _IsPressed(11) And Not _IsPressed(12) And _IsPressed(74) And $couleur16 = 0x555555 Then
Send("k")
EndIf
If Not _IsPressed(10) And Not _IsPressed(11) And Not _IsPressed(12) And _IsPressed(74) Then
Send("q")
EndIf
    If Not _IsPressed(10) And Not _IsPressed(11) And Not _IsPressed(12) And _IsPressed(74) Then
Send("*")
EndIf
If Not _IsPressed(10) And Not _IsPressed(11) And Not _IsPressed(12) And _IsPressed(74) And $couleur8 = 0xFFFFFF And $couleur9 = 0xFFFFFF And $couleur10 = 0xFFFFFF And $couleur4 <> 0x00FF00 Then
Send("y")
EndIf
WEnd

This script works very well with windows xp, but with windows 7 it works really bad, it works but very slowly, the command did not execute well or very slowly, which is very annoying. And when I add other script like this, to walk together, the slowdown is even greater, whereas with windows xp it works very well.

Do you know what can be the problem please ?

Link to comment
Share on other sites

If you can tell us what you try to automate then maybe we can provide a more reliable solution.

My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2022-02-19 - Version 1.6.1.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts
OutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - Download
Outlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - Wiki
PowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - Wiki
Task Scheduler (NEW 2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki

Standard UDFs:
Excel - Example Scripts - Wiki
Word - Wiki

Tutorials:
ADO - Wiki
WebDriver - Wiki

 

Link to comment
Share on other sites

Ho yes sorry. It's for a action sequence in a game.

You should have read the rules when water asked you that, you fell into the trap... ;)

Now Jos, Melba32, Smoke_N or valik are going to see this & lock your thread.

Edited by ApudAngelorum
Link to comment
Share on other sites

Then I would strongly suggest that you read the forum rules. Game automation is not allowed here ;)

My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2022-02-19 - Version 1.6.1.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts
OutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - Download
Outlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - Wiki
PowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - Wiki
Task Scheduler (NEW 2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki

Standard UDFs:
Excel - Example Scripts - Wiki
Word - Wiki

Tutorials:
ADO - Wiki
WebDriver - Wiki

 

Link to comment
Share on other sites

  • Developers

. But looks like, lock of thread it gives you an erection.

These type of comments are not appreciated here so I will help you with 7 days vacation time from these forums.

In case you decide to come back you better behave.

SciTE4AutoIt3 Full installer Download page   - Beta files       Read before posting     How to post scriptsource   Forum etiquette  Forum Rules 
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Link to comment
Share on other sites

Guest
This topic is now closed to further replies.
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...