Jump to content

Merging Or Joing 3 Scripts


Recommended Posts

HELLO everyone!! :think:

i have 3 scripts..

Keyboard script - hotkey which disable some keyboard keys

mouse script - which has a mouse trap script

Timer script - hotkey which has a start and countdown timer..

when timer gets zero, some keyboard keys will be disabled and mouse will be mousetrapped

when you add time, keyboard keys will be enabled and mouse will be free to move again..

is it possible to merge all the 3 script?

i have no experience about merging or joining script..

any ideas or advice.. for me to work with? :(

here is my script:

Timer script:

HotKeySet("{HOME}", "add4Min")

Dim $min = 0, $sec = 60, $start = False, $first_S = False, $finish_S = False

Func add4Min()
    If $first_S = False Then
        $min += 4
        $first_S = True
        $start = True
    ; script to enable mouse and keyboard
    Else
        $min += 4
        $start = True
    EndIf
    $finish_S = False
EndFunc

While 1
    If $finish_S = False Then
        If $start = True Then
            $sec -= 1
            If $sec = 0 Then
                $sec = 59
                If $min = 0 Then
                    $finish_S = True
                ;script to disable mouse and keyboard
                EndIf
                $min -= 1
            EndIf
            ToolTip('' & StringFormat('%i:%i', $min, $sec), 0, 0)
        Else
            ToolTip('' & StringFormat('%i:%i', 0, 0), 0, 0)
        EndIf
    Else
        ToolTip('' & StringFormat('%i:%i TIMED OUT', 0, 0), 0, 0)
        $first_S = False
    EndIf
    Sleep(1000)
WEnd

keyboard script:

;Other
HotKeySet("a", "OtherA")
HotKeySet("{UP}", "OtherUP")
HotKeySet("{ENTER}", "OtherENTER")

While 1
    Sleep(10)
WEnd

;Other
Func OtherA()
    Send("")
EndFunc

Func OtherUP()
    Send("")
EndFunc

Func OtherENTER()
    Send("")
EndFunc

mouse script:

#include <Misc.au3>
HotKeySet("{PGUP}", "TerminateMouseTrap")

While 1
    _MouseTrap(100, 100, 100, 100)
    Sleep(100)
WEnd

Func TerminateMouseTrap()
    _MouseTrap()
    Exit
EndFunc

Umbrella Member

Link to comment
Share on other sites

Hi,

why douple post?

Nevermind, I posted the answer on the other one.

So long,

Mega

Scripts & functions Organize Includes Let Scite organize the include files

Yahtzee The game "Yahtzee" (Kniffel, DiceLion)

LoginWrapper Secure scripts by adding a query (authentication)

_RunOnlyOnThis UDF Make sure that a script can only be executed on ... (Windows / HD / ...)

Internet-Café Server/Client Application Open CD, Start Browser, Lock remote client, etc.

MultipleFuncsWithOneHotkey Start different funcs by hitting one hotkey different times

Link to comment
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
 Share

  • Recently Browsing   0 members

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