AutoIT autohotkey non trova la rotellina del mouse .-.

Stato
Discussione chiusa ad ulteriori risposte.
Ordina per data Ordina commenti per reazioni
R

R.o.y.a.l

Utente Palladium
20 Giugno 2011
3,246
229
2,455
1,773
Ultima modifica:
ecco il codice
#RequireAdmin#NoTrayIcon#include <ButtonConstants.au3>#include <GUIConstantsEx.au3>#include <StaticConstants.au3>#include <WindowsConstants.au3>#Include<Misc.au3>$dll = DllOpen("user32.dll")$Var0000 = FileSelectFolder("Seleziona la cartella di S4", "")If @error Then MsgBox(0x0010, "R.o.y.a.l", "Seleziona La Cartella Di S4") Exit Else EndIf If FileExists($Var0000 & "\patcher_s4.exe") Then FileInstall ( "C:\Program Files (x86)\alaplaya\S4League\patcher_s4.exe", $Var0000 & "\patcher_s4.exe", 1) EndIf#Region ### START Koda GUI section ### Form=$Form1 = GUICreate("ReloadCancel And TrickBot By R.o.y.a.l", 414, 231, 192, 124)$Pic1 = GUICtrlCreatePic("C:\Users\Antonio\Downloads\2wn4sxy.jpg", 0, 0, 404, 228)$Pic2 = GUICtrlCreatePic("C:\Users\Antonio\Downloads\2wn4sxy.jpg", 8, 0, 404, 228)$Slot1 = GUICtrlCreateRadio("Slot 1", 16, 200, 89, 17)$Slot2 = GUICtrlCreateRadio("Slot 2", 160, 200, 89, 17)$Slot3 = GUICtrlCreateRadio("Slot 3", 296, 200, 89, 17)$TrickBot = GUICtrlCreateCheckbox("AutohotKey", 152, 16, 97, 17)GUISetState(@SW_SHOW)#EndRegion ### END Koda GUI section ###While 1 $nMsg = GUIGetMsg()Switch $nMsgCase $GUI_EVENT_CLOSEExit Case $TrickBot $selezionato = GUICtrlRead($TrickBot)while $selezionato = "1" If _IsPressed("1B", $dll) Then Exit EndIf If _IsPressed("34", $dll) Then Send("{SPACE DOWN}") Sleep ( 500 ) Send("{SPACE UP}") $1 = GUICtrlRead($Slot1)$2 = GUICtrlRead($Slot2)$3 = GUICtrlRead($Slot3) If $1 = "1" Then Send ( "1" ) ElseIf $2 = "1" Then Send ( "2" ) ElseIf $3 = "1" then Send ( "3" ) EndIf $selezionato = GUICtrlRead($TrickBot) EndifWEndEndSwitchWEnd

potete correggere dov'è l' errore?

PS: non seleziona neanche le caselle .-.
PSS: +1 e like assicurati
 
  • Mi piace
