|
Gotta download ACtool for it 2 werk......
WEll the code you see has lots of junk code that is useless. It was for testing different methods for different things and we never removed it so
dont sit there wondering what some of the stuff means. Alsoi ran this code in a well designed city. What i mean by that is that the city should have its mission terminals on the outskirts. If they dont, talk to your mayor and see if you can get them to place one on the outside, otherwise you will hit buildings left and right and since the unstuck procedure was never finished you will get nowhere!!!!!! also when you use this macro wear UBESE armor and write your own ingame brandy macro that will eat it based on the amount of time on your brandy(i recommend brandy of at least 45 min)
I. SWG SETUP FOR MACRO
II. CRAP
I. SWG SETUP FOR MoneyBot for Mokks v.01
In game resolution needs to be set at 1024*768.
Camera chase needs to be turned off. Hit period on numpad while in game to toggle on/off.
Use Rebel Palette.
We need in toolbar
Dismount...........F9 354,17 (/wave; /pause 1; /dismount; ------> write this in game macro to use for dismount)
CombatSpam.........F10 384,17 (/stand; /unarmedspinattack2; /unarmedhit3; ---->recommended since mokks have weapons now)
CycleTarget........F11 420,17 (/ui action cycleTargetOutward;)
Mount..............F12 454,17 (/target speederbike; /mount; /target speederbike; /mount; /target self;)
Toolbar needs to be locked into the top left corner and needs to have 2 rows(so F1-F12 and shiftF1-shiftF12).
Datapad needs to fill from bottom left corner up to top left where its top border will touch the bottom of F1 on the toolbar.
Need to have the following in datapad, vehicle, ATST/anything(ATST recommended if you run own solo group), and another item of your choice.
Size of the objects in the datapad coming soon....(also use view that shows the icons)
Stuff 2 decipher in the code?
Procedure AbortCheck
Loadrgb 988, 518
delay 100
IF {rgbgreen} > 250
MousePos 897, 494
delay 300
Doubleclick
delay 1 sec
end
end
When u have a mission activated and get near another while travellin to the first, the second becomes activated and this can throw things into a big mess.
AbortCheck takes care of this problem, providing u have your window set up right. Above the mission terminal window should be the onscreen waypoint tracker.
be4 configin this, be sure to have datapad at 100% without missions. also u need 2 remove the nearest group wp by fillin datapad to 100% deletin the nearest
grp wp and makin a random one of your own. to config window, activate a waypoint and grap 2 missions, or activate 2 waypoints and a mission, watever just as long as u have 3 things activated. The first two in the list on the onscreen waypoint monitor need to be visible when the mission window is open. The second one needs to LOCK onto the top of the mission window and then the 3rd will rest under.
What is doublecheck and triplecheck?
-well u want this to get the right missions. by right missions i mean MOKKS..no jantas becuz they have that little hut and u can get stuck in it and then theres no point to all this. im second guessin this right now due to the poor labelin of the procedures but i think doublecheck decides if the mission is a janta mission and the triplecheck is for takin missions to NE,E,SE(designed for the city i used). so this takes missions to NE,E,SE that are only mokks.
OK.. warning.. this code is even longer.. you have to setup 7 extra waypoints (you can figure it out for now, i'll make a "read me" some other time) and be a master Doc, novice Entertainer, but it'll buff you, heal your BF and then take missions.
Only thing that still has problems is procedure Unstuck (checks to see if you're stuck). Phearless got tired of messing with it, and I didn't feel like doing it either, we both quit SWG.
BTW, that's the same Phearless that told you guys that this kinda code DID exist, but he was told to prove it then.. now that we're done with it, we'll happily comply.
Wear UBESE armor, instead of composite.. Mokk's all hit with melee anyways. We MIGHT get around to posting screen shots of how all the windows should be configured, but if you're smart you'll figure it out anyways.
(*EDIT*** Read the top post.. it's been edited with quite a few of the things needed to set up the ingame portion anyways*)
MaCro starts below this line
-------------------------------------------------------------------------------------
SetActiveWindow SwgClient
Constants
// We need in toolbar
// Dismount....F9 354,17
// Unarmed3..F10 384,17
// CycleTarget........F11 420,17
// Mount.......F12 454,17
//CAMERA CHASE NEEDS TO BE OFF TO WORK ON BIKE!!!!
//USE REBEL PALETTE FOR THIS TO WORK
//BE SURE TO SORT MISSIONS BY PAYMENT BIGGEST ON BOTTOM BEFORE U BEGIN THE MACRO
//The number of waypoints you set for your destination//
(* tons of unused constants in here.. just ignore'em unless you wanna try to debug*)
numwaypoints = 3
bufftime = 0
bufftest = 0
bufflength = 0245
counter = 0
tick = 0
timer = 0
timer1 = 0
bufftimer = 9000000 // this is how long you run with your buffs
count = 0
newcount = 0
count1 = 0
count2 = 0
count3 = 0
x = 0
y = 0
count4 = 0
count5 = 0
count6 = 0
count7 = 0
flag = 0
//!!!End of customizable variables. Ignore everything beyond this point!!!
centerx = 512//use 1024x768 resolution
centery = 384
waypointx = 444
waypointy = 249
numloops = 100
waypointxB = 162
waypointyB = 724
direction = 0
continuewalking = 0
currentwaypoint = 1
tempconst = 0
temp1 = 0
temp2 = 0
temp3 = 0
temp4 = 0
temp5 = 0
temp6 = 0
temp9 = 0
tempx1 = 0
tempx2 = 0
tempx3 = 0
tempx4 = 0
tempy1 = 0
tempy2 = 0
tempy3 = 0
tempy4 = 0
sintheta = 0
costheta = 0
radius = 149//
isarrow = 0
crudetheta = 0
////////////////////mission constants////////////////////////////////////////////////////////////////////
//coords for accept button
acceptX = 428
acceptY = 343
//coords for ok button to accept
okX = 588
okY = 393
//coords for refresh button
refreshX = 615
refreshY = 745
nummissions = 2
currentmission = 1
missionfound = 0
///////////////////////////////////end mission constants/////////////////////////////////////////////////
end
delay 3000
////////////////////////////////OBJECTS///////////////////////////////////////////////////////////
objVar 35
Object lairlow // Test at coords 808, 13
141=0,0|141=1,0|141=2,0|141=3,0|141=4,0|141=5,0|141=6,0|141=7,0|
165=0,1|165=1,1|165=2,1|165=3,1|165=4,1|165=5,1|165=6,1|165=7,1|
187=0,2|187=1,2|187=2,2|187=3,2|187=4,2|187=5,2|187=6,2|187=7,2|
206=0,3|206=1,3|206=2,3|206=3,3|206=4,3|206=5,3|206=6,3|206=7,3|
219=0,4|219=1,4|219=2,4|219=3,4|219=4,4|219=5,4|219=6,4|219=7,4|
206=0,5|206=1,5|206=2,5|206=3,5|206=4,5|206=5,5|206=6,5|206=7,5|
187=0,6|187=1,6|187=2,6|187=3,6|187=4,6|187=5,6|187=6,6|187=7,6|
End Object
Object c8 // Test at coords 938, 13 checks for full health bar of a lair
155=0,0|155=2,0|155=4,0|155=6,0|
192=0,2|192=2,2|192=4,2|192=6,2|
218=0,4|218=2,4|218=4,4|218=6,4|
195=0,6|195=2,6|195=4,6|195=6,6|
End Object
Object m1 // Test at coords 844, 686
75=0,0|75=1,0|75=2,0|75=3,0|75=4,0|75=5,0|75=6,0|75=7,0|75=8,0|
74=0,1|74=1,1|74=2,1|74=3,1|74=4,1|74=5,1|74=6,1|74=7,1|74=8,1|
75=0,2|74=1,2|74=2,2|74=3,2|255=4,2|255=5,2|255=6,2|74=7,2|74=8,2|
75=0,3|74=1,3|74=2,3|255=3,3|74=4,3|74=5,3|74=6,3|255=7,3|74=8,3|
76=0,4|75=1,4|74=2,4|74=3,4|74=4,4|74=5,4|74=6,4|255=7,4|74=8,4|
76=0,5|75=1,5|74=2,5|74=3,5|74=4,5|255=5,5|255=6,5|74=7,5|74=8,5|
76=0,6|76=1,6|74=2,6|74=3,6|74=4,6|74=5,6|74=6,6|255=7,6|74=8,6|
76=0,7|76=1,7|75=2,7|255=3,7|74=4,7|74=5,7|74=6,7|255=7,7|75=8,7|
76=0,8|76=1,8|75=2,8|74=3,8|255=4,8|255=5,8|255=6,8|74=7,8|75=8,8|
76=0,9|76=1,9|76=2,9|74=3,9|74=4,9|74=5,9|74=6,9|74=7,9|74=8,9|
76=0,10|76=1,10|76=2,10|75=3,10|74=4,10|74=5,10|74=6,10|74=7,10|74=8,10|
End
Object d1 // Test at coords 186, 87
133=0,0|132=1,0|131=2,0|131=3,0|132=4,0|132=5,0|
128=0,1|255=1,1|255=2,1|255=3,1|255=4,1|255=5,1|
125=0,2|255=1,2|255=2,2|115=3,2|119=4,2|124=5,2|
125=0,3|255=1,3|255=2,3|114=3,3|118=4,3|123=5,3|
125=0,4|255=1,4|255=2,4|255=3,4|255=4,4|255=5,4|
125=0,5|255=1,5|255=2,5|121=3,5|128=4,5|132=5,5|
126=0,6|255=1,6|255=2,6|122=3,6|129=4,6|132=5,6|
128=0,7|255=1,7|255=2,7|255=3,7|255=4,7|255=5,7|
End
Object ms2 // Test at coords 442, 170
94=0,0|94=1,0|94=2,0|94=3,0|94=4,0|94=5,0|93=6,0|93=7,0|93=8,0|93=9,0|93=10,0|
94=0,1|94=1,1|94=2,1|94=3,1|94=4,1|94=5,1|93=6,1|93=7,1|93=8,1|93=9,1|93=10,1|
94=0,2|94=1,2|94=2,2|94=3,2|94=4,2|94=5,2|93=6,2|93=7,2|93=8,2|93=9,2|93=10,2|
94=0,3|94=1,3|94=2,3|94=3,3|94=4,3|94=5,3|93=6,3|93=7,3|93=8,3|93=9,3|93=10,3|
94=0,4|94=1,4|94=2,4|94=3,4|94=4,4|94=5,4|93=6,4|93=7,4|93=8,4|93=9,4|93=10,4|
94=0,5|94=1,5|94=2,5|94=3,5|94=4,5|94=5,5|94=6,5|93=7,5|93=8,5|93=9,5|93=10,5|
94=0,6|94=1,6|94=2,6|94=3,6|94=4,6|94=5,6|94=6,6|94=7,6|93=8,6|93=9,6|93=10,6|
94=0,7|94=1,7|94=2,7|94=3,7|94=4,7|94=5,7|94=6,7|94=7,7|93=8,7|93=9,7|93=10,7|
94=0,8|94=1,8|94=2,8|94=3,8|94=4,8|94=5,8|94=6,8|94=7,8|93=8,8|93=9,8|93=10,8|
End
Object ms1 // Test at coords 511, 170
94=0,0|94=1,0|94=2,0|93=3,0|93=4,0|93=5,0|93=6,0|94=7,0|
94=0,1|94=1,1|94=2,1|94=3,1|93=4,1|93=5,1|93=6,1|93=7,1|
94=0,2|94=1,2|94=2,2|94=3,2|93=4,2|93=5,2|93=6,2|93=7,2|
94=0,3|94=1,3|94=2,3|93=3,3|93=4,3|93=5,3|93=6,3|93=7,3|
94=0,4|94=1,4|94=2,4|93=3,4|93=4,4|93=5,4|94=6,4|94=7,4|
94=0,5|94=1,5|93=2,5|93=3,5|94=4,5|94=5,5|94=6,5|94=7,5|
93=0,6|94=1,6|93=2,6|93=3,6|94=4,6|94=5,6|93=6,6|94=7,6|
93=0,7|94=1,7|93=2,7|93=3,7|94=4,7|94=5,7|94=6,7|94=7,7|
End
Object bantheJanta // Test at coords 83, 53
136=0,0|136=1,0|136=2,0|133=3,0|131=4,0|132=5,0|134=6,0|135=7,0|
138=0,1|138=1,1|132=2,1|255=3,1|255=4,1|255=5,1|128=6,1|133=7,1|
138=0,2|135=1,2|126=2,2|255=3,2|255=4,2|255=5,2|122=6,2|133=7,2|
135=0,3|128=1,3|255=2,3|255=3,3|114=4,3|255=5,3|255=6,3|132=7,3|
134=0,4|124=1,4|255=2,4|255=3,4|117=4,4|255=5,4|255=6,4|128=7,4|
132=0,5|121=1,5|255=2,5|255=3,5|255=4,5|255=5,5|255=6,5|126=7,5|
132=0,6|255=1,6|255=2,6|123=3,6|122=4,6|118=5,6|255=6,6|255=7,6|
133=0,7|255=1,7|255=2,7|132=3,7|132=4,7|128=5,7|255=6,7|255=7,7|
End
Object a1 // Test at coords 1004, 520
255=0,0|
End
//////////////////////////////////////END OJECTS///////////////////////////////////////////
Procedure AbortCheck
Loadrgb 988, 518
delay 100
IF {rgbgreen} > 250
MousePos 897, 494
delay 300
Doubleclick
delay 1 sec
end
end
////////////////Doc Buff and Repair Vehicle /////////////////////////////////////////////////////////////
Procedure Cantina
call shiftF1 //turn on first WP from term to Cantina
call MyDriveBlue
//call MyPark
call shiftF1
(********************************************************************************************************
WAYPOINT CANTINA #2 MUST BE VISIBLE, LINE OF SIGHT, FROM WAYPOINT CANTINA #5
WAYPOINTS #3, 4, and 5 ARE TO MAKE SURE YOU GET INSIDE THE CANTINA, NOT GET TO IT!
*********************************************************************************************************)
call shiftF2
call MyDriveBlue
call ParkBlue////////////////////////////////////see right here where it says ParkBlue..
call ParkBlue/////////it needs to go to a procedure just like it, only calling the ones that don't check
call ParkBlue//better safe than sorry
delay 1 sec
call Dismount
call shiftF2
call shiftF3
call FinalWP
call shiftF3
call shiftF4
call FinalWP
call shiftF4
call shiftF5
call FinalWP
RightMouseDown
delay 1 sec
RightMouseUp
end
Procedure BackToTerminal
call shiftF5
call shiftF2
call MyDriveBlue
call shiftF2
call shiftF1
call MyDriveBlue
call shiftF1
call F1
call MyDriveBlue
call GetBike
end
Procedure Repairing
call F7
delay 1 sec
keys `
delay 1 sec
keys `
delay 1 sec
keys `
delay 1 sec
keys 4
delay 1 sec
delay 2 sec
mousepos 612, 434
delay 1 sec
leftclick
delay 400
leftclick
keys /target self
delay 1 sec
keys {return}
delay 1 sec
end
Procedure HealVehicle
call F1 //turns off mission terminal WP
call shiftF1
call MyDriveBlue
call MyPark
call shiftF1
call shiftF2
call MyDriveBlue
call MyPark
call shiftF2
call shiftF6
call MyDriveBlue
call ParkBlue
call Repairing
end
Procedure Entertainer
//call f8 //this equips your musical instrument
//delay 1 sec
//keys /startmusic starwars1
//delay 2 sec
call f6
delay 300 sec // these are how long the ingame macros will run.. we have them coded here over and over
call f6 // so that we don't have to use /dump ingame.. setup an ingame macro for your brandy
delay 300 sec // that calls it and you won't have to worry about a timer in ACTool for it
call f6
delay 300 sec
call f6
delay 300 sec
call f6
delay 300 sec
call f6
delay 300 sec
call f6
delay 300 sec
call f6
delay 300 sec
call f6
delay 300 sec
call f6
delay 300 sec
//keys /stopmusic
//delay 1 sec
//keys {return}
//call f2 // this calls your weapon back out
end
Procedure BFHealer
keys /target AAA //this is the name of your music bot.. change it as needed
delay 1 sec
keys {return}
delay 1 sec
keys /listen
delay 1 sec
keys {return}
end
Procedure Buffing
call F1 //this turns off the mission term waypoint
call Cantina
delay 5 sec
//call BFHealer //People with music bots setup can use this to target and heal themselves.
call Entertainer // this macro is for characters that are doc/tka/ent they'll heal their own BF
(* if you're using the "Entertainer" portion of the macro, comment out the delay 1200 directly below here
and also the delay for 1800 seconds below.. the delay is built into the "Entertainer" macro*)
//delay 1200 sec
// call AAA //
//delay 1800 sec // this is where they listen to Nads and get their BF healed.
delay 10 sec
keys /ui action toolbarPane05 //THIS IS ONLY FOR THE BUFFERS... ENTERTAINERS USE ABOVE PROCEDURE
delay 1 sec
keys {return}
delay 1 sec
call F12 /// this is the space where your doctor macro in game shoud be
(*Doc stuff or a macro for Doc stuff should be in F12.. By that I mean, if you use
an apron, you macro putting those clothes on and put the macro here.
Pane 6 was the one I just picked out of thin air to be the "Doctor" Panel. This
will give us plenty of hotkeys to work with.. gotta put
Bivoli in quite a few of'em.. only 2-3 uses per hotkey.. maybe fill the entire bottom
row up with Bivoli? Also, macro in using the buffs.. that'll save a lot of programming here.
We can just make a macro in game that'll put on the Doc clothes, then try eating from every
hotkey that isn't a buff, then buff with pauses in between. After that it'll call the pane that
we can put an armor macro on to re-equip the armor we had to take off, then bring up
action pane 1 or whatever pane you have setup to run the macro
.. piece of cake. Make sure to ADD IN A DELAY RIGHT HERE SO THAT ACTooL ISN'T TRYING TO CONTINUE
WITH THE REST OF THE PROCEDURE WHILE THE DOCTOR BUFFING/BATTLE FATIGUE IS GOING ON!!*)
delay 300 sec
call GetBuffTime
delay 120 sec
call BackToTerminal
call HealVehicle
call Return
end
Procedure Return
delay 1 sec
call shiftF6
delay 1 sec
call shiftF7
call MyDriveBlue
delay 200
delay 1 sec
call shiftF7
delay 1 sec
call F1
call DriveBlue
call ParkBlue
delay 400
call RunMissions
end
Procedure TestBuffTime
SetConst $timer1 = {elapsedMsec}
compute $bufftest = $timer1 - $timer
if $bufftest > 9950000
//THIS IS FOR 3 1/2 HOUR BUFF, MAKE IT END WELL BEFORE YOUR BUFFS DO. MAKE SURE THE TIME IS IN MILLISECONDS
call Buffing
else
end
end
procedure GetBuffTime
setConst $timer = {elapsedmsec}
end
////////////////////////////END BUFFING SECTION//////////////////////////////////////////////
//////////////////////////GETTING MISSION PART/////////////////////////////////////////////
Procedure GetMission
//call Refresh
while $missionfound = 0
delay 1 sec
loadRgb 851, 693 // checking for a 30K
if {rgbred} > 250
call CheckJanta
else
call Refresh
End
End
End
Procedure CheckJanta // Checks for the Janta mission and kicks it
mousepos 872, 694
LeftClick
Delay 1 sec
mousepos 832, 747
LeftClick
Delay 1 sec
loadRgb 88, 57 //88, 54
if {rgbred} > 250
call GetMission
else
call DirectionCheck
end
end
(* THis part still isn't working for some reason.. will work on it again when I can
mousepos 872, 694
LeftClick
Delay 1 sec
mousepos 832, 747
LeftClick
Delay 1 sec
loadRgb 88, 57 //88 54
setConst $tick = 0
if {rgbred} > 250
compute $tick = $tick + 1
else
loadRgb 88, 54
if {rgbred} > 250
compute $tick = $tick + 1
end
end
if $tick > 1
call GetMission
else
call DirectionCheck
end
end
*)
Procedure DirectionCheck //checks the direction.
Delay 1 sec
loadRgb 187, 101 //101 94
if {rgbred} > 250
setConst missionfound = 1
call Accept
Else
call GetMission
End
End
(* This part isn't working yet.. will fix it when I get time
Delay 1 sec
loadRgb 187, 101 //101 94
setConst $tick = 0
if {rgbred} > 250
compute $tick = $tick + 1
else
loadRgb 101, 94
if {rgbred} > 250
compute $tick = $tick +1
end
end
if $tick = 1
setConst missionfound = 1
call Accept
else
call GetMission
end
end
*)
Procedure Accept
mousepos $acceptX, $acceptY //the accept button position
LeftClick
delay 1 sec
mousepos $okX, $okY
LeftClick
delay 1 sec
end
Procedure Refresh
delay .5 sec
mousepos $refreshX, $refreshY
LeftClick
delay 2 sec
mousepos 752, 615
LeftClick
End
//////////////////////////////////////////////////////////////////////////////////////////
//loop 1
//delay 1 sec
//delay 2 sec
//loop 2
//objvar $missiontolerance
Procedure TakeTwo
keys /ui action missionBrowser
delay 1 sec
keys {return}
call GetMission
setConst missionfound = 0
call GetMission
setConst missionfound = 0
delay 1 sec
mousepos 974, 748
LeftClick
delay 1 sec
delay 3 sec
end
//Call Refresh
//objvar $numbertolerance
//call refresh
// end of !@#$%^&* that goes into main section
//////////////////////////////END GET MISSION PART///////////////////////////////////////
//////////////////////////PARK PROCEDURE/////////////////////////////////////////////////
Procedure PullUpBlue
//SetConst continuewalking = 1
MousePos $waypointx, $waypointy
//while $continuewalking = 1
//delay 50
call RefineThetablue
call detectarrowblue
RightMouseDown
delay 1 sec
RightMouseUp
delay 1 sec
end
Procedure MyPark
call LocateWaypointDirectionBlue
call PullUpBlue
end
Procedure ParkBlue
call LocateWaypointDirectionBlue
call PullUpBlue
call LocateWaypointDirectionBlue
call PullUpBlue
call LocateWaypointDirectionBlue
call PullUpBlue
end
//call detectarrowB
//IF $isarrow = 1
//Else
//SetConst continuewalking = 0
//delay 50
//RightMouseUp
//delay 2 sec
Procedure PullUpOrange
//SetConst continuewalking = 1
MousePos $waypointx, $waypointy
call RefineTheta
call detectarrow
RightMouseDown
delay 1 sec
RightMouseUp
delay 1 sec
end
Procedure ParkOrange
call LocateWaypointDirection
Call PullUpOrange
call LocateWaypointDirection
Call PullUpOrange
call LocateWaypointDirection
Call PullUpOrange
call LocateWaypointDirection
Call PullUpOrange
call LocateWaypointDirection
Call PullUpOrange
end
////////////////////////////////////END PARK//////////////////////////////////////////////////////////
procedure detectarrowblue
// yellow is R=255 G=255 B=0
LoadRGB $waypointx, $waypointy
if {rgbBlue} > 120
setconst temp1 = 1
else
setconst temp1 = 0
end
Compute tempconst = {RGBBlue} - {RGBGreen}
if $tempconst > 30
setconst temp2 = 1
else
setconst temp2 = 0
end
Compute tempconst = $tempconst + {RGBGreen} - {RGBRed}
if $tempconst > 20
setconst temp3 = 1
else
setconst temp3 = 0
end
compute isarrow = $temp1 * $temp2 * $temp3
end
Object test // Test at coords 205, 766 left corner bottom
41=0,0|
End
Object test1 // Test at coords 1021, 766 right corner bottom
44=0,0|
End
Object test2 // Test at coords 586, 0
44=0,0|
End
Procedure GetBike
mousepos 808, 752 // hits the datapad button on bottom
LeftClick
delay 1 sec
mousepos 332, 125 //makes sure it's in the "Data" portion of datapad, where the bikes are located
LeftClick
delay 1 sec
mousepos 343, 175 //puts the cursor over the second item in your Datapad.. should be a speederbike
delay 2 sec
RightClick
delay 10 sec
keys 3
delay 3 sec
mousepos 1018, 97 //closes Datapad
delay 1 sec
LeftClick
delay 1 sec
call f7
call CheckBike
end
Procedure CheckBike
call f7
delay 1 sec
LoadRgb 772, 17 //checks where bikes health will be
If {rgbred} > 210
call f12
else
call GetBike
end
end
Procedure Unstuck
setConst count1 = 0
setConst count2 = 0
setConst count3 = 0
setConst count4 = 0
loadRgb 524, 396
if {rgbred} > 60
setConst $count1 = 1
end
loadRgb 500, 396
if {rgbred} > 60
setConst $count2 = 1
end
loadRgb 512, 372
if {rgbred} > 60
setConst $count3 = 1
end
compute $count4 = $count1 * $count2 * $count3
if $count4 = 1
call eject
else
call squaredance
end
end
Procedure eject
RightMouseUp
keys /eject
delay 1 sec
keys {return}
delay 1 sec
keys /eject
delay 1 sec
keys {return}
delay 15 sec
call GetBike
delay 2 sec
call squaredance
end
Procedure squaredance
mousepos 514, 505
RightMouseDown
delay 500
RightMouseUp
delay 500
Mousepos 318,382
RightMouseDown
delay 1 sec
RightMouseUp
delay 1 sec
call DriveBlue
end
Procedure Insurance
setConst count1 = 0
setConst count2 = 0
setConst count3 = 0
loadRgb 500, 384
if {rgbgreen} > 80
setConst count1 = 1
end
if $count1 = 1
compute $count4 = $count4 + 1
end
setConst count1 = 0
setConst count2 = 0
setConst count3 = 0
loadRgb 524, 384////////////////////////////////////////////////////////////change me
if {rgbgreen} > 80
setConst count1 = 1
end
if $count1 = 1
compute $count4 = $count4 + 1
end
setConst count1 = 0
setConst count2 = 0
setConst count3 = 0
loadRgb 512, 372//////////////////////////////////////////////////////////change me
if {rgbgreen} > 80
setConst count1 = 1
end
if $count1 = 1
compute $count4 = $count4 + 1
end
setConst count1 = 0
setConst count2 = 0
setConst count3 = 0
loadRgb 500, 396//////////////////////////////////////////////////////////change me
if {rgbgreen} > 80
setConst count1 = 1
end
if $count1 = 1
compute $count4 = $count4 + 1
end
setConst count1 = 0
setConst count2 = 0
setConst count3 = 0
loadRgb 512, 396//////////////////////////////////////////////////////////change me
if {rgbgreen} > 80
setConst count1 = 1
end
if $count1 = 1
compute $count4 = $count4 + 1
end
setConst count1 = 0
setConst count2 = 0
setConst count3 = 0
loadRgb 500, 372//////////////////////////////////////////////////////////change me
if {rgbgreen} > 80
setConst count1 = 1
end
if $count1 = 1
compute $count4 = $count4 + 1
end
setConst count1 = 0
setConst count2 = 0
setConst count3 = 0
loadRgb 524, 372//////////////////////////////////////////////////////////change me
if {rgbgreen} > 80
setConst count1 = 1
end
if $count1 = 1
compute $count4 = $count4 + 1
end
setConst count1 = 0
setConst count2 = 0
setConst count3 = 0
loadRgb 524, 396//////////////////////////////////////////////////////////change me
if {rgbgreen} > 80
setConst count1 = 1
end
if $count1 = 1
compute $count4 = $count4 + 1
end
setConst count1 = 0
setConst count2 = 0
setConst count3 = 0
loadRgb 500, 384//////////////////////////////////////////////////////////change me
if {rgbgreen} > 80
setConst count1 = 1
end
if $count1 = 1
compute $count4 = $count4 + 1
end
setConst count1 = 0
setConst count2 = 0
setConst count3 = 0
loadRgb 500, 392//////////////////////////////////////////////////////////change me
if {rgbgreen} > 80
setConst count1 = 1
end
if $count1 = 1
compute $count4 = $count4 + 1
end
setConst count1 = 0
setConst count2 = 0
setConst count3 = 0
loadRgb 500, 376//////////////////////////////////////////////////////////change me
if {rgbgreen} > 80
setConst count1 = 1
end
if $count1 = 1
compute $count4 = $count4 + 1
end
setConst count1 = 0
setConst count2 = 0
setConst count3 = 0
loadRgb 524,376//////////////////////////////////////////////////////////change me
if {rgbgreen} > 80
setConst count1 = 1
end
if $count1 = 1
compute $count4 = $count4 + 1
end
setConst count1 = 0
setConst count2 = 0
setConst count3 = 0
loadRgb 524, 392//////////////////////////////////////////////////////////change me
if {rgbgreen} > 80
setConst count1 = 1
end
if $count1 = 1
compute $count4 = $count4 + 1
end
if $count4 > 2
compute $count5 = $count5 + 1
else
setConst count5 = 0
end
if $count5 > 20
call unstuck
end
end
Procedure WalktoWaypointblue
SetConst continuewalking = 1
setConst count4 = 0
call Insurance
MousePos $waypointx, $waypointy
RightMouseDown
while $continuewalking = 1
delay 50
call RefineThetablue
call detectarrowblue
IF $isarrow = 1
Else
SetConst continuewalking = 0
delay 50
RightMouseUp
delay 2 sec
End
end
End
Procedure LocateWaypointDirectionBlue
SetConst isarrow = 0
SetConst temp4 = 0
SetConst tempx4 = 0
SetConst tempy4 = $radius
while $isarrow = 0
compute temp4 = $temp4 + .025
compute costheta = cos($temp4)
compute sintheta = sin($temp4)
compute tempx1 = int($sintheta * $tempy4) + 512
compute tempy1 = int($costheta * $tempy4) + 384
SetConst waypointx = $tempx1
SetConst waypointy = $tempy1
call detectarrowblue
end
SetConst crudetheta = $temp4
call refinethetablue
end
Procedure RefineThetablue
SetConst temp4 = $crudetheta
SetConst isarrow = 1
while $isarrow = 1
compute temp4 = $temp4 + .005
compute costheta = cos($temp4)
compute sintheta = sin($temp4)
compute tempx1 = int($sintheta * $tempy4) + 512
compute tempy1 = int($costheta * $tempy4) + 384
SetConst waypointx = $tempx1
SetConst waypointy = $tempy1
call detectarrowblue
end
SetConst temp5 = $temp4
SetConst tempx2 = $tempx1
SetConst tempy2 = $tempy1
SetConst temp4 = $crudetheta
SetConst isarrow = 1
while $isarrow = 1
compute temp4 = $temp4 - .005
compute costheta = cos($temp4)
compute sintheta = sin($temp4)
compute tempx1 = int($sintheta * $tempy4) + 512
compute tempy1 = int($costheta * $tempy4) + 384
SetConst waypointx = $tempx1
SetConst waypointy = $tempy1
call detectarrowblue
end
SetConst tempx3 = $tempx1
SetConst tempy3 = $tempy1
SetConst temp6 = $temp4
compute crudetheta = ($temp5 + $temp6) / 2
compute waypointx = int(($tempx2 + $tempx3)/2)
compute waypointy = int(($tempy2 + $tempy3)/2)
End
////////////////////////////////////////////////////////////////////////////////////////
Procedure detectarrow
LoadRGB $waypointx, $waypointy
if {rgbRed} > 135 // < 120 to do orange
setconst temp1 = 1
else
setconst temp1 = 0
end
Compute tempconst = {RGBRed} - {RGBGreen}// do red - green
if $tempconst > 60 // was 30
setconst temp2 = 1
//keys temp2 is 1
//keys {return}
else
setconst temp2 = 0
//keys temp2 is 0
//keys {return}
end
Compute tempconst = $tempconst + {RGBGreen} - {RGBBlue}
if $tempconst > 120
setconst temp3 = 1
//keys temp3 is 1
//keys {return}
else
setconst temp3 = 0
//keys temp3 is 0
//keys {return}
end
compute isarrow = $temp1 * $temp2 * $temp3
//keys isarrow = $temp1 * $temp2 * $temp3
end
call detectarrow
//Walk to the currently targetted waypoint
//Uses = waypointx, waypointy
//Out = nothing
//Altered = continuewalking
//Procedure Park
Procedure WalktoWaypoint
SetConst continuewalking = 1
setConst count4 = 0
call Insurance
MousePos $waypointx, $waypointy
RightMouseDown
while $continuewalking = 1
delay 50
call RefineTheta
call detectarrow
//call detectarrowB
IF $isarrow = 1
Else
SetConst continuewalking = 0
delay 50
RightMouseUp
delay 2 sec
End
end
End
//Ok, here goes...
//Out = mouseclickspot, waypointx, waypointy
//Used = isarrow, temp4, tempx1, tempy1, costheta, sintheta, tempx4, tempy4, crudetheta
Procedure LocateWaypointDirection
SetConst isarrow = 0
SetConst temp4 = 0
SetConst tempx4 = 0
SetConst tempy4 = $radius
while $isarrow = 0
compute temp4 = $temp4 + .025
compute costheta = cos($temp4)
compute sintheta = sin($temp4)
compute tempx1 = int($sintheta * $tempy4) + 512
compute tempy1 = int($costheta * $tempy4) + 384
SetConst waypointx = $tempx1
SetConst waypointy = $tempy1
call detectarrow
//call detectarrowB
end
SetConst crudetheta = $temp4
call refinetheta
end
//Once we get a general idea of where the waypoint is, we refine it to find a more exact center
Procedure RefineTheta
SetConst temp4 = $crudetheta
SetConst isarrow = 1
while $isarrow = 1
compute temp4 = $temp4 + .005
compute costheta = cos($temp4)
compute sintheta = sin($temp4)
compute tempx1 = int($sintheta * $tempy4) + 512
compute tempy1 = int($costheta * $tempy4) + 384
SetConst waypointx = $tempx1
SetConst waypointy = $tempy1
call detectarrow
//call detectarrowB
end
SetConst temp5 = $temp4
SetConst tempx2 = $tempx1
SetConst tempy2 = $tempy1
SetConst temp4 = $crudetheta
SetConst isarrow = 1
while $isarrow = 1
compute temp4 = $temp4 - .005
compute costheta = cos($temp4)
compute sintheta = sin($temp4)
compute tempx1 = int($sintheta * $tempy4) + 512
compute tempy1 = int($costheta * $tempy4) + 384
SetConst waypointx = $tempx1
SetConst waypointy = $tempy1
call detectarrow
//call detectarrowB
end
SetConst tempx3 = $tempx1
SetConst tempy3 = $tempy1
SetConst temp6 = $temp4
compute crudetheta = ($temp5 + $temp6) / 2
compute waypointx = int(($tempx2 + $tempx3)/2)
compute waypointy = int(($tempy2 + $tempy3)/2)
End
//Select the next waypoint to run to
Procedure ToggleNextWaypoint///////// this will be used to track way through a town/////////
compute tempconst = $currentwaypoint - 1// so tempconst is 0
keys /ui action toolbarSlot0
keys $tempconst
keys {return}
mousepos 397, 388
LeftClick
delay 2 sec
mousepos 152, 388
LeftClick
delay 2 sec
If $direction = 0
compute currentwaypoint = $currentwaypoint + 1
Else
compute currentwaypoint = $currentwaypoint - 1
End
compute tempconst = $currentwaypoint - 1
keys /ui action toolbarSlot0
keys $tempconst
keys {return}
delay 2 sec
mousepos 397, 388
LeftClick
delay 2 sec
mousepos 152, 388
LeftClick
delay 2 sec
End
/////////////////////////////ACTIVATING AND DEACTIVATING OF MISSIONS AND WAYPOINT//////////////////////////
Procedure wpswap01
mousepos 40, 25//clicks on the mission terminal waypoint which is saved in in slot00
LeftClick
delay 2 sec
mousepos 813, 755//clicks button for datapad on bottom right
LeftClick
delay 2 sec
mousepos 330, 123//clicks on Data button under datapad
LeftClick
delay 2 sec
mousepos 469, 180// for Deactivating the 4th mission
RightClick
delay 2 sec
keys 2
delay 2 sec
mousepos 1015, 96
LeftClick
delay 1 sec
//LeftClick
//delay 2 sec
end
Procedure wpswap12
mousepos 813, 755//clicks button for datapad on bottom right
LeftClick
delay 2 sec
mousepos 330, 123 //clicks on Data button under datapad
LeftClick
delay 2 sec
LoadRGB 551, 184
If {rgbblue} > 10
MousePos 547, 179
DoubleClick
delay 1 sec
MousePos 188, 338
LeftClick
delay 1 sec
MousePos 590, 395 // hits the final ok button
LeftClick
delay 3 sec
mousepos 482, 184 // for the mission on the far right which is the 4th item on screen
RightClick
delay 2 sec
keys 2
delay 500
else
mousepos 482, 184 // for the mission on the far right which is the 4th item on screen
RightClick
delay 2 sec
keys 2
delay 500
keys {return}
end
mousepos 1015, 96
LeftClick
delay 1 sec
End
Procedure wpswap20
mousepos 813, 755//clicks button for datapad on bottom right
LeftClick
delay 2 sec
mousepos 330, 123 //clicks on Data button under datapad
LeftClick
delay 2 sec
Loadrgb 482, 184
If {rgbblue} > 10
MousePos 482, 184
DoubleClick
delay 2 sec
MousePos 188, 338
LeftClick
delay 1 sec
MousePos 590, 395 // hits the final ok button
LeftClick
delay 2 sec
mousepos 40, 25 // clicks on the mission terminal waypoint which is saved in in slot00
delay 400
LeftClick
delay 2 sec
else
mousepos 40, 25 // clicks on the mission terminal waypoint which is saved in in slot00
delay 400
LeftClick
delay 2 sec
end
mousepos 1015, 96
delay 200
LeftClick
delay 1 sec
End
////////////////////////////////////END ACTIVATE/DEACTIVATE PART//////////////////////////////////////////
/////////////////////////NEW !@#$%^&* NEEDS ORGANIZED////////////////////////////////////////////////////
//We need in toolbar
// Dismount....F9 354,17
// CombatSpam..F10 384,17
// Cycletargets........F11 420,17
// Mount.......F12 454,17
//////////////New Procedures added to facilitate selecting the hotkeys for whatever reason/////////
Procedure Dismount
mousepos 354, 17
Delay 1 sec
Leftclick
Delay 4 sec
end
Procedure f1
mousepos 40, 25
delay 1 sec
leftclick
delay 1 sec
end
Procedure f6
mousepos 230, 25
delay 1 sec
leftclick
delay 1 sec
end
procedure shiftF1
mousepos 40, 55
delay 1 sec
leftclick
delay 1 sec
end
Procedure shiftF2
mousepos 73, 55
delay 1 sec
leftclick
delay 1 sec
end
Procedure shiftF3
mousepos 102, 55
delay 1 sec
leftclick
delay 1 sec
end
Procedure shiftF4
mousepos 134, 55
delay 1 sec
leftclick
delay 1 sec
end
Procedure shiftF5
mousepos 201, 55
delay 1 sec
leftclick
delay 1 sec
end
Procedure shiftF6
mousepos 230, 55
delay 1 sec
leftclick
delay 1 sec
end
Procedure shiftF7
mousepos 260, 55
delay 1 sec
leftclick
delay 1 sec
end
Procedure shiftF8
mousepos 295, 55
delay 1 sec
leftclick
delay 1 sec
end
Procedure f9
mousepos 354, 20
delay 1 sec
leftclick
delay 100
end
Procedure f8
mousepos 295, 20
delay 1 sec
leftclick
delay 100
end
Procedure f7
mousepos 259, 20
delay 1 sec
leftclick
delay 100
end
Procedure f10
mousepos 384, 17
delay 1 sec
leftclick
delay 100
end
Procedure f11
mousepos 420, 17
delay 1 sec
leftclick
delay 100
end
Procedure f12
mousepos 454, 17
delay 1 sec
leftclick
delay 100
end
Procedure Combatspam
mousepos 390, 17//(toolbarslot of spam)f9
Delay 300
objVar 0
While $flag = 0
Leftclick
delay 100
LoadRGB 805, 17
if {rgbblue} > 10
setConst flag = 1
end
// finish off lair time
end
Delay 5 sec
objVar 35
SetConst flag = 0
end
//Procedure Dump
// mousepos 420, 17
// Delay 1 sec
// Leftclick
// Delay 300
// Leftclick
// Leftclick
// Delay 2 sec
//end
Procedure Mount
delay 1 sec
mousepos 454, 17
Delay 500
Leftclick
delay 1 sec
end
Procedure Fight
objVar 0
setConst counter = 0
setConst temp9 = 0
while $temp9 = 0
//compute counter = $counter + 1
//if $counter < 20
mousepos 420, 17
delay 200
LeftCLick
//say /ui action cycleTargetOutward
//keys {RETURN}
delay 2 sec
//keys {TAB}
IsObject c8 at 938, 13 // if false runs the else which should goto waypoint updated loc
setConst temp9 = 1
//Say SWEET
//else
// exit Fight
end
end
objVar 35
delay 3 sec
call Dismount
call Combatspam///
//call Dump
call Mount
delay 2 sec
end
Procedure DriveOrange
call LocateWaypointDirection
call WalktoWaypoint
call AbortCheck
call LocateWaypointDirection
call WalktoWaypoint
call AbortCheck
call LocateWaypointDirection
call WalktoWaypoint
call AbortCheck
call LocateWaypointDirection
call WalktoWaypoint
call AbortCheck
call LocateWaypointDirection
call ParkOrange
end
Procedure WalktoWaypointblueCantina
SetConst continuewalking = 1
MousePos $waypointx, $waypointy
RightMouseDown
while $continuewalking = 1
delay 50
call RefineThetablue
call detectarrowblue
IF $isarrow = 1
Else
SetConst continuewalking = 0
delay 50
RightMouseUp
delay 2 sec
End
end
End
Procedure MyDriveBlue
call LocateWaypointDirectionBlue
call WalktoWaypointblueCantina
call LocateWaypointDirectionBlue
call MyPark
end
Procedure FinalWP
call LocateWaypointDirectionBlue
call WalktoWaypointblueCantina
end
Procedure DriveBlue
call LocateWaypointDirectionBlue
call WalktoWaypointblue
call LocateWaypointDirectionBlue
call WalktoWaypointblue
call LocateWaypointDirectionBlue
call WalktoWaypointblue
call LocateWaypointDirectionBlue
call ParkBlue
end
Procedure LeaveTerminal
call f1 //this turns off the mission term waypoint
delay 1 sec
keys /ui action toolbarPane01
delay 1 sec
keys {return}
call f12
call MyDriveBlue
call f12 //this turns the far waypoint back off
delay 1 sec
keys /ui action toolbarPane00
delay 1 sec
keys {return}
call f1 //this turns the WP in f1 back on so that wpswap01 doesn't bork
end
Procedure GoHome
call f1 // this turns off the wp in f1
delay 1 sec
keys /ui action toolbarPane01
delay 1 sec
keys {return}
call f12 // drives you back to the waypoint that's clear
call MyDriveBlue
call f12 // turns the wp back off.
call f11 //this will be your waypoint in town that's well inside of town
call MyDriveBlue
call f11 //this will turn it back off so you can go to the terms from inside of town
delay 1 sec
keys /ui action toolbarPane00
delay 1 sec
keys {return}
call f1 //this will turn the Mission terminal back on so you can go to it.
end
/////////////////////////////final !@#$%^&*////// outline
Procedure RunMissions
keys ^m /////////////////This turns overhead map ON so that while you run missions unstuck will work//
delay 500
call TakeTwo
call LeaveTerminal
//////////////////Mission 1////////////////////////
call wpswap01
call DriveOrange
call Fight
//////////////////Mission 2////////////////////////
call wpswap12
call DriveOrange
call Fight
////////////////Return to Term/////////////////////
call wpswap20
call GoHome
call DriveBlue
keys ^m ////////////////This turns the overhead map OFF in case you have to go get buffed again/////
delay 1 sec
////////////////This checks the status of your buffs.. also takes care of BF and vehicle///////////////
call TestBuffTime
call CheckBike
end
///////////////////////////////////////////////////////
//delay 2 sec
//call WalktoWaypointblue
//call AbortCheck
//call Repairing
//call Return
/////////////////////////////add in a call to take the Brandy & food/////////////////////////////////////
//call Buffing
call GetBuffTime
while 1 = 1
call Runmissions
end
//call DriveBlue
//call fixbike
//call cantina
//call (Pause)
//call BuffGroup
//call ToMissionTerm
//Loop
-------------------------------------------------------------------------------------
|
MokBot Money Maker enjoy : Star Wars Galaxies Nerfed Info
![(!empty($user->lang['IMAGE'])) ? $user->lang['IMAGE'] : ucwords(strtolower(str_replace('_', ' ', 'IMAGE')))](http://img.photobucket.com/albums/v202/LatexHo/post-12-1092895821.jpg)
![(!empty($user->lang['IMAGE'])) ? $user->lang['IMAGE'] : ucwords(strtolower(str_replace('_', ' ', 'IMAGE')))](http://img.photobucket.com/albums/v202/LatexHo/post-12-1092896046.jpg)
RSS Feed
Sitemap
