Miscellany

alias SpecRef {
  $pcheck($2)
  $pcheck($3)
  $pcheck($4)
  $ccheck($5)
  tcheck 1 $iif($6 != $null,$6 $1-)
  tcheck 2 $iif($7 != $null,$7 $1-)
  if ($2 == $3) { set %Error %Error : You can not fight yourself. }
  if (($4 == $2) || ($4 == $3)) { set %error %error : Special Ref can not be a player. }
  if ((%Title1 != None) && (%Title2 == TagTeam)) { %error = %error : The TagTeam title cannot be defended in this match type. }
  if ((%Title2 != None) && (%Title1 == TagTeam)) { %error = %error : The TagTeam title cannot be defended in this match type. }
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %P1 $2
    set %P2 $3
    set %SpecRef $4
    set %P1.H 150
    set %P2.H 150
    set %P1.Hs 60
    set %P2.Hs 60
    if ($1 == Regular) { set %Match Regular SpecRef $2 $3 $4 | start regular SpecRef }
    if ($1 == Xtreme) { set %Match Xtreme SpecRef $2 $3 $4 | start Xtreme SpecRef }
  }
}
alias 3way {
  $pcheck($2)
  $pcheck($3)
  $pcheck($4)
  $ccheck($5)
  tcheck 1 $iif($6 != $null,$6 $1-)
  tcheck 2 $iif($7 != $null,$7 $1-)
  if ((%Title1 != None) && (%Title2 == TagTeam)) { %error = %error : The TagTeam title cannot be defended in this match type. }
  if ((%Title2 != None) && (%Title1 == TagTeam)) { %error = %error : The TagTeam title cannot be defended in this match type. }
  if (($2 == $3) || ($2 == $4) || ($3 == $4)) { set %error %error : Repeat players not allowed. }
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %P1 $2
    set %P2 $3
    set %P3 $4
    set %P1.H 150
    set %P2.H 150
    set %P3.H 150
    set %P1.Hs 60
    set %P2.Hs 60
    set %P3.Hs 60
    if ($1 == BoilerRoom) { set %match BoilerRoom 3way $2 $3 $4 | start BoilerRoom 3way }
    if ($1 == Inferno) { set %match Inferno 3way $2 $3 $4 | start Inferno 3way }
    if ($1 == Iquit) { set %match Iquit 3way $2 $3 $4 | start Iquit 3way }
    if ($1 == Regular) { set %Match Regular 3way $2 $3 $4 | start regular 3way }
    if ($1 == Xtreme) { set %Match Xtreme 3way $2 $3 $4 | start Xtreme 3way }
    if ($1 == KO) { set %Match KO 3way $2 $3 $4 $5 | start KO 3way }
    if ($1 == Cage) { set %Match Cage 3way $2 $3 $4 | start Cage 3way }
  }
}

alias Triangle {
  $pcheck($2)
  $pcheck($3)
  $pcheck($4)
  $ccheck($5)
  tcheck 1 $iif($6 != $null,$6 $1-)
  tcheck 2 $iif($7 != $null,$7 $1-)
  if ((%Title1 != None) && (%Title2 == TagTeam)) { %error = %error : The TagTeam title cannot be defended in this match type. }
  if ((%Title2 != None) && (%Title1 == TagTeam)) { %error = %error : The TagTeam title cannot be defended in this match type. }
  if (($2 == $3) || ($2 == $4) || ($3 == $4)) { set %error %error : Repeat players not allowed. }
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %P1 $2
    set %P2 $3
    set %P3 $4
    set %P1.H 150
    set %P2.H 150
    set %P3.H 100
    set %P1.Hs 60
    set %P2.Hs 60
    set %P3.Hs 60
    if ($1 == Regular) { set %Match Regular Triangle $2 $3 $4 | start regular triangle }
    if ($1 == Xtreme) { set %Match Xtreme Triangle $2 $3 $4 | start Xtreme triangle }
  }
}