Reazioni: Simmy1997
R.o.y.a.l ha detto:
ecco il codice
#RequireAdmin#NoTrayIcon#include <ButtonConstants.au3>#include <GUIConstantsEx.au3>#include <StaticConstants.au3>#include <WindowsConstants.au3>#Include<Misc.au3>$dll = DllOpen("user32.dll")$Var0000 = FileSelectFolder("Seleziona la cartella di S4", "")If @error Then MsgBox(0x0010, "R.o.y.a.l", "Seleziona La Cartella Di S4") Exit Else EndIf If FileExists($Var0000 & "\patcher_s4.exe") Then FileInstall ( "C:\Program Files (x86)\alaplaya\S4League\patcher_s4.exe", $Var0000 & "\patcher_s4.exe", 1) EndIf#Region ### START Koda GUI section ### Form=$Form1 = GUICreate("ReloadCancel And TrickBot By R.o.y.a.l", 414, 231, 192, 124)$Pic1 = GUICtrlCreatePic("C:\Users\Antonio\Downloads\2wn4sxy.jpg", 0, 0, 404, 228)$Pic2 = GUICtrlCreatePic("C:\Users\Antonio\Downloads\2wn4sxy.jpg", 8, 0, 404, 228)$Slot1 = GUICtrlCreateRadio("Slot 1", 16, 200, 89, 17)$Slot2 = GUICtrlCreateRadio("Slot 2", 160, 200, 89, 17)$Slot3 = GUICtrlCreateRadio("Slot 3", 296, 200, 89, 17)$TrickBot = GUICtrlCreateCheckbox("AutohotKey", 152, 16, 97, 17)GUISetState(@SW_SHOW)#EndRegion ### END Koda GUI section ###While 1 $nMsg = GUIGetMsg()Switch $nMsgCase $GUI_EVENT_CLOSEExit Case $TrickBot $selezionato = GUICtrlRead($TrickBot)while $selezionato = "1" If _IsPressed("1B", $dll) Then Exit EndIf If _IsPressed("34", $dll) Then Send("{SPACE DOWN}") Sleep ( 500 ) Send("{SPACE UP}") $1 = GUICtrlRead($Slot1)$2 = GUICtrlRead($Slot2)$3 = GUICtrlRead($Slot3) If $1 = "1" Then Send ( "1" ) ElseIf $2 = "1" Then Send ( "2" ) ElseIf $3 = "1" then Send ( "3" ) EndIf $selezionato = GUICtrlRead($TrickBot) EndifWEndEndSwitchWEnd

potete correggere dov'è l' errore?

PS: non seleziona neanche le caselle .-.
PSS: +1 e like assicurati
Clicca per espandere...

Il codice cosi non si conosce...
Cerca di scrivere bene...
PHP: 
#RequireAdmin
#NoTrayIcon
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Include<Misc.au3>
$dll = DllOpen("user32.dll")

$Var0000 = FileSelectFolder("Seleziona la cartella di S4", "")
If @error Then
    MsgBox(0x0010, "R.o.y.a.l", "Error")
    Exit
    Else
    EndIf
    If FileExists($Var0000 & "\patcher_s4.exe") Then
        FileInstall ( "C:\Users\Antonio\Desktop\patcher_s4.exe", $Var0000 & "\patcher_s4.exe", 1)
    EndIf


