automatic-recycle-expedition-debris.go

origin = "1:2:3"
nbPathfindersMin = 10

func alreadyRecycling(coord) {
    fleet, slots = GetFleets()
    for f in fleet {
        if f.Mission == RECYCLEDEBRISFIELD && f.Destination == coord {
            return true
        }
    }
    return false
}

for {
    s = <-OnSystemInfos
    m = s.ExpeditionDebris.Metal
    c = s.ExpeditionDebris.Crystal
    d = s.ExpeditionDebris.Deuterium
    n = s.ExpeditionDebris.PathfindersNeeded
    if n >= nbPathfindersMin {
        dest = NewCoordinate(s.Galaxy(), s.System(), 16, PLANET_TYPE)
        
        // Make sure we don't send multiple fleet to same DF
        if alreadyRecycling(dest) {
            continue
        }
        
        LogInfof("Debris field at %s (M: %d, C: %d, D: %d)", dest, m, c, d)
        f = NewFleet()
        f.SetOrigin(origin)
        f.SetDestination(dest)
        f.SetMission(RECYCLEDEBRISFIELD)
        f.AddShips(PATHFINDER, n)
        fleet, err = f.SendNow()
        if err != nil {
            LogErrorf("failed to send %d pathfinders to %s: %v", n, dest, err)
            continue
        }
        LogInfof("sending %d pathfinders to %s : #%d", n, dest, fleet.ID)
    }
}