on *:TEXT:!Dm*:#:{ if ($readini(NickBlklist.ini,$nick,Abused) || $readini(AddBlklist.ini,$address($nick,2),Abused) >= 1)  { halt } 
  if ($1 == !dmcommands) { 
    msg $nick 7!Dm (on|off) 
    msg $nick 14!Whip 
    msg $nick 7!Dds 
    msg $nick 14!Dh 
    msg $nick 7!Guthans 
    msg $nick 14!DMace    
    msg $nick 7!Ice 
    msg $nick 14!Karils 
    msg $nick 7!Msb 
    msg $nick 14!Shark    
    msg $nick 7!MyStats 7- Tells you your stats in the Dm 
    msg $nick 14!TheirStats 7- Tells you your opponents stats in the Dm 
    msg $nick 7!Hiscores *NICK* 14- Shows wins and losses of a nick. If you don't supply a nick then it'll tell you your stats  
    msg $nick 12 $+ $+($chr(77),$chr(97),$chr(100),$chr(101),$chr(32),$chr(98),$chr(121),$chr(32),$chr(75),$chr(105),$chr(114),$chr(98),$chr(115),$chr(116),$chr(101),$chr(114))    
    halt 
  } 
  if ($2 == on) { 
    if ($readini(Dm.ini,$chan,Status) == On) { 
      notice $nick 14There is already a DM currently in $+ 7 $chan $+ 14. 
      halt 
    } 
    if ($readini(Dm.ini,$chan,Status) == $null) { 
      msg $chan 7 $+ $nick ( $+ $iif($readini(D-Coins.ini,$nick,BPhat) == Sold, $+(12\,$chr(124),/), 10§) $+ $iif($readini(D-Coins.ini,$nick,RPhat) == Sold, $+(4\,$chr(124),/), 10§) $+ $iif($readini(D-Coins.ini,$nick,GPhat) == Sold, $+(3\,$chr(124),/), 10§) W: $iif($readini(Dm.Hiscores.ini,$nick,Wins) != $null, $readini(Dm.Hiscores.ini,$nick,Wins), 0) L: $iif($readini(Dm.Hiscores.ini,$nick,Losses) != $null, $readini(Dm.Hiscores.ini,$nick,Losses), 0) T: $calc( $iif($readini(Dm.Hiscores.ini,$nick,Wins) == $null, 0, $v1) + $iif($readini(Dm.Hiscores.ini,$nick,Losses) == $null, 0, $v1)) D-Coins: $iif($readini(D-Coins.ini,$nick,Coins) == $null, 0, $v1) $+ ) 14has initicated a DM! Ready to fight? To join just type 7!DM14. 
      writeini Dm.ini $chan Status Start 
      writeini Dm.Players.ini $chan Player-1 $nick 
      writeini Dm.Hp.ini $chan Player-1 99 
      writeini Dm.Sharks.ini $chan Player-1 15 
      writeini Dm.Spec.ini $chan Player-1 100      
      .timerdmoff $+ $chan 1 30 dmtimerend $chan      
      halt 
    } 
    if ($readini(Dm.ini,$chan,Status) == Start) { 
      notice $nick 7 $+ $readini(Dm.Players.ini,$chan,Player-1) 14has already started a DM for $+ 7 $chan $+ 14. To join, type 7!DM14. 
      halt 
    }    
  } 
  if ($2 == $null) && ($readini(Dm.Players.ini,$chan,Player-1) != $nick) { 
    if ($readini(Dm.ini,$chan,Status) == Start) { 
      .timerdmoff $+ $chan off      
      set %who.goes.first. [ $+ [ $chan ] ] $rand(1,2) 
      writeini Dm.Turn.ini $chan Turn Player- $+ %who.goes.first. [ $+ [ $chan ] ] 
      writeini Dm.ini $chan Status On 
      writeini Dm.Players.ini $chan Player-2 $nick 
      writeini Dm.Hp.ini $chan Player-2 99 
      writeini Dm.Sharks.ini $chan Player-2 15 
      writeini Dm.Spec.ini $chan Player-2 100      
      msg $chan 14The DM has STARTED! $+ 7 $readini(Dm.Players.ini,$chan,Player-1) 14VS $+ 7 $readini(Dm.Players.ini,$chan,Player-2) 14with $+ 4 99 14Hitpoints and $+ 12 15 14Sharks!    
      .timer 1 2 msg $chan 7 $+ $readini(Dm.Players.ini,$chan,Player- $+ %who.goes.first. [ $+ [ $chan ] ]) 14goes first! 
      .timerdmnextturn $+ $chan 1 30 dmnextturn $chan $iif(%who.goes.first. [ $+ [ $chan ] ] == 1, Player-2, Player-1) $iif(%who.goes.first. [ $+ [ $chan ] ] == 1, Player-1, Player-2)      
      unset %who.goes.first. [ $+ [ $chan ] ] 
      halt 
    } 
    if ($readini(Dm.ini,$chan,Status) == $null) { 
      notice $nick 14There is no Waiting-DM for $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
      halt 
    } 
  } 
  if ($2 == $null) && ($readini(Dm.Players.ini,$chan,Player-1) == $nick) && ($readini(Dm.ini,$chan,Status) == Start) { 
    notice $nick 14You are already in the DM for $+ 7 $chan $+ 14. 
    halt 
  }  
  if ($2 == off) { 
    if ($readini(Dm.ini,$chan,Status) == On || $readini(Dm.ini,$chan,Status) == Start) && ($nick isop $chan || $nick ishop $chan || $readini(Dm.Players.ini,$chan,Player-1) == $nick || $readini(Dm.Players.ini,$chan,Player-2) == $nick) || ($address($me,2) == $address($nick,2)) { 
      enddm $chan        
      msg $chan 7 $+ $nick 14has stopped the DM for $+ 7 $chan $+ 14. 
      halt 
    } 
    if ($readini(Dm.ini,$chan,Status) == $null) && ($nick isop $chan || $nick ishop $chan) { 
      msg $chan 14There is no DM currently in $+ 7 $chan $+ 14. To start one, type 7!Dm On14. 
      halt 
    } 
  } 
} 
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 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) + 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.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) + 60      
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10      
        .timer 1 2 dmwinner $chan Player-2        
        halt 
      } 
    } 
  } 
} 
on *:TEXT:!eat*:#:{ 
  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) + 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.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) + 60          
          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) + 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.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) + 60          
          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) + 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.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) + 60 
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10        
        .timer 1 2 dmwinner $chan Player-2        
        halt 
      } 
    } 
  } 
} 
on *:TEXT:!xbow*:#:{ 
  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,35) 
        $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) + 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.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,35) 
      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) + 60 
        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) + 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.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) + 60          
          dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10 
          .timer 1 2 dmwinner $chan Player-2      
          halt 
        } 
      } 
    } 
  } 
} 
on *:TEXT:!barrage*:#:{ 
  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) + 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.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) + 60 
        dmadddcoins $readini(Dm.Players.ini,$chan,Player-1) - 10      
        .timer 1 2 dmwinner $chan Player-2        
        halt 
      } 
    } 
  } 
} 
on *:TEXT:!MyStats:#:{ 
  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) { 
      notice $readini(Dm.Players.ini,$chan,Player-1) 14Here are your current DM Stats for $+ 7 $chan $+ 14: 12Hitpoints:4 $readini(Dm.Hp.ini,$chan,Player-1) 12Sharks:4 $readini(Dm.Sharks.ini,$chan,Player-1) 12Special Bar:4 $readini(Dm.Spec.ini,$chan,Player-1) $+ % 12Dharoks:4 $iif($readini(Dm.Other.ini,$chan,Player-1-Dh) == Degraded, 4Degraded, 4In-Shape) 12Frozen Turns Left:4 $iif($readini(Dm.Other.ini,$chan,Player-1-Frozen) != $null, $v1, 0) 
      halt 
    } 
    if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) { 
      notice $readini(Dm.Players.ini,$chan,Player-2) 14Here are your current DM Stats for $+ 7 $chan $+ 14: 12Hitpoints:4 $readini(Dm.Hp.ini,$chan,Player-2) 12Sharks:4 $readini(Dm.Sharks.ini,$chan,Player-2) 12Special Bar:4 $readini(Dm.Spec.ini,$chan,Player-2) $+ % 12Dharoks:4 $iif($readini(Dm.Other.ini,$chan,Player-2-Dh) == Degraded, 4Degraded, 4In-Shape) 12Frozen Turns Left:4 $iif($readini(Dm.Other.ini,$chan,Player-2-Frozen) != $null, $v1, 0) 
    } 
  } 
} 
on *:TEXT:!TheirStats:#:{  
  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) { 
      notice $readini(Dm.Players.ini,$chan,Player-1) 14Here are $+ 7 $readini(Dm.Players.ini,$chan,Player-2) $+ 's 14current DM Stats for $+ 7 $chan $+ 14: 12Hitpoints:4 $readini(Dm.Hp.ini,$chan,Player-2) 12Sharks:4 $readini(Dm.Sharks.ini,$chan,Player-2) 12Special Bar:4 $readini(Dm.Spec.ini,$chan,Player-2) $+ % 12Dharoks:4 $iif($readini(Dm.Other.ini,$chan,Player-2-Dh) == Degraded, 4Degraded, 4In-Shape) 12Frozen Turns Left:4 $iif($readini(Dm.Other.ini,$chan,Player-2-Frozen) != $null, $v1, 0) 
      halt 
    } 
    if ($readini(Dm.Players.ini,$chan,Player-2) == $nick) { 
      notice $readini(Dm.Players.ini,$chan,Player-2) 14Here are $+ 7 $readini(Dm.Players.ini,$chan,Player-1) $+ 's 14current DM Stats for $+ 7 $chan $+ 14: 12Hitpoints:4 $readini(Dm.Hp.ini,$chan,Player-1) 12Sharks:4 $readini(Dm.Sharks.ini,$chan,Player-1) 12Special Bar:4 $readini(Dm.Spec.ini,$chan,Player-1) $+ % 12Dharoks:4 $iif($readini(Dm.Other.ini,$chan,Player-1-Dh) == Degraded, 4Degraded, 4In-Shape) 12Frozen Turns Left:4 $iif($readini(Dm.Other.ini,$chan,Player-1-Frozen) != $null, $v1, 0) 
    } 
  } 
} 
on *:TEXT:!Hiscores*:#:{ 
  if (!$2) { 
    notice $nick 14Here are your hiscores from my 7DM 14Script: Wins:7 $iif($readini(Dm.Hiscores.ini,$nick,Wins) != $null, $readini(Dm.Hiscores.ini,$nick,Wins), 0) 14Losses:7 $iif($readini(Dm.Hiscores.ini,$nick,Losses) != $null, $readini(Dm.Hiscores.ini,$nick,Losses), 0) 14Total:7 $calc( $iif($readini(Dm.Hiscores.ini,$nick,Wins) == $null, 0, $v1) + $iif($readini(Dm.Hiscores.ini,$nick,Losses) == $null, 0, $v1)) 
    halt 
  } 
  else { 
    notice $nick 14Here are $+ 7 $2 $+ 's 14hiscores from my 7DM 14Script: Wins:7 $iif($readini(Dm.Hiscores.ini,$2,Wins) != $null, $readini(Dm.Hiscores.ini,$2,Wins), 0) 14Losses:7 $iif($readini(Dm.Hiscores.ini,$2,Losses) != $null, $readini(Dm.Hiscores.ini,$2,Losses), 0) 14Total:7 $calc( $iif($readini(Dm.Hiscores.ini,$2,Wins) == $null, 0, $v1) + $iif($readini(Dm.Hiscores.ini,$2,Losses) == $null, 0, $v1)) 
    halt 
  } 
} 
alias spec { 
  writeini Dm.Spec.ini $2 $1 $calc( $readini(Dm.Spec.ini,$2,$1) - $3 ) 
} 
alias enddm { 
  .timerdmoff $+ $1 off  
  .timerdmnextturn $+ $1 off  
  remini Dm.ini $1 Status 
  remini Dm.Players.ini $1 Player-1 
  remini Dm.Players.ini $1 Player-2 
  remini Dm.Hp.ini $1 Player-1 
  remini Dm.Hp.ini $1 Player-2 
  remini Dm.Sharks.ini $1 Player-1 
  remini Dm.Sharks.ini $1 Player-2 
  remini Dm.Hits.ini $1 DdpSpec 
  remini Dm.Hits.ini $1 DdpSpecTotal 
  remini Dm.Hits.ini $1 Hit 
  remini Dm.Spec.ini $1 Player-1 
  remini Dm.Spec.ini $1 Player-2 
  remini Dm.Turn.ini $1 Turn 
  remini Dm.Other.ini $1 Player-1-Dh 
  remini Dm.Other.ini $1 Player-2-Dh 
  remini Dm.Other.ini $1 Player-1-Frozen 
  remini Dm.Other.ini $1 Player-2-Frozen 
  remini Dm.Other.ini $1 Healed 
} 
alias dmadddcoins { 
  writeini D-Coins.ini $1 Coins $calc( $readini(D-Coins.ini,$1,Coins) $2 $3 ) 
  if ($readini(D-Coins.ini,$1,Coins) < 0) { 
    writeini D-Coins.ini $1 Coins 0 
  } 
} 
alias dmnextturn { 
  .timerdmnextturn $+ $1 off 
  writeini Dm.Turn.ini $1 Turn $2 
  msg $1 7 $+ $readini(Dm.Players.ini,$1,$3) 14hasn't made a move in their DM in $+ 7 $1 $+ 14, so it's now $+ 7 $readini(Dm.Players.ini,$1,$2) $+ 's 14Turn. 
  .timerdmnextturn $+ $1 1 30 dmnextturn $1 $3 $2 
} 
alias dmtimerend { 
  msg $1 14No one has entered $+ 7 $readini(Dm.Players.ini,$1,Player-1) $+ 's 14DM in 30 Seconds, so their DM for $+ 7 $1 14has ended. 
  enddm $1 
} 
alias dmhiscore { 
  writeini Dm.Hiscores.ini $1 $2 $calc($readini(Dm.Hiscores.ini,$1,$2) + 1) 
} 
alias dmwinner { 
  msg $1 7 $+ $readini(Dm.Players.ini,$1,$2) 14WINS! Wins:7 $iif($readini(Dm.Hiscores.ini,$readini(Dm.Players.ini,$1,$2),Wins) != $null, $readini(Dm.Hiscores.ini,$readini(Dm.Players.ini,$1,$2),Wins), 0) 14Losses:7 $iif($readini(Dm.Hiscores.ini,$readini(Dm.Players.ini,$1,$2),Losses) != $null, $readini(Dm.Hiscores.ini,$readini(Dm.Players.ini,$1,$2),Losses), 0) 14Total:7 $calc( $iif($readini(Dm.Hiscores.ini,$readini(Dm.Players.ini,$1,$2),Wins) == $null, 0, $v1) + $iif($readini(Dm.Hiscores.ini,$readini(Dm.Players.ini,$1,$2),Losses) == $null, 0, $v1)) 
  enddm $1 
} 
on *:PART:#:{ 
  if ($readini(Dm.ini,$chan,Status) != $null) { 
    if ($readini(Dm.Players.ini,$chan,Player-1) == $nick) || ($readini(Dm.Players.ini,$chan,Player-2) == $nick) {      
      enddm $chan 
      msg $chan 7 $+ $nick 14has parted $+ 7 $chan $+ 14, so their DM automatically ends. 
      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 
      } 
    } 
  } 
} 
if ($2- == Green Phat) { 
  if ($readini(D-Coins.ini,$nick,GPhat) == Sold) { 
    remini D-Coins.ini $nick GPhat 
    writeini D-Coins.ini $nick Coins $calc( $readini(D-Coins.ini,$nick,Coins) + 1000000) 
    msg $nick 14You have just sold 7Green Phat 14and now have $+ 7 $readini(D-Coins.ini,$nick,Coins) 4D-Coins Left. 
    halt 
  } 
  if ($readini(D-Coins.ini,$nick,GPhat) != Sold) { 
    msg $nick 14You don't even have a Green Phat! To buy, type 7!Buy Cracker 14and type 7!Open 14to see if you got a Green Phat. 
    halt 
  } 
} 
if ($2- == Red Phat) { 
  if ($readini(D-Coins.ini,$nick,RPhat) == Sold) { 
    remini D-Coins.ini $nick RPhat 
    writeini D-Coins.ini $nick Coins $calc( $readini(D-Coins.ini,$nick,Coins) + 1000000) 
    msg $nick 14You have just sold 7Red Phat 14and now have $+ 7 $readini(D-Coins.ini,$nick,Coins) 4D-Coins Left. 
    halt 
  } 
  if ($readini(D-Coins.ini,$nick,RPhat) != Sold) { 
    msg $nick 14You don't even have a Red Phat! To buy, type 7!Buy Cracker 14and type 7!Open 14to see if you got a Red Phat. 
    halt 
  } 
} 

