// This macro is intended to cycle through the group and
// apply a buff from a device/item in slot 1
// and then assist group leader and use device 2 on their target
// while returning to firing


// This line is necessary to select the proper window
SetActiveWindow Earth & Beyond


Delay 2000


OBJVAR 10


Constants
  DO=1
  
  GD = 200            // typical lag time between when we doa command and check for its result
  ScanMax=2
  S=1
  WindowOffsetX = 2   // running windowed 1024x768 with window in top-left
  WindowOffsetY = 30
  LootX = 0
  LootY = 0
  LootBoxX = 0
  LootBoxY =
  
  AttackLoop = 1
  CyclesBetweenAttacks = 2
  AttackTarget = 0
  AttackDelay = 3500
  FollowDelay = 1000
  
  BuffCooldown = 6500
  
  maxkeycycle = 3  // number of group members to cycle between for attacks
  keycycle = 6  // This makes it reset to 'first' on macro start
  BuffSelf = 0
  
  FireWeapons = 1
  DebuffToo = 1
  PostBuffLoopWait = 0
  
end

Compute LootX = 990 + $WindowOffsetX
Compute LootY = 515 + $WindowOffsetY
Compute LootBoxX =  915 + $WindowOffsetX
Compute LootBoxY =   230 + $WindowOffsetY

// Main loop
while $DO > 0
  
  TimeStamp EnterMainLoop
  
  if $keycycle >= $maxkeycycle
    if $BuffSelf > 0
      set keycycle = 1
    else
      set keycycle = 2
    end
  end
  While $keycycle <= $maxkeycycle
    TimeStamp Buffing group member $keycycle
    if $keycycle = 1
      keys {F1}
    end
    if $keycycle = 2
      keys {F2}
    end
    if $keycycle = 3
      keys {F3}
      //keys {F4}
    end
    if $keycycle = 4
      keys {F4}
      //keys {F6}
    end
    if $keycycle = 5
      keys {F5}
    end
    
    
    // wait briefly for target switch
    delay $GD
    
    // activate buff
    keys 1
    
    delay $GD
    
    // Fire Weapons
    if $FireWeapons > 0 or $DebuffToo > 0
      // Move mouseto 'take target of first member of group' icon
      MousePos   980,491
      // Take mouse pos to do target of second group member to fire from.
      //MousePos   980,452    
      delay $GD
      LeftClick
    end
    
    if $FireWeapons > 0
      keys {space}
      Delay $GD
    end
    
    //fire Debuff Device
    if $DebuffToo > 0
      Delay $GD
      keys 2
    end
    
    //Wait for cooldown of buff device
    Delay $BuffCooldown
    
    compute Keycycle = $keycycle + 1
  end
  
  
  
  // Postbuff loop actions, perhaps a long term buff?
  
  TimeStamp PostBuffLoop Wait
  Delay $PostBuffLoopWait
  
  
end