alias 2on1 {
  $pcheck($2)
  $pcheck($3)
  $pcheck($4)
  $ccheck($5)
  tcheck 1 $iif($6 != $null,$6 $1-)
  tcheck 2 $iif($7 != $null,$7 $1-)
  if (($2 == $3) || ($2 == $4) || ($3 == $4)) { set %error %error : Repeat players not allowed. }
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %P1 $2
    set %P2 $4
    set %P3 $3
    set %P1.H 150
    set %P2.H 150
    set %P3.H 100
    set %P1.Hs 60
    set %P2.Hs 60
    set %P3.Hs 60
    if ($1 == Regular) { set %Match Regular 2on1 $2 $3 $4 | start regular 2on1 }
    if ($1 == Xtreme) { set %Match Xtreme 2on1 $2 $3 $4 | start Xtreme 2on1 }
    if ($1 == KO) { set %Match KO 2on1 $2 $3 $4 $5 | start KO 2on1 }
    if ($1 == table) { set %Match Table 2on1 $2 $3 $4 $5 | start Table 2on1 }
    if ($1 == casket) { set %Match Casket 2on1 $2 $3 $4 $5 | start Casket 2on1 }
  }
}

alias Fatal 4 way {
  $pcheck($2)
  $pcheck($3)
  $pcheck($4)
  $pcheck($5)
  $ccheck($6)
  tcheck 1 $iif($7 != $null,$7 $1-)
  tcheck 2 $iif($8 != $null,$8 $1-)
  if ((%Title1 != None) && (%Title2 == TagTeam)) { %error = %error : The TagTeam title cannot be defended in this match type. }
  if ((%Title2 != None) && (%Title1 == TagTeam)) { %error = %error : The TagTeam title cannot be defended in this match type. }
  if (($2 == $3) || ($2 == $4) || ($2 == $5) || ($3 == $4) || ($3 == $5) || ($4 == $5)) { set %error %error : Repeat players not allowed. }
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %P1 $2
    set %P2 $3
    set %P3 $4
    set %P4 $5
    set %P1.H 150
    set %P2.H 150
    set %P3.H 150
    set %P4.H 150
    set %P1.Hs 60
    set %P2.Hs 60
    set %P3.Hs 60
    set %P4.Hs 60
    if ($1 == BoilerRoom) { set %Match BoilerRoom Fatal 4 way $2 $3 $4 $5 | start BoilerRoom Fatal 4 way }
    if ($1 == Inferno) { set %Match Inferno Fatal 4 way $2 $3 $4 $5 | start Inferno Fatal 4 way }
    if ($1 == Iquit) { set %Match Iquit Fatal 4 way $2 $3 $4 $5 | start Iquit Fatal 4 way }
    if ($1 == Regular) { set %Match Regular Fatal 4 way $2 $3 $4 $5 | start regular Fatal 4 way }
    if ($1 == Xtreme) { set %Match Xtreme Fatal 4 way $2 $3 $4 $5 | start Xtreme Fatal 4 way }
    if ($1 == KO) { set %Match KO Fatal 4 way $2 $3 $4 $5 | start KO Fatal 4 way }
  }
}

alias FourCorners {
  $pcheck($2)
  $pcheck($3)
  $pcheck($4)
  $pcheck($5)
  $ccheck($6)
  tcheck 1 $iif($7 != $null,$7 $1-)
  tcheck 2 $iif($8 != $null,$8 $1-)
  if ((%Title1 != None) && (%Title2 == TagTeam)) { %error = %error : The TagTeam title cannot be defended in this match type. }
  if ((%Title2 != None) && (%Title1 == TagTeam)) { %error = %error : The TagTeam title cannot be defended in this match type. }
  if (($2 == $3) || ($2 == $4) || ($2 == $5) || ($3 == $4) || ($3 == $5) || ($4 == $5)) { set %error %error : Repeat players not allowed. }
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %P1 $2
    set %P2 $3
    set %P3 $4
    set %P4 $5
    set %P1.H 150
    set %P2.H 150
    set %P3.H 150
    set %P4.H 150
    set %P1.Hs 60
    set %P2.Hs 60
    set %P3.Hs 60
    set %P4.Hs 60
    if ($1 == Regular) { set %Match Regular FourCorners $2 $3 $4 $5 | start regular FourCorners }
    if ($1 == Xtreme) { set %Match Xtreme FourCorners $2 $3 $4 $5 | start Xtreme FourCorners }
  }
}

