User:Shuofthefieryheat/MyUtilitiesPage/Shu Repeat Clicker - Revision history

Shuofthefieryheat at 01:31, 19 April 2009

2009-04-19T01:31:08Z

Shuofthefieryheat: /* Shuofthefieryheat Utilities Page */

2009-03-28T02:05:19Z

Shuofthefieryheat Utilities Page

Shuofthefieryheat: /* Shuofthefieryheat Utilities Page */

2009-03-28T01:57:53Z

Shuofthefieryheat Utilities Page

Shuofthefieryheat: /* Shuofthefieryheat Utilities Page */

2009-03-28T01:57:37Z

Shuofthefieryheat Utilities Page

Shuofthefieryheat: User:Shuofthefieryheat/MyUtilitiesPage moved to User:Shuofthefieryheat/MyUtilitiesPage/Shu Repeat Clicker: adding another macro and need to branch the page

2009-03-28T01:54:48Z

User:Shuofthefieryheat/MyUtilitiesPage moved to User:Shuofthefieryheat/MyUtilitiesPage/Shu Repeat Clicker: adding another macro and need to branch the page

Shuofthefieryheat: /* Source */

2009-02-26T02:04:40Z

Source

Shuofthefieryheat: /* Zip file with Source EXE and Info */

2009-02-26T02:04:24Z

Zip file with Source EXE and Info

Shuofthefieryheat: /* Shu's Repeat Clicker Macro */

2009-02-26T01:59:37Z

Shu's Repeat Clicker Macro

Shuofthefieryheat: /* Shu's Repeat Clicker Macro */

2009-02-26T01:51:31Z

Shu's Repeat Clicker Macro

Shuofthefieryheat: /* Shu's Repeat Clicker Macro */

2009-02-26T01:42:44Z

Shu's Repeat Clicker Macro

