Help with Mouse button commands.

[King]

I'm looking to make a script so that when I press mouse button 4 it sends the letter A one time, and when I press mouse button 5 it sends the letter B one time.

Can anyone lead me in a direction to make this script (sorry I am new at this)

Thanks in advance.

[MikahS]

This should help you out a bit: >MouseOnEvent UDF

[King]

I have read that like 5 times. This can't be that hard of a concept. I guess I just don't know how to start it. Maybe if I used F1,F2,F3,F4 keys.

What I want to look like is

Func 4MouseDown()
Send ( "keys" [, flag = 01] ) Phrase 1, Phrase 2.

EndFunc

or

Func  {F1}Down()
Send ( "keys" [, flag = 01] ) Phrase 1, Phrase 2.

Endfunc

To bad neither of those work.. LOL

Edited January 28, 2015 by King

[Valuater]

Maybe...

#include <MsgBoxConstants.au3>

; Press Esc to terminate script, Pause/Break to "pause"

Global $g_bPaused = False

HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")
HotKeySet("+!d", "ShowMessage") ; Shift-Alt-d

While 1
    Sleep(100)
WEnd

Func TogglePause()
    $g_bPaused = Not $g_bPaused
    While $g_bPaused
        Sleep(100)
        ToolTip('Script is "Paused"', 0, 0)
    WEnd
    ToolTip("")
EndFunc   ;==>TogglePause

Func Terminate()
    Exit
EndFunc   ;==>Terminate

Func ShowMessage()
    MsgBox($MB_SYSTEMMODAL, "", "This is a message.")
EndFunc   ;==>ShowMessage

[King]

I'm not looking to do a message box. I just want it to type the message out. When I press F1 it types the message wherever the curser is. For instance if I Pressed F1 it would type the message in this forum box because my curser is there.

[JLogan3o13]

What is the application you're typing the message into? You may be able to use control commands much more easily.

[King]

Ok so what I got it.

 

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

GUICreate("")

HotKeySet("{F2}", "sendit")

While 1
        $msg = GUIGetMsg()

        If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    WEnd
    GUIDelete()

Func sendit()
    Send ("{ENTER}Text here")
EndFun

[King]

What is the application you're typing the message into? You may be able to use control commands much more easily.

Just notepad

[King]

expandcollapse popup

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

GUICreate("")

HotKeySet("{F1}", "sendit")

While 1
        $msg = GUIGetMsg()

        If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    WEnd
    GUIDelete()

Func sendit()
    Send ("Phrase 1")
EndFunc

HotKeySet("{F2}", "sendit")

While 1
        $msg = GUIGetMsg()

        If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    WEnd
    GUIDelete()

Func sendit()
    Send ("Phrase 2")
EndFunc

HotKeySet("{F3}", "sendit")

While 1
        $msg = GUIGetMsg()

        If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    WEnd
    GUIDelete()

Func sendit()
    Send ("Phrase 3")
EndFunc

HotKeySet("{F4}", "sendit")

While 1
        $msg = GUIGetMsg()

        If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    WEnd
    GUIDelete()

Func sendit()
    Send ("Phrase 4")
EndFunc

This is what I want. But it doesn't work. It works if I just leave F1... but if I add 2 3 and 4 it doesn't work.

[King]

Ok I got it.

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

GUICreate("")

HotKeySet("{F1}", "sendit1")
HotKeySet("{F2}", "sendit2")
HotKeySet("{F3}", "sendit3")
HotKeySet("{F4}", "sendit4")

While 1
        $msg = GUIGetMsg()

        If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    WEnd
    GUIDelete()

Func sendit1()
    Send ("Phrase 1")
    EndFunc
Func sendit2()
    Send ("Phrase 2")
    EndFunc
Func sendit3()
    Send ("Phrase 3")
    EndFunc
Func sendit4()
    Send ("Phrase 4")
EndFunc