Users > Spoiled > AssortedBase

This macro is so useful it makes me cry. It works with all resolutions(small icons) and these are its 3 main features:

• Hotkeys for gathering icons and "Pick it all up for god's sake"
• Generating a second click for simple menus following the click (Best thing since sliced bread)
• A simple reminder function pulling you back into game after a time you specify.

Controls:

• Ctrl+(1-4): Clicks where the four gathering icons appear. Ctrl+4 is the rightmost icon, i.e. the one next to the pyramid icon that shows the test tree.
• Ctrl+a: Clicks where "Max" on a pickup dialog would be, picking everything up.
• Ctrl+LeftClick: Clicks and then generates a second click to the right and down.
• Alt+LeftClick: Clicks and then generates a second click to the right and up. Use these to save clicking on monotonous menus.
• Ctrl+r: Asks you for a time, waits out that time and reminds you via sound, pop-up window and reactivation of the ATITD window afterwards.

---

#IfWinActive, eGenesis Client
SendMode Input
SetDefaultMouseSpeed, 0

IfWinExist eGenesis Client 
{
	WinActivate
	WinGetPos,,, wWidth, wHeight
	I1X := wWidth - 148
	I2X := wWidth - 118
	I3X := wWidth - 88
	I4X := wWidth - 58
	CenterX := wWidth / 2
	CenterY := WHeight / 2
}

^1::
MouseGetPos, mousex, mousey
Click %I1X%, 63
MouseMove, mousex, mousey
return

^2::
MouseGetPos, mousex, mousey
Click %I2X%, 63
MouseMove, mousex, mousey
return

^3::
MouseGetPos, mousex, mousey
Click %I3X%, 63
MouseMove, mousex, mousey
return

^4::
MouseGetPos, mousex, mousey
Click %I4X%, 63
MouseMove, mousex, mousey
return

^LButton::			;QuickClick Right and down
Click
MouseGetPos, mousex, mousey
mx := mousex + 16
my := mousey + 9
sleep 100
MouseGetPos, mousex, mousey
Click, %mx%, %my%
MouseMove, mousex, mousey
return

!LButton::			;QuickClick Right and up
Click
MouseGetPos, mousex, mousey
mx := mousex + 16
my := mousey - 5
sleep 100
MouseGetPos, mousex, mousey
Click, %mx%, %my%
MouseMove, mousex, mousey
return

^a::				;Take "Max"
MouseGetPos, mousex, mousey
Click, %CenterX%, %CenterY%
MouseMove, mousex, mousey
return

^r::					;Simple Reminder function
WinActivate, eGenesis Client
Gui, +AlwaysOnTop +ToolWindow
Gui, Add, Text,, In how many seconds will this window be reactivated?
Gui, Add, Edit, vDelay, 10
Gui, Add, Button, default gSetPoint, OK
Gui, Show
return

SetPoint:
Gui, Submit
Gui, Destroy
Timero := (Delay * 1000) - 1100
Sleep %Timero%

Gui, +AlwaysOnTop +ToolWindow
Gui, Add, Text,, Reminding you ^_°
SoundPlay, *48
sleep 40
SoundPlay, *48
sleep 75
SoundPlay, *48
Gui, Show
sleep 1000
Gui, Destroy

WinActivate, eGenesis Client
return

^!c::				;Close pins when the flax/onion macros fail
MouseGetPos, mousex, mousey
ImageSearch closex, closey, 0, 600, 640, 1024, *2 pincloseautoflax.bmp
if ErrorLevel = 0
	Click, %closex%, %closey%
ImageSearch closex, closey, 0, 600, 500, 1024, *2 pincloseonion.bmp
if ErrorLevel = 0
	Click, %closex%, %closey%
MouseMove, mousex, mousey
return