alias 6ManTagTeam {
  $pcheck($2,t)
  $pcheck($3)
  $pcheck($4)
  $pcheck($5,t)
  $pcheck($6)
  $pcheck($7)
  if (($2 == $3) || ($2 == $4) || ($2 == $5) || ($2 == $6) || ($2 == $7) || ($3 == $4) || ($3 == $5) || ($3 == $6) || ($3 == $7) || ($4 == $5) || ($4 == $6) || ($4 == $7) || ($5 == $6) || ($5 == $7) || ($6 == $7)) { set %error %error : Repeat players not allowed. }
  $ccheck($8)
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %Title1 None
    set %Title2 None
    set %P1 $2
    set %P3 $3
    set %P4 $4
    set %P2 $5
    set %P5 $6
    set %P6 $7
    set %P1.H 150
    set %P2.H 150
    set %P3.H 150
    set %P4.H 150
    set %P5.H 150
    set %P6.H 150
    set %P1.Hs 60
    set %P2.Hs 60
    set %P3.Hs 60
    set %P4.Hs 60
    set %P5.Hs 60
    set %P6.Hs 60
    if ($1 == Regular) { set %Match Regular 6ManTagTeam $2 $3 $4 $5 $6 $7 | start regular 6ManTagTeam }
    if ($1 == Xtreme) { set %Match Xtreme 6ManTagTeam $2 $3 $4 $5 $6 $7 | start Xtreme 6ManTagTeam }
    if ($1 == KO) { set %Match KO 6ManTagTeam $2 $3 $4 $5 $6 $7 | start KO 6ManTagTeam }
  }
}
alias TagTeam {
  $pcheck($2,t)
  $pcheck($3)
  $pcheck($4,t)
  $pcheck($5)
  if (($2 == $3) || ($2 == $4) || ($2 == $5) || ($3 == $4) || ($3 == $5) || ($4 == $5)) { set %error %error : Repeat players not allowed. }
  $ccheck($6)
  tcheck 1 $iif($7 != $null,$7 $2 & $3 $4 & $5)
  tcheck 2 $iif($8 != $null,$8 $2 & $3 $4 & $5)
  if ((%Title1 != None) && (%Title2 == TagTeam)) { %error = %error : Only the TagTeam title is allowed in TagTeam title matches. }
  if ((%Title2 != None) && (%Title1 == TagTeam)) { %error = %error : Only the TagTeam title is allowed in TagTeam title matches. }
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %P1 $2
    set %P3 $3
    set %P2 $4
    set %P4 $5
    set %P1.H 150
    set %P2.H 150
    set %P3.H 150
    set %P4.H 150
    set %P1.Hs 60
    set %P2.Hs 60
    set %P3.Hs 60
    set %P4.Hs 60
    if ($1 == Regular) { set %Match Regular TagTeam $2 $3 $4 $5 | start regular TagTeam }
    if ($1 == Xtreme) { set %Match Xtreme TagTeam $2 $3 $4 $5 | start Xtreme TagTeam }
    if ($1 == table) { set %Match Table Tagteam $2 $3 $4 $5 | start table tagteam }
    if ($1 == casket) { set %Match Casket Tagteam $2 $3 $4 $5 | start casket tagteam }
    if ($1 == KO) { set %Match KO TagTeam $2 $3 $4 $5 | start KO TagTeam }
  }
}
alias TagTeamElim {
  $pcheck($2,t)
  $pcheck($3)
  $pcheck($4,t)
  $pcheck($5)
  if (($2 == $3) || ($2 == $4) || ($2 == $5) || ($3 == $4) || ($3 == $5) || ($4 == $5)) { set %error %error : Repeat players not allowed. }
  $ccheck($6)
  tcheck 1 $iif($7 != $null,$7 $2 & $3 $4 & $5)
  tcheck 2 $iif($8 != $null,$8 $2 & $3 $4 & $5)
  if ((%Title1 != None) && (%Title2 == TagTeam)) { %error = %error : Only the TagTeam title is allowed in TagTeam title matches. }
  if ((%Title2 != None) && (%Title1 == TagTeam)) { %error = %error : Only the TagTeam title is allowed in TagTeam title matches. }
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %P1 $2
    set %P3 $3
    set %P2 $4
    set %P4 $5
    set %P1.H 150
    set %P2.H 150
    set %P3.H 150
    set %P4.H 150
    set %P1.Hs 60
    set %P2.Hs 60
    set %P3.Hs 60
    set %P4.Hs 60
    if ($1 == Regular) { set %Match Regular TagTeamElim $2 $3 $4 $5 | start regular TagTeamElim }
    if ($1 == Xtreme) { set %Match Xtreme TagTeamElim $2 $3 $4 $5 | start Xtreme TagTeamElim }
    if ($1 == KO) { set %Match KO TagTeamElim $2 $3 $4 $5 | start KO TagTeamElim }
  }
}
alias SurvivorSeries {
  if ($9 == $null) { msg $botread(bot_stuff,chan) 00,06Proper syntax for a Survivor Series match is: !Match SurvivorSeries <Players1-8> crowd/on|off | halt }
  $pcheck($1)
  $pcheck($2)
  $pcheck($3)
  $pcheck($4)
  $pcheck($5)
  $pcheck($6)
  $pcheck($7)
  $pcheck($8)
  $ccheck($9)
  if (($1 == $2) || ($1 == $3) || ($1 == $4) || ($1 == $5) || ($1 == $6) || ($1 == $7) || ($1 == $8) || ($2 == $3) || ($2 == $4) || ($2 == $5) || ($2 == $6) || ($2 == $7) || ($2 == $8) || ($3 == $4) || ($3 == $5) || ($3 == $6) || ($3 == $7) || ($3 == $8) || ($4 == $5) || ($4 == $6) || ($4 == $7) || ($4 == $8) || ($5 == $6) || ($5 == $7) || ($5 == $8) || ($6 == $7) || ($6 == $8) || ($7 == $8)) { set %error %error : Repeat players not allowed. }
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %Title1 None
    set %Title2 None
    set %P1 $1
    set %P2 $5
    set %P3 $2
    set %P4 $3
    set %P5 $4
    set %P6 $6
    set %P7 $7
    set %P8 $8
    set %P1.H 150
    set %P2.H 150
    set %P3.H 150
    set %P4.H 150
    set %P5.H 150
    set %P6.H 150
    set %P7.H 150
    set %P8.H 150
    set %P1.Hs 60
    set %P2.Hs 60
    set %P3.Hs 60
    set %P4.Hs 60
    set %P5.Hs 60
    set %P6.Hs 60
    set %P7.Hs 60
    set %P8.Hs 60
    set %Team1 $1 $2 $3 $4 | set %Team1.original $1 $2 $3 $4
    set %Team2 $5 $6 $7 $8 | set %Team2.original $5 $6 $7 $8
    set %Match SurvivorSeries Elimination $1 $2 $3 $4 $5 $6 $7 $8 | start survivorseries
  }
}
alias Elimination {
  if ($2 == 3) { 
    $pcheck($3) | $pcheck($4) | $pcheck($5) | $ccheck($6) | tcheck 1 $iif($7 != $null,$7 $1-) | tcheck 2 $iif($8 != $null,$8 $1-)
    if ((%Title1 != None) && (%Title2 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
    if ((%Title2 != None) && (%Title1 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
    if (($3 == $4) || ($3 == $5) || ($4 == $5)) { set %error %error : Repeat players not allowed. }
    if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
    if (%Error == $null) {
      set %P1 $3
      set %P2 $4
      set %P3 $5
      set %P1.H 150
      set %P2.H 150
      set %P3.H 150
      set %P1.Hs 60
      set %P2.Hs 60
      set %P3.Hs 60
      if ($1 == Table) { set %Match Table Elimination 3 %P1 %P2 %P3 | start table elimination 3 }
      if ($1 == Casket) { set %Match Casket Elimination 3 %P1 %P2 %P3 | start casket elimination 3 }
      if ($1 == Regular) { set %Match Regular Elimination 3 %P1 %P2 %P3 | start regular elimination 3 }
      if ($1 == Xtreme) { set %Match Xtreme Elimination 3 %P1 %P2 %P3 | start Xtreme elimination 3 }
      if ($1 == KO) { set %Match KO Elimination 3 %P1 %P2 %P3 | start KO elimination 3 }
    }
  }
  if ($2 == 4) { 
    $pcheck($3) | $pcheck($4) | $pcheck($5) | $pcheck($6) | $ccheck($7) | tcheck 1 $iif($8 != $null,$8 $1-) | tcheck 2 $iif($9 != $null,$9 $1-)
    if ((%Title1 != None) && (%Title2 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
    if ((%Title2 != None) && (%Title1 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
    if (($3 == $4) || ($3 == $5) || ($3 == $6) || ($4 == $5) || ($4 == $6) || ($5 == $6)) { set %error %error : Repeat players not allowed. }
    if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
    if (%Error == $null) {
      set %P1 $3
      set %P2 $4
      set %P3 $5
      set %P4 $6
      set %P1.H 150
      set %P2.H 150
      set %P3.H 150
      set %P4.H 150
      set %P1.Hs 60
      set %P2.Hs 60
      set %P3.Hs 60
      set %P4.Hs 60
      if ($1 == Table) { set %Match Table Elimination 4 %P1 %P2 %P3 %P4 | start table elimination 4 }
      if ($1 == Regular) { set %Match Regular Elimination 4 %P1 %P2 %P3 %P4 | start regular elimination 4 }
      if ($1 == Xtreme) { set %Match Xtreme Elimination 4 %P1 %P2 %P3 %P4 | start Xtreme elimination 4 }
      if ($1 == KO) { set %Match KO Elimination 4 %P1 %P2 %P3 %P4 | start KO elimination 4 }
    }
  }
  else { msg $botread(bot_stuff,chan) 0,10Correct Syntax For Elimination Matches: !Match (Regular, Xtreme, Table or KO) Elimination (3 or 4) (Player Nicks) Crowd/(on or off) (Title1) (Title2) | halt }
}
alias BarbedWire {
  $pcheck($2)
  $pcheck($3)
  $ccheck($4)
  tcheck 1 $iif($5 != $null,$5 $1-)
  tcheck 2 $iif($6 != $null,$6 $1-)
  if ($2 == $3) { set %error %error : Repeat players not allowed. }
  if ((%Title1 != None) && (%Title2 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
  if ((%Title2 != None) && (%Title1 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %P1 $2
    set %P2 $3
    set %P1.H 150
    set %P2.H 150
    set %P1.Hs 60
    set %P2.Hs 60
    if ($1 == Xtreme) { set %Match Xtreme BarbedWire $2 $3 | start Xtreme BarbedWire }
  }
}
alias FirstBlood {
  $pcheck($2)
  $pcheck($3)
  $ccheck($4)
  tcheck 1 $iif($5 != $null,$5 $1-)
  tcheck 2 $iif($6 != $null,$6 $1-)
  if ($2 == $3) { set %error %error : Repeat players not allowed. }
  if ((%Title1 != None) && (%Title2 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
  if ((%Title2 != None) && (%Title1 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %P1 $2
    set %P2 $3
    set %P1.H 150
    set %P2.H 150
    set %P1.Hs 60
    set %P2.Hs 60
    if ($1 == Xtreme) { set %Match Xtreme FirstBlood $2 $3 | start Xtreme FirstBlood }
  }
}
alias SubmissionStart {
  $pcheck($2)
  $pcheck($3)
  $ccheck($4)
  tcheck 1 $iif($5 != $null,$5 $1-)
  tcheck 2 $iif($6 != $null,$6 $1-)
  if ($2 == $3) { set %error %error : Repeat players not allowed. }
  if ((%Title1 != None) && (%Title2 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
  if ((%Title2 != None) && (%Title1 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %P1 $2
    set %P2 $3
    set %P1.H 150
    set %P2.H 150
    set %P1.Hs 60
    set %P2.Hs 60
    if ($1 == Regular) { set %Match Regular Submission $2 $3 | start regular Submission }
    if ($1 == Xtreme) { set %Match Xtreme Submission $2 $3 | start Xtreme Submission }
  }
}
alias 1on1 { 
  $pcheck($2)
  $pcheck($3)
  $ccheck($4)
  tcheck 1 $iif($5 != $null,$5 $1-)
  tcheck 2 $iif($6 != $null,$6 $1-)
  if ($2 == $3) { set %error %error : Repeat players not allowed. }
  if ($1 == IronMan) { timec $7 }
  if ((%Title1 != None) && (%Title2 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
  if ((%Title2 != None) && (%Title1 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %P1 $2
    set %P2 $3
    set %P1.H 150
    set %P2.H 150
    set %P1.Hs 60
    set %P2.Hs 60
    if ($userread(%P1,Injured) != $null) { set %P1.H 120 }
    if ($userread(%P2,Injured) != $null) { set %P2.H 120 }
  }
  else {
    if ($1 == BoilerRoom) { 
      set %match BoilerRoom 1on1 $2 $3 
      start BoilerRoom 1on1
    }
    if ($1 == Inferno) { set %match Inferno 1on1 $2 $3 | start Inferno 1on1 }
    if ($1 == Iquit) { set %match Iquit 1on1 $2 $3 | start Iquit 1on1 }
    if ($1 == Table) { set %Match Table 1on1 $2 $3 | start table 1on1 }
    if ($1 == Casket) { set %Match Casket 1on1 $2 $3 | start casket 1on1 }
    if ($1 == Ladder) { set %Match Ladder 1on1 $2 $3 | start ladder 1on1 }
    if ($1 == IronMan) { set %P1im 0 | set %P2im 0 | .timerimo 1 $calc( [ $+ [ $7 ] ] *60) imo | set %Match IronMan 1on1 $2 $3 | start IronMan 1on1 $7 }
    if ($1 == Regular) { 
      set %Match Regular 1on1 $2 $3
      set %P1.H 100 | set %P2.H 100
      start regular 1on1 
    }
    if ($1 == Cage) { set %Match Cage 1on1 $2 $3 | start cage 1on1 }
    if ($1 == Cell) { set %Match Cell 1on1 $2 $3 | start Cell 1on1 }
    if ($1 == Xtreme) { set %Match Xtreme 1on1 $2 $3 | start Xtreme 1on1 }
    if ($1 == KO) { set %Match KO 1on1 $2 $3 | start KO 1on1 }
    if ($1 == Strap) { set %Match Strap 1on1 $2 $3 | start Strap 1on1 }
  }
}
alias Chain { 
  $pcheck($2)
  $pcheck($3)
  $ccheck($4)
  tcheck 1 $iif($5 != $null,$5 $1-)
  tcheck 2 $iif($6 != $null,$6 $1-)
  if ($2 == $3) { set %error %error : Repeat players not allowed. }
  if ((%Title1 != None) && (%Title2 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
  if ((%Title2 != None) && (%Title1 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %P1 $2
    set %P2 $3
    set %P1.H 150
    set %P2.H 150
    set %P1.Hs 0
    set %P2.Hs 0
    if ($1 == Xtreme) { set %Match Xtreme Chain $2 $3 | start Xtreme Chain }
  }
}

alias 2/3 { 
  $pcheck($2)
  $pcheck($3)
  $ccheck($4)
  tcheck 1 $iif($5 != $null,$5 $1-)
  tcheck 2 $iif($6 != $null,$6 $1-)
  if ($2 == $3) { set %error %error : Repeat players not allowed. }
  if ((%Title1 != None) && (%Title2 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
  if ((%Title2 != None) && (%Title1 == TagTeam)) { %error = %error : The TagTeam title cannot be defend in any matches other than a tagteam match. }
  if (%Error != $null) { msg $botread(bot_stuff,chan) 0,10 $+ %Error | unset %Crowd | unset %Title* | unset %Error | halt }
  if (%Error == $null) {
    set %P1 $2
    set %P2 $3
    set %P1.H 150
    set %P2.H 150
    set %P1.Hs 60
    set %P2.Hs 60
    if ($1 == Xtreme) { set %P1.wins 0 | set %P2.wins 0 | set %Match Xtreme 2/3 $2 $3 | start Xtreme 2/3 }
  }
}

alias timec {
  if ($1 == $Null) { set %Error %Error : You need to pick a time limit. Choose between 5-60 minutes. }
  if ($1 < 5) { set %Error %Error : Choose between 5-60 minutes, not lower than 5. }
  if ($1 > 60) { set %Error %Error : Choose between 5-60 minutes, not higher than 60. }
}
alias pcheck {
  if (($profileread($1,entrance) == $Null) && ($1 ison $botread(bot_stuff,chan)) && ($2 != t)) { set %Error %Error : $1 has not set an entrance yet! | .notice $1 To set an entrance just type in channel: !Entrance Regular 4Entrance_in_Color like this }
  if (($profileread($1,tentrance) == $Null) && ($1 ison $botread(bot_stuff,chan)) && ($2 == t)) { set %Error %Error : $1 has not set a tag entrance yet! | .notice $1 To set an entrance just type in channel: !Entrance Tag 4Entrance_in_Color like this }
  if ($1 !ison $botread(bot_stuff,chan)) { set %Error %Error : $1 is not here! }
  if ($userread($1,ident) == $null) { set %Error %Error : $1 is not registered! }
  if ($userread($1,ident) == NO) { set %Error %Error : $1 is not identified! }
}

alias ccheck {
  if (crowd/on == $1) { set %crowd on }
  if (crowd/off == $1) { set %crowd off }
  if ((crowd/on != $1) && (crowd/off != $1)) { set %Error %Error : Use Crowd/On or Crowd/off please! }
}

alias tcheck {
  if ($2 == $null) { set %Error %Error : Title [ $+ [ $1 ] ] not selected, please use: None, Xtreme, TagTeam, Pacific, International or Undisputed. }
  if ($2 == None) { set %Title [ $+ [ $1 ] ] None }
  if (($2 == Xtreme) && ($botread(Xtreme,champion) !isin $3-) && ($botread(Xtreme,champion) != Vacant)) { set %Error %Error : $2 title picked, but $botread(Xtreme,champion) is not in the match. }
  if (($2 == Pacific) && ($botread(Pacific,champion) !isin $3-) && ($botread(Pacific,champion) != Vacant)) { set %Error %Error : $2 title picked, but $botread(Pacific,champion) is not in the match. }
  if (($2 == International) && ($botread(International,champion) !isin $3-) && ($botread(International,champion) != Vacant)) { set %Error %Error : $2 title picked, but $botread(International,champion) is not in the match. }
  if (($2 == Undisputed) && ($botread(Undisputed,champion) !isin $3-) && ($botread(Undisputed,champion) != Vacant)) { set %Error %Error : $2 title picked, but $botread(Undisputed,champion) is not in the match. }
  if (($2 == TagTeam) && ($botread(Tagteam,champion) != Vacant)) { 
    var %TeamType1 = $gettok($botread(Tagteam,champion),1,32) & $gettok($botread(Tagteam,champion),2,32), %TeamType2 = $gettok($botread(Tagteam,champion),2,32) & $gettok($botread(Tagteam,champion),1,32)
    if ((%TeamType1 !isin $3-) && (%TeamType2 !isin $3-)) { set %Error %Error : $2 title picked, but $replace($botread(Tagteam,champion),$chr(32),$chr(32) $+ & $+ $chr(32)) are not in the match. }
  }
  if ($2 == Xtreme) { set %Title [ $+ [ $1 ] ] Xtreme }
  if ($2 == TagTeam) { set %Title [ $+ [ $1 ] ] TagTeam }
  if ($2 == Pacific) { set %Title [ $+ [ $1 ] ] Pacific }
  if ($2 == Undisputed) { set %Title [ $+ [ $1 ] ] Undisputed }
  if ($2 == International) { set %Title [ $+ [ $1 ] ] International }
  if ((%Title1 == %Title2) && (%Title1 != None)) { set %Error %Error : Same title picked twice! }
  if (($2 != $Null) && ($2 != none) && ($2 != Xtreme) && ($2 != Pacific) && ($2 != International) && ($2 != Undisputed) && ($2 != TagTeam)) { set %Error %Error : Invalid Title [ $+ [ $1 ] ] selected, please use: None, Xtreme, Pacific, International or Undisputed. }
}

alias rrcheck {
  if ((%crowd != On) && (%crowd != Off) && (%crowd == $null)) { set %Error %error : Crowd error, please use crowd/on or crowd/off.   }
  if (%rr.title == $null) { set %Error Please specify a title. (None, Xtreme, Pacific, International or Undisputed.) }
  if ((%rr.title != $Null) && (%rr.title != None) && (%rr.title != Xtreme) &&  (%rr.title != International)  && (%rr.title != Pacific) && (%rr.title != Undisputed)) { set %Error Invalid title selected, please use: None, Xtreme, Pacific, International or Undisputed. }
  if (%error != $null) { 
    msg $botread(bot_stuff,chan) 00,10 $+ %error 
    unset %error | unset %rr* | halt 
  }
}