← Older revision		Revision as of 01:31, 19 April 2009
Line 6:		Line 6:

	[[User:Shuofthefieryheat/MyUtilitiesPage \| MyUtilitiesPage]]		[[User:Shuofthefieryheat/MyUtilitiesPage \| MyUtilitiesPage]]
		+
		+	==== Notes ====
		+
		+	These macros where created and compiled on Vista x64 using AutoIt 3.0. If you are using a different OS or get an error when you run them, you need to get the AutoIt 3.0 compiler/editor utility and recompile the macro on your own system. The macro utilities and compilers can be found on the main macro page : [http://www.atitd.org/wiki/tale4/Macro Macros]

	==== Shu's Repeat Clicker Macro ====		==== Shu's Repeat Clicker Macro ====

← Older revision		Revision as of 02:05, 28 March 2009
Line 1:		Line 1:
−	== Shuofthefieryheat ~~Utilities~~ Page ==	+	== Shuofthefieryheat Repeat Clicker Page ==

	'''Other Pages of Interest'''		'''Other Pages of Interest'''

← Older revision		Revision as of 01:57, 28 March 2009
Line 4:		Line 4:

	[[User:Shuofthefieryheat \| MyHomePage]]		[[User:Shuofthefieryheat \| MyHomePage]]
		+
	[[User:Shuofthefieryheat/MyUtilitiesPage \| MyUtilitiesPage]]		[[User:Shuofthefieryheat/MyUtilitiesPage \| MyUtilitiesPage]]

← Older revision		Revision as of 01:57, 28 March 2009
Line 4:		Line 4:

	[[User:Shuofthefieryheat \| MyHomePage]]		[[User:Shuofthefieryheat \| MyHomePage]]
		+	[[User:Shuofthefieryheat/MyUtilitiesPage \| MyUtilitiesPage]]

	==== Shu's Repeat Clicker Macro ====		==== Shu's Repeat Clicker Macro ====

@@ Line 28: / Line 28: @@
 [http://www.atitd.org/wiki/tale4/Image:Shu_Clicker.zip Shu's Clicker Zip File]
-==== Source ====
+==== Shu's Repeat Clicker Macro Source ====
   <pre>

← Older revision	Revision as of 01:54, 28 March 2009
(No difference)

@@ Line 24: / Line 24: @@
 </pre>
-==== Zip file with Source EXE and Info ====
+==== Shu's Repeat Clicker Macro: Zip file with Source & EXE & Info File ====
 [http://www.atitd.org/wiki/tale4/Image:Shu_Clicker.zip Shu's Clicker Zip File]
 ==== Source ====

@@ Line 10: / Line 10: @@
-This one has a prompt to for the Pause Delay between clicks.  The Pause Delay defaults to 30000 (30 seconds). To change the Pause Delay while the macro is running use (CTRL+2). This allows you to experiment with the delay.
+This one has a prompt for the Pause Delay between clicks.  The Pause Delay defaults to 30000 (30 seconds). To change the Pause Delay while the macro is running use (CTRL+2). This allows you to experiment with the delay.
 You start the macro by doing one of the TogglePause key commands. I added (CTRL+1) as a TogglePause because sometimes my keyboard doesn't respond properly to the PAUSE key.
-     HotKeySet( "^1", "TogglePause" )
+<pre>
-     HotKeySet( "{PAUSE}", "TogglePause" )
+HotKeySet( "^1", "TogglePause" )
-     HotKeySet( "{ESC}", "Terminate" )
+HotKeySet( "{ESC}", "Terminate" )
-     HotKeySet( "{F1}", "SetClickPos" )
+HotKeySet( "{F1}", "SetClickPos" )
-     HotKeySet( "^2", "SetClickDelay" )
+HotKeySet( "^2", "SetClickDelay" )
 ==== Zip file with Source EXE and Info ====

← Older revision		Revision as of 01:51, 26 February 2009
Line 22:		Line 22:
	HotKeySet( "^2", "SetClickDelay" )		HotKeySet( "^2", "SetClickDelay" )

		+	==== Zip file with Source EXE and Info ====

		+	[http://www.atitd.org/wiki/tale4/Image:Shu_Clicker.zip Shu's Clicker Zip File]
		+
		+
		+	==== Source ====

	<pre>		<pre>

← Older revision		Revision as of 01:42, 26 February 2009
Line 21:		Line 21:

	HotKeySet( "^2", "SetClickDelay" )		HotKeySet( "^2", "SetClickDelay" )
		+
		+
		+
		+	<pre>
		+	#cs --------------------------------------------------------------------------------------
		+
		+	AutoIt Version 3.2.12.1
		+
		+	Author: ShuoftheFieryHeat
		+	Date: 02.23.09
		+	Version: 1.0.b
		+	Script Function:
		+	Repeat Clicker - With Prompt for Delay Time.
		+	Based on the work of Sithid.
		+
		+	Author: Sithid
		+	Date: 07.12.08
		+	Version: 1.3
		+
		+	Script Function:
		+	Repeat Clicker - Automagical
		+
		+
		+	#ce --------------------------------------------------------------------------------------
		+
		+	#include <GUIConstants.au3>
		+	#include <GUIConstantsEx.au3>
		+	#include <WindowsConstants.au3>
		+
		+	Opt( "MustDeclareVars", 1 )
		+
		+	Global $Paused = False
		+	Global $ClickPosSet = False
		+	Global $ClickPos[2]
		+
		+	Global $Delay = 30000; time in ms between clicks about 30 seconds
		+
		+	HotKeySet( "{ESC}", "Terminate" )
		+	HotKeySet( "^1", "TogglePause" )
		+	HotKeySet( "{PAUSE}", "TogglePause" )
		+	HotKeySet( "{F1}", "SetClickPos" )
		+	HotKeySet( "^2", "SetClickDelay" )
		+
		+
		+	WinWaitActive( "eGenesis Client" );
		+
		+	TogglePause()
		+
		+	SetClickDelay()
		+
		+	SetClickLocation()
		+
		+	While Not $ClickPosSet
		+	Sleep( 100 )
		+	WEnd
		+
		+	Main()
		+
		+	Func SetClickLocation()
		+
		+	MsgBox( 0x0, "Click Location", "Please hover over the place you want to repeat click and press F1." )
		+
		+	EndFunc
		+
		+	Func SetClickDelay()
		+
		+
		+	$Delay = InputBox( "Pause Delay", "Please enter the delay time between clicks. 30000 is about 30 seconds.", $Delay)
		+
		+	$Delay = Int($Delay)
		+
		+	MsgBox( 0x0, "Pause Delay Value", "The Pause Delay is now set for: " & $Delay)
		+
		+
		+	EndFunc
		+
		+	Func SetClickPos()
		+	$ClickPos = MouseGetpos()
		+	$ClickPosSet = True
		+	EndFunc
		+
		+	Func Main()
		+	Local $OldMouseLoc[2]
		+	Do
		+	WinWaitActive( "eGenesis Client" );
		+
		+	$OldMouseLoc = MouseGetPos()
		+	MouseClick( "left", $ClickPos[0], $ClickPos[1], 1,1 )
		+	MouseMove( $OldMouseLoc[0], $OldMouseLoc[1], 1)
		+
		+	Sleep( $Delay )
		+	Until 1 = 2
		+	EndFunc
		+
		+	Func TogglePause()
		+	$Paused = Not $Paused
		+
		+	While $Paused
		+	Sleep(100 )
		+	WEnd
		+	EndFunc
		+
		+	Func Terminate()
		+	Exit
		+	EndFunc
		+	</pre>