Miscellany

on *:TEXT:!Whip:#:{ 
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }
      if ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2) {
        notice $nick 14You can only Eat, Mage, or Range when your are frozen!
        halt
      }     
      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        .timerdmnextturn $+ $chan off
        writeini Dm.Hits.ini $chan Hit $rand(0,40)
        $iif($readini(Dm.Spec.ini,$chan,Player-1) < 100, writeini Dm.Spec.ini $chan Player-1 $calc( $readini(Dm.Spec.ini,$chan,Player-1) + 5))
        writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) - $readini(Dm.Hits.ini,$chan,Hit) )
        if ($readini(Dm.Hp.ini,$chan,Player-2) > 0) {
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14swings a whip at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints.
          msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14Turn.          
          writeini Dm.Turn.ini $chan Turn Player-2
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2          
          halt
        } 
      }
    }
    if ($readini(Dm.Hp.ini,$chan,Player-2) <= 0) {      
      msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14swings a whip at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 0 14Hitpoints.
      dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Wins 
      dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Losses      
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) + $rand(10000,1000000)
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) - 10      
      .timer 1 2 dmwinner $chan Player-1       
      halt
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }
    if ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2) {
      notice $nick 14You can only Eat, Mage, or Range when your are frozen!
      halt
    }    
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      .timerdmnextturn $+ $chan off
      $iif($readini(Dm.Spec.ini,$chan,Player-2) < 100, writeini Dm.Spec.ini $chan Player-2 $calc( $readini(Dm.Spec.ini,$chan,Player-2) + 5))   
      writeini Dm.Hits.ini $chan Hit $rand(0,40)
      writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) - $readini(Dm.Hits.ini,$chan,Hit) )
      if ($readini(Dm.Hp.ini,$chan,Player-1) > 0) {
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14swings a whip at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints.
        msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14Turn.     
        writeini Dm.Turn.ini $chan Turn Player-1
        .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1       
        halt
      } 
      if ($readini(Dm.Hp.ini,$chan,Player-1) <= 0) {       
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14swings a whip at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 0 14Hitpoints.
        dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Wins 
        dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Losses        
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) + $rand(10000,1000000)     
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10     
        .timer 1 2 dmwinner $chan Player-2       
        halt
      }
    }
  }
}
on *:TEXT:!Flick:#:{ 
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }
      if ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2) {
        notice $nick 14You can only Eat, Mage, or Range when your are frozen!
        halt
      }     
      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        .timerdmnextturn $+ $chan off
        writeini Dm.Hits.ini $chan Hit $rand(0,40)
        $iif($readini(Dm.Spec.ini,$chan,Player-1) < 100, writeini Dm.Spec.ini $chan Player-1 $calc( $readini(Dm.Spec.ini,$chan,Player-1) + 5))
        writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) - $readini(Dm.Hits.ini,$chan,Hit) )
        if ($readini(Dm.Hp.ini,$chan,Player-2) > 0) {
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14swings a whip at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints.
          msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14Turn.          
          writeini Dm.Turn.ini $chan Turn Player-2
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2          
          halt
        } 
      }
    }
    if ($readini(Dm.Hp.ini,$chan,Player-2) <= 0) {      
      msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14swings a whip at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 0 14Hitpoints.
      dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Wins 
      dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Losses      
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) + $rand(10000,1000000)
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) - 10      
      .timer 1 2 dmwinner $chan Player-1       
      halt
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }
    if ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2) {
      notice $nick 14You can only Eat, Mage, or Range when your are frozen!
      halt
    }    
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      .timerdmnextturn $+ $chan off
      $iif($readini(Dm.Spec.ini,$chan,Player-2) < 100, writeini Dm.Spec.ini $chan Player-2 $calc( $readini(Dm.Spec.ini,$chan,Player-2) + 5))   
      writeini Dm.Hits.ini $chan Hit $rand(0,40)
      writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) - $readini(Dm.Hits.ini,$chan,Hit) )
      if ($readini(Dm.Hp.ini,$chan,Player-1) > 0) {
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14swings a whip at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints.
        msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14Turn.     
        writeini Dm.Turn.ini $chan Turn Player-1
        .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1       
        halt
      } 
      if ($readini(Dm.Hp.ini,$chan,Player-1) <= 0) {       
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14swings a whip at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 0 14Hitpoints.
        dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Wins 
        dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Losses        
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) + $rand(10000,1000000)     
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10     
        .timer 1 2 dmwinner $chan Player-2       
        halt
      }
    }
  }
}
on *:TEXT:!fire wave:#:{ 
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }   
      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        .timerdmnextturn $+ $chan off
        writeini Dm.Hits.ini $chan Hit $rand(0,25)
        $iif($readini(Dm.Spec.ini,$chan,Player-1) < 100, writeini Dm.Spec.ini $chan Player-1 $calc( $readini(Dm.Spec.ini,$chan,Player-1) + 5))
        writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) - $readini(Dm.Hits.ini,$chan,Hit) )
        if ($readini(Dm.Hp.ini,$chan,Player-2) > 0) {
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14casts a fire wave at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints.
          msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14Turn.          
          writeini Dm.Turn.ini $chan Turn Player-2
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2          
          halt
        } 
      }
    }
    if ($readini(Dm.Hp.ini,$chan,Player-2) <= 0) {      
      msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14casts a fire wave at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 0 14Hitpoints.
      dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Wins 
      dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Losses      
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) + $rand(10000,1000000)
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) - 10      
      .timer 1 2 dmwinner $chan Player-1       
      halt
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }    
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      .timerdmnextturn $+ $chan off
      $iif($readini(Dm.Spec.ini,$chan,Player-2) < 100, writeini Dm.Spec.ini $chan Player-2 $calc( $readini(Dm.Spec.ini,$chan,Player-2) + 5))   
      writeini Dm.Hits.ini $chan Hit $rand(0,25)
      writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) - $readini(Dm.Hits.ini,$chan,Hit) )
      if ($readini(Dm.Hp.ini,$chan,Player-1) > 0) {
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14casts a fire wave at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints.
        msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14Turn.     
        writeini Dm.Turn.ini $chan Turn Player-1
        .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1       
        halt
      } 
      if ($readini(Dm.Hp.ini,$chan,Player-1) <= 0) {       
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14casts a fire wave at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 0 14Hitpoints.
        dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Wins 
        dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Losses        
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) + $rand(10000,1000000)     
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10     
        .timer 1 2 dmwinner $chan Player-2       
        halt
      }
    }
  }
}
on *:TEXT:!water wave:#:{ 
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }   
      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        .timerdmnextturn $+ $chan off
        writeini Dm.Hits.ini $chan Hit $rand(0,20)
        $iif($readini(Dm.Spec.ini,$chan,Player-1) < 100, writeini Dm.Spec.ini $chan Player-1 $calc( $readini(Dm.Spec.ini,$chan,Player-1) + 5))
        writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) - $readini(Dm.Hits.ini,$chan,Hit) )
        if ($readini(Dm.Hp.ini,$chan,Player-2) > 0) {
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14casts a water wave at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints.
          msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14Turn.          
          writeini Dm.Turn.ini $chan Turn Player-2
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2          
          halt
        } 
      }
    }
    if ($readini(Dm.Hp.ini,$chan,Player-2) <= 0) {      
      msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14casts a water wave at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 0 14Hitpoints.
      dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Wins 
      dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Losses      
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) + $rand(10000,1000000)
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) - 10      
      .timer 1 2 dmwinner $chan Player-1       
      halt
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }    
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      .timerdmnextturn $+ $chan off
      $iif($readini(Dm.Spec.ini,$chan,Player-2) < 100, writeini Dm.Spec.ini $chan Player-2 $calc( $readini(Dm.Spec.ini,$chan,Player-2) + 5))   
      writeini Dm.Hits.ini $chan Hit $rand(0,20)
      writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) - $readini(Dm.Hits.ini,$chan,Hit) )
      if ($readini(Dm.Hp.ini,$chan,Player-1) > 0) {
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14casts a water  wave at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints.
        msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14Turn.     
        writeini Dm.Turn.ini $chan Turn Player-1
        .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1       
        halt
      } 
      if ($readini(Dm.Hp.ini,$chan,Player-1) <= 0) {       
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14casts a water wave at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 0 14Hitpoints.
        dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Wins 
        dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Losses        
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) + $rand(10000,1000000)     
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10     
        .timer 1 2 dmwinner $chan Player-2       
        halt
      }
    }
  }
}
on *:TEXT:!earth wave:#:{ 
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }   
      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        .timerdmnextturn $+ $chan off
        writeini Dm.Hits.ini $chan Hit $rand(0,23)
        $iif($readini(Dm.Spec.ini,$chan,Player-1) < 100, writeini Dm.Spec.ini $chan Player-1 $calc( $readini(Dm.Spec.ini,$chan,Player-1) + 5))
        writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) - $readini(Dm.Hits.ini,$chan,Hit) )
        if ($readini(Dm.Hp.ini,$chan,Player-2) > 0) {
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14casts an earth wave at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints.
          msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14Turn.          
          writeini Dm.Turn.ini $chan Turn Player-2
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2          
          halt
        } 
      }
    }
    if ($readini(Dm.Hp.ini,$chan,Player-2) <= 0) {      
      msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14casts an earth wave at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 0 14Hitpoints.
      dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Wins 
      dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Losses      
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) + $rand(10000,1000000)
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) - 10      
      .timer 1 2 dmwinner $chan Player-1       
      halt
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }    
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      .timerdmnextturn $+ $chan off
      $iif($readini(Dm.Spec.ini,$chan,Player-2) < 100, writeini Dm.Spec.ini $chan Player-2 $calc( $readini(Dm.Spec.ini,$chan,Player-2) + 5))   
      writeini Dm.Hits.ini $chan Hit $rand(0,23)
      writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) - $readini(Dm.Hits.ini,$chan,Hit) )
      if ($readini(Dm.Hp.ini,$chan,Player-1) > 0) {
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14casts an earth wave at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints.
        msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14Turn.     
        writeini Dm.Turn.ini $chan Turn Player-1
        .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1       
        halt
      } 
      if ($readini(Dm.Hp.ini,$chan,Player-1) <= 0) {       
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14casts an earth wave at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 0 14Hitpoints.
        dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Wins 
        dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Losses        
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) + $rand(10000,1000000)     
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10     
        .timer 1 2 dmwinner $chan Player-2       
        halt
      }
    }
  }
}
on *:TEXT:!DMace:#:{ 
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }
      if ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2) {
        notice $nick 14You can only Eat, Mage, or Range when your are frozen!
        halt
      }     
      if ($readini(Dm.Spec.ini,$chan,Player-1) <= 0) {
        notice $nick 14You don't have any Special Bar left!
        halt
      }
      if ($readini(Dm.Spec.ini,$chan,Player-1) < 25) {
        notice $nick 14You don't have enough Special Bar left!
        halt
      }      
      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        if ($readini(D-Coins.ini,$nick,DMace) != Sold) {
          notice $nick 14You havn't bought D Mace Special. To buy, type 7!Buy DMace
          halt
        }
        .timerdmnextturn $+ $chan off
        spec Player-1 $chan 25        
        writeini Dm.Hits.ini $chan Hit $rand(0,40)
        $iif($readini(Dm.Spec.ini,$chan,Player-1) < 100, writeini Dm.Spec.ini $chan Player-1 $calc( $readini(Dm.Spec.ini,$chan,Player-1) + 5))
        writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) - $readini(Dm.Hits.ini,$chan,Hit) )
        if ($readini(Dm.Hp.ini,$chan,Player-2) > 0) {
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14shatters $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints.
          msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14Turn.          
          writeini Dm.Turn.ini $chan Turn Player-2
          notice $nick 14You now have $+ 7 $readini(Dm.Spec.ini,$chan,Player-1) $+ % 14Special Bar left.          
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2          
          halt
        } 
      }
    }
    if ($readini(Dm.Hp.ini,$chan,Player-2) <= 0) {      
      msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14shatters $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 0 14Hitpoints.
      dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Wins 
      dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Losses      
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) + 60
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) - 10      
      .timer 1 2 dmwinner $chan Player-1       
      halt
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }
    if ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2) {
      notice $nick 14You can only Eat, Mage, or Range when your are frozen!
      halt
    }    
    if ($readini(Dm.Spec.ini,$chan,Player-2) <= 0) {
      notice $nick 14You don't have any Special Bar left!
      halt
    }
    if ($readini(Dm.Spec.ini,$chan,Player-2) < 25) {
      notice $nick 14You don't have enough Special Bar left!
      halt
    }   
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      if ($readini(D-Coins.ini,$nick,DMace) != Sold) {
        notice $nick 14You havn't bought D Mace Special. To buy, type 7!Buy DMace
        halt
      }      
      .timerdmnextturn $+ $chan off
      spec Player-2 $chan 25
      writeini Dm.Hits.ini $chan Hit $rand(0,40)
      writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) - $readini(Dm.Hits.ini,$chan,Hit) )
      if ($readini(Dm.Hp.ini,$chan,Player-1) > 0) {
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14shatters $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints.
        msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14Turn.     
        writeini Dm.Turn.ini $chan Turn Player-1
        notice $nick 14You now have $+ 7 $readini(Dm.Spec.ini,$chan,Player-2) $+ % 14Special Bar left.        
        .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1      
        halt
      } 
      if ($readini(Dm.Hp.ini,$chan,Player-1) <= 0) {       
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14shatters $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 0 14Hitpoints.
        dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Wins 
        dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Losses        
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) + 60     
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10     
        .timer 1 2 dmwinner $chan Player-2       
        halt
      }
    }
  }
}

