on *:TEXT:!start ttt:?: {
  set %noswitch $+ $nick off 
  set %stopper $+ $nick 0 
  set %ttswitch on
  set %a1 $+ $nick ( )
  set %a2 $+ $nick ( )
  set %a3 $+ $nick ( )
  set %b1 $+ $nick ( )
  set %b2 $+ $nick ( )
  set %b3 $+ $nick ( )
  set %c1 $+ $nick ( )
  set %c2 $+ $nick ( )
  set %c3 $+ $nick ( )
  msg $nick TicTacToe Started
  msg $nick Please Choose A Symbol (X or O) Use !symbol
}
on *:TEXT:!reset:?: {
  set %noswitch $+ $nick off  
  set %stopper $+ $nick 0
  set %ttswitch on
  set %a1 $+ $nick ( )
  set %a2 $+ $nick ( )
  set %a3 $+ $nick ( )
  set %b1 $+ $nick ( )
  set %b2 $+ $nick ( )
  set %b3 $+ $nick ( )
  set %c1 $+ $nick ( )
  set %c2 $+ $nick ( )
  set %c3 $+ $nick ( )
}
on *:TEXT:!symbol *:?: { if (%ttswitch == on) {
    if ((%noswitch [ $+ [ $nick ] ] == off) && (($2 == X) || ($2 == O))) {
      set %noswitch [ $+ [ $nick ] ] on
    }
    if ($2 == x) {
      set %ttt [ $+ [ $nick ] ] x
      set %ttt. [ $+ [ $nick ] ] o
    }
    if ($2 == o) {
      set %ttt [ $+ [ $nick ] ] o
      set %ttt. [ $+ [ $nick ] ] x
    }
    msg $nick You Have Selected $2 As Your Symbol For This Game
  } 
  ELSEIF (%noswitch [ $+ [ $nick ] ] == on) { 
    /msg $nick You Cannot Change Your Symbol During A Game! Your Symbol Will Stay ( $+ %ttt [ $+ [ $nick ] ] $+ ) For The Duration Of This Game 
  }
  ELSEIF (($2 != X) && ($2 != O)) { 
    msg $nick You Can Only Use X or O! 
  }
}


