on *:INVITE:#:{
  inc %IDinvite
  set %requestchan $chan
  /notice $nick 5Searching for an open bot, please wait...
  /notice [NY]ApolyBot Channel Number Needed
  /notice [TX]ApolyBot Channel Number Needed
  /set %rootchans $chan(0)
}

on *:PART:#:{
  /set %mode parting
  /notice [NY]ApolyBot Channel Number Needed
  /notice [TX]ApolyBot Channel Number Needed
  /set %rootchans $chan(0)
}

on *:NOTICE:*:?:{
  if ($nick == [TX]ApolyBot || $nick == [NY]ApolyBot) {
    if ($nick == [TX]ApolyBot) {
      set %pkchans $1
    }
    if ($nick == [NY]ApolyBot) {
      set %gdchans $1
    }
    if (%mode != parting) { /sendbot }
  }
}

alias -l sendbot {
  set %channelreq $eval(%requestchan $+ %IDinvite)
  if (%rootchans < %pkchans && %rootchans < %gdchans) { /join %requestchan }
  elseif (%rootchans > %pkchans && %pkchans < %gdchans) { /msg #invite !NY join %requestchan }
  elseif (%rootchans > %gdchans && %gdchans < %pkchans) { /msg #invite !TX join %requestchan }
  elseif (%rootchans == %pkchans && %pkchans == %gdchans) {
    set %invitechoice $rand(1,3)
    if (%invitechoice == 1) { /join %requestchan }
    elseif (%invitechoice == 2) { /msg #invite !TX join %requestchan }
    elseif (%invitechoice == 3) { /msg #invite !NY join %requestchan }
  }
  elseif (%rootchans == %gdchans && %pkchans > %gdchans) {
    set %invitechoice $rand(1,2)
    if (%invitechoice == 1) { /join %requestchan }
    elseif (%invitechoice == 2) { /msg #invite !NY join %requestchan }
  }
  elseif (%rootchans == %pkchans && %pkchans < %gdchans) {
    set %invitechoice $rand(1,2)
    if (%invitechoice == 1) { /join %requestchan }
    elseif (%invitechoice == 2) { /msg #invite !TX join %requestchan }
  }
  elseif (%rootchans > %gdchans && %pkchans == %gdchans) {
    set %invitechoice $rand(1,2)
    if (%invitechoice == 1) { /msg #invite !TX join %requestchan }
    elseif (%invitechoice == 2) { /msg #invite !NY join %requestchan }
  }
  else { /ms send Apolytrosi A situation has occured which you have not anticipated. %gdchans GD %rootchans ROOT %pkchans PK }
}