on *:TEXT:!Lash:#:{ 
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }
      if ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2) {
        notice $nick 14You can only Eat, Mage, or Range when your are frozen!
        halt
      }     
      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        .timerdmnextturn $+ $chan off
        writeini Dm.Hits.ini $chan Hit $rand(0,40)
        $iif($readini(Dm.Spec.ini,$chan,Player-1) < 100, writeini Dm.Spec.ini $chan Player-1 $calc( $readini(Dm.Spec.ini,$chan,Player-1) + 5))
        writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) - $readini(Dm.Hits.ini,$chan,Hit) )
        if ($readini(Dm.Hp.ini,$chan,Player-2) > 0) {
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14swings a whip at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints.
          msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14Turn.          
          writeini Dm.Turn.ini $chan Turn Player-2
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2          
          halt
        } 
      }
    }
    if ($readini(Dm.Hp.ini,$chan,Player-2) <= 0) {      
      msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14swings a whip at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 0 14Hitpoints.
      dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Wins 
      dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Losses      
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) + $rand(10000,1000000)
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) - 10      
      .timer 1 2 dmwinner $chan Player-1       
      halt
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }
    if ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2) {
      notice $nick 14You can only Eat, Mage, or Range when your are frozen!
      halt
    }    
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      .timerdmnextturn $+ $chan off
      $iif($readini(Dm.Spec.ini,$chan,Player-2) < 100, writeini Dm.Spec.ini $chan Player-2 $calc( $readini(Dm.Spec.ini,$chan,Player-2) + 5))   
      writeini Dm.Hits.ini $chan Hit $rand(0,40)
      writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) - $readini(Dm.Hits.ini,$chan,Hit) )
      if ($readini(Dm.Hp.ini,$chan,Player-1) > 0) {
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14swings a whip at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints.
        msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14Turn.     
        writeini Dm.Turn.ini $chan Turn Player-1
        .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1       
        halt
      } 
      if ($readini(Dm.Hp.ini,$chan,Player-1) <= 0) {       
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14swings a whip at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 0 14Hitpoints.
        dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Wins 
        dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Losses        
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) + $rand(10000,1000000)     
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10     
        .timer 1 2 dmwinner $chan Player-2       
        halt
      }
    }
  }
}
on $*:TEXT:/!(eat|shark)/Si:#:{
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }
      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        if ($readini(Dm.Sharks.ini,$chan,Player-1) <= 0) {
          notice $nick 14You have $+ 7 0 14Sharks! 
          halt
        }
        if ($readini(Dm.Sharks.ini,$chan,Player-1) > 0) {
          if ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2) {
            $iif($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2, writeini Dm.Other.ini $chan Player-1-Frozen $calc( $readini(Dm.Other.ini,$chan,Player-1-Frozen) - 1), remini Dm.Other.ini $chan Player-1-Frozen)
          } 
          .timerdmnextturn $+ $chan off          
          writeini Dm.Sharks.ini $chan Player-1 $calc( $readini(Dm.Sharks.ini,$chan,Player-1) - 1)
          writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) + 20)
          $iif($readini(Dm.Hp.ini,$chan,Player-1) > 99, writeini Dm.Hp.ini $chan Player-1 99)        
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14eats a Shark and now has $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints.
          notice $readini(Dm.Players.ini,$chan,Player-1) 14You now have $+ 7 $readini(Dm.Sharks.ini,$chan,Player-1) 14Sharks.
          writeini Dm.Turn.ini $chan Turn Player-2
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2          
          halt
        }
      }
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      if ($readini(Dm.Sharks.ini,$chan,Player-2) <= 0) {
        notice $nick 14You have $+ 7 0 14Sharks! 
        halt
      }
      if ($readini(Dm.Sharks.ini,$chan,Player-2) > 0) {
        if ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2) {
          $iif($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2, writeini Dm.Other.ini $chan Player-2-Frozen $calc( $readini(Dm.Other.ini,$chan,Player-2-Frozen) - 1), remini Dm.Other.ini $chan Player-2-Frozen)
        } 
        .timerdmnextturn $+ $chan off        
        writeini Dm.Sharks.ini $chan Player-2 $calc( $readini(Dm.Sharks.ini,$chan,Player-2) - 1)
        writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) + 20)
        $iif($readini(Dm.Hp.ini,$chan,Player-2) > 99, writeini Dm.Hp.ini $chan Player-2 99)        
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14eats a Shark and now has $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints.
        notice $readini(Dm.Players.ini,$chan,Player-2) 14You now have $+ 7 $readini(Dm.Sharks.ini,$chan,Player-2) 14Sharks.
        writeini Dm.Turn.ini $chan Turn Player-1
        .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1        
        halt
      }    
    }
  }
}
on *:TEXT:!Dds:#:{ 
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }
      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        if ($readini(Dm.Spec.ini,$chan,Player-1) <= 0) {
          notice $nick 14You don't have any Special Bar left!
          halt
        }
        if ($readini(Dm.Spec.ini,$chan,Player-1) < 25) {
          notice $nick 14You don't have enough Special Bar left!
          halt
        }
        if ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2) {
          notice $nick 14You can only Eat, Mage, or Range when your are frozen!
          halt
        }
        if ($readini(Dm.Spec.ini,$chan,Player-1) > 0) {
          .timerdmnextturn $+ $chan off
          spec Player-1 $chan 25     
          writeini Dm.Hits.ini $chan Hit $rand(0,25) | writeini Dm.Hits.ini $chan DdpSpec $rand(0,25)          
          writeini Dm.Hits.ini $chan DdpSpecTotal $calc( $readini(Dm.Hits.ini,$chan,Hit) + $readini(Dm.Hits.ini,$chan,DdpSpec) )
          writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) - $readini(Dm.Hits.ini,$chan,DdpSpecTotal) )  
          if ($readini(Dm.Hp.ini,$chan,Player-2) > 0) {
            msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14stabs a Dragon Dagger at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14and a $+ 12 $readini(Dm.Hits.ini,$chan,DdpSpec) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints.
            msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14Turn.           
            notice $readini(Dm.Players.ini,$chan,Player-1) 14You now have $+ 7 $readini(Dm.Spec.ini,$chan,Player-1) $+ % 14Special Bar left.                       
            writeini Dm.Turn.ini $chan Turn Player-2          
            .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2            
            halt
          } 
        }
      }
      if ($readini(Dm.Hp.ini,$chan,Player-2) <= 0) {        
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14stabs a Dragon Dagger at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14and a $+ 12 $readini(Dm.Hits.ini,$chan,DdpSpec) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 0 14Hitpoints.
        dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Wins 
        dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Losses        
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) + $rand(10000,1000000)
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) - 10        
        .timer 1 2 dmwinner $chan Player-1     
        halt
      }
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      if ($readini(Dm.Spec.ini,$chan,Player-2) <= 0) {
        notice $nick 14You don't have any Special Bar left!
        halt
      }
      if ($readini(Dm.Spec.ini,$chan,Player-2) < 25) {
        notice $nick 14You don't have enough Special Bar left!
        halt
      }
      if ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2) {
        notice $nick 14You can only Eat, Mage, or Range when your are frozen!
        halt
      }      
      if ($readini(Dm.Spec.ini,$chan,Player-2) > 0) {
        .timerdmnextturn $+ $chan off
        spec Player-2 $chan 25                
        writeini Dm.Hits.ini $chan Hit $rand(0,25) | writeini Dm.Hits.ini $chan DdpSpec $rand(0,25)
        writeini Dm.Hits.ini $chan DdpSpecTotal $calc( $readini(Dm.Hits.ini,$chan,Hit) + $readini(Dm.Hits.ini,$chan,DdpSpec) )
        writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) - $readini(Dm.Hits.ini,$chan,DdpSpecTotal) )        
        if ($readini(Dm.Hp.ini,$chan,Player-1) > 0) {
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14stabs a Dragon Dagger at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14and a $+ 12 $readini(Dm.Hits.ini,$chan,DdpSpec) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints.
          msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14Turn.         
          notice $readini(Dm.Players.ini,$chan,Player-2) 14You now have $+ 7 $readini(Dm.Spec.ini,$chan,Player-2) $+ % 14Special Bar left.                   
          writeini Dm.Turn.ini $chan Turn Player-1
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1         
          halt
        } 
        if ($readini(Dm.Hp.ini,$chan,Player-1) <= 0) {     
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14stabs a Dragon Dagger at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14and a $+ 12 $readini(Dm.Hits.ini,$chan,DdpSpec) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 0 14Hitpoints.
          dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Wins 
          dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Losses          
          dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) + $rand(10000,1000000)         
          dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10 
          .timer 1 2 dmwinner $chan Player-2      
          halt
        }
      }
    }
  }
}
on *:TEXT:!gmaul:#:{ 
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }
      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        if ($readini(Dm.Spec.ini,$chan,Player-1) <= 0) {
          notice $nick 14You don't have any Special Bar left!
          halt
        }
        if ($readini(Dm.Spec.ini,$chan,Player-1) < 100) {
          notice $nick 14You don't have enough Special Bar left!
          halt
        }
        if ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2) {
          notice $nick 14You can only Eat, Mage, or Range when your are frozen!
          halt
        }
        if ($readini(Dm.Spec.ini,$chan,Player-1) > 0) {
          .timerdmnextturn $+ $chan off
          spec Player-1 $chan 100     
          writeini Dm.Hits.ini $chan Maul $rand(0,30) | writeini Dm.Hits.ini $chan Gspec $rand(0,30) | writeini Dm.Hits.ini $chan Gmaulspec $rand(0,30)         
          writeini Dm.Hits.ini $chan GmaulSpecTotal $calc( $readini(Dm.Hits.ini,$chan,Maul) + $readini(Dm.Hits.ini,$chan,Gspec) + $readini(Dm.Hits.ini,$chan,Gmaulspec) )
          writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) - $readini(Dm.Hits.ini,$chan,GmaulSpecTotal) )  
          if ($readini(Dm.Hp.ini,$chan,Player-2) > 0) {
            msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14 whacks a Gmaul at $+ 7 $readini(Dm.Players.ini,$chan,Player-2)  14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Maul) 14  $+ , 12 $readini(Dm.Hits.ini,$chan,Gspec) and $readini(Dm.Hits.ini,$chan,Gmaulspec) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints.
            msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14Turn.           
            notice $readini(Dm.Players.ini,$chan,Player-1) 14You now have $+ 7 $readini(Dm.Spec.ini,$chan,Player-1) $+ % 14Special Bar left.                       
            writeini Dm.Turn.ini $chan Turn Player-2          
            .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2            
            halt
          } 
        }
      }
      if ($readini(Dm.Hp.ini,$chan,Player-2) <= 0) {        
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14whacks a Gmaul at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Maul) 14  $+ , 12 $readini(Dm.Hits.ini,$chan,Gspec) and $readini(Dm.Hits.ini,$chan,Gmaulspec) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 0 14Hitpoints.
        dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Wins 
        dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Losses        
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) + $rand(10000,1000000)
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) - 10        
        .timer 1 2 dmwinner $chan Player-1     
        halt
      }
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      if ($readini(Dm.Spec.ini,$chan,Player-2) <= 0) {
        notice $nick 14You don't have any Special Bar left!
        halt
      }
      if ($readini(Dm.Spec.ini,$chan,Player-2) < 100) {
        notice $nick 14You don't have enough Special Bar left!
        halt
      }
      if ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2) {
        notice $nick 14You can only Eat, Mage, or Range when your are frozen!
        halt
      }      
      if ($readini(Dm.Spec.ini,$chan,Player-2) > 0) {
        .timerdmnextturn $+ $chan off
        spec Player-2 $chan 100               
        writeini Dm.Hits.ini $chan Maul $rand(0,30) | writeini Dm.Hits.ini $chan Gspec $rand(0,30) | writeini Dm.Hits.ini $chan Gmaulspec $rand(0,30)         
        writeini Dm.Hits.ini $chan GmaulSpecTotal $calc( $readini(Dm.Hits.ini,$chan,Maul) + $readini(Dm.Hits.ini,$chan,Gspec) + $readini(Dm.Hits.ini,$chan,Gmaulspec) )
        writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) - $readini(Dm.Hits.ini,$chan,GmaulSpecTotal) )  
        if ($readini(Dm.Hp.ini,$chan,Player-1) > 0) {
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14whacks a Gmaul at $+ 7 $readini(Dm.Players.ini,$chan,Player-1)  14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Maul) 14  $+ , 12 $readini(Dm.Hits.ini,$chan,Gspec) and $readini(Dm.Hits.ini,$chan,Gmaulspec) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints.
          msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14Turn.         
          notice $readini(Dm.Players.ini,$chan,Player-2) 14You now have $+ 7 $readini(Dm.Spec.ini,$chan,Player-2) $+ % 14Special Bar left.                   
          writeini Dm.Turn.ini $chan Turn Player-1
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1         
          halt
        } 
        if ($readini(Dm.Hp.ini,$chan,Player-1) <= 0) {     
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2)  14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Maul) 14  $+ , 12 $readini(Dm.Hits.ini,$chan,Gspec) and $readini(Dm.Hits.ini,$chan,Gmaulspec 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 0 14Hitpoints.
          dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Wins 
          dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Losses          
          dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) + $rand(10000,1000000)         
          dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10 
          .timer 1 2 dmwinner $chan Player-2      
          halt
        }
      }
    }
  }
}