on *:TEXT:*:?: { if (%ttswitch != on) { 
    /msg $nick You need to start a game first! "!start ttt" 
  }
  elseif (%ttswitch == on) {
    if (% [ $+ [ $1 [ $+ [ $nick ] ] ] ] != ( )) { 
      /msg $nick $1 Has Already Been Taken
      /halt
    }
    if (($1 == a1) && (%a1 [ $+ [ $nick ] ] == ( ))) { 
      set %a1 [ $+ [ $nick ] ] ( $+ %ttt [ $+ [ $nick ] ] $+ ) 
      inc %stopper [ $+ [ $nick ] ] 1
    }

    if (($1 == a2) && (%a2 [ $+ [ $nick ] ] == ( ))) { 
      set %a2 [ $+ [ $nick ] ] ( $+ %ttt [ $+ [ $nick ] ] $+ ) 
      inc %stopper [ $+ [ $nick ] ] 1
    }
    if (($1 == a3) && (%a3 [ $+ [ $nick ] ] == ( ))) {
      set %a3 [ $+ [ $nick ] ] ( $+ %ttt [ $+ [ $nick ] ] $+ ) 
      inc %stopper [ $+ [ $nick ] ] 1
    }
    if (($1 == b1) && (%b1 [ $+ [ $nick ] ] == ( ))) {
      set %b1 [ $+ [ $nick ] ] ( $+ %ttt [ $+ [ $nick ] ] $+ ) 
      inc %stopper [ $+ [ $nick ] ] 1
    }
    if (($1 == b2) && (%b2 [ $+ [ $nick ] ] == ( ))) {
      set %b2 [ $+ [ $nick ] ] ( $+ %ttt [ $+ [ $nick ] ] $+ )
      inc %stopper [ $+ [ $nick ] ] 1
    }
    if (($1 == b3) && (%b3 [ $+ [ $nick ] ] == ( ))) {
      set %b3 [ $+ [ $nick ] ] ( $+ %ttt [ $+ [ $nick ] ] $+ ) 
      inc %stopper [ $+ [ $nick ] ] 1
    }
    if (($1 == c1) && (%c1 [ $+ [ $nick ] ] == ( ))) {
      set %c1 [ $+ [ $nick ] ] ( $+ %ttt [ $+ [ $nick ] ] $+ ) 
      inc %stopper [ $+ [ $nick ] ] 1
    }
    if (($1 == c2) && (%c2 [ $+ [ $nick ] ] == ( ))) {
      set %c2 [ $+ [ $nick ] ] ( $+ %ttt [ $+ [ $nick ] ] $+ )
      inc %stopper [ $+ [ $nick ] ] 1
    }
    if (($1 == c3) && (%c3 [ $+ [ $nick ] ] == ( ))) {
      set %c3 [ $+ [ $nick ] ] ( $+ %ttt [ $+ [ $nick ] ] $+ ) 
      inc %stopper [ $+ [ $nick ] ] 1
    }
    goto $rand(1,8)
    :1
    if (%a2 [ $+ [ $nick ] ] != ( )) goto $rand(1,8)
    elseif ((%a2 [ $+ [ $nick ] ] == ( )) && (%stopper [ $+ [ $nick ] ] <= 5)) set %a2 [ $+ [ $nick ] ] ( $+ %ttt. [ $+ [ $nick ] ] $+ )
    /msg $nick 0...1A0...1B0...1C
    /msg $nick 1 %a1 [ $+ [ $nick ] ] 0.1 %b1 [ $+ [ $nick ] ] 0.1 %c1 [ $+ [ $nick ] ]
    /msg $nick 2 %a2 [ $+ [ $nick ] ] 0.1 %b2 [ $+ [ $nick ] ] 0.1 %c2 [ $+ [ $nick ] ]
    /msg $nick 3 %a3 [ $+ [ $nick ] ] 0.1 %b3 [ $+ [ $nick ] ] 0.1 %c3 [ $+ [ $nick ] ]  
    halt
    :2
    if (%a3 [ $+ [ $nick ] ] != ( )) goto $rand(1,8)   
    elseif ((%a3 [ $+ [ $nick ] ] == ( )) && (%stopper [ $+ [ $nick ] ] <= 5)) set %a3 [ $+ [ $nick ] ] ( $+ %ttt. [ $+ [ $nick ] ] $+ )
    /msg $nick 0...1A0...1B0...1C
    /msg $nick 1 %a1 [ $+ [ $nick ] ] 0.1 %b1 [ $+ [ $nick ] ] 0.1 %c1 [ $+ [ $nick ] ]
    /msg $nick 2 %a2 [ $+ [ $nick ] ] 0.1 %b2 [ $+ [ $nick ] ] 0.1 %c2 [ $+ [ $nick ] ]
    /msg $nick 3 %a3 [ $+ [ $nick ] ] 0.1 %b3 [ $+ [ $nick ] ] 0.1 %c3 [ $+ [ $nick ] ]  
    halt
    :3
    if (%b1 [ $+ [ $nick ] ] != ( )) goto $rand(1,8)   
    elseif ((%b1 [ $+ [ $nick ] ] == ( )) && (%stopper [ $+ [ $nick ] ] <= 5)) set %b1 [ $+ [ $nick ] ] ( $+ %ttt. [ $+ [ $nick ] ] $+ )
    /msg $nick 0...1A0...1B0...1C
    /msg $nick 1 %a1 [ $+ [ $nick ] ] 0.1 %b1 [ $+ [ $nick ] ] 0.1 %c1 [ $+ [ $nick ] ]
    /msg $nick 2 %a2 [ $+ [ $nick ] ] 0.1 %b2 [ $+ [ $nick ] ] 0.1 %c2 [ $+ [ $nick ] ]
    /msg $nick 3 %a3 [ $+ [ $nick ] ] 0.1 %b3 [ $+ [ $nick ] ] 0.1 %c3 [ $+ [ $nick ] ]  
    halt
    :4
    if (%b2 [ $+ [ $nick ] ] != ( )) goto $rand(1,8)    
    elseif ((%b2 [ $+ [ $nick ] ] == ( )) && (%stopper [ $+ [ $nick ] ] <= 5)) set %b2 [ $+ [ $nick ] ] ( $+ %ttt. [ $+ [ $nick ] ] $+ )
    /msg $nick 0...1A0...1B0...1C
    /msg $nick 1 %a1 [ $+ [ $nick ] ] 0.1 %b1 [ $+ [ $nick ] ] 0.1 %c1 [ $+ [ $nick ] ]
    /msg $nick 2 %a2 [ $+ [ $nick ] ] 0.1 %b2 [ $+ [ $nick ] ] 0.1 %c2 [ $+ [ $nick ] ]
    /msg $nick 3 %a3 [ $+ [ $nick ] ] 0.1 %b3 [ $+ [ $nick ] ] 0.1 %c3 [ $+ [ $nick ] ]   
    halt
    :5
    if (%b3 [ $+ [ $nick ] ] != ( )) goto $rand(1,8)   
    elseif ((%b3 [ $+ [ $nick ] ] == ( )) && (%stopper [ $+ [ $nick ] ] <= 5)) set %b3 [ $+ [ $nick ] ] ( $+ %ttt. [ $+ [ $nick ] ] $+ )
    /msg $nick 0...1A0...1B0...1C
    /msg $nick 1 %a1 [ $+ [ $nick ] ] 0.1 %b1 [ $+ [ $nick ] ] 0.1 %c1 [ $+ [ $nick ] ]
    /msg $nick 2 %a2 [ $+ [ $nick ] ] 0.1 %b2 [ $+ [ $nick ] ] 0.1 %c2 [ $+ [ $nick ] ]
    /msg $nick 3 %a3 [ $+ [ $nick ] ] 0.1 %b3 [ $+ [ $nick ] ] 0.1 %c3 [ $+ [ $nick ] ]   
    halt
    :6
    if (%c1 [ $+ [ $nick ] ] != ( )) goto $rand(1,8)   
    elseif ((%c1 [ $+ [ $nick ] ] == ( )) && (%stopper [ $+ [ $nick ] ] <= 5)) set %c1 [ $+ [ $nick ] ] ( $+ %ttt. [ $+ [ $nick ] ] $+ )
    /msg $nick 0...1A0...1B0...1C
    /msg $nick 1 %a1 [ $+ [ $nick ] ] 0.1 %b1 [ $+ [ $nick ] ] 0.1 %c1 [ $+ [ $nick ] ]
    /msg $nick 2 %a2 [ $+ [ $nick ] ] 0.1 %b2 [ $+ [ $nick ] ] 0.1 %c2 [ $+ [ $nick ] ]
    /msg $nick 3 %a3 [ $+ [ $nick ] ] 0.1 %b3 [ $+ [ $nick ] ] 0.1 %c3 [ $+ [ $nick ] ] 
    halt
    :7
    if (%c2 [ $+ [ $nick ] ] != ( )) goto $rand(1,8)      
    elseif ((%c2 [ $+ [ $nick ] ] == ( )) && (%stopper [ $+ [ $nick ] ] <= 5)) set %c2 [ $+ [ $nick ] ] ( $+ %ttt. [ $+ [ $nick ] ] $+ )
    /msg $nick 0...1A0...1B0...1C
    /msg $nick 1 %a1 [ $+ [ $nick ] ] 0.1 %b1 [ $+ [ $nick ] ] 0.1 %c1 [ $+ [ $nick ] ]
    /msg $nick 2 %a2 [ $+ [ $nick ] ] 0.1 %b2 [ $+ [ $nick ] ] 0.1 %c2 [ $+ [ $nick ] ]
    /msg $nick 3 %a3 [ $+ [ $nick ] ] 0.1 %b3 [ $+ [ $nick ] ] 0.1 %c3 [ $+ [ $nick ] ] 
    halt
    :8
    if (%c3 [ $+ [ $nick ] ] != ( )) goto $rand(1,8)     
    elseif ((%c3 [ $+ [ $nick ] ] == ( )) && (%stopper [ $+ [ $nick ] ] <= 5)) set %c3 [ $+ [ $nick ] ] ( $+ %ttt. [ $+ [ $nick ] ] $+ )
    /msg $nick 0...1A0...1B0...1C
    /msg $nick 1 %a1 [ $+ [ $nick ] ] 0.1 %b1 [ $+ [ $nick ] ] 0.1 %c1 [ $+ [ $nick ] ]
    /msg $nick 2 %a2 [ $+ [ $nick ] ] 0.1 %b2 [ $+ [ $nick ] ] 0.1 %c2 [ $+ [ $nick ] ]
    /msg $nick 3 %a3 [ $+ [ $nick ] ] 0.1 %b3 [ $+ [ $nick ] ] 0.1 %c3 [ $+ [ $nick ] ] 
    halt
  }
}