ON *:TEXT:!dm:#duel1,#duel2:{
  if ($readini(pdm.ini,$chan,Player1) == $nick || $readini(pdm.ini,$chan,Player2) == $nick) {
    notice $nick You're already in the game.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2) {
    notice $nick There is already a Deathmatch, please wait until it is over or join another duel channel.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    writeini pdm.ini $chan Player2 $nick
    writeini dm.ini $chan Status ON2
    writeini hp.ini $chan Player2 99
    writeini turn.ini $chan Turn $rand(1,2)
    writeini shark.ini $chan Player2 20
    writeini spec.ini $chan Player2 100
    writeini spec.ini $chan Player1 100
    msg $chan The deathmatch will be $readini(pdm.ini,$chan,Player1) vs. $readini(pdm.ini,$chan,Player2) $+ !
    msg $chan $readini(pdm.ini,$chan,$+(Player,$readini(turn.ini,$chan,turn))) gets first hit.
    notice $readini(pdm.ini,$chan,Player2) You have 99 hitpoints and 20 sharks, these replenish 20 hitpoints each.
    timerduel $+ $chan 1 60 /stopdm $chan
    halt
  } 
  if ($readini(dm.ini,$chan,Status) == $null) {
    writeini pdm.ini $chan Player1 $nick
    writeini dm.ini $chan Status ON
    writeini hp.ini $chan Player1 99
    writeini shark.ini $chan Player1 20
    msg $chan $readini(pdm.ini,$chan,Player1) has initiated a deathmatch! Type !dm to fight $readini(pdm.ini,$chan,Player1) $+ .
    timerduel $+ $chan 1 60 /stopdm $chan
    notice $readini(pdm.ini,$chan,Player1) You have 99 hitpoints and 20 sharks, these replenish 20 hitpoints each.
    halt
  }
}
ON *:TEXT:!whip*:#duel1,#duel2:{
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick There is no deathmatch in play, type !dm to initiate one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick You do not have a challenger!
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    timerduel $+ $chan off
    timerduel $+ $chan 1 60 /stopdm $chan
    set %chance $rand(0,2)
    if (%chance == 2) || (%chance == 1) { 
      writeini hit.ini $chan Hit $rand(1,35)
    } | else { writeini hit.ini $chan Hit 0 }
    set %player2hp $readini(hp.ini,$chan,Player2)
    writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player2) <= 0 ) {
      timerduel $+ $chan off
      msg $chan $readini(pdm.ini,$chan,Player1) lashes at $readini(pdm.ini,$chan,Player2) with a whip, hitting %player2hp $+ . Leaving $readini(pdm.ini,$chan,Player2) with 0 hp.
      timer 1 2 msg $chan $readini(pdm.ini,$chan,Player1) has won the deathmatch!
      remini dm.ini $chan Status
      remini shark.ini $chan Player1
      remini shark.ini $chan Player2
      remini Hit.ini $chan Hit
      remini Hit.ini $chan Hit2
      remini hp.ini $chan Player1
      remini hp.ini $chan Player2
      remini pdm.ini $chan Player1
      remini pdm.ini $chan Player2
      remini dds.ini $chan Total
      halt
    }
    else {
      msg $chan $readini(pdm.ini,$chan,Player1) lashes at $readini(pdm.ini,$chan,Player2) with a whip, hitting $readini(hit.ini,$chan,Hit) $+ . Leaving $readini(pdm.ini,$chan,Player2) with $readini(hp.ini,$chan,Player2) hp.
      writeini turn.ini $chan Turn 2
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    timerduel $+ $chan off
    timerduel $+ $chan 1 60 /stopdm $chan
    set %chance $rand(0,2)
    if (%chance == 2) || (%chance == 1) { 
      writeini hit.ini $chan Hit $rand(1,35)
    } | else { writeini hit.ini $chan Hit 0 }
    set %player1hp $readini(hp.ini,$chan,Player1)
    writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player1) <= 0 ) {
      timerduel $+ $chan off
      msg $chan $readini(pdm.ini,$chan,Player2) lashes at $readini(pdm.ini,$chan,Player1) with a whip, hitting %player1hp $+ . Leaving $readini(pdm.ini,$chan,Player1) with 0 hp.
      timer 1 2 msg $chan $readini(pdm.ini,$chan,Player2) has won the deathmatch!
      remini dm.ini $chan Status
      remini shark.ini $chan Player1
      remini shark.ini $chan Player2
      remini Hit.ini $chan Hit
      remini Hit.ini $chan Hit2
      remini hp.ini $chan Player1
      remini hp.ini $chan Player2
      remini pdm.ini $chan Player1
      remini pdm.ini $chan Player2
      remini dds.ini $chan Total     
      halt
    }
    else {
      msg $chan $readini(pdm.ini,$chan,Player2) lashes at $readini(pdm.ini,$chan,Player1) with a whip, hitting $readini(hit.ini,$chan,Hit) $+ . Leaving $readini(pdm.ini,$chan,Player1) with $readini(hp.ini,$chan,Player1) hp.
      writeini turn.ini $chan Turn 1
      halt
    }
  }
  else {
    notice $nick It is not your turn to attack, or you are not currently in a deathmatch.
  }
}
ON *:TEXT:!dh*:#duel1,#duel2:{
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick There is no deathmatch in play, type !dm to initiate one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick You do not have a challenger!
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    timerduel $+ $chan off
    timerduel $+ $chan 1 60 /stopdm $chan
    if ($readini(hp.ini,$chan,Player1) >= 81) { writeini hit.ini $chan Hit $rand(0,20) }
    elseif (($readini(hp.ini,$chan,Player1) >= 61) && ($readini(hp.ini,$chan,Player1) <= 80)) { writeini hit.ini $chan Hit $rand(0,30) }
    elseif (($readini(hp.ini,$chan,Player1) >= 41) && ($readini(hp.ini,$chan,Player1) <= 60)) { writeini hit.ini $chan Hit $rand(0,40) }
    elseif (($readini(hp.ini,$chan,Player1) >= 21) && ($readini(hp.ini,$chan,Player1) <= 40)) { writeini hit.ini $chan Hit $rand(0,50) }
    elseif (($readini(hp.ini,$chan,Player1) > 10) && ($readini(hp.ini,$chan,Player1) <= 20)) { writeini hit.ini $chan Hit $rand(0,70) }
    elseif (($readini(hp.ini,$chan,Player1) > 1) && ($readini(hp.ini,$chan,Player1) <= 10)) { writeini hit.ini $chan Hit $rand(5,85) }
    elseif ($readini(hp.ini,$chan,Player1) = 1) { writeini hit.ini $chan Hit $rand(21,99) }
    set %player2hp $readini(hp.ini,$chan,Player2)
    writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player2) <= 0 ) {
      timerduel $+ $chan off
      msg $chan $readini(pdm.ini,$chan,Player1) swings at $readini(pdm.ini,$chan,Player2) with Dharok's Axe, hitting %player2hp $+ . Leaving $readini(pdm.ini,$chan,Player2) with 0 hp.
      timer 1 2 msg $chan $readini(pdm.ini,$chan,Player1) has won the deathmatch!
      remini dm.ini $chan Status
      remini shark.ini $chan Player1
      remini shark.ini $chan Player2
      remini Hit.ini $chan Hit
      remini Hit.ini $chan Hit2
      remini hp.ini $chan Player1
      remini hp.ini $chan Player2
      remini pdm.ini $chan Player1
      remini dds.ini $chan Total     
      remini pdm.ini $chan Player2
      halt
    }
    else {
      msg $chan $readini(pdm.ini,$chan,Player1) swings at $readini(pdm.ini,$chan,Player2) with Dharok's Axe, hitting $readini(hit.ini,$chan,Hit) $+ . Leaving $readini(pdm.ini,$chan,Player2) with $readini(hp.ini,$chan,Player2) hp.
      writeini turn.ini $chan Turn 2
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    timerduel $+ $chan off
    timerduel $+ $chan 1 60 /stopdm $chan
    if ($readini(hp.ini,$chan,Player2) >= 81) { writeini hit.ini $chan Hit $rand(0,20) }
    elseif (($readini(hp.ini,$chan,Player2) >= 61) && ($readini(hp.ini,$chan,Player2) <= 80)) { writeini hit.ini $chan Hit $rand(0,30) }
    elseif (($readini(hp.ini,$chan,Player2) >= 41) && ($readini(hp.ini,$chan,Player2) <= 60)) { writeini hit.ini $chan Hit $rand(0,40) }
    elseif (($readini(hp.ini,$chan,Player2) >= 21) && ($readini(hp.ini,$chan,Player2) <= 40)) { writeini hit.ini $chan Hit $rand(0,50) }
    elseif (($readini(hp.ini,$chan,Player2) > 10) && ($readini(hp.ini,$chan,Player2) <= 20)) { writeini hit.ini $chan Hit $rand(0,70) }
    elseif (($readini(hp.ini,$chan,Player2) > 1) && ($readini(hp.ini,$chan,Player2) <= 10)) { writeinihit.ini $chan Hit $rand(5,85) }
    elseif ($readini(hp.ini,$chan,Player2) = 1) { writeini hit.ini $chan Hit $rand(21,99) }
    set %player2hp $readini(hp.ini,$chan,Player1)
    writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player1) <= 0 ) {
      timerduel $+ $chan off
      msg $chan $readini(pdm.ini,$chan,Player2) swings at $readini(pdm.ini,$chan,Player1) with Dharok's Axe, hitting %player2hp $+ . Leaving $readini(pdm.ini,$chan,Player1) with 0 hp.
      timer 1 2 msg $chan $readini(pdm.ini,$chan,Player2) has won the deathmatch!
      remini dm.ini $chan Status
      remini shark.ini $chan Player1
      remini shark.ini $chan Player2
      remini Hit.ini $chan Hit
      remini Hit.ini $chan Hit2
      remini hp.ini $chan Player1
      remini hp.ini $chan Player2
      remini pdm.ini $chan Player1
      remini pdm.ini $chan Player2
      remini dds.ini $chan Total
      halt
    }
    else {
      msg $chan $readini(pdm.ini,$chan,Player2) swings at $readini(pdm.ini,$chan,Player1) with Dharok's Axe, hitting $readini(hit.ini,$chan,Hit) $+ . Leaving $readini(pdm.ini,$chan,Player1) with $readini(hp.ini,$chan,Player1) hp.
      writeini turn.ini $chan Turn 1
      halt
    }
  }
  else {
    notice $nick It is not your turn to attack, or you are not currently in a deathmatch.
  }
}
ON *:TEXT:!eat*:#duel1,#duel2:{
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick && $readini(shark.ini,$chan,Player2) <= 0 ) {
    Notice $nick You are out of sharks!
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick && $readini(shark.ini,$chan,Player1) <= 0 ) {
    Notice $nick You are out of sharks!
    halt
  }
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick There is no deathmatch in play, type !dm to initiate one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick You can't eat before you have a challenger!
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    timerduel $+ $chan off
    timerduel $+ $chan 1 60 /stopdm $chan
    if ($readini(hp.ini,$chan,Player1) >= 79) { writeini hp.ini $chan Player1 99 }
    elseif ($readini(hp.ini,$chan,Player1) < 79) { writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) + 20 ) }
    writeini shark.ini $chan Player1 $calc( $readini(shark.ini,$chan,Player1) - 1)
    notice $readini(pdm.ini,$chan,Player1) You now have $readini(shark.ini,$chan,Player1) sharks left.
    msg $chan $readini(pdm.ini,$chan,Player1) has eaten a shark, and now has $readini(hp.ini,$chan,Player1) hp.
    writeini turn.ini $chan Turn 2
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    timerduel $+ $chan off
    timerduel $+ $chan 1 60 /stopdm $chan
    if ($readini(hp.ini,$chan,Player2) >= 79) { writeini hp.ini $chan Player2 99 }
    elseif ($readini(hp.ini,$chan,Player2) < 79) { writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) + 20 ) }
    writeini shark.ini $chan Player2 $calc( $readini(shark.ini,$chan,Player2) - 1)
    notice $readini(pdm.ini,$chan,Player2) You now have $readini(shark.ini,$chan,Player2) sharks left.
    msg $chan $readini(pdm.ini,$chan,Player2) has eaten a shark, and now has $readini(hp.ini,$chan,Player2) hp.
    writeini turn.ini $chan Turn 1
    halt
  } 
  else {
    notice $nick It is not your turn to attack, or you are not currently in a deathmatch.
  }
}
ON *:TEXT:!dds*:#duel1,#duel2:{
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick && $readini(spec.ini,$chan,Player1) <= 0 ) {
    notice $nick You have no special bar remaining!
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick && $readini(spec.ini,$chan,Player2) <= 0 ) {
    notice $nick You have no special bar remaining!
    halt
  }
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick There is no deathmatch in play, type !dm to initiate one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick You do not have a challenger!
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    timerduel $+ $chan off
    timerduel $+ $chan 1 60 /stopdm $chan
    if ($readini(hp.ini,$chan,Player2) < 25) { writeini hit.ini $chan Hit $rand(0,$readini(hp.ini,$chan,Player2)) | writeini hit.ini $chan Hit2 $rand(0,$calc($readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit))) }
    else { writeini hit.ini $chan Hit $rand(0,25) | if ($calc($readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit)) >= 25) { writeini hit.ini $chan Hit2 $rand(0,25) }
    else { writeini hit.ini $chan Hit2 $rand(0,$calc($readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit))) } }
    set %player2hp $readini(hp.ini,$chan,Player2)
    writeini dds.ini $chan Total $calc( $readini(hit.ini,$chan,hit) + $readini(hit.ini,$chan,hit2) )
    writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(dds.ini,$chan,total) )
    writeini spec.ini $chan Player1 $calc( $readini(spec.ini,$chan,Player1) - 25 )
    if ($readini(hp.ini,$chan,Player2) <= 0 ) {
      timerduel $+ $chan off
      msg $chan $readini(pdm.ini,$chan,Player1) swipes at $readini(pdm.ini,$chan,Player2) with a DDS Special, hitting $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2) $+ . Leaving $readini(pdm.ini,$chan,Player2) with 0 hp.
      timer 1 2 msg $chan $readini(pdm.ini,$chan,Player1) has won the deathmatch!
      remini dm.ini $chan Status
      remini shark.ini $chan Player1
      remini shark.ini $chan Player2
      remini Hit.ini $chan Hit
      remini Hit.ini $chan Hit2
      remini hp.ini $chan Player1
      remini hp.ini $chan Player2
      remini pdm.ini $chan Player1
      remini pdm.ini $chan Player2
      remini dds.ini $chan Total
      halt
    }
    else {
      notice $nick You have $readini(spec.ini,$chan,Player1) $+ % of your special bar left. 
      msg $chan $readini(pdm.ini,$chan,Player1) swipes at $readini(pdm.ini,$chan,Player2) with a DDS Special, hitting $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2) $+ . Leaving $readini(pdm.ini,$chan,Player2) with $readini(hp.ini,$chan,Player2) hp.
      writeini turn.ini $chan Turn 2
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    timerduel $+ $chan off
    timerduel $+ $chan 1 60 /stopdm $chan
    if ($readini(hp.ini,$chan,Player1) < 25) { writeini hit.ini $chan Hit $rand(0,$readini(hp.ini,$chan,Player1)) | writeini hit.ini $chan Hit2 $rand(0,$calc($readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit))) }
    else { writeini hit.ini $chan Hit $rand(0,25) | if ($calc($readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit)) >= 25) { writeini hit.ini $chan Hit2 $rand(0,25) }
    else { writeini hit.ini $chan Hit2 $rand(0,$calc($readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit))) } }
    set %player2hp $readini(hp.ini,$chan,Player1)
    writeini dds.ini $chan Total $calc( $readini(hit.ini,$chan,hit) + $readini(hit.ini,$chan,hit2) )
    writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(dds.ini,$chan,total) )
    writeini spec.ini $chan Player2 $calc( $readini(spec.ini,$chan,Player2) - 25 )
    if ($readini(hp.ini,$chan,Player1) <= 0 ) {
      timerduel $+ $chan off
      msg $chan $readini(pdm.ini,$chan,Player2) swipes at $readini(pdm.ini,$chan,Player1) with a DDS Special, hitting $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2) $+ . Leaving $readini(pdm.ini,$chan,Player1) with 0 hp.
      timer 1 2 msg $chan $readini(pdm.ini,$chan,Player2) has won the deathmatch!
      remini dm.ini $chan Status
      remini shark.ini $chan Player1
      remini shark.ini $chan Player2
      remini Hit.ini $chan Hit
      remini Hit.ini $chan Hit2
      remini hp.ini $chan Player1
      remini hp.ini $chan Player2
      remini pdm.ini $chan Player1
      remini pdm.ini $chan Player2
      remini dds.ini $chan Total
      halt
    }
    else {
      notice $nick You have $readini(spec.ini,$chan,Player2) $+ % of your special bar left. 
      msg $chan $readini(pdm.ini,$chan,Player2) swipes at $readini(pdm.ini,$chan,Player1) with a DDS Special, hitting $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2) $+ . Leaving $readini(pdm.ini,$chan,Player1) with $readini(hp.ini,$chan,Player1) hp.
      writeini turn.ini $chan Turn 1
      halt
    }
  }
  else {
    notice $nick It is not your turn to attack, or you are not currently in a deathmatch.
  }
}
ON *:TEXT:!stopDM*:#duel1,#duel2:{
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick There is no deathmatch in progress in this channel!
    halt
  }
  if ($nick isop $chan || $nick ishop $chan) {
    msg $chan Deathmatch was halted by $nick $+ .
    remini dm.ini $chan Status
    remini shark.ini $chan Player1
    remini shark.ini $chan Player2
    remini Hit.ini $chan Hit
    remini Hit.ini $chan Hit2
    remini hp.ini $chan Player1
    remini hp.ini $chan Player2
    remini pdm.ini $chan Player1
    remini pdm.ini $chan Player2
    remini dds.ini $chan Total
  }
  else {
    notice $nick You need +h or above to use this command.
  }
}
ON *:TEXT:!dmcommands*:#duel1,#duel2:{
  msg $nick !StopDM - Stops DM, can only be used by halfop and above.
  msg $nick !DM - Initiate a DM.
  msg $nick !Whip - Whip someone, max hit of 35, 66% chance of a hit.
  msg $nick !DDS - Max hit of 25-25, good chance of hitting although it can hit 0.  4 specials allowed per deathmatch.
  msg $nick !DH - Dharoks.  Hits are as follows $chr(91) $+ (3 Your HP ) (4 Hit Range ) $+ $chr(93) $chr(124) $+ $chr(124) $chr(91) $+ (3 1hp ) (4 21-99 (Instant KO if opponent hp 21 or under) ) $+ $chr(93) $chr(124) $chr(91) $+ (3 2-19hp ) (4 0-70 ) $+ $chr(93) $chr(124) $chr(91) $+ (3 20-39hp ) (4 0-50 ) $+ $chr(93) $chr(124) $chr(91) $+ (3 40-59hp ) (4 0-40 ) $+ $chr(93) $chr(124) $chr(91) $+ (3 60-69hp ) (4 0-30 ) $+ $chr(93) $chr(124) $chr(91) $+ (3 70+hp ) (4 0-20 ) $+ $chr(93)
  msg $nick !Eat - Eats a shark, giving you back 20hp, you have 20 of these.
  msg $nick !verac - Gives you a definate low hit of 5-20.
  msg $nick !barrage - Hits 75% chance of a hit, can hit up to 30.
  msg $nick !tele - Teles you away, loser.
}
ON *:TEXT:!tele*:#duel1,#duel2:{
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick There is no deathmatch in play, type !dm to initiate one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick You cannot teleport before the deathmatch has begun!
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    timerduel $+ $chan off
    msg $chan $readini(pdm.ini,$chan,Player1) has teleported away.
    msg $chan $readini(pdm.ini,$chan,Player2) wins the deathmatch!
    remini dm.ini $chan Status
    remini shark.ini $chan Player1
    remini shark.ini $chan Player2
    remini Hit.ini $chan Hit
    remini Hit.ini $chan Hit2
    remini hp.ini $chan Player1
    remini hp.ini $chan Player2
    remini pdm.ini $chan Player1
    remini pdm.ini $chan Player2
    remini dds.ini $chan Total   
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    timerduel $+ $chan off
    msg $chan $readini(pdm.ini,$chan,Player2) has teleported away.
    msg $chan $readini(pdm.ini,$chan,Player1) wins the deathmatch!
    remini dm.ini $chan Status
    remini shark.ini $chan Player1
    remini shark.ini $chan Player2
    remini Hit.ini $chan Hit
    remini Hit.ini $chan Hit2
    remini hp.ini $chan Player1
    remini hp.ini $chan Player2
    remini pdm.ini $chan Player1
    remini pdm.ini $chan Player2
    remini dds.ini $chan Total   
  }
  else { notice $nick It is not your turn to attack, or you are not currently in a deathmatch.
  }
}
ON *:TEXT:!verac*:#duel1,#duel2:{
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick There is no deathmatch in play, type !dm to initiate one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick You do not have a challenger!
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    timerduel $+ $chan off
    timerduel $+ $chan 1 60 /stopdm $chan
    writeini hit.ini $chan Hit $rand(5,20)
    set %player2hp $readini(hp.ini,$chan,Player2)
    writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player2) <= 0 ) {
      timerduel $+ $chan off
      msg $chan $readini(pdm.ini,$chan,Player1) hits $readini(pdm.ini,$chan,Player2) with his flail, smacking %player2hp $+ . Leaving $readini(pdm.ini,$chan,Player2) with 0 hp.
      timer 1 2 msg $chan $readini(pdm.ini,$chan,Player1) has won the deathmatch!
      remini dm.ini $chan Status
      remini shark.ini $chan Player1
      remini shark.ini $chan Player2
      remini Hit.ini $chan Hit
      remini Hit.ini $chan Hit2
      remini hp.ini $chan Player1
      remini hp.ini $chan Player2
      remini pdm.ini $chan Player1
      remini pdm.ini $chan Player2
      remini dds.ini $chan Total
      halt
    }
    else {
      msg $chan $readini(pdm.ini,$chan,Player1) hits $readini(pdm.ini,$chan,Player2) with his flail, smacking $readini(hit.ini,$chan,hit) $+ . Leaving $readini(pdm.ini,$chan,Player2) with $readini(hp.ini,$chan,Player2) hp.
      writeini turn.ini $chan Turn 2
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    timerduel $+ $chan off
    timerduel $+ $chan 1 60 /stopdm $chan
    writeini hit.ini $chan Hit $rand(5,20)
    set %player1hp $readini(hp.ini,$chan,Player1)
    writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player1) <= 0 ) {
      timerduel $+ $chan off
      msg $chan $readini(pdm.ini,$chan,Player2) hits $readini(pdm.ini,$chan,Player1) with his flail, smacking %player1hp $+ . Leaving $readini(pdm.ini,$chan,Player1) with 0 hp.
      timer 1 2 msg $chan $readini(pdm.ini,$chan,Player2) has won the deathmatch!
      remini dm.ini $chan Status
      remini shark.ini $chan Player1
      remini shark.ini $chan Player2
      remini Hit.ini $chan Hit
      remini Hit.ini $chan Hit2
      remini hp.ini $chan Player1
      remini hp.ini $chan Player2
      remini pdm.ini $chan Player1
      remini pdm.ini $chan Player2
      remini dds.ini $chan Total     
      halt
    }
    else {
      msg $chan $readini(pdm.ini,$chan,Player2) hits $readini(pdm.ini,$chan,Player1) with his flail, smacking $readini(hit.ini,$chan,hit) $+ . Leaving $readini(pdm.ini,$chan,Player1) with $readini(hp.ini,$chan,Player1) hp.
      writeini turn.ini $chan Turn 1
      halt
    }
  }
  else {
    notice $nick It is not your turn to attack, or you are not currently in a deathmatch.
  }
}
ON *:TEXT:!barrage*:#duel1,#duel2:{
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick There is no deathmatch in play, type !dm to initiate one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick You do not have a challenger!
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    timerduel $+ $chan off
    timerduel $+ $chan 1 60 /stopdm $chan
    set %chance $rand(0,3)
    if (%chance == 1) || (%chance == 2) || (%chance == 3) { writeini hit.ini $chan Hit $rand(1,30) }
    else { writeini hit.ini $chan Hit 0 }
    set %player2hp $readini(hp.ini,$chan,Player2)
    writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player2) <= 0 ) {
      timerduel $+ $chan off
      msg $chan $readini(pdm.ini,$chan,Player1) attempts to cast ice barrage on $readini(pdm.ini,$chan,Player2) hitting %player2hp $+ . Leaving $readini(pdm.ini,$chan,Player2) with 0 hp.
      timer 1 2 msg $chan $readini(pdm.ini,$chan,Player1) has won the deathmatch!
      remini dm.ini $chan Status
      remini shark.ini $chan Player1
      remini shark.ini $chan Player2
      remini Hit.ini $chan Hit
      remini Hit.ini $chan Hit2
      remini hp.ini $chan Player1
      remini hp.ini $chan Player2
      remini pdm.ini $chan Player1
      remini pdm.ini $chan Player2
      remini dds.ini $chan Total
      halt
    }
    else {
      msg $chan $readini(pdm.ini,$chan,Player1) attempts to cast ice barrage on $readini(pdm.ini,$chan,Player2) hitting $readini(hit.ini,$chan,Hit) $+ . Leaving $readini(pdm.ini,$chan,Player2) with $readini(hp.ini,$chan,Player2) hp.
      writeini turn.ini $chan Turn 2
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    timerduel $+ $chan off
    timerduel $+ $chan 1 60 /stopdm $chan
    writeini hit.ini $chan Hit $rand(5,20)
    set %player1hp $readini(hp.ini,$chan,Player1)
    writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player1) <= 0 ) {
      timerduel $+ $chan off
      msg $chan $readini(pdm.ini,$chan,Player2) attempts to cast ice barrage on $readini(pdm.ini,$chan,Player1) hitting %player1hp $+ . Leaving $readini(pdm.ini,$chan,Player1) with 0 hp.
      timer 1 2 msg $chan $readini(pdm.ini,$chan,Player2) has won the deathmatch!
      remini dm.ini $chan Status
      remini shark.ini $chan Player1
      remini shark.ini $chan Player2
      remini Hit.ini $chan Hit
      remini Hit.ini $chan Hit2
      remini hp.ini $chan Player1
      remini hp.ini $chan Player2
      remini pdm.ini $chan Player1
      remini pdm.ini $chan Player2
      remini dds.ini $chan Total     
      halt
    }
    else {
      msg $chan $readini(pdm.ini,$chan,Player2) attempts to cast ice barrage on $readini(pdm.ini,$chan,Player1) hitting $readini(hit.ini,$chan,Hit) $+ . Leaving $readini(pdm.ini,$chan,Player1) with $readini(hp.ini,$chan,Player1) hp.
      writeini turn.ini $chan Turn 1
      halt
    }
  }
  else {
    notice $nick It is not your turn to attack, or you are not currently in a deathmatch.
  }
}
on 1:QUIT:{ if ($nick == $readini(pdm.ini,#duel1,Player1)) { stopdmquit #duel1 $nick $readini(pdm.ini,#duel1,Player2) }
  elseif ($nick == $readini(pdm.ini,#duel1,Player2)) { stopdmquit #duel1 $nick $readini(pdm.ini,#duel1,Player1) }
  elseif ($nick == $readini(pdm.ini,#duel2,Player1)) { stopdmquit #duel1 $nick $readini(pdm.ini,#duel1,Player2) }
  elseif ($nick == $readini(pdm.ini,#duel2,Player2)) { stopdmquit #duel1 $nick $readini(pdm.ini,#duel1,Player1) }
}
on 1:PART:#duel1,#duel2:{ if ($nick == $readini(pdm.ini,#duel1,Player1)) { stopdmpart $chan $nick $readini(pdm.ini,$chan,Player2) }
  elseif ($nick == $readini(pdm.ini,#duel1,Player2)) { stopdmquit $chan $nick $readini(pdm.ini,$chan,Player1) }
}
on 1:KICK:#duel1,#duel2:{ if ($knick == $readini(pdm.ini,#duel1,Player1)) { stopdmkick $chan $knick $readini(pdm.ini,$chan,Player2) }
  elseif ($knick == $readini(pdm.ini,#duel1,Player2)) { stopdmkick $chan $nick $readini(pdm.ini,$chan,Player1) }
}
on 1:NICK:{ if ($nick == $readini(pdm.ini,#duel1,Player1)) { writeini pdm.ini #duel1 Player1 $newnick }
  elseif ($nick == $readini(pdm.ini,#duel1,Player2)) { writeini pdm.ini #duel1 Player2 $newnick }
  elseif ($nick == $readini(pdm.ini,#duel2,Player1)) { writeini pdm.ini #duel2 Player1 $newnick }
  elseif ($nick == $readini(pdm.ini,#duel2,Player2)) { writeini pdm.ini #duel2 Player2 $newnick }
}