Well, after seeing Alcor75's Quide and code regarding auto fleeting,
I loved the idea but didnt want to run 2 different version of evebot.
I also wanted the commander character to move himself to the squad command position once he was done makign the fleet.
So 7 hours later, with some help from stealthy ( I say some help he did most of it )
I loved the idea but didnt want to run 2 different version of evebot.
I also wanted the commander character to move himself to the squad command position once he was done makign the fleet.
So 7 hours later, with some help from stealthy ( I say some help he did most of it )
Code:
variable(script) bool shouldLoop = TRUE
function main()
{
while 1
{
if ${Me.CharID} == XXXCOMMANDERCHARIDXXX
{
call Inv
}
else
{
call CheckForInvite
}
Wait 30
call FleetPosition
Wait 250
}
}
function Inv()
{
variable int i
variable int buddycount
variable index:being buddylist
buddycount:Set[${EVE.GetBuddies[buddylist]}]
echo ${buddycount} Buddies, here we go!
for (i:Set[1] ; ${i}<=${buddycount} ; i:Inc)
{
switch ${buddylist.Get[${i}].Name}
{
case XXXMEMBER1XXX
if ${buddylist.Get[${i}].IsOnline} && !${Local[${buddylist.Get[${i}].Name}].ToFleetMember(exists)}
buddylist[${i}]:InviteToFleet
break
case XXXMEMBER2XXX
if ${buddylist.Get[${i}].IsOnline} && !${Local[${buddylist.Get[${i}].Name}].ToFleetMember(exists)}
buddylist[${i}]:InviteToFleet
break
case XXMEMBER3XXX
if ${buddylist.Get[${i}].IsOnline} && !${Local[${buddylist.Get[${i}].Name}].ToFleetMember(exists)}
buddylist[${i}]:InviteToFleet
break
}
wait 30
}
}
function CheckForInvite()
{
Echo "Starting accept invite"
if !${Me.Fleet.Invited} || ${Me.Fleet.Size}
{
if !${Local[XXXCOMMANDERCHANRNAMEXXX].ToFleetMember(exists)}
Me.Fleet:LeaveFleet
}
if ${Me.Fleet.Invited}
{
echo "I'm been invited"
if ${Me.Fleet.InvitationText.Find[XXXCOMMANDERCHARNAMEXXX]}
{
echo "Accepting"
wait 10
Me.Fleet:AcceptInvite
}
else
{
echo "Rejecting"
wait 10
Me.Fleet:RejectInvite
}
Wait 30
}
}
function FleetPosition()
{
variable iterator Wing
variable index:int64 Wings
Me.Fleet:GetWings[Wings]
Wings:GetIterator[Wing]
if ${Wing:First(exists)}
{
variable index:int64 Squads
variable iterator Squad
do
{
Me.Fleet:GetSquads[Squads, ${Wing.Value}]
Squads:GetIterator[Squad]
if ${Squad:First(exists)}
{
do
{
if (${wingID} != -1 && ${squadID} != -1)
{
if ${Me.Fleet.IsFleetCommander}
{
echo "Moving From Fleet Command To Squad Command "
Me.ToPilot.ToFleetMember:MoveToSquadCommander[${Wing.Value},${Squad.Value}]
}
}
}
while ${Squad:Next(exists)}
}
}
while ${Wing:Next(exists)}
}
}
Last edited: