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.






