Battle  //  OMG, we just made a /Battle datum.
   var
      p_turn = 0   //  This will keep track of which player's turn it is
      players[2]
      GameOver = 0
      NextTurn = 0

   New(mob/m1, mob/m2)   // Called when created
      if(m1 && m2)
           players = list(m1, m2)
      else
           CRASH("Where's everyone? :(")

      p_turn = rand(1,2)  //  randomly pick which player's turn it is
      Start_Battling()   //  Okay, lets start the fight

   proc/Start_Battling()
      while(!GameOver)   //  We want this procedure to keep happening until the game is over
         var/mob/M = player[p_turn]  //  Set who's turn it is
         M << "It is your turn. Hurry!"  //  The purpose of M defined here is not for the message but shows that you can modify certain variables at the beginning of M's turn here.
         
         while(!NextTurn) sleep(1)   //  While the player is not ready, this proc will "pause" here until NextTurn = a true value, such as when M attacks

         M << "It's the end of your turn."

         p_turn = 3-p_turn  //  If it was player 1 turn, now it is #2's turn and vice versa
         NextTurn = 0
         //  Loops back to the top due to the while()

      Finish_Battle()   //  The while() loop stop when GameOver != 0, "" or null. This is called after the while() loop stops