on *:TEXT:*:*:{
  if ($chan == #ParadiseServers) {
    if ($1 == @apply) {
      if (!%tryout.timeout) {
        .msg $nick Hello $nick $+ , I will now ask you 11 questions which will be part of your tryout process and will be reviewed later!
        .msg $nick You will have 10 minutes to complete this process if you would like to continue type ?continue in this window.
      }
      elseif (%tryout.nick == $nick) {
        if (%x == 1) {
          .msg $nick 1. What is your First "Alias" Last name? (Alias -- Numeric and Alphabetic Characters Only) [1/11]
        }
        if (%x == 2) {
          .msg $nick 2. Where do you live? (City, State, Country) [2/11]
        }
        if (%x == 3) {
          .msg $nick 3. How old are you? [3/11]
        }
        if (%x == 4) {
          .msg $nick 4. How long have you been playing Counter-Strike? (Years) [4/11]
        }
        if (%x == 5) {
          .msg $nick 5. What CAL-EXP do you have? (Cal-O/IM/M/I/P) [5/11]
        }
        if (%x == 6) {
          .msg $nick 6. Do you have proof? (Yes/No) [6/11]
        }
        if (%x == 7) {
          .msg $nick 7. Do you have a high voice? (Yes/No) [7/11]
        }
        if (%x == 8) {
          .msg $nick 8. Are you mature? (Yes/No) [8/11]
        }
        if (%x == 9) {
          .msg $nick 9. How active are you a day? (Hours) [9/11]
        }
        if (%x == 10) {
          .msg $nick 10. Do you have strict parents? Can you stay up all night on weekends? Or maybe even weekdays if no school? [10/11]
        }
        if (%x == 11) {
          .msg $nick 11. What is your SteamID? [11/11]
        }
      }
      else {
        .msg $nick %tryout.nick is already in the process of questioning. You must wait until %tryout.nick is done until you may begin!
      }
    }
    elseif ($ulevel >= 2) {
      if ($1 == ?review) {
        if ($2) && (!$3) {
          if ($exists(Tryouts/ $+ $2 $+ .txt)) {
            .notice $nick Sending tryout review information to you..
            var %p 1
            while (%p <= $lines(Tryouts/ $+ $2 $+ .txt)) {
              .msg $nick $read(Tryouts/ $+ $2 $+ .txt,%p)
              inc %p
            }
          }
          else {
            .notice $nick You cannot review something that doesn't exist.
          }
        }
        else {
          .notice $nick [^B]Error[^B]: Incorrect Format. Usage: ?review <alias>
        }
      }
    }
  }
  if ($nick) {
    if ($1 == ?continue) {
      if (!%tryout.timeout) {
        set %tryout.nick $nick
        set %tryout. $+ $nick $nick
        .msg $nick Now starting the Paradiseservers apply questioning process!
        set %x 1
        set %tryout.timeout 1
        .timertryout 1 600 $!iif(%tryout.timeout,goto two,goto three)
        .msg $nick 1. What is your First "Alias" Last name? (Alias -- Numeric and Alphabetic Characters Only) [1/11]
        halt
        :two
        .msg %tryout.nick You have not completed the ParadiseServers questioning process in 10 minutes!
        .msg %tryout.nick If you would like to go again you must type @apply in #ParadiseServers in the next available slot!
        close -m %tryout.nick
        unset %tryout.*
        :three
      }
      else {
        .msg $nick %tryout.nick is already in the process of questioning. You must wait until %tryout.nick is done until you may begin!
      }
    }
    if (%x == 1) {
      if (!$exists(Tryouts/ $+ $remove($2,") $+ .txt)) {
        if ($1 isalpha) && ($left($2,1) == ") && ($right($2,1) == ") && ($3 isalpha) && (!$4) {
          var %p 1
          while (%p <= $len($remove($2,"))) {
            if ($left($remove($2,"),%p) isalpha) || ($left($remove($2,"),%p) isnum) {
              inc %p
              if (%p == $len($remove($2,"))) {
                goto one
              }
            }
            else {
              .msg $nick [^B]Error[^B]: Only Numeric and Alphabetic Characters allowed in alias name.
              halt
            }
            :one
            set %tryout.alias $remove($2,")
            write Tryouts/ $+ %tryout.alias $+ .txt ParadiseServers apply Questioning! IRC Nick: $nick
            write Tryouts/ $+ %tryout.alias $+ .txt  1. What is your First "Alias" Last name?
            write Tryouts/ $+ %tryout.alias $+ .txt $1-
            inc %x
            .msg $nick 2. Where do you live? (City, State, Country) [2/11]
            halt
          }
        }
        else {
          .msg $nick [^B]Error[^B]: Incorrect Format! Usage: FirstName "Alias" LastName
        }
      }
      else {
        .msg $nick This alias is already in use. Please pick a new alias.
      }
    }
    if (%x == 2) {
      if ($count($1-,$chr(44)) == 2) {
        write Tryouts/ $+ %tryout.alias $+ .txt 2. Where do you live? (City, State, Country)
        write Tryouts/ $+ %tryout.alias $+ .txt $1-
        inc %x
        .msg $nick 3. How old are you? [3/11]
        halt
      }
      else {
        .msg $nick [^B]Error[^B]: Incorrect Format! Usage: City, State, Country
      }
    }
    if (%x == 3) {
      if ($1 isnum) && (!$2) {
        if ($1 < 16) {
          .msg $nick Sorry $nick $+ , ParadiseServers does not allow people under the age of 16! Thanks for your time!
          .msg $nick Your questioning is now over! Have a nice day!
          remove Tryouts/ $+ %tryout.alias $+ .txt
          onotice #ParadiseServers $nick did not meet the requirements for trying out for ParadiseServers! Reason: Age = $1
          unset %x
          .timertryout off
          unset %tryout.*
          close -m $nick
        }
        else {
          write Tryouts/ $+ %tryout.alias $+ .txt 3. How old are you? (Years)
          write Tryouts/ $+ %tryout.alias $+ .txt $1 years old
          inc %x
          .msg $nick 4. How long have you been playing Counter-Strike? (Years) [4/11]
          halt        
        }
        else {
          .msg $nick [^B]Error[^B]: Incorrect Format! Usage: #ofyears
        }
      }
    }
    if (%x == 4) {
      if ($1 isnum) {
        write Tryouts/ $+ %tryout.alias $+ .txt 4. How long have you been playing Counter-Strike?
        write Tryouts/ $+ %tryout.alias $+ .txt $1-
        inc %x
        .msg $nick 5. What CAL-EXP do you have? (Cal-O/IM/M/I/P) [5/11]
        halt
      }
      else {
        .msg $nick [^B]Error[^B]: Incorrect Format! Usage: #ofyears
      }
    }
    if (%x == 5) {
      if (cal isin $1-) {
        write Tryouts/ $+ %tryout.alias $+ .txt 5. What CAL-EXP do you have?
        write Tryouts/ $+ %tryout.alias $+ .txt $1-
        inc %x
        .msg $nick 6. Do you have proof? (Yes/No) [6/11]
        halt
      }
      else {
        .msg $nick [^B]Error[^B]: Incorrect Format! Usage: Cal-O/IM/M/I/P
      }
    }
    if (%x == 6) {
      if (yes == $1) {
        .msg $nick Link?
        set %y 1
      }
      if (%y == 1) {
        write Tryouts/ $+ %tryout.alias $+ .txt 6. Do you have proof?
        write Tryouts/ $+ %tryout.alias $+ .txt Yes - $1-
        unset %y
        inc %x
        .msg $nick 7. Do you have a high voice? (Yes/No) [7/11]
        halt
      }
      if (no == $1) {
        write Tryouts/ $+ %tryout.alias $+ .txt 6. Do you have proof?
        write Tryouts/ $+ %tryout.alias $+ .txt No
        inc %x
        .msg $nick 7. Do you have a high voice? (Yes/No) [7/11]
        halt
      }
      else {
        .msg $nick [^B]Error[^B]: Incorrect Format! Usage: Yes/No
      }
    }
    if (%x == 7) {
      if (yes == $1) {
        .msg $nick Sorry $nick $+ , ParadsieServers does not allow people with high voices! Thanks for your time!
        .msg $nick Your questioning is now over! Have a nice day!
        remove Tryouts/ $+ %tryout.alias $+ .txt
        onotice #ParadiseServers $nick did not meet the requirements for application for ParadiseServers! Reason: High Voice
        unset %x
        .timertryout off
        unset %tryout.*
        close -m $nick
      }
      if (no == $1) {
        write Tryouts/ $+ %tryout.alias $+ .txt 7. Do you have a high voice?
        write Tryouts/ $+ %tryout.alias $+ .txt No
        inc %x
        .msg $nick 8. Are you mature? (Yes/No) [8/11]
        halt
      }
      else {
        .msg $nick [^B]Error[^B]: Incorrect Format! Usage: Yes/No
      }
    }
    if (%x == 8) {
      if (yes == $1) {
        write Tryouts/ $+ %tryout.alias $+ .txt 8. Are you mature?
        write Tryouts/ $+ %tryout.alias $+ .txt Yes
        inc %x
        .msg $nick 9. How active are you a day? (Hours) [9/11]
        halt
      }
      if (no == $1) {
        .msg $nick Sorry $nick $+ , ParadiseServers does not allow people that are not mature! Thanks for your time!
        .msg $nick Your questioning is now over! Have a nice day!
        remove Tryouts/ $+ %tryout.alias $+ .txt
        onotice #ParadiseServers $nick did not meet the requirements for apply for ParadiseServers! Reason: Not Mature
        unset %x
        .timertryout off
        unset %tryout.*
        close -m $nick
      }
      else {
        .msg $nick [^B]Error[^B]: Incorrect Format! Usage: Yes/No
      }
    }
    if (%x == 9) {
      if ($1 isnum) {
        write Tryouts/ $+ %tryout.alias $+ .txt 9. How active are you a day?
        write Tryouts/ $+ %tryout.alias $+ .txt $1-
        inc %x
        .msg $nick 10. Do you have strict parents? Can you stay up all night on weekends? Or maybe even weekdays if no school? [10/11]
        halt
      }
      else {
        .msg $nick [^B]Error[^B]: Incorrect Format! Usage: #ofhours
      }
    }
    if (%x == 10) {
      write Tryouts/ $+ %tryout.alias $+ .txt 10. Do you have strict parents? Can you stay up all night on weekends? Or maybe even weekdays if no school?
      write Tryouts/ $+ %tryout.alias $+ .txt $1-
      inc %x
      .msg $nick 11. What is your SteamID?
      halt
    }
    if (%x == 11) {
      if ($count($1,:) == 2) {
        if ($left($1,5) == STEAM) || ($left($1,1) isnum)  {
          write Tryouts/ $+ %tryout.alias $+ .txt 11. What is your SteamID?
          write Tryouts/ $+ %tryout.alias $+ .txt $1-
          unset %x
          .timertryout off
          .msg $nick Congratulations! You have finished the ParadiseServers tryout questioning! ParadiseServers leaders have been notified and your responses have been saved.
          .msg $nick Thanks for your time and Happy Fragging!
          onotice #ParadiseServers $nick has just completed the tryout questioning process! Stored as %tryout.alias $+ .txt. Type ?review %tryout.alias to view responses.
          unset %tryout.*
          close -m $nick
        }
        else {
          .msg $nick [^B]Error[^B]: Incorrect Format! Usage: STEAM_#:#:##### or #:#:#####
        }
      }
      else {
        .msg $nick [^B]Error[^B]: Incorrect Format! Usage: STEAM_#:#:##### or #:#:#####
      }
    }
    if ($1 == ?restart) {
      remove Tryouts/ $+ %tryout.alias $+ .txt
      .msg $nick Now restarting the ParadiseServers tryout questioning process!
      set %x 1
      .msg $nick 1. What is your First "Alias" Last name? (Alias -- Numeric and Alphabetic Characters Only) [1/11]
      halt
    }
    if (%x == 1) {
      unset %x
    }
  }
}