on *:TEXT:!Dh:#:{ 
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }

      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        if ($readini(Dm.Hp.ini,$chan,Player-2) <= 35) {
          notice $nick 14You cant use Dharok when your Opponet has less than or equal to $+ 7 35 Hitpoints.
          halt
        }
        if ($readini(Dm.Other.ini,$chan,Player-1-Dh) == Degraded) {
          notice $nick 14Your Dharok has degraded when you lasted used it.
          halt
        }
        if ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2) {
          notice $nick 14You can only Eat, Mage, or Range when your are frozen!
          halt
        }        
        if ($readini(Dm.Hp.ini,$chan,Player-2) > 35) {
          .timerdmnextturn $+ $chan off
          $iif($readini(Dm.Spec.ini,$chan,Player-1) < 100, writeini Dm.Spec.ini $chan Player-1 $calc( $readini(Dm.Spec.ini,$chan,Player-1) + 5))
          $iif($readini(Dm.Hp.ini,$chan,Player-1) == 99, writeini Dm.Hits.ini $chan Hit $rand(0,1), writeini Dm.Hits.ini $chan Hit $rand(0,70))             
          writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) - $readini(Dm.Hits.ini,$chan,Hit) )
          if ($readini(Dm.Hp.ini,$chan,Player-2) > 0) {
            msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14throws a Great Axe at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints.
            msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14Turn.            
            writeini Dm.Other.ini $chan Player-1-Dh Degraded            
            writeini Dm.Turn.ini $chan Turn Player-2
            .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2          
            halt
          } 
        }
      }
      if ($readini(Dm.Hp.ini,$chan,Player-2) <= 0) {      
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14throws a Great Axe at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 0 14Hitpoints.
        dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Wins 
        dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Losses       
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) + $rand(10000,1000000)
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) - 10    
        .timer 1 2 dmwinner $chan Player-1       
        halt
      }
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      if ($readini(Dm.Hp.ini,$chan,Player-1) <= 35) {
        notice $nick 14You cant use Dharok when your Opponet has less than or equal to $+ 7 35 Hitpoints.
        halt
      }
      if ($readini(Dm.Other.ini,$chan,Player-2-Dh) == Degraded) {
        notice $nick 14Your Dharok has degraded when you lasted used it.
        halt
      }
      if ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2) {
        notice $nick 14You can only Eat, Mage, or Range when your are frozen!
        halt
      }      
      if ($readini(Dm.Hp.ini,$chan,Player-1) > 35) {
        .timerdmnextturn $+ $chan off
        $iif($readini(Dm.Spec.ini,$chan,Player-2) < 100, writeini Dm.Spec.ini $chan Player-2 $calc( $readini(Dm.Spec.ini,$chan,Player-2) + 5))        
        $iif($readini(Dm.Hp.ini,$chan,Player-1) == 99, writeini Dm.Hits.ini $chan Hit $rand(0,1), writeini Dm.Hits.ini $chan Hit $rand(0,70))        
        writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) - $readini(Dm.Hits.ini,$chan,Hit) )
        if ($readini(Dm.Hp.ini,$chan,Player-1) > 0) {
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14throws a Great Axe at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints.
          msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14Turn.          
          writeini Dm.Other.ini $chan Player-2-Dh Degraded          
          writeini Dm.Turn.ini $chan Turn Player-1
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1          
          halt
        } 
        if ($readini(Dm.Hp.ini,$chan,Player-1) <= 0) {       
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14throws a Great Axe at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 0 14Hitpoints.
          dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Wins 
          dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Losses          
          dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) + $rand(10000,1000000)         
          dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10 
          .timer 1 2 dmwinner $chan Player-2    
          halt
        }
      }
    }
  }
}
on *:TEXT:!Guthans:#:{ 
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }
      if ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2) {
        notice $nick 14You can only Eat, Mage, or Range when your are frozen!
        halt
      }        

      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        if ($readini(D-Coins.ini,$nick,Guthans) != Sold) {
          notice $nick 14You havn't bought Guthans. To buy, type 7!Buy Guthans
          halt
        }
        .timerdmnextturn $+ $chan off
        writeini Dm.Hits.ini $chan Hit $rand(0,45)
        set %healed [ $+ [ $chan ] ] $rand(1,4) | $iif(%healed [ $+ [ $chan ] ] == 1, writeini Dm.Other.ini $chan Healed $readini(Dm.Hits.ini,$chan,Hit)) | unset %healed [ $+ [ $chan ] ]                           
        $iif($readini(Dm.Spec.ini,$chan,Player-1) < 100, writeini Dm.Spec.ini $chan Player-1 $calc( $readini(Dm.Spec.ini,$chan,Player-1) + 5))
        if ($readini(Dm.Other.ini,$chan,Healed) != $null) {
          writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) + $readini(Dm.Other.ini,$chan,Healed) )
          $iif($readini(Dm.Hp.ini,$chan,Player-1) > 99, writeini Dm.Hp.ini $chan Player-1 99)        
        }       
        writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) - $readini(Dm.Hits.ini,$chan,Hit) )
        if ($readini(Dm.Hp.ini,$chan,Player-2) > 0) {
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14Smashes $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with the tip of a Guthan Spear which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints and Healed $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ $iif($readini(Dm.Other.ini,$chan,Healed) != $null, $+ 3 $v1, $+ 3 0) 14Hitpoints. | remini Dm.Other.ini $chan Healed
          msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14Turn.          
          writeini Dm.Turn.ini $chan Turn Player-2
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2          
          halt
        } 
      }
    }
    if ($readini(Dm.Hp.ini,$chan,Player-2) <= 0) {      
      msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14Smashes $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with the tip of a Guthan Spear which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 0 14Hitpoints.
      dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Wins 
      dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Losses      
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) + $rand(10000,1000000)
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) - 10 
      .timer 1 2 dmwinner $chan Player-1       
      halt
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }
    if ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2) {
      notice $nick 14You can only Eat, Mage, or Range when your are frozen!
      halt
    }    
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      if ($readini(D-Coins.ini,$nick,Guthans) != Sold) {
        notice $nick 14You havn't bought Guthans. To buy, type 7!Buy Guthans
        halt
      }
      .timerdmnextturn $+ $chan off
      $iif($readini(Dm.Spec.ini,$chan,Player-2) < 100, writeini Dm.Spec.ini $chan Player-2 $calc( $readini(Dm.Spec.ini,$chan,Player-2) + 5))   
      writeini Dm.Hits.ini $chan Hit $rand(0,45)
      set %healed [ $+ [ $chan ] ] $rand(1,4) | $iif(%healed [ $+ [ $chan ] ] == 1, writeini Dm.Other.ini $chan Healed $readini(Dm.Hits.ini,$chan,Hit)) | unset %healed [ $+ [ $chan ] ]           
      if ($readini(Dm.Other.ini,$chan,Healed) != $null) {
        writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) + $readini(Dm.Other.ini,$chan,Healed) )
        $iif($readini(Dm.Hp.ini,$chan,Player-2) > 99, writeini Dm.Hp.ini $chan Player-2 99)      
      }      
      writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) - $readini(Dm.Hits.ini,$chan,Hit) )
      if ($readini(Dm.Hp.ini,$chan,Player-1) > 0) {
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14Smashes $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with the tip of a Guthan Spear which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints and Healed $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ $iif($readini(Dm.Other.ini,$chan,Healed) != $null, $+ 3 $v1, $+ 3 0) 14Hitpoints. | remini Dm.Other.ini $chan Healed
        msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14Turn.     
        writeini Dm.Turn.ini $chan Turn Player-1
        .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1        
        halt
      } 
      if ($readini(Dm.Hp.ini,$chan,Player-1) <= 0) {       
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14Smashes $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with the tip of a Guthan Spear which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 0 14Hitpoints.
        dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Wins 
        dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Losses        
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) + $rand(10000,1000000)
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10        
        .timer 1 2 dmwinner $chan Player-2       
        halt
      }
    }
  }
}
on *:TEXT:!Karils:#:{ 
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }     
      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        if ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2) {
          $iif($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2, writeini Dm.Other.ini $chan Player-1-Frozen $calc( $readini(Dm.Other.ini,$chan,Player-1-Frozen) - 1), remini Dm.Other.ini $chan Player-1-Frozen) 
        }
        .timerdmnextturn $+ $chan off       
        writeini Dm.Hits.ini $chan Hit $rand(0,30)
        $iif($readini(Dm.Spec.ini,$chan,Player-1) < 100, writeini Dm.Spec.ini $chan Player-1 $calc( $readini(Dm.Spec.ini,$chan,Player-1) + 5))
        writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) - $readini(Dm.Hits.ini,$chan,Hit) )
        if ($readini(Dm.Hp.ini,$chan,Player-2) > 0) {
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14fires Karils X Bow at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints.
          msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14Turn.          
          writeini Dm.Turn.ini $chan Turn Player-2
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2         
          halt
        } 
      }
    }
    if ($readini(Dm.Hp.ini,$chan,Player-2) <= 0) {      
      msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14fires Karils X Bow at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 0 14Hitpoints.
      dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Wins 
      dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Losses      
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) + $rand(10000,1000000)
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) - 10     
      .timer 1 2 dmwinner $chan Player-1       
      halt
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      if ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2) {
        $iif($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2, writeini Dm.Other.ini $chan Player-2-Frozen $calc( $readini(Dm.Other.ini,$chan,Player-2-Frozen) - 1), remini Dm.Other.ini $chan Player-2-Frozen) 
      }      
      .timerdmnextturn $+ $chan off     
      $iif($readini(Dm.Spec.ini,$chan,Player-2) < 100, writeini Dm.Spec.ini $chan Player-2 $calc( $readini(Dm.Spec.ini,$chan,Player-2) + 5))   
      writeini Dm.Hits.ini $chan Hit $rand(0,30)
      writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) - $readini(Dm.Hits.ini,$chan,Hit) )
      if ($readini(Dm.Hp.ini,$chan,Player-1) > 0) {
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14fires Karils X Bow at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints.
        msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14Turn.     
        writeini Dm.Turn.ini $chan Turn Player-1
        .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1      
        halt
      } 
      if ($readini(Dm.Hp.ini,$chan,Player-1) <= 0) {       
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14fires Karils X Bow at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 0 14Hitpoints.
        dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Wins 
        dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Losses        
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) + $rand(10000,1000000)
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10        
        .timer 1 2 dmwinner $chan Player-2       
        halt
      }
    }
  }
}
on *:TEXT:!Cbow:#:{ 
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }     
      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        if ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2) {
          $iif($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2, writeini Dm.Other.ini $chan Player-1-Frozen $calc( $readini(Dm.Other.ini,$chan,Player-1-Frozen) - 1), remini Dm.Other.ini $chan Player-1-Frozen) 
        }
        .timerdmnextturn $+ $chan off       
        writeini Dm.Hits.ini $chan Hit $rand(0,30)
        $iif($readini(Dm.Spec.ini,$chan,Player-1) < 100, writeini Dm.Spec.ini $chan Player-1 $calc( $readini(Dm.Spec.ini,$chan,Player-1) + 5))
        writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) - $readini(Dm.Hits.ini,$chan,Hit) )
        if ($readini(Dm.Hp.ini,$chan,Player-2) > 0) {
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14fires Crystal Bow at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints.
          msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14Turn.          
          writeini Dm.Turn.ini $chan Turn Player-2
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2         
          halt
        } 
      }
    }
    if ($readini(Dm.Hp.ini,$chan,Player-2) <= 0) {      
      msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14fires Crystal Bow at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 0 14Hitpoints.
      dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Wins 
      dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Losses      
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) + $rand(10000,1000000)
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) - 10     
      .timer 1 2 dmwinner $chan Player-1       
      halt
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      if ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2) {
        $iif($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2, writeini Dm.Other.ini $chan Player-2-Frozen $calc( $readini(Dm.Other.ini,$chan,Player-2-Frozen) - 1), remini Dm.Other.ini $chan Player-2-Frozen) 
      }      
      .timerdmnextturn $+ $chan off     
      $iif($readini(Dm.Spec.ini,$chan,Player-2) < 100, writeini Dm.Spec.ini $chan Player-2 $calc( $readini(Dm.Spec.ini,$chan,Player-2) + 5))   
      writeini Dm.Hits.ini $chan Hit $rand(0,30)
      writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) - $readini(Dm.Hits.ini,$chan,Hit) )
      if ($readini(Dm.Hp.ini,$chan,Player-1) > 0) {
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14fires Crystal Bow at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints.
        msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14Turn.     
        writeini Dm.Turn.ini $chan Turn Player-1
        .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1      
        halt
      } 
      if ($readini(Dm.Hp.ini,$chan,Player-1) <= 0) {       
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14fires Crystal Bow at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 0 14Hitpoints.
        dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Wins 
        dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Losses        
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) + $rand(10000,1000000)
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10        
        .timer 1 2 dmwinner $chan Player-2       
        halt
      }
    }
  }
}

