taultunleashed logoSimple AC Tool mining macro : EVE Online Submissions
newtopic  postreply
 [ 2 posts ] 
blue large dot

Simple AC Tool mining macro : EVE Online Submissions

Posted: May 31st, 2006, 2:48 am
 
sercane
sercane's Reps:
User avatar
//Must have Cargo bay open.
//Must have Item bay open.
//Astroids only in overview (the ones you want to mine).
//Current Constants are for Full Screen.
//Use ctrl+alt+shift+M to see mouse positions in Eve

Constants
Zoomx = 450 // zoom out
Zoomy = 805
Undockx = 20 //Un-dock on NeoCon
Undocky = 830
Depart1x = 600 //Open Drop down
Depart1y = 142
Depart2x =655 //Asteroid belts
Depart2y = 207
Depart3x = 845 // First belt
Depart3y = 225
Depart4x = 950 // Warp to
Depart4y = 225
FirstTargetx = 992 //First Target in overview
FirstTargety = 182
Orbit1x = 992 //Orbit Button, Top Overview
Orbit1y = 209
Orbit2x = 900 // orbit 500m
Orbit2y = 211
LockTargetx = 992 //Lock Target, Top Overview
LockTargety = 247
MineLazer1x = 666 //Mine Lazer 1
MineLazer1y = 737
MineLazer2x = 709 //Mine Lazer 2
MineLazer2y = 737
MineLazer3x = 745 //Mine Lazer 3
MineLazer3y = 737
Dock1x = 600 //Open Drop down
Dock1y = 142
Dock2x = 650 // station
Dock2y = 260
Dock3x = 850 // station 1
Dock3y = 260
Dock4x = 690 // dock
Dock4y = 300
ItemNeoConx = 989 //Item box in the NeoCon
ItemNeoCony = 436
CargoItemx = 85 //Stack of mined stuff
CargoItemy = 769
ItemBayx = 1092 //Any open spot on your Item bay
ItemBayy = 713
MoveToBeltDelay = 1 //Min
OrbitDelay = 120 //Seconds
LockTargetDelay = 10 //Seconds
MineDelay = 120 //sec
MoveToStationDelay = 160 //Seconds
PathToEve = D:\EVE\eve.exe //Were you eve.exe is located
PassBoxX = 346 //Password Box
PassBoxY = 538
Password = s5a1k2 //EvE Password
LoginX = 580 //Login Button
LoginY = 609
LoginDelay = 5 //Seconds, How long you want to wait before logging back in
Trial = No //Trial Account?
TrialCloseX = //Trail note close button
TrialCloseY =
CharPickX = 380 //Char Portrait to login
CharPickY = 300
End

Call Main

Procedure Main
While 1 = 1
SetActiveWindow EVE
call MoveToBelt
Call FindTarget
Call LockTarget
Call Mine
Call MoveToStation
Call Transfer
End
End

Procedure SwitchedWindow On WindowChange
ExecProgram $PathToEve
delay 20 sec
SetActiveWindow EVE
MousePos $PassBoxX, $PassBoxY
leftclick
delay 5 sec
Keys $Password
delay 1 sec
Keys {RETURN}
delay $LoginDelay sec
leftclick
If $Trial = Yes
delay 5 min
MousePos $TrialCloseX, $TrialCloseY
delay 1 sec
leftclick
delay 10 sec
MousePos $CharPickX, $CharPickY
delay 1 sec
leftclick
delay 2 min
Else
delay 10 sec
MousePos $CharPickX, $CharPickY
delay 1 sec
DoubleClick 1
delay 2 min
End
End

Procedure MoveToBelt
SetActiveWindow EVE
MousePos $UnDockx, $UnDocky
Delay 2 Sec
LeftClick
Delay 30 Sec
MousePos $Zoomx, $Zoomy
delay 1 sec
leftclick
delay 1 sec
leftclick
delay 1 sec
MousePos $Depart1x, $Depart1y
delay 1 sec
RightClick
Delay 1 Sec
MousePos $Depart2x, $Depart2y
Delay 1 Sec
MousePos $Depart3x, $Depart3y
Delay 1 Sec
MousePos $Depart4x, $Depart4y
Delay 1 Sec
LeftClick
Delay $MoveToBeltDelay Min
End

Procedure FindTarget
SetActiveWindow EVE
MousePos $FirstTargetx, $FirstTargety
Delay 2 Sec
RightClick
Delay 2 Sec
MousePos $Orbit1x, $Orbit1y
delay 2 sec
MousePos $Orbit2x, $Orbit2y
Delay 2 Sec
LeftClick
Delay $OrbitDelay Sec
End

Procedure LockTarget
SetActiveWindow EVE
MousePos $FirstTargetx, $FirstTargety
Delay 1 Sec
rightclick
delay 1 sec
Mousepos $LockTargetx, $LockTargety
delay 1 sec
leftclick
Delay $LockTargetDelay Sec
End

Procedure Mine
SetActiveWindow EVE
Keys {F1}
Delay 1 Sec
Keys {F2}
Delay 1 Sec
Keys {F3}
Delay 1 Sec
Delay $MineDelay sec
End

Procedure MoveToStation
SetActiveWindow EVE
MousePos $Dock1x, $Dock1y
Delay 1 Sec
RightClick
Delay 1 Sec
MousePos $Dock2x, $Dock2y
Delay 1 Sec
MousePos $Dock3x, $Dock3y
Delay 1 Sec
MousePos $Dock4x, $Dock4y
Delay 1 Sec
LeftClick
Delay $MoveToStationDelay Sec
End

Procedure Transfer
SetActiveWindow EVE
MousePos $ItemNeoConx, $ItemNeoCony
delay 1 sec
leftclick
delay 1 sec
MousePos $CargoItemx, $CargoItemy
Delay 1 Sec
DragTo $ItemBayx, $ItemBayy
Delay 10 Sec
End


Reply with quote
Posted: June 6th, 2006, 7:12 pm
 
blackrockshock
blackrockshock's Reps:
User avatar
Some screen shots to get an idea of setup for people lacking macro experience. Also, what resolution you are using would be cool.


Reply with quote
Want Advertisements After The Last Post Removed? Create A Free Account!

blue large dot Who is online
Users browsing this forum: No registered users and 2 guests

Popular Sections
SWTOR Cheats
Guild Wars 2 Cheats
Guild Wars 2 Hacks
Guild Wars 2 Bots
Diablo 3 Cheats
Guild Wars 2 Mods

Popular Sections
WoW Cataclysm Cheats & Exploits
WoW Cataclysm Hacks & Bots
Star Wars The Old Republic Cheats
SWTOR Mods
Torchlight 2 Cheats
SWTOR Space Mission Bots
Site Nav and RSS
RSS Feed of EVE Online Submissions RSS Feed 
Sitemap of EVE Online Submissions Sitemap 
SitemapIndex SitemapIndex
RSS Feed RSS Feed
Channel list Channel list
left bottom corner Site and Contents Copyright 2001-2012 All Rights Reserved TaultUnleashed.com bottom corner
top left
top right
createaccount
Username:   Password:   Remember Me?