on *:LOAD:{
  echo -a 4*** TNA iPGN JOINER LOADED ***
  echo -a 4*** TNA iPGN JOINER LOADED ***
  ipgnjoiner
}
alias ipgnjoinlol { join #ipgn-comp | join #ipgn-comp2 | join #ipgn-comp3 }
alias ipgnleavelol { leave #ipgn-comp | leave #ipgn-comp2 | leave #ipgn-comp3 }
alias joineroff { set %joiner off | set %replacer off | set %dellast1 off | set %dellast2 off | set %dellast3 off }
alias ipgnjoiner { set %statname $$?="Enter your iPGN stat name (used for dellast):" }

menu channel {
  TNA IPGN Joiner
  .Join Channels
  ..Join : ipgnjoinlol
  ..Part : ipgnleavelol
  .Join Game
  ..On : set %joiner on | echo -a 4*** JOINER ENABLED ***
  ..Off : set %joiner off | echo -a 4*** JOINER DISABLED ***
  .Join Replace
  ..On : set %replacer on | echo -a 4*** REPLACER ENABLED ***
  ..Off : set %replacer off | echo -a 4*** REPLACER DISABLED ***
  .Join Dellast
  ..Channel
  ...1 : set %dellast1 on | %joiner off | echo -a 4*** DELLAST ENABLED ***
  ...2 : set %dellast2 on | %joiner off | echo -a 4*** DELLAST ENABLED ***
  ...3 : set %dellast3 on | %joiner off | echo -a 4*** DELLAST ENABLED ***
  ...All : set %dellast1 on | set %dellast2 on | set %dellast3 on | %joiner off | echo -a 4*** DELLAST ENABLED ***
  ..Off : set %dellast1 off | set %dellast2 off | set %dellast3 off | echo -a 4*** DELLAST DISABLED ***
  .Everything
  ..On : set %joiner on | set %replacer on | set %dellast1 on | set %dellast2 on | set %dellast3 on | %joiner off | echo -a 4*** EVERYTHING ENABLED ***
  ..Off : joineroff | echo -a 4*** EVERYTHING DISABLED ***
  .-
  .Edit Stat Name : ipgnjoiner
}
on *:TEXT:*:#:{
  if (%joiner == on) && (129 isin $10) && (s isin $11) && (l isin $11) && (o isin $11) && (t isin $11) && ($chan == #ipgn-comp) && ($nick == [iPGN-Bot][1]) {
    .timer 1 1 /msg $chan !me
  }
  if (%joiner == on) && (129 isin $10) && (s isin $11) && (l isin $11) && (o isin $11) && (t isin $11) && ($chan == #ipgn-comp2) && ($nick == [iPGN-Bot][2]) {
    .timer 1 1 /msg $chan !me
  }
  if (%joiner == on) && (129 isin $10) && (s isin $11) && (l isin $11) && (o isin $11) && (t isin $11)  && ($chan == #ipgn-comp3) && ($nick == [iPGN-Bot][3]) {
    .timer 1 1 /msg $chan !me
  }
  if (%replacer == on) && (requested isin $3) &&  (replacement isin $5) && (for isin $6) && ($chan == #ipgn-comp) && ($nick == [iPGN-Bot][1]) {
    .timer 1 1 /msg $chan !me
  }
  if (%replacer == on) && (requested isin $3) &&  (replacement isin $5) && (for isin $6) && ($chan == #ipgn-comp2) && ($nick == [iPGN-Bot][2]) {
    .timer 1 1 /msg $chan !me
  }
  if (%replacer == on) && (requested isin $3) &&  (replacement isin $5) && (for isin $6) && ($chan == #ipgn-comp3) && ($nick == [iPGN-Bot][3]) {
    .timer 1 1 /msg $chan !me
  }
  if (%joiner == on) && (%statname isin $2) && (!dellast isin $6) && ($chan == #ipgn-comp) && ($nick == [iPGN-Bot][1]) {
    set %dellast1 on
  }
  if (%joiner == on) && (%statname isin $2) && (!dellast isin $6) && ($chan == #ipgn-comp2) && ($nick == [iPGN-Bot][2]) {
    set %dellast2 on
  }
  if (%joiner == on) && (%statname isin $2) && (!dellast isin $6) && ($chan == #ipgn-comp3) && ($nick == [iPGN-Bot][3]) {
    set %dellast3 on
  }
  if (%dellast1 == on) && (*People who played in the last game are now allowed to join* iswm $1-) && ($chan == #ipgn-comp) && ($nick == [iPGN-Bot][1]) {
    .timer 1 1 /msg $chan !me
  }
  if (%dellast2 == on) && (*People who played in the last game are now allowed to join* iswm $1-) && ($chan == #ipgn-comp2) && ($nick == [iPGN-Bot][2]) {
    .timer 1 1 /msg $chan !me
  }
  if (%dellast3 == on) && (*People who played in the last game are now allowed to join* iswm $1-) && ($chan == #ipgn-comp3) && ($nick == [iPGN-Bot][3]) {
    .timer 1 1 /msg $chan !me
  }
  if (%joiner == on) && ($me isin $2) && (has isin $4) && (been isin $5) && (added isin $6) && (to isin $7) && (the isin $8) && (game isin $9) {
    msg $me 4*** JOINED $chan ***
    beep 6
    join #teamtNa
    joineroff
  }
  if (%dellast1 == on) && ($me isin $2) && (has isin $4) && (been isin $5) && (added isin $6) && (to isin $7) && (the isin $8) && (game isin $9) {
    msg $me 4*** JOINED $chan ***
    beep 6
    join #teamtNa
    joineroff
  }
  if (%dellast2 == on) && ($me isin $2) && (has isin $4) && (been isin $5) && (added isin $6) && (to isin $7) && (the isin $8) && (game isin $9) {
    msg $me 4*** JOINED $chan ***
    beep 6
    join #teamtNa
    joineroff
  }
  if (%dellast3 == on) && ($me isin $2) && (has isin $4) && (been isin $5) && (added isin $6) && (to isin $7) && (the isin $8) && (game isin $9) {
    msg $me 4*** JOINED $chan ***
    beep 6
    join #teamtNa
    joineroff
  }
  if (%replacer == on) && ($me isin $2) && (has isin $4) {
    msg $me 4*** JOINED $chan ***
    beep 6
    join #teamtNa
    joineroff
  }
  if (%replacer == on) && (%statname isin $2) && (has isin $4) && (the isin $5) && (closest isin $6) {
    msg $me 4*** REPLACE IN $chan ***
    beep 6
    join #teamtNa
    joineroff
  }
}