on *:TEXT:!Msb:#:{ 
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }
      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        if ($readini(Dm.Spec.ini,$chan,Player-1) <= 0) {
          notice $nick 14You don't have any Special Bar left!
          halt
        }
        if ($readini(Dm.Spec.ini,$chan,Player-1) < 55) {
          notice $nick 14You don't have enough Special Bar left!
          halt
        }
        if ($readini(Dm.Spec.ini,$chan,Player-1) > 0) {
          if ($readini(Dm.Other.ini,$chan,Player-1) == 1-Frozen) || ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2) {
            $iif($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2, writeini Dm.Other.ini $chan Player-1-Frozen $calc( $readini(Dm.Other.ini,$chan,Player-1-Frozen) - 1), remini Dm.Other.ini $chan Player-1-Frozen) 
          }
          .timerdmnextturn $+ $chan off          
          spec Player-1 $chan 55  
          writeini Dm.Hits.ini $chan Hit $rand(0,30) | writeini Dm.Hits.ini $chan DdpSpec $rand(0,30)          
          writeini Dm.Hits.ini $chan DdpSpecTotal $calc( $readini(Dm.Hits.ini,$chan,Hit) + $readini(Dm.Hits.ini,$chan,DdpSpec) )
          writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) - $readini(Dm.Hits.ini,$chan,DdpSpecTotal) )
          if ($readini(Dm.Hp.ini,$chan,Player-2) > 0) {
            msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14shoots 2 Rune Arrows at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14and a $+ 12 $readini(Dm.Hits.ini,$chan,DdpSpec) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints.
            msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14Turn.           
            notice $readini(Dm.Players.ini,$chan,Player-1) 14You now have $+ 7 $readini(Dm.Spec.ini,$chan,Player-1) $+ % 14Special Bar left.            
            writeini Dm.Turn.ini $chan Turn Player-2        
            .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2            

            halt
          } 
        }
      }
      if ($readini(Dm.Hp.ini,$chan,Player-2) <= 0) {        
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14shoots 2 Rune Arrows at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14and a $+ 12 $readini(Dm.Hits.ini,$chan,DdpSpec) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 0 14Hitpoints.
        dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Wins 
        dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Losses        
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) + $rand(10000,1000000)
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) - 10        
        .timer 1 2 dmwinner $chan Player-1     
        halt
      }
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      if ($readini(Dm.Spec.ini,$chan,Player-2) <= 0) {
        notice $nick 14You don't have any Special Bar left!
        halt
      }
      if ($readini(Dm.Spec.ini,$chan,Player-2) < 55) {
        notice $nick 14You don't have enough Special Bar left!
        halt
      }
      if ($readini(Dm.Spec.ini,$chan,Player-2) > 0) {
        if ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 1) || ($readini(Dm.IB.ini,$chan,Player-2-Frozen) == 2) {
          $iif($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2, writeini Dm.Other.ini $chan Player-2-Frozen $calc( $readini(Dm.Other.ini,$chan,Player-2-Frozen) - 1), remini Dm.Other.ini $chan Player-2-Frozen) 
        }
        .timerdmnextturn $+ $chan off        
        spec Player-2 $chan 55       
        writeini Dm.Hits.ini $chan Hit $rand(0,25) | writeini Dm.Hits.ini $chan DdpSpec $rand(0,25)
        writeini Dm.Hits.ini $chan DdpSpecTotal $calc( $readini(Dm.Hits.ini,$chan,Hit) + $readini(Dm.Hits.ini,$chan,DdpSpec) )
        writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) - $readini(Dm.Hits.ini,$chan,DdpSpecTotal) )
        if ($readini(Dm.Hp.ini,$chan,Player-1) > 0) {
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14shoots 2 Rune Arrows at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14and a $+ 12 $readini(Dm.Hits.ini,$chan,DdpSpec) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints.
          msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14Turn.         
          notice $readini(Dm.Players.ini,$chan,Player-2) 14You now have $+ 7 $readini(Dm.Spec.ini,$chan,Player-2) $+ % 14Special Bar left.         
          writeini Dm.Turn.ini $chan Turn Player-1
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1
          halt
        } 
        if ($readini(Dm.Hp.ini,$chan,Player-1) <= 0) {     
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14shoots 2 Rune Arrows at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14and a $+ 12 $readini(Dm.Hits.ini,$chan,DdpSpec) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 0 14Hitpoints.
          dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Wins 
          dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Losses          
          dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) + $rand(10000,1000000)         
          dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10 
          .timer 1 2 dmwinner $chan Player-2      
          halt
        }
      }
    }
  }
}
on $*:TEXT:/!(barrage|ice)/Si:#:{ 
  if ($readini(Dm.ini,$chan,Status) == $null) {
    msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
    halt
  }
  if ($readini(Dm.ini,$chan,Status) == Start) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) {
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14is waiting to be challenged. To join the DM just type 7!DM14.
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      notice $nick 14You don't have anyone to face!
      halt
    }
  }
  if ($readini(Dm.ini,$chan,Status) == On) {
    if ($readini(Dm.Players.ini,$chan,Player-1) != $nick) && ($readini(Dm.Players.ini,$chan,Player-2) != $nick) {
      notice $nick 14You're not in the DM for $+ 7 $chan $+ 14!
      halt
    }
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) {
      if ($readini(Dm.Turn.ini,$chan,Turn) != Player-1) {
        notice $nick 14It's not your turn!
        halt
      }        
      if ($readini(Dm.Turn.ini,$chan,Turn) == Player-1) {
        writeini Dm.Hits.ini $chan Hit $rand(0,30)
        .timerdmnextturn $+ $chan off
        if ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == $null) {
          set %player2.frozen? [ $+ [ $chan ] ] $rand(1,4) | $iif(%player2.frozen? [ $+ [ $chan ] ] == 1, writeini Dm.Other.ini $chan Player-2-Frozen 2) | unset %player2.frozen? [ $+ [ $chan ] ]                       
        }      
        if ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2) {
          $iif($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2, writeini Dm.Other.ini $chan Player-1-Frozen $calc( $readini(Dm.Other.ini,$chan,Player-1-Frozen) - 1), remini Dm.Other.ini $chan Player-1-Frozen) 
        }  
        $iif($readini(Dm.Spec.ini,$chan,Player-1) < 100, writeini Dm.Spec.ini $chan Player-1 $calc( $readini(Dm.Spec.ini,$chan,Player-1) + 5))
        writeini Dm.Hp.ini $chan Player-2 $calc( $readini(Dm.Hp.ini,$chan,Player-2) - $readini(Dm.Hits.ini,$chan,Hit) )
        if ($readini(Dm.Hp.ini,$chan,Player-2) > 0) {
          msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14casts Ice Barrage at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-2) 14Hitpoints and $iif($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2, Froze them for $+ 3 2 14Turns., didn't freeze them.)
          msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14Turn.          
          writeini Dm.Turn.ini $chan Turn Player-2
          .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-1 Player-2          
          halt
        } 
      }
    }
    if ($readini(Dm.Hp.ini,$chan,Player-2) <= 0) {      
      msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14casts Ice Barrage at $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 0 14Hitpoints.
      dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Wins 
      dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Losses      
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) + $rand(10000,1000000)
      dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) - 10      
      .timer 1 2 dmwinner $chan Player-1       
      halt
    }
  }
  if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {
    if ($readini(Dm.Turn.ini,$chan,Turn) != Player-2) {
      notice $nick 14It's not your turn!
      halt
    }
    if ($readini(Dm.Turn.ini,$chan,Turn) == Player-2) {
      .timerdmnextturn $+ $chan off
      $iif($readini(Dm.Spec.ini,$chan,Player-2) < 100, writeini Dm.Spec.ini $chan Player-2 $calc( $readini(Dm.Spec.ini,$chan,Player-2) + 5))   
      writeini Dm.Hits.ini $chan Hit $rand(0,30)
      if ($readini(Dm.Other.ini,$chan,Player-1-Frozen) == $null) {
        set %player1.frozen? [ $+ [ $chan ] ] $rand(1,4) | $iif(%player1.frozen? [ $+ [ $chan ] ] == 1, writeini Dm.Other.ini $chan Player-1-Frozen 2) | unset %player1.frozen? [ $+ [ $chan ] ]      
      }
      if ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 1) || ($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2) {
        $iif($readini(Dm.Other.ini,$chan,Player-2-Frozen) == 2, writeini Dm.Other.ini $chan Player-2-Frozen $calc( $readini(Dm.Other.ini,$chan,Player-2-Frozen) - 1), remini Dm.Other.ini $chan Player-2-Frozen)
      }           
      writeini Dm.Hp.ini $chan Player-1 $calc( $readini(Dm.Hp.ini,$chan,Player-1) - $readini(Dm.Hits.ini,$chan,Hit) )
      if ($readini(Dm.Hp.ini,$chan,Player-1) > 0) {
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14casts Ice Barrage at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 $readini(Dm.Hp.ini,$chan,Player-1) 14Hitpoints and $iif($readini(Dm.Other.ini,$chan,Player-1-Frozen) == 2, Froze them for $+ 3 2 14Turns., didn't freeze them.)
        msg $chan 14It's $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14Turn.     
        writeini Dm.Turn.ini $chan Turn Player-1
        .timerdmnextturn $+ $chan 1 30 dmnextturn $chan Player-2 Player-1       
        halt
      } 
      if ($readini(Dm.Hp.ini,$chan,Player-1) <= 0) {       
        msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player-2) 14casts Ice Barrage at at $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14which hits a $+ 12 $readini(Dm.Hits.ini,$chan,Hit) 14leaving $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14with $+ 4 0 14Hitpoints.
        dmhiscore $readini(Dm.Players.ini,$chan,Player-2) Wins 
        dmhiscore $readini(Dm.Players.ini,$chan,Player-1) Losses        
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-2) + $rand(10000,1000000)
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10     
        .timer 1 2 dmwinner $chan Player-2       
        halt
      }
    }
  }
}