Code:
; ##################
; # Unstacked deck #
; ##################
#If WinActive Path of Exile
#NoEnv
#SingleInstance Force
#If GetKeyState("CapsLock", "T")
SetMouseDelay 40
SetWorkingDir % A_ScriptDir
SendMode Input
ConfigINI := A_ScriptDir "\Config.ini"
if not FileExist(ConfigINI)
{
IniWrite 0, %ConfigINI%, InvPos, xx
IniWrite 0, %ConfigINI%, InvPos, yy
IniWrite 0, %ConfigINI%, GroundPos, xx
IniWrite 0, %ConfigINI%, GroundPos, YY
IniWrite 0, %ConfigINI%, Flag, ToggleFlag
}
IniRead ToggleFlag, %ConfigINI%, Flag, ToggleFlag
if (ToggleFlag = 0)
{
TrayTip "Flag Status", "GroundDrop-mode is activated", 1
}
else
{
TrayTip "Flag Status", "Inventory-mode activated", 1
}
return
$RButton::
IniRead ToggleFlag, %ConfigINI%, Flag, ToggleFlag
if (ToggleFlag = 0) ; Drop on ground
{
MouseGetPos Rx, Ry
BlockInput MouseMove
Loop
{
if (!(GetKeyState("RButton", "P") && (A_Index < 11)))
break
Click Right
IniRead CordXX, %ConfigINI%, GroundPos, xx
IniRead CordYY, %ConfigINI%, GroundPos, yy
Sleep 100
MouseMove CordXX, Ry, 0
Sleep 100
Click
MouseMove Rx, Ry, 0
Sleep 100
}
BlockInput MouseMoveOff
}
else ; Inventory mode
{
MouseGetPos Rx, Ry
BlockInput MouseMove
While GetKeyState("RButton", "P")
{
Click Right
IniRead CordXX, %ConfigINI%, InvPos, xx
IniRead CordYY, %ConfigINI%, InvPos, yy
Sleep 50
MouseMove CordXX, CordYY, 0
Sleep 100
Click
Sleep 100
Send ^{Click}
Sleep 100
MouseMove Rx, Ry, 0
Sleep 50
}
BlockInput MouseMoveOff
}
return
+^m::
IniRead ToggleFlag, %ConfigINI%, Flag, ToggleFlag
if (ToggleFlag = 0)
{
ToggleFlag := 1
TrayTip "Flag Status", "Inventory-mode activated", 1
}
else
{
ToggleFlag := 0
TrayTip "Flag Status", "GroundDrop-mode is activated", 1
}
IniWrite %ToggleFlag%, %ConfigINI%, Flag, ToggleFlag
return
+F9::
IniRead ToggleFlag, %ConfigINI%, Flag, ToggleFlag
if (ToggleFlag = 0) ; Drop on ground
{
MouseGetPos xx, yy
IniWrite %xx%, %ConfigINI%, GroundPos, xx
TrayTip "New Coordinations", "Saved Ground-drop Coordinations: X=" xx, 1
}
else
{
MouseGetPos xx, yy
IniWrite %xx%, %ConfigINI%, InvPos, xx
IniWrite %yy%, %ConfigINI%, InvPos, yy
TrayTip "New Coordinations", "Saved Empty-inventory slot Coordinations: X=" xx " Y=" yy, 1
}
return