Teht
ComBot Author
Here's what I pieced together using magictiger's code, so far it's working for me.
Accept script
Update CHARID and NAME to match your fleet commander's ID and Name.
Invite script
Update CHARID1, CHARID2, etc to match your fleet member's IDs. You can add more lines if you have more characters.
Accept script
Update CHARID and NAME to match your fleet commander's ID and Name.
Code:
function main()
{
variable int Commander_CharID = CHARID
variable string Commander_Name = "NAME"
echo Waiting for Extension
while !${ISXEVE(exists)} || !${ISXEVE.IsReady}
{
wait 1
}
echo Waiting to send invites until I'm logged in
while !${Me(exists)} && !${MyShip(exists)}
{
wait 1
}
echo Logged in, waiting until UI catches up
wait 60
Echo Starting accept invite
while 1
{
if !${Me.Fleet} == 0
{
if !${Me.Fleet.IsMember[${Commander_CharID}]}
{
echo ${Commander_Name} has left the fleet, leaving.
Me.Fleet:LeaveFleet
}
}
if ${Me.Fleet.Invited}
{
echo "I'm been invited"
if ${Me.Fleet.InvitationText.Find[${Commander_Name}]}
{
echo "Accepting"
wait 10
Me.Fleet:AcceptInvite
}
else
{
echo "Rejecting"
wait 10
Me.Fleet:RejectInvite
}
Wait 50
}
}
}
Update CHARID1, CHARID2, etc to match your fleet member's IDs. You can add more lines if you have more characters.
Code:
function main()
{
variable index:int InviteList
variable iterator InviteMember
InviteList:Insert[CHARID1]
InviteList:Insert[CHARID2]
InviteList:GetIterator[InviteMember]
echo Waiting for Extension
while !${ISXEVE(exists)} || !${ISXEVE.IsReady}
{
wait 1
}
variable int i
variable int buddycount
variable index:being buddylist
echo Waiting to send invites until I'm logged in
while !${Me(exists)} && !${MyShip(exists)}
{
wait 1
}
echo Logged in, waiting until UI catches up
wait 60
EVE:DoGetBuddies[buddylist]
buddycount:Set[${buddylist.Used}]
echo ${buddycount} Buddies, here we go!
while 1
{
for (i:Set[1] ; ${i}<=${buddycount} ; i:Inc)
{
if ${InviteMember:First(exists)}
do
{
if ${buddylist.Get[${i}].CharID} == ${InviteMember.Value}
{
if ${buddylist.Get[${i}].IsOnline} && !${Me.Fleet.IsMember[${InviteMember.Value}]}
buddylist[${i}]:InviteToFleet
}
}
while ${InviteMember:Next(exists)}
wait 30
}
}
}