почти..Autoloot...пользовать по желанию. работает отлично
Posted: Sat Mar 21, 2009 7:52 pm
Скрипт под AutoHotKey
Для запуска:
1) В корне диска С: создать пустой текстовый файл loot.txt
2) Открыть AutoHotKey, пройти путь "File" -> "Edit Script...", откроется "Блокнот" вставить туда код скрипта, сохранить файл со кодом через "блокнот" только не в С:\loot.txt
3) В AutoHotKey пройти путь "File" -> "Reload Script."
Как работает:
1) Нужно указать сундук в который будут ложиться предметы. Банк, бекпек, папердол, продажа вендору. выполняется при помощи комбинации "Alt+Right Click"
2) Чтобы переместить предмет в заданную позицию используем "Alt+Left Click"
Для запуска:
1) В корне диска С: создать пустой текстовый файл loot.txt
2) Открыть AutoHotKey, пройти путь "File" -> "Edit Script...", откроется "Блокнот" вставить туда код скрипта, сохранить файл со кодом через "блокнот" только не в С:\loot.txt
3) В AutoHotKey пройти путь "File" -> "Reload Script."
Как работает:
1) Нужно указать сундук в который будут ложиться предметы. Банк, бекпек, папердол, продажа вендору. выполняется при помощи комбинации "Alt+Right Click"
2) Чтобы переместить предмет в заданную позицию используем "Alt+Left Click"
IniFile := "C:\loot.txt"
FileGetSize, size, %IniFile%
if (size = "") {
MsgBox Setting up
IniWrite, 1300, %IniFile%, Loot, xdest ; --- destination x pos
IniWrite, 700, %IniFile%, Loot, ydest ; --- destination y pos
} else {
IniRead, xdest, %IniFile%, Loot, xdest ; --- destination x pos
IniRead, ydest, %IniFile%, Loot, ydest ; --- destination y pos
}
CoordMode, Pixel
$!Lbutton:: ;quick loot -------------------------
MouseGetPos, x1, y1
MouseClickDrag, left, x1, y1, xdest, ydest, 0 ;0 is mouse speed, 0 is instant
MouseMove, x1, y1, 0 ;0 is mouse speed, 0 is instant
return
$!Rbutton:: ;loot destination ------------------------->
MouseGetPos, xdest, ydest
IniWrite, %xdest%, %IniFile%, Loot, xdest
IniWrite, %ydest%, %IniFile%, Loot, ydest
return
