Code:
#Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_icon=C:\Program Files\AutoIt3\Icons\Misc\bundle.ico #AutoIt3Wrapper_outfile=.\DFLoot.exe #AutoIt3Wrapper_Compression=4 #AutoIt3Wrapper_Res_Comment=Darkfall Loot Macro #AutoIt3Wrapper_Res_Description=Darkfall Loot Macro #AutoIt3Wrapper_Res_Fileversion=1.0.2.4 #AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y #AutoIt3Wrapper_Res_LegalCopyright=© 2009 #AutoIt3Wrapper_Res_Language=1033 #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #cs ---------------------------------------------------------------------------- AutoIt Version: 3.2.12.1 Author: Jazkal Date: 03/12/2009 Script Function: Darkfall Loot Macro #ce ---------------------------------------------------------------------------- Opt("MouseClickDragDelay", 0) ; Alters the length of the brief pause at the start and end of a mouse drag operation. Opt("MouseCoordMode", 0) ; Sets the way coords are used in the mouse functions, 0 = relative coords to the active window If Not FileExists(@ScriptDir&"\_Macros.ini") Then IniWrite(@ScriptDir&"\_Macros.ini", "Bag", "X", "0") IniWrite(@ScriptDir&"\_Macros.ini", "Bag", "Y", "0") Sleep(500) EndIf Global $BagTargetX = IniRead(@ScriptDir&"\_Macros.ini", "Bag", "X", "0") Global $BagTargetY = IniRead(@ScriptDir&"\_Macros.ini", "Bag", "Y", "0") HotKeySet("{Esc}", "_MouseDragDrop") ; Press 'Esc' key once mouse if over loot you want to grab. HotKeySet("!{Esc}", "_SetBagCoords") ; Press 'Alt' 'Esc' to set the location of your bag, where you want to drag your loot too. While 1 Sleep(50) WEnd Func _MouseDragDrop() $MousePos = MouseGetPos() MouseClickDrag("left", $MousePos[0], $MousePos[1], $BagTargetX, $BagTargetY, 0) MouseMove($MousePos[0], $MousePos[1], 0) EndFunc Func _SetBagCoords() $MousePos = MouseGetPos() IniWrite(@ScriptDir&"\_Macros.ini", "Bag", "X", $MousePos[0]) IniWrite(@ScriptDir&"\_Macros.ini", "Bag", "Y", $MousePos[1]) $BagTargetX = $MousePos[0] $BagTargetY = $MousePos[1] EndFunc
Use Alt-ESC to set the location where you want the loot dragged too.
Use ESC when the mouse is over loot you want to drag.
If you want changes made to the script, you can ask really nicely or learn Autoit yourself. Otherwise, enjoy.