User:Sithid/Macros/AHK/Grass - Revision history

Sithid: /* The Macro */

2009-01-02T03:31:08Z

The Macro

Sithid: /* Grass Macro */

2008-12-31T20:34:28Z

Grass Macro

Sithid: /* Grass Macro */

2008-12-31T20:34:10Z

Grass Macro

Sithid: /* Grass Macro */

2008-12-31T20:33:46Z

Grass Macro

Sithid at 20:33, 31 December 2008

2008-12-31T20:33:22Z

Sithid: New page:

 ; ; AutoHotkey Version: 1.x ; Language:       English ; Platform:       Win9x/NT ; Author:         Sithid	 ; ; Script Function: ;	Simple grass picker ; Notes: ;	Thanks Selune for hel...

2008-12-31T20:30:16Z

New page: <pre> ; ; AutoHotkey Version: 1.x ; Language: English ; Platform: Win9x/NT ; Author: Sithid ; ; Script Function: ; Simple grass picker ; Notes: ; Thanks Selune for hel...

New page

<pre>
;
; AutoHotkey Version: 1.x
; Language: English
; Platform: Win9x/NT
; Author: Sithid
;
; Script Function:
; Simple grass picker
; Notes:
; Thanks Selune for helping me out with AHK ... though I still hate AHK :P.
;

#NoEnv
SendMode Input
#SingleInstance force

Pause::
Pause
return

!Escape::
ExitApp
return

!s::
Main()
return

SetDefaultMouseSpeed, 0

; Varibles, no touching!
GrassIconX := 0
GrassIconY := 0
CenterX := win_Xmax / 2
CenterY := win_Ymax / 2

; Main script execution.
Main()
{
; Wait for the egen client to be running.
WinWait, eGenesis Client

; Check if the egen client is active, wait for it to become so.
IfWinNotActive, eGenesis Client, , WinActivate, eGenesis Client,
WinWaitActive, eGenesis Client,

; Get egen client window stats.
WinGetActiveStats, win_Title, win_Xmax, win_Ymax, win_Xpos, win_Ypos

; Wait until the f1 key is pressed.
KeyWait F1, D

; Set the grass icons x/y.
MouseGetPos GrassIconX, GrassIconY

; Wait till the f1 key is released.
KeyWait F1, U

; Main function loop, performs the picking.
loop
{
; Click the grass icon, place to run to, and sleep.
MouseClick, left, GrassIconX, GrassIconY
MouseClick, left, CenterX, CenterY + 200
Sleep, 3000

; Again, click the grass icon, place to run to, and sleep.
MouseClick, left, GrassIconX, GrassIconY
MouseClick, left, CenterX, CenterY - 200
Sleep, 3000
}
}
</pre>

@@ Line 3: / Line 3: @@
 Hotkeys
-   Alt + s      : starts the script/macro.
+   Alt + s      : Starts the script/macro.
    Alt + Escape : Terminates the script/macro.
-   Pause        : pauses the script/macro.
+   Pause        : Pauses the script/macro.
 Run script/macro and press alt + s to start.  Follow the msgbox instructions and enjoy.

@@ Line 1: / Line 1: @@
 == Grass Macro ==
-My simple grass macro.<br>
+My simple grass macro.<br><br>
-Hotkeys:
    Alt + s      : starts the script/macro.
    Alt + Escape : Terminates the script/macro.

@@ Line 1: / Line 1: @@
 == Grass Macro ==
-My simple grass macro.
+My simple grass macro.<br>
 Hotkeys:
    Alt + s      : starts the script/macro.

← Older revision		Revision as of 20:33, 31 December 2008
Line 1:		Line 1:
		+	== Grass Macro ==
		+	My simple grass macro.
		+	Hotkeys:
		+	Alt + s : starts the script/macro.
		+	Alt + Escape : Terminates the script/macro.
		+	Pause : pauses the script/macro.
		+
		+	Run script/macro and press alt + s to start. Follow the msgbox instructions and enjoy.
		+
		+	== The Macro ==
	<pre>		<pre>
	;		;

@@ Line 39: / Line 39: @@
 return
-SetDefaultMouseSpeed, 0
+SetDefaultMouseSpeed 0
 ; Main script execution.
 Main()
@@ Line 59: / Line 53: @@
 	; Get egen client window stats.
 	WinGetActiveStats, win_Title, win_Xmax, win_Ymax, win_Xpos, win_Ypos
 	; Wait until the f1 key is pressed.
 	KeyWait F1, D
 	; Set the grass icons x/y.
 	MouseGetPos GrassIconX, GrassIconY
 	; Main function loop, performs the picking.