on *:TEXT:!Market*:*:{ 
  msg $nick 4****D-Coins Market**** 3You have $+ 6 $iif($readini(D-Coins.ini,$nick,Coins) == $null, 0, $v1) 3D-Coins 14(To buy, type 7!Buy Item 14[The buy code is the 7underlined14 part in the Market]) 
  msg $nick 14DMace Spec -7 $iif($readini(D-Coins.ini,$nick,DMace) == Sold, SOLD!, For Sale - $+ 4 500 D-Coins) 
  msg $nick 14Guthans -7 $iif($readini(D-Coins.ini,$nick,Guthans) == Sold, SOLD!, For Sale - $+ 4 2000 D-Coins) 
  msg $nick 14Christmas Cracker -7 $iif($readini(D-Coins.ini,$nick,CCracker) == Sold, SOLD!, For Sale - $+ 4 250 D-Coins)  
  msg $nick 14Blue/Green/Red PHat -7 $iif($readini(D-Coins.ini,$nick,BPhat) == Sold, Bought!4 1M D-Coins, Only Buyable through !Cracker)  
} 
on *:TEXT:!Open:*:{ 
  if ($readini(D-Coins.ini,$nick,Cracker) != Sold) { 
    msg $nick 14You havn't even bought a Christmas Cracker! To buy one, type 7!Buy Cracker 
    halt 
  } 
  else { 
    remini D-Coins.ini $nick Cracker 
    set %phat? [ $+ [ $nick ] ] $rand(1,20) 
    if (%phat? [ $+ [ $nick ] ] == 3) { 
      writeini D-Coins.ini $nick BPhat Sold 
      msg $nick 14You open your cracker and.... 7ITS A 12BLUE PHAT7!!! 
      msg #KirbyKoot 7 $+ $nick 14just got a 12Blue Phat! 
      unset %phat? [ $+ [ $nick ] ] 
      halt 
    } 
    if (%phat? [ $+ [ $nick ] ] == 12) { 
      writeini D-Coins.ini $nick RPhat Sold 
      msg $nick 14You open your cracker and.... 7ITS A 4RED PHAT7!!! 
      msg #KirbyKoot 7 $+ $nick 14just got a 4Red Phat! 
      unset %phat? [ $+ [ $nick ] ] 
      halt 
    }    
    if (%phat? [ $+ [ $nick ] ] == 7) { 
      writeini D-Coins.ini $nick GPhat Sold 
      msg $nick 14You open your cracker and.... 7ITS A 3GREEN PHAT7!!! 
      msg #KirbyKoot 7 $+ $nick 14just got a 3Green Phat! 
      unset %phat? [ $+ [ $nick ] ] 
      halt 
    }    
    else { 
      msg $nick 14You open your cracker and.... 7You got nothing.... 
      halt 
    }  
  } 
} 
on *:TEXT:!DCoin Status*:#:{ 
  msg $nick 14Here is your 4D-Coins 14Status: $iif($readini(D-Coins.ini,$nick,BPhat) == Sold, $+(12\,$chr(124),/), 10§) $+ $iif($readini(D-Coins.ini,$nick,RPhat) == Sold, $+(4\,$chr(124),/), 10§) $+ $iif($readini(D-Coins.ini,$nick,GPhat) == Sold, $+(3\,$chr(124),/), 10§) 12D-Coins:4 $iif($readini(D-Coins.ini,$nick,Coins) == $null, 0, $v1) 3~~ 12Guthans?4 $iif($readini(D-Coins.ini,$nick,Guthans) == Sold, Yes, No) 3~~ 12DMace?4 $iif($readini(D-Coins.ini,$nick,DMace) == Sold, Yes, No) 3~~ 12Cracker?4 $iif($readini(D-Coins.ini,$nick,Cracker) == Sold, Yes, No) 3~~    
  msg $nick 12 $+ $+($chr(77),$chr(97),$chr(100),$chr(101),$chr(32),$chr(98),$chr(121),$chr(32),$chr(75),$chr(105),$chr(114),$chr(98),$chr(115),$chr(116),$chr(101),$chr(114)) 
} 
on *:TEXT:!Buy*:*:{ 
  if ($2 == $null) { 
    msg $nick 14You must specify what to buy. E.g: 7!Buy Guthans 
    halt 
  } 
  if ($2 == Guthans) { 
    if ($readini(D-Coins.ini,$nick,Guthans) == Sold) { 
      msg $nick 14You have already bought the 7Guthans! 
      halt 
    }    
    if ($readini(D-Coins.ini,$nick,Coins) >= 2000) { 
      writeini D-Coins.ini $nick Coins $calc( $readini(D-Coins.ini,$nick,Coins) - 2000) 
      writeini D-Coins.ini $nick Guthans Sold 
      msg $nick 14You have just bought 7Guthans 14and now have $+ 7 $readini(D-Coins.ini,$nick,Coins) 4D-Coins Left.  
      halt    
    } 
    else { 
      msg $nick 7Guthans 14costs $+ 7 2000 14D-Coins and you only have $+ 7 $iif($readini(D-Coins.ini,$nick,Coins) == $null, 0, $v1) 14D-Coins. 
      halt    
    } 
  } 
  if ($2 == DMace) { 
    if ($readini(D-Coins.ini,$nick,DMace) == Sold) { 
      msg $nick 14You have already bought the 7DMace Special! 
      halt 
    }    
    if ($readini(D-Coins.ini,$nick,Coins) >= 500) { 
      writeini D-Coins.ini $nick Coins $calc( $readini(D-Coins.ini,$nick,Coins) - 500) 
      writeini D-Coins.ini $nick DMace Sold 
      msg $nick 14You have just bought 7The DMace Special 14and now have $+ 7 $readini(D-Coins.ini,$nick,Coins) 4D-Coins Left. 
      halt 
    } 
    else { 
      msg $nick 7DMace Special 14costs $+ 7 500 14D-Coins and you only have $+ 7 $iif($readini(D-Coins.ini,$nick,Coins) == $null, 0, $v1) 14D-Coins. 
      halt 
    } 
  } 
  if ($2 == Cracker) { 
    if ($readini(D-Coins.ini,$nick,Cracker) == Sold) { 
      msg $nick 14You have already bought the 7Christmas Cracker! 
      halt    
    } 
    if ($readini(D-Coins.ini,$nick,Coins) >= 250) { 
      writeini D-Coins.ini $nick Cracker Sold 
      writeini D-Coins.ini $nick Coins $calc( $readini(D-Coins.ini,$nick,Coins) - 250) 
      msg $nick 14You have just bought 7A Christmas Cracker 14and now have $+ 7 $readini(D-Coins.ini,$nick,Coins) 4D-Coins Left. 14(To Open, type 7!Open 
      halt 
    } 
    else { 
      msg $nick 7A Christmas Cracker 14costs $+ 7 250 14D-Coins and you only have $+ 7 $iif($readini(D-Coins.ini,$nick,Coins) == $null, 0, $v1) 14D-Coins. 
      halt    
    } 
  } 
} 
on *:TEXT:!DCoin Commands:#:{ 
  msg $nick 4****D-Coins Commands****  
  msg $nick 14!Market -7 To see whats up for sale 
  msg $nick 14!Buy Item -7 To buy an item 
  msg $nick 14!Sell Item -7 To sell an item 
  msg $nick 14!DCoin Status -7 To see your D-Coin Status (D-Coins, What you have, ect. ect.) 
  msg $nick 14!Open -7 To open a Christmas Cracker  
}