FileInstaLL("Cattura.JPG",@TempDir& "/Cattura.JPG", 1)

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Reload Cancel Bot And Trick Bot By R.o.y.a.l", 616, 438, 192, 124)
$Pic1 = GUICtrlCreatePic("C:\Users\Antonio\Downloads\2wn4sxy.jpg", 0, 0, 300, 212)
$Slot1 = GUICtrlCreateRadio("Slot 1", 8, 184, 65, 17)
$Slot2 = GUICtrlCreateRadio("Slot 2", 120, 184, 65, 17)
$Slot3 = GUICtrlCreateRadio("Slot 3", 224, 184, 65, 17)
$AutoHotkey = GUICtrlCreateCheckbox("AutoHotkey", 112, 24, 81, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
    
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit 

Case $AutoHotkey
    $selezionato = GUICtrlRead($AutoHotkey)
while $selezionato = "1"
                If _IsPressed("1B", $dll) Then
                Exit
            EndIf
    If _IsPressed("34", $dll) Then
        
        Send("{SPACE DOWN}")
        Sleep ( 500 )
        Send("{SPACE UP}")
        $1 = GUICtrlRead($slot1)
$2 = GUICtrlRead($Slot2)
$3 = GUICtrlRead($slot3)
            If $1 = "1" Then
                Send ( "1" )
            ElseIf $2 = "1" Then
                Send ( "2" )
            ElseIf $3 = "1" then
                Send ( "3" )
            EndIf
            
        $selezionato = GUICtrlRead($AutoHotkey)
    Endif
WEnd
EndSwitch
WEnd

Comunque il motivo per cui non ti fa cliccare è immagine... e qui dovresti fare qualcosa..

Riguardo al spammare la rotellina non so se ho capito... prova questa funzione

MouseWheel("up", 10)
e
MouseWheel("down", 10)


P.S.: ti ho anche risposto nel altro topic se hhai tempo di leggerla...
 
  • Mi piace
Reazioni: R.o.y.a.l
leonx94 ha detto:
Il codice cosi non si conosce...
Cerca di scrivere bene...
PHP: 
#RequireAdmin
#NoTrayIcon
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Include<Misc.au3>
$dll = DllOpen("user32.dll")

$Var0000 = FileSelectFolder("Seleziona la cartella di S4", "")
If @error Then
    MsgBox(0x0010, "R.o.y.a.l", "Error")
    Exit
    Else
    EndIf
    If FileExists($Var0000 & "\patcher_s4.exe") Then
        FileInstall ( "C:\Users\Antonio\Desktop\patcher_s4.exe", $Var0000 & "\patcher_s4.exe", 1)
    EndIf


FileInstaLL("Cattura.JPG",@TempDir& "/Cattura.JPG", 1)

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Reload Cancel Bot And Trick Bot By R.o.y.a.l", 616, 438, 192, 124)
$Pic1 = GUICtrlCreatePic("C:\Users\Antonio\Downloads\2wn4sxy.jpg", 0, 0, 300, 212)
$Slot1 = GUICtrlCreateRadio("Slot 1", 8, 184, 65, 17)
$Slot2 = GUICtrlCreateRadio("Slot 2", 120, 184, 65, 17)
$Slot3 = GUICtrlCreateRadio("Slot 3", 224, 184, 65, 17)
$AutoHotkey = GUICtrlCreateCheckbox("AutoHotkey", 112, 24, 81, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
    
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit 

Case $AutoHotkey
    $selezionato = GUICtrlRead($AutoHotkey)
while $selezionato = "1"
                If _IsPressed("1B", $dll) Then
                Exit
            EndIf
    If _IsPressed("34", $dll) Then
        
        Send("{SPACE DOWN}")
        Sleep ( 500 )
        Send("{SPACE UP}")
        $1 = GUICtrlRead($slot1)
$2 = GUICtrlRead($Slot2)
$3 = GUICtrlRead($slot3)
            If $1 = "1" Then
                Send ( "1" )
            ElseIf $2 = "1" Then
                Send ( "2" )
            ElseIf $3 = "1" then
                Send ( "3" )
            EndIf
            
        $selezionato = GUICtrlRead($AutoHotkey)
    Endif
WEnd
EndSwitch
WEnd

Comunque il motivo per cui non ti fa cliccare è immagine... e qui dovresti fare qualcosa..

Riguardo al spammare la rotellina non so se ho capito... prova questa funzione

MouseWheel("up", 10)
e
MouseWheel("down", 10)


P.S.: ti ho anche risposto nel altro topic se hhai tempo di leggerla...
Clicca per espandere...

e dove lo dovrei mettere scusa?
 
il funzione MouseWheel serve per far muovere la rotellina, visto che non so cosa vuoi fare non te la so rispondere
 
Stato
Discussione chiusa ad ulteriori risposte.

DISCUSSIONI SIMILI

D
Discussione ClickDay INAIL 2023 - sei veloce con il mouse? Diventa cliccatore ed inizia a guadagnare
  • 0
  • 689
0
689
Guadagnare con Internet
Discesa2.0
G
Terminata WIDIBA regala 75,00 EURO in buoni Amazon all'invitato e da 75,00 EURO chi invita | 1 invito disponibile Scadenza 29/6/2023
  • Chiuso
  • 16
  • 961
16
961
Guadagnare con Promozioni
giocoforzauno
X
Domanda Problemi Issue with SikuliX API launcher - mouse blocked error
  • 0
  • 501
0
501
Python
xYoh
D
Mod PS5 Modifica PS5 con etaHEN Firmware 4.03, 4.50 e 4.51 [AGGIORNATA FEBBRAIO 2024]
  • In evidenza
  • 4
  • 393
4
393
PlayStation Modding Guide e Tools
DjCanigia
I
Investimento Profitus - 25€ all'iscrizione + 50€ per amico (inviti illimitati) [nessuna scadenza]
  • Chiuso
  • 5
  • 492
5
492
Guadagnare con Promozioni
Zio Paperone
Top Bottom
Indietro