Not a member yet? Register for your free account!

You last visited: Today at 02:47

  • Please register to post and access all features, it's quick, easy and FREE!


[AutoIt] DFBank

Old   #1
elite*gold: 0
The Black Market: 0/0/0
Join Date: Jan 2008
Posts: 113
Received Thanks: 56
[AutoIt] DFBank

An adaptation of Jazkal's DFLoot script for banking items quickly. Useful if you're being attacked and are near a bank.

Open the Bank and use Alt+F2 to set its location.
With the Bank open, hit F2 over an item and it will bank it for you.

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=C:\Program Files\AutoIt3\Icons\Misc\Bank.ico
#AutoIt3Wrapper_Res_Comment=Darkfall Bank Macro
#AutoIt3Wrapper_Res_Description=Darkfall Bank Macro
#AutoIt3Wrapper_Res_LegalCopyright= 2009
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#cs ----------------------------------------------------------------------------
AutoIt Version:
Author: Jazkal (Original DFLoot) Magister (Adaptation to DFBank)
Date: 03/15/2009
Script Function: Darkfall Bank 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", "Bank", "X", "0")
IniWrite(@ScriptDir&"\_Macros.ini", "Bank", "Y", "0")

Global $BankTargetX = IniRead(@ScriptDir&"\_Macros.ini", "Bank", "X", "0")
Global $BankTargetY = IniRead(@ScriptDir&"\_Macros.ini", "Bank", "Y", "0")

HotKeySet("{F2}", "_MouseDragDrop") ; Press 'F2' key once mouse if over the item you want to grab.
HotKeySet("!{F2}", "_SetBankCoords") ; Press 'Alt' 'F2' to set the location of your paperdoll, where you want to drag your items to.

While 1

Func _MouseDragDrop()
$MousePos = MouseGetPos()
MouseClickDrag("left", $MousePos[0], $MousePos[1], $BankTargetX, $BankTargetY, 0)
MouseMove($MousePos[0], $MousePos[1], 0)

Func _SetBankCoords()
$MousePos = MouseGetPos()
IniWrite(@ScriptDir&"\_Macros.ini", "Bank", "X", $MousePos[0])
IniWrite(@ScriptDir&"\_Macros.ini", "Bank", "Y", $MousePos[1])
$BankTargetX = $MousePos[0]
$BankTargetY = $MousePos[1]

Penakle is offline  

« Previous Thread | Next Thread »

All times are GMT +2. The time now is 02:47.

Powered by vBulletin®
Copyright ©2000 - 2016, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

Support | Contact Us | FAQ | Advertising | Privacy Policy
Copyright ©2016 elitepvpers All Rights Reserved.