alias -l c1 { return $+($chr(3),14,$1-,$chr(3)) }
alias -l c2 { return $+($chr(3),04,$1-,$chr(3)) }
alias -l c3 { return $+($chr(3),06,$1-,$chr(3)) }
alias -l c4 { return $+($chr(3),02,$1-,$chr(3)) }
alias -l c5 { return $+($chr(3),03,$1-,$chr(3)) }
alias -l c6 { return $+($chr(3),07,$1-,$chr(3)) }
on *:TEXT:!dmcommands*:#: {
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
    notice $nick $c3(¤) $c2(Dm Commands) $c3(¤)
    notice $nick $c2(!dm) $c6(~) $c1(To start/join a Death Match) 
    notice $nick $c2(!stopdm) $c6(~) $c1(To stop a dm if you're in it)
    notice $nick $c2(!defaultwin) $c6(~) $c1(Use it if your opponent doesnt attack)
    notice $nick $c2(!rank Nick) $c6(~) $c1(To see someone's DM Stats)
    notice $nick $c2(!dmweps) $c6(~) $c1(To see the DM Weapons)
  }
}
on *:TEXT:!dmweps*:#: {
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    notice $nick $c3(¤) $c2(Dm Weapons) $c3(¤) 
    notice $nick $c2(!dds) $c6(~) $c1(To dds spec your opponent, uses 25% spec) 
    notice $nick $c2(!whip) $c6(~) $c1(To whip your opponent)
    notice $nick $c2(!d2h) $c6(~) $c1(To d2h your opponent)
    notice $nick $c2(!cbow) $c6(~) $c1(To range your opponent)
    notice $nick $c2(!dmace) $c6(~) $c1(To smash your opponent)
    notice $nick $c2(!dh) $c6(~) $c1(To strike your opponent with your Dharok's Greataxe) 
    notice $nick $c2(!barrage) $c6(~) $c1(To barrage your opponent) 
    notice $nick $c2(!eat) $c6(~) $c1(To eat a shark and heal 20 hp) 
    notice $nick $c2(!spec) $c6(~) $c1(To recharge 25% spec)
    notice $nick $c2(!dmcommands) $c6(~) $c1(To see the commands) 
  }
}
on *:TEXT:!rank*:#: {  
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
    if ($2 == $null) {
      notice $nick $c3(¤) $c6($nick) $c3(¤) $c2(Won:) $c6($readini(dm.ini,$nick,Won)) $c3(¤) $c2(Lost:) $c6($readini(dm.ini,$nick,Lost)) $c3(¤)
    }
    else {
      notice $nick $c3(¤) $c6($2) $c3(¤) $c2(Won:) $c6($readini(dm.ini,$2,Won)) $c3(¤) $c2(Lost:) $c6($readini(dm.ini,$2,Lost)) $c3(¤)
    }
  }
}
on *:TEXT:!defaultwin*:#: {  
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) {
    if ($readini(dm.ini,$chan,AutoWin) == $readini(dm.ini,$chan,nick2) || $readini(dm.ini,$chan,AutoWin) == $readini(dm.ini,$chan,nick1)) {
      halt
    }
    if ($nick == $readini(dm.ini,$chan,nick1) && $readini(dm.ini,$chan,turn) == 2) {
      msg $chan $c2($nick) $c1(has called for a) $c2(default win.) $c1(If) $c2($readini(dm.ini,$chan,nick2)) $c1(doesn't attack in 1 minute) $c2($nick) $c1(Wins !)
      writeini -n dm.ini $chan AutoWin $readini(dm.ini,$chan,nick2)
      timer $+ $chan $+ AutoWin1 1 60 writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
      timer $+ $chan $+ AutoWin2 1 60 writeini -n dm.ini $readini(dm.ini,$chan,nick1) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Won) + 1 )
      timer $+ $chan $+ AutoWin3 1 60 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!) $c4((by default))
      timer $+ $chan $+ AutoWin4 1 60 remini -n dm.ini $chan
      halt 
    }
    if ($nick == $readini(dm.ini,$chan,nick2) && $readini(dm.ini,$chan,turn) == 1) {
      msg $chan $c2($nick) $c1(has called for a) $c2(default win.) $c1(If) $c2($readini(dm.ini,$chan,nick1)) $c1(doesn't attack in 1 minute) $c2($nick) $c1(Wins !)
      writeini -n dm.ini $chan AutoWin  $readini(dm.ini,$chan,nick1)
      timer $+ $chan $+ AutoWin1 1 60 writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
      timer $+ $chan $+ AutoWin2 1 60 writeini -n dm.ini $readini(dm.ini,$chan,nick1) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Won) + 1 )
      timer $+ $chan $+ AutoWin3 1 60 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!) $c4((by default))
      timer $+ $chan $+ AutoWin4 1 60 remini -n dm.ini $chan 
      halt 
    }
  }
} 
on *:TEXT:!dm:#: { 
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤) 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,status) == on) { 
      notice $nick $c3(¤) $c1(There's already a) $c2(Death Match) $c1(active) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting && $readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick $c3(¤) $c1(You're already in the) $c2(Death Match) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting && $readini(dm.ini,$chan,nick2)) == $null) { 
      writeini -n dm.ini $chan nick2 $nick 
      writeini -n dm.ini $chan turn 1 
      writeini -n dm.ini $chan status on 
      timer $+ $chan $+ 1 off 
      timer $+ $chan $+ 2 off 
      msg $chan $c2(DeathMath!) $c5($readini(dm.ini,$chan,nick1)) $c1(vs.) $c5($readini(dm.ini,$chan,nick2) !) $c1(Type) $c2(!DmWeps) $c1(to see how to attack!) $c2(Let the fight BEGIN !) 
      notice $readini(dm.ini,$chan,nick1) $c3(¤) $c1(You are attacking first!) $c2(Good luck!) $c3(¤)
      notice $readini(dm.ini,$chan,nick2) $c3(¤) $c2($readini(dm.ini,$chan,nick1)) $c1(is attacking first!) $c2(Good luck!) $c3(¤) 
    } 
    if ($readini(dm.ini,$chan,status) == $null) { 
      writeini -n dm.ini $chan barrage1 3 
      writeini -n dm.ini $chan barrage2 3 
      writeini -n dm.ini $chan status waiting 
      writeini -n dm.ini $chan nick1 $nick 
      writeini -n dm.ini $chan nick1hp 99 
      writeini -n dm.ini $chan nick2hp 99 
      writeini -n dm.ini $chan nick1sharks 3 
      writeini -n dm.ini $chan nick2sharks 3 
      writeini -n dm.ini $chan nick1spec 100 
      writeini -n dm.ini $chan nick2spec 100 
      timer $+ $chan $+ 1 1 30 remini -n dm.ini $chan 
      timer $+ $chan $+ 2 1 30 msg $chan $c1(The) $c2(Death Math) $c1(has been canceled) $c2((Not enough players)) 
      msg $chan $c2($nick) $c1(has started a) $c2(DeathMath!) $c1(To fight) $c2($nick) $c1(type) $c2(!Dm) 
    } 
  } 
} 
on $*:TEXT:/^[!](dds|ddagger|dagger)$/Si:*:{ 
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤)
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤) 
      halt 
    }
    if ($readini(dm.ini,$chan,AutoWin) == $nick) {
      timer $+ $chan $+ AutoWin1 off
      timer $+ $chan $+ AutoWin2 off
      timer $+ $chan $+ AutoWin3 off
      timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin | remini -n dm.ini $chan AutoWin
      msg $chan $c2(Default Win) $c1(ended)
    }  
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick $c3(¤) $c1(Please wait) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 1) && ($readini(dm.ini,$chan,nick1) == $nick) && ($readini(dm.ini,$chan,nick1spec) <= 24) { 
      notice $nick $c3(¤) $c1(You don't have enough) $c2(energy) $c1(left!) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp) 
      writeini -n dm.ini $chan oldspec1 $readini(dm.ini,$chan,nick1spec) 
      writeini -n dm.ini $chan nick1spec $calc( $readini(dm.ini,$chan,oldspec1) - 25 ) 
      writeini -n dm.ini $chan hit1 $rand(1,20) 
      writeini -n dm.ini $chan hit2 $rand(1,25) 
      writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1) + $readini(dm.ini,$chan,hit2)) ) 
      if ($readini(dm.ini,$chan,nick2hp) <= 0) { 
        msg $chan $c2($nick) $c1(specs a) $c2($readini(dm.ini,$chan,hit1)) $c1(and a) $c2($readini(dm.ini,$chan,hit2)) $c1(on) $c2($readini(dm.ini,$chan,nick2) $+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 ) 
        remini -n dm.ini $chan 
        halt 
      } 
      else {
        remini -n dm.ini $chan $nick
        msg $chan $c2($nick) $c1(specs a) $c2($readini(dm.ini,$chan,hit1)) $c1(and a) $c2($readini(dm.ini,$chan,hit2)) $c1(on) $c2($readini(dm.ini,$chan,nick2)$+ 12.) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!) 
        notice $nick $c3(¤) $c1(You have) $c2($readini(dm.ini,$chan,nick1spec) $+ %) $c1(spec left) $c3(¤) 
        writeini -n dm.ini $chan turn 2 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!) 
        halt 
      } 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick && $readini(dm.ini,$chan,nick2spec) <= 24) { 
      notice $nick $c3(¤) $c1(You don't have enough) $c2(energy) $c1(left!) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp) 
      writeini -n dm.ini $chan oldspec2 $readini(dm.ini,$chan,nick2spec) 
      writeini -n dm.ini $chan nick2spec $calc( $readini(dm.ini,$chan,oldspec2) - 25 ) 
      writeini -n dm.ini $chan hit1 $rand(1,25) 
      writeini -n dm.ini $chan hit2 $rand(1,25) 
      writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1) - $readini(dm.ini,$chan,hit2) ) 
      if ($readini(dm.ini,$chan,nick1hp) <= 0) {
        msg $chan $c2($nick) $c1(specs a) $c2($readini(dm.ini,$chan,hit1)) $c1(and a) $c2($readini(dm.ini,$chan,hit2)) $c1(on) $c2($readini(dm.ini,$chan,nick1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!) 
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
        remini -n dm.ini $chan 
        halt 
      } 
      else {
        remini -n dm.ini $chan $nick
        msg $chan $c2($nick) $c1(specs a) $c2($readini(dm.ini,$chan,hit1)) $c1(and a) $c2($readini(dm.ini,$chan,hit2)) $c1(on) $c2($readini(dm.ini,$chan,nick1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!) 
        notice $nick $c3(¤) $c1(You have) $c2($readini(dm.ini,$chan,nick2spec) $+ %) $c1(spec left) $c3(¤)  
        writeini -n dm.ini $chan turn 1 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!)
        halt 
      } 
    } 
    else { 
      notice $nick $c3(¤) $c1(It's not your turn) $c3(¤)
    } 
  } 
} 

on $*:TEXT:/^[!](heal|shark|eat)$/Si:*:{ 
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤) 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick $c3(¤) $c1(There are no) $c2(Death Math's) $c1(on. To start one Type) $c2(!Dm) $c3(¤) 
      halt 
    }
    if ($readini(dm.ini,$chan,AutoWin) == $nick) {
      timer $+ $chan $+ AutoWin1 off
      timer $+ $chan $+ AutoWin2 off
      timer $+ $chan $+ AutoWin3 off
      timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
      msg $chan $c2(Default Win) $c1(ended)
    }  
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick $c3(¤) $c1(Please wait) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,Turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick && $readini(dm.ini,$chan,nick2sharks) <= 0) { 
      notice $nick $c3(¤) $c1(You have no sharks left) $c3(¤)  
      halt 
    } 
    if ($readini(dm.ini,$chan,Turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick && $readini(dm.ini,$chan,nick1sharks) <= 0) { 
      notice $nick $c3(¤) $c1(You have no sharks left) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan nick1hp $calc($readini(dm.ini,$chan,nick1hp)+20) 
      writeini -n dm.ini $chan nick1sharks $calc($readini(dm.ini,$chan,nick1sharks) - 1) 
      if ($readini(dm.ini,$chan,nick1hp) >= 100) { 
        writeini -n dm.ini $chan nick1hp 99 
        msg $chan $c2($nick) $c1(ate a Shark.) $c2($nick) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hitpoints left)  
        notice $nick $c3(¤) $c1(You have) $c2($readini(dm.ini,$chan,nick1sharks)) $c1(shark/s left) $c3(¤) 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!) 
        writeini -n dm.ini $chan Turn 2 
        halt 
      } 
      else { 
        msg $chan $c2($nick) $c1(ate a Shark.) $c2($nick) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hitpoints left)  
        notice $nick $c3(¤) $c1(You have) $c2($readini(dm.ini,$chan,nick1sharks)) $c1(shark left) $c3(¤) 
        writeini -n dm.ini $chan Turn 2 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!) 
        halt 
      } 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan nick2hp $calc($readini(dm.ini,$chan,nick2hp)+20) 
      writeini -n dm.ini $chan nick2sharks $calc($readini(dm.ini,$chan,nick2sharks) - 1) 
      if ($readini(dm.ini,$chan,nick2hp) >= 100) { 
        writeini -n dm.ini $chan nick2hp 99 
        msg $chan $c2($nick) $c1(ate a Shark.) $c2($nick) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hitpoints left)  
        notice $nick $c3(¤) $c1(You have) $c2($readini(dm.ini,$chan,nick2sharks)) $c1(shark/s left) $c3(¤)
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!) 
        writeini -n dm.ini $chan Turn 1 
        halt 
      } 
      else { 
        msg $chan $c2($nick) $c1(ate a Shark.) $c2($nick) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hitpoints left)  
        notice $nick $c3(¤) $c1(You have) $c2($readini(dm.ini,$chan,nick2sharks)) $c1(shark/s left) $c3(¤) 
        writeini -n dm.ini $chan Turn 1 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!) 
        halt 
      } 
    } 
    else { 
      notice $nick $c3(¤) $c1(It's not your turn) $c3(¤) 
    } 
  } 
} 
on $*:TEXT:/^[!](stopdm|enddm|haltdm)$/Si:*:{   
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤) 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤)
      halt 
    }
    if ($nick == Nedyc) {
      msg $chan $c1(The) $c2(Death Match) $c1(has been ended by) $c2($nick $+ .)
      remini -n dm.ini $chan
    } 
    if ($readini(dm.ini,$chan,status) == waiting && $readini(dm.ini,$chan,nick1) == $nick) {
      msg $chan $c1(The) $c2(Death Match) $c1(has been ended by) $c2($nick $+ .)
      remini -n dm.ini $chan
    }
    if ($nick == $readini(dm.ini,$chan,nick2)) {   
      msg $chan $c1(The) $c2(Death Match) $c1(has been ended by) $c2($nick $+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(is the winner!)
      writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
      writeini -n dm.ini $readini(dm.ini,$chan,nick1) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Won) + 1 )
      remini -n dm.ini $chan 
      halt 
    }
    if ($nick == $readini(dm.ini,$chan,nick1)) {  
      msg $chan $c1(The) $c2(Death Match) $c1(has been ended by) $c2($nick $+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(is the winner!)
      writeini -n dm.ini $readini(dm.ini,$chan,nick2) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Won) + 1 )
      writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
      remini -n dm.ini $chan 
      halt 
    }
    if ($nick isop $chan) {
      if ($chan == #Nedyc) { halt }
      remini -n dm.ini $chan  
      msg $chan $c1(The) $c2(Death Match) $c1(has been ended by) $c2($nick) 
      halt 
    }
  } 
}
on $*:TEXT:/^[!](dmace|mace|dragonmace)$/Si:*:{  
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤) 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,AutoWin) == $nick) {
      timer $+ $chan $+ AutoWin1 off
      timer $+ $chan $+ AutoWin2 off
      timer $+ $chan $+ AutoWin3 off
      timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
      msg $chan $c2(Default Win) $c1(ended)
    } 
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick $c3(¤) $c1(Please wait) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤) 
      halt 
    }  
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp) 
      writeini -n dm.ini $chan hit1 $rand(0,40)  
      writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) ) 
      if ($readini(dm.ini,$chan,nick2hp) <= 0) { 
        msg $chan $c2($nick) $c1(smashes) $c2($readini(dm.ini,$chan,nick2)) $c1(with a dragon mace hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)  
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
        remini -n dm.ini $chan 
        halt 
      } 
      else {
        remini -n dm.ini $chan $nick
        msg $chan $c2($nick) $c1(smashes) $c2($readini(dm.ini,$chan,nick2)) $c1(with a dragon mace hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!) 
        writeini -n dm.ini $chan turn 2 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!) 
        halt 
      } 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp) 
      writeini -n dm.ini $chan hit1 $rand(0,40) 
      writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1)) 
      if ($readini(dm.ini,$chan,nick1hp) <= 0) { 
        msg $chan $c2($nick) $c1(smashes) $c2($readini(dm.ini,$chan,nick1)) $c1(with a dragon mace hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 ) 
        remini -n dm.ini $chan 
        halt 
      } 
      else {
        remini -n dm.ini $chan $nick
        msg $chan $c2($nick) $c1(smashes) $c2($readini(dm.ini,$chan,nick1)) $c1(with a dragon mace hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!)  
        writeini -n dm.ini $chan turn 1 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!) 
      } 
    } 
    else { 
      notice $nick $c3(¤) $c1(It's not your turn) $c3(¤) 
    } 
  } 
}
on $*:TEXT:/^[!](cbow|xbow|bow)$/Si:*:{  
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤) 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,AutoWin) == $nick) {
      timer $+ $chan $+ AutoWin1 off
      timer $+ $chan $+ AutoWin2 off
      timer $+ $chan $+ AutoWin3 off
      timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
      msg $chan $c2(Default Win) $c1(ended)
    } 
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick $c3(¤) $c1(Please wait) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤) 
      halt 
    }  
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp) 
      writeini -n dm.ini $chan hit1 $rand(1,35)  
      writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) ) 
      if ($readini(dm.ini,$chan,nick2hp) <= 0) { 
        msg $chan $c2($nick) $c1(fires an arrow to) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)  
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
        remini -n dm.ini $chan 
        halt 
      } 
      else {
        remini -n dm.ini $chan $nick
        msg $chan $c2($nick) $c1(fires an arrow to) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!) 
        writeini -n dm.ini $chan turn 2 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!) 
        halt 
      } 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp) 
      writeini -n dm.ini $chan hit1 $rand(1,35) 
      writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1)) 
      if ($readini(dm.ini,$chan,nick1hp) <= 0) { 
        msg $chan $c2($nick) $c1(fires an arrow to) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 ) 
        remini -n dm.ini $chan 
        halt 
      } 
      else {
        remini -n dm.ini $chan $nick
        msg $chan $c2($nick) $c1(fires an arrow to) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!)  
        writeini -n dm.ini $chan turn 1 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!) 
      } 
    } 
    else { 
      notice $nick $c3(¤) $c1(It's not your turn) $c3(¤) 
    } 
  } 
}
on $*:TEXT:/^[!](d2h|2h|dragon2h)$/Si:*:{  
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤) 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤) 
      halt 
    }
    if ($readini(dm.ini,$chan,AutoWin) == $nick) {
      timer $+ $chan $+ AutoWin1 off
      timer $+ $chan $+ AutoWin2 off
      timer $+ $chan $+ AutoWin3 off
      timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
      msg $chan $c2(Default Win) $c1(ended)
    }  
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick $c3(¤) $c1(Please wait) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤) 
      halt 
    }  
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp) 
      writeini -n dm.ini $chan hit1 $rand(1,35)  
      writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) ) 
      if ($readini(dm.ini,$chan,nick2hp) <= 0) { 
        msg $chan $c2($nick) $c1(d2hnd's a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick2)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)  
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
        remini -n dm.ini $chan 
        halt 
      } 
      else {
        remini -n dm.ini $chan $nick 
        msg $chan $c2($nick) $c1(d2hnd's a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick2)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!) 
        writeini -n dm.ini $chan turn 2 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!) 
        halt 
      } 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp) 
      writeini -n dm.ini $chan hit1 $rand(1,35) 
      writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1)) 
      if ($readini(dm.ini,$chan,nick1hp) <= 0) { 
        msg $chan $c2($nick) $c1(d2hnd's a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 ) 
        remini -n dm.ini $chan 
        halt 
      } 
      else {
        remini -n dm.ini $chan $nick 
        msg $chan $c2($nick) $c1(d2hnd's a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!) 
        writeini -n dm.ini $chan turn 1 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!) 
      } 
    } 
    else { 
      notice $nick $c3(¤) $c1(It's not your turn) $c3(¤) 
    } 
  } 
} 
on $*:TEXT:/^[!](whip|flick|lash)$/Si:*:{  
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤) 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick $c3(¤) $c1(Please wait) $c3(¤) 
      halt 
    }
    if ($readini(dm.ini,$chan,AutoWin) == $nick) {
      timer $+ $chan $+ AutoWin1 off
      timer $+ $chan $+ AutoWin2 off
      timer $+ $chan $+ AutoWin3 off
      timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
      msg $chan $c2(Default Win) $c1(ended)
    }  
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤) 
      halt 
    }  
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp) 
      writeini -n dm.ini $chan hit1 $rand(10,30)  
      writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) ) 
      if ($readini(dm.ini,$chan,nick2hp) <= 0) {
        msg $chan $c2($nick) $c1(whips a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick2)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)  
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
        remini -n dm.ini $chan 
        halt 
      } 
      else {
        remini -n dm.ini $chan $nick 
        msg $chan $c2($nick) $c1(whips a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick2)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!) 
        writeini -n dm.ini $chan turn 2 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!) 
        halt 
      } 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp) 
      writeini -n dm.ini $chan hit1 $rand(10,30) 
      writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1)) 
      if ($readini(dm.ini,$chan,nick1hp) <= 0) { 
        msg $chan $c2($nick) $c1(whips a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
        remini -n dm.ini $chan 
        halt 
      } 
      else { 
        remini -n dm.ini $chan $nick
        msg $chan $c2($nick) $c1(whips a) $c2($readini(dm.ini,$chan,hit1)) $c1(on) $c2($readini(dm.ini,$chan,nick1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!) 
        writeini -n dm.ini $chan turn 1 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!) 
      } 
    } 
    else { 
      notice $nick $c3(¤) $c1(It's not your turn) $c3(¤) 
    } 
  } 
} 
on $*:TEXT:/^[!](dh|dharock|gaxe)$/Si:*:{
  if ($readini(dm.ini,$chan,$nick) == Dharock) { 
    notice $nick $c3(¤) $c1(You are still recovering from your) $c2(Dharok) $c1(hit before. Use another attack) $c3(¤) 
    halt 
  }
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤) 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick $c3(¤) $c1(Please wait) $c3(¤) 
      halt 
    }
    if ($readini(dm.ini,$chan,AutoWin) == $nick) {
      timer $+ $chan $+ AutoWin1 off
      timer $+ $chan $+ AutoWin2 off
      timer $+ $chan $+ AutoWin3 off
      timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
      msg $chan $c2(Default Win) $c1(ended)
    }  
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤) 
      halt 
    }  
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp) 
      writeini -n dm.ini $chan hit1 $rand(1,60)    
      writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) ) 
      if ($readini(dm.ini,$chan,nick2hp) <= 0) { 
        msg $chan $c2($nick) $c1(strikes at) $c2($readini(dm.ini,$chan,nick2)) $c1(with his greataxe hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 ) 
        remini -n dm.ini $chan 
        halt 
      } 
      else {
        msg $chan $c2($nick) $c1(strikes at) $c2($readini(dm.ini,$chan,nick2)) $c1(with his greataxe hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!)
        writeini -n dm.ini $chan $nick Dharock  
        writeini -n dm.ini $chan turn 2 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!) 
        halt 
      } 
    }  
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp) 
      writeini -n dm.ini $chan hit1 $rand(1,35)   
      writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1)) 
      if ($readini(dm.ini,$chan,nick1hp) <= 0) { 
        msg $chan $c2($nick) $c1(strikes at) $c2($readini(dm.ini,$chan,nick1)) $c1(with his greataxe hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 ) 
        remini -n dm.ini $chan 
        halt 
      } 
      else { 
        msg $chan $c2($nick) $c1(strikes at) $c2($readini(dm.ini,$chan,nick1)) $c1(with his greataxe hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!)
        writeini -n dm.ini $chan $nick Dharock 
        writeini -n dm.ini $chan turn 1  
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!) 
      } 
    } 
    else { 
      notice $nick $c3(¤) $c1(It's not your turn) $c3(¤) 
    } 
  } 
} 
on *:TEXT:!adddmchan*:#:{ 
  if ($nick == Nedyc) { 
    writeini -n alloweddm.ini $2 allowed allowed 
    notice $nick $c3(¤) $c1(Added) $c2($2) $c1(to the Allowed List) $c3(¤) 
  } 
} 
on *:TEXT:!deldmchan*:#:{ 
  if ($nick == Nedyc) { 
    remini -n alloweddm.ini $2 allowed 
    notice $nick $c3(¤) $c1(Removed) $c2($2) $c1(from the Allowed List) $c3(¤) 
  } 
} 
on $*:TEXT:/^[!](ice|barrage|ancient)$/Si:*:{ 
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤)
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤) 
      halt 
    }
    if ($readini(dm.ini,$chan,AutoWin) == $nick) {
      timer $+ $chan $+ AutoWin1 off
      timer $+ $chan $+ AutoWin2 off
      timer $+ $chan $+ AutoWin3 off
      timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
      msg $chan $c2(Default Win) $c1(ended)
    }  
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick $c3(¤) $c1(Please wait) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤) 
      halt 
    }  
    if ($readini(dm.ini,$chan,Turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick && $readini(dm.ini,$chan,barrage2) <= 0) { 
      notice $nick $c3(¤) $c1(You are out of runes) $c3(¤)
      halt 
    } 
    if ($readini(dm.ini,$chan,Turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick && $readini(dm.ini,$chan,barrage1) <= 0) { 
      notice $nick $c3(¤) $c1(You are out of runes) $c3(¤)
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp) 
      writeini -n dm.ini $chan hit1 $rand(1,30) 
      writeini -n dm.ini $chan freeze $rand(1,10) 
      writeini -n dm.ini $chan barrage1 $calc($readini(dm.ini,$chan,barrage1)-1) 
      writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) ) 
      if ($readini(dm.ini,$chan,nick2hp) <= 0) { 
        msg $chan $c2($nick) $c1(ice barrages) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
        remini -n dm.ini $chan 
        halt 
      } 
      elseif ($readini(dm.ini,$chan,freeze) >= 5) {
        remini -n dm.ini $chan $nick
        msg $chan $c2($nick) $c1(ice barrages) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!) 
        msg $chan $c2($readini(dm.ini,$chan,nick2)) $c1(has been frozen and missed their turn!) $c1(It is) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn again!) 
        halt 
      } 
      else { 
        remini -n dm.ini $chan $nick
        msg $chan $c2($nick) $c1(ice barrages) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!) 
        writeini -n dm.ini $chan turn 2 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!) 
        halt 
      } 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp) 
      writeini -n dm.ini $chan hit1 $rand(1,30) 
      writeini -n dm.ini $chan barrage2 $calc($readini(dm.ini,$chan,barrage2)-1) 
      writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1)) 
      writeini -n dm.ini $chan freeze $rand(1,10) 
      if ($readini(dm.ini,$chan,nick1hp) <= 0) { 
        msg $chan $c2($nick) $c1(ice barrages) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
        remini -n dm.ini $chan 
        halt 
      } 
      elseif ($readini(dm.ini,chan,freeze) <= 5) {
        remini -n dm.ini $chan $nick 
        msg $chan $c2($nick) $c1(ice barrages) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!) 
        msg $chan $c2($readini(dm.ini,$chan,nick1)) $c1(has been frozen and missed their turn!) $c1(It is) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn again!) 
        halt 
      } 
      else {
        remini -n dm.ini $chan $nick 
        msg $chan $c2($nick) $c1(ice barrages) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!) 
        writeini -n dm.ini $chan turn 1 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!) 
        halt 
      } 
    } 
    else { 
      notice $nick $c3(¤) $c1(It's not your turn) $c3(¤) 
    } 
  } 
} 
on *:TEXT:!win*:#: { 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,status) == on) { 
      if ($nick == Nedyc) { 
        msg $chan $c2($nick) $c1(randomly comes into the fight and hits a) $c2(99) $c1(on) $c2($readini(dm.ini,$chan,nick1)) $c1(and) $c2($readini(dm.ini,$chan,nick2)) $c1(. Owned Pl0x!) $c2(Nedyc WINS :D) 
        remini -n dm.ini $chan 
      } 
    } 
  } 
} 
on *:TEXT:!spec*:#: {  
  if ($1 == !speccheck) { halt } 
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤) 
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤) 
      halt 
    }
    if ($readini(dm.ini,$chan,AutoWin) == $nick) {
      timer $+ $chan $+ AutoWin1 off
      timer $+ $chan $+ AutoWin2 off
      timer $+ $chan $+ AutoWin3 off
      timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
      msg $chan $c2(Default Win) $c1(ended)
    }  
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick $c3(¤) $c1(Please wait) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,Turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick && $readini(dm.ini,$chan,nick2spec) >= 100) { 
      notice $nick $c3(¤) $c1(You already have max spec) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,Turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick && $readini(dm.ini,$chan,nick1spec) >= 100) { 
      notice $nick $c3(¤) $c1(You already have max spec) $c3(¤)  
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan nick1spec $calc( $readini(dm.ini,$chan,nick1spec)+25) 
      msg $chan $c2($nick) $c1(recharged) $c2(25%) $c1(of their spec,) $c2($nick) $c1(now has) $c2($readini(dm.ini,$chan,nick1spec) $+ %) $c1(spec) 
      msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!) 
      writeini -n dm.ini $chan Turn 2 
      halt 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan nick2spec $calc( $readini(dm.ini,$chan,nick2spec)+25) 
      msg $chan $c2($nick) $c1(recharged) $c2(25%) $c1(of their spec,) $c2($nick) $c1(now has) $c2($readini(dm.ini,$chan,nick2spec) $+ %) $c1(spec)  
      msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!)  
      writeini -n dm.ini $chan Turn 1 
      halt 
    } 
    else { 
      notice $nick $c3(¤) $c1(It's not your turn) $c3(¤) 
    } 
  } 
}
on 1:NICK: {
  if ($nick == $readini(dm.ini,$chan,nick1)) {
    writeini dm.ini $chan nick1 $newnick
    halt
  }
  if ($nick == $readini(dm.ini,$chan,nick2)) {
    writeini dm.ini $chan nick2 $newnick
    halt
  }
}
on *:QUIT: {
  if ($readini(dm.ini,$chan,status) == waiting && $readini(dm.ini,$chan,nick1) == $nick) {
    remini -n dm.ini $chan
    msg $chan $c2(Death Match) $c1(cancelled)
    halt
  }
  if ($nick == $readini(dm.ini,$chan,nick1)) {
    msg $chan $c1(The) $c2(Death Match) $c1(has been ended because) $c2($nick) $c1(has left the channel.) $c2($readini(dm.ini,$chan,nick1)) $c1(is the winner!)
    writeini -n dm.ini $readini(dm.ini,$chan,nick2) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Won) + 1 )
    writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
    remini -n dm.ini $chan 
    halt 
  }
  if ($nick == $readini(dm.ini,$chan,nick2)) {
    msg $chan $c1(The) $c2(Death Match) $c1(has been ended because) $c2($nick) $c1(has left the channel.) $c2($readini(dm.ini,$chan,nick1)) $c1(is the winner!)
    writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
    writeini -n dm.ini $readini(dm.ini,$chan,nick1) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Won) + 1 )
    remini -n dm.ini $chan 
    halt
  }
}
on *:KICK:#: {
  if ($readini(dm.ini,$chan,status) == waiting && $readini(dm.ini,$chan,nick1) == $knick) {
    remini -n dm.ini $chan
    msg $chan $c2(Death Match) $c1(cancelled)
    halt
  }
  if ($knick == $readini(dm.ini,$chan,nick1)) {
    msg $chan $c1(The) $c2(Death Match) $c1(has been ended because) $c2($nick) $c1(has left the channel.) $c2($readini(dm.ini,$chan,nick1)) $c1(is the winner!)
    writeini -n dm.ini $readini(dm.ini,$chan,nick2) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Won) + 1 )
    writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
    remini -n dm.ini $chan 
    halt 
  }
  if ($knick == $readini(dm.ini,$chan,nick2)) {
    msg $chan $c1(The) $c2(Death Match) $c1(has been ended because) $c2($nick) $c1(has left the channel.) $c2($readini(dm.ini,$chan,nick1)) $c1(is the winner!)
    writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
    writeini -n dm.ini $readini(dm.ini,$chan,nick1) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Won) + 1 )
    remini -n dm.ini $chan 
    halt
  }
}
on *:PART:#: {
  if ($readini(dm.ini,$chan,status) == waiting && $readini(dm.ini,$chan,nick1) == $nick) {
    remini -n dm.ini $chan
    msg $chan $c2(Death Match) $c1(cancelled)
    halt
  } 
  if ($nick == $readini(dm.ini,$chan,nick1)) {
    msg $chan $c1(The) $c2(Death Match) $c1(has been ended because) $c2($nick) $c1(has left the channel.) $c2($readini(dm.ini,$chan,nick1)) $c1(is the winner!)
    writeini -n dm.ini $readini(dm.ini,$chan,nick2) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Won) + 1 )
    writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
    remini -n dm.ini $chan 
    halt 
  }
  if ($nick == $readini(dm.ini,$chan,nick2)) {
    msg $chan $c1(The) $c2(Death Match) $c1(has been ended because) $c2($nick) $c1(has left the channel.) $c2($readini(dm.ini,$chan,nick1)) $c1(is the winner!)
    writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 )
    writeini -n dm.ini $readini(dm.ini,$chan,nick1) Won $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Won) + 1 )
    remini -n dm.ini $chan 
    halt
  }
}
on $*:TEXT:/^[!](guth|guthans|guth)$/Si:*:{
  if ($readini(alloweddm.ini,$chan,allowed) == $null) { 
    notice $nick $c3(¤) $c1(Join) $c2(#Nedyc) $c1(for) $c2(Death Match's) $c3(¤)
    halt 
  } 
  if ($readini(alloweddm.ini,$chan,allowed) == allowed) { 
    if ($readini(dm.ini,$chan,Status) == $null) { 
      notice $nick $c3(¤) $c1(There are no) $c2(Death Match's) $c1(on. To start one Type) $c2(!Dm) $c3(¤) 
      halt 
    }
    if ($readini(dm.ini,$chan,AutoWin) == $nick) {
      timer $+ $chan $+ AutoWin1 off
      timer $+ $chan $+ AutoWin2 off
      timer $+ $chan $+ AutoWin3 off
      timer $+ $chan $+ AutoWin4 off | remini -n dm.ini $chan AutoWin
      msg $chan $c2(Default Win) $c1(ended)
    }  
    if ($readini(dm.ini,$chan,status) == waiting) && ($readini(dm.ini,$chan,nick1) == $nick) { 
      notice $nick $c3(¤) $c1(Please wait) $c3(¤) 
      halt 
    } 
    if ($readini(dm.ini,$chan,status) == waiting) { 
      notice $nick $c3(¤) $c1(Type) $c2(!Dm) $c1(to join the) $c2(DeathMath) $c1(with) $c2($readini(dm.ini,$chan,nick1)) $c3(¤) 
      halt 
    }  
    if ($readini(dm.ini,$chan,turn) == 1 && $readini(dm.ini,$chan,nick1) == $nick) { 
      writeini -n dm.ini $chan oldhp2 $readini(dm.ini,$chan,nick2hp) 
      writeini -n dm.ini $chan hit1 $rand(5,30) 
      writeini -n dm.ini $chan heal $rand(1,10) 
      writeini -n dm.ini $chan barrage1 $calc($readini(dm.ini,$chan,barrage1)-1) 
      writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) - ($readini(dm.ini,$chan,hit1)) ) 
      if ($readini(dm.ini,$chan,nick2hp) <= 0) { 
        msg $chan $c2($nick) $c1(guthans) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick2) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick2),Lost) + 1 ) 
        remini -n dm.ini $chan 
        halt 
      } 
      elseif ($readini(dm.ini,$chan,heal) >= 5) {
        remini -n dm.ini $chan $nick
        writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) + ($readini(dm.ini,$chan,hit1)) )
        if ($readini(dm.ini,$chan,nick1hp >= 100)) {
          writeini -n dm.ini $chan nick1hp 99
        }
        msg $chan $c2($nick) $c1(guthans) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(is able to heal himself using guthans and now has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hitpoints.) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!) 
        writeini -n dm.ini $chan turn 2 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!) 
        halt 
      } 
      else { 
        remini -n dm.ini $chan $nick
        msg $chan $c2($nick) $c1(guthans) $c2($readini(dm.ini,$chan,nick2)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hp left!) 
        writeini -n dm.ini $chan turn 2 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick2) $+ 's) $c1(turn!) 
        halt 
      } 
    } 
    if ($readini(dm.ini,$chan,turn) == 2 && $readini(dm.ini,$chan,nick2) == $nick) { 
      writeini -n dm.ini $chan oldhp1 $readini(dm.ini,$chan,nick1hp) 
      writeini -n dm.ini $chan hit1 $rand(5,30) 
      writeini -n dm.ini $chan barrage2 $calc($readini(dm.ini,$chan,barrage2)-1) 
      writeini -n dm.ini $chan nick1hp $calc( $readini(dm.ini,$chan,nick1hp) - $readini(dm.ini,$chan,hit1)) 
      writeini -n dm.ini $chan heal $rand(1,10) 
      if ($readini(dm.ini,$chan,nick1hp) <= 0) { 
        msg $chan $c2($nick) $c1(guthans) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2(0) $c1(hp left!) 
        timer 1 3 msg $chan $c2($nick) $c1(has won the) $c2(DeathMatch!)
        writeini -n dm.ini $nick Won $calc($readini(dm.ini,$nick,Won) + 1)
        writeini -n dm.ini $readini(dm.ini,$chan,nick1) Lost $calc($readini(dm.ini,$readini(Dm.ini,$chan,nick1),Lost) + 1 )
        remini -n dm.ini $chan 
        halt 
      } 
      elseif ($readini(dm.ini,chan,heal) <= 5) {
        remini -n dm.ini $chan $nick
        writeini -n dm.ini $chan nick2hp $calc( $readini(dm.ini,$chan,nick2hp) + ($readini(dm.ini,$chan,hit1)) )
        if ($readini(dm.ini,$chan,nick2hp >= 100)) {
          writeini -n dm.ini $chan nick2hp 99
        } 
        msg $chan $c2($nick) $c1(guthans) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick2)) $c1(is able to heal himself using guthans and now has) $c2($readini(dm.ini,$chan,nick2hp)) $c1(hitpoints.) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!) 
        writeini -n dm.ini $chan turn 1 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!) 
        halt 
      } 
      else {
        remini -n dm.ini $chan $nick 
        msg $chan $c2($nick) $c1(guthans) $c2($readini(dm.ini,$chan,nick1)) $c1(hitting a) $c2($readini(dm.ini,$chan,hit1)12$+ .) $c2($readini(dm.ini,$chan,nick1)) $c1(has) $c2($readini(dm.ini,$chan,nick1hp)) $c1(hp left!) 
        writeini -n dm.ini $chan turn 1 
        msg $chan $c1(It is now) $c2($readini(dm.ini,$chan,nick1) $+ 's) $c1(turn!) 
        halt 
      } 
    } 
    else { 
      notice $nick $c3(¤) $c1(It's not your turn) $c3(¤) 
    } 
  } 
}
alias -l hiscore_duel {
  var %alls = 0, %allp = 0, %wins = 0, %winp = 0, %loss = 0, %losp = 0, %a = 0
  while (%a < $readini(dm.ini,0,Won)) {
    var %a = %a + 1, %p = $readini(dm.ini,,%a), %s = $readini(duels.ini,alltime,%p), %win = $gettok(%s,1,32), %los = $gettok(%s,2,32)
    if (%win > %wins) var %wins = $v1, %winp = %p
    if (%los > %loss) var %loss = $v1, %losp = %p
    if ($calc(%los + %win) > %alls) var %alls = $v1, %allp = %p
  }
  notice $1 $c1(Most Wins:) $+($c2(%winp),$c1($chr(40)),$c2(%wins),$c1($chr(41))) 
  notice $1 $c1(Most Losses:) $+($c2(%losp),$c1($chr(40)),$c2(%loss),$c1($chr(41)))
  notice $1 $c1(Most DMs played:) $+($c2(%allp),$c1($chr(40)),$c2(%alls),$c1($chr(41)))
}
alias -l checkscore {
  var %alls = 0, %allp = 0, %wins = 0, %winp = 0, %loss = 0, %losp = 0, %a = 0
  while (%a < $ini(duels.ini,alltime,0)) {
    var %a = %a + 1, %p = $ini(duels.ini,alltime,%a), %s = $readini(duels.ini,alltime,%p), %win = $gettok(%s,1,32), %los = $gettok(%s,2,32)
    if (%win > %wins) var %wins = $v1, %winp = %p
    if (%los > %loss) var %loss = $v1, %losp = %p
    if ($calc(%los + %win) > %alls) var %alls = $v1, %allp = %p
  }
  return %allp %winp %losp
}