on *:TEXT:!dm:#:{
  if ($chan == #bot || $chan == #bots || $chan == b0t || $chan == b0ts) halt {
    else {
      if (%dmstart) && (!%dmrun) {
        if ($nick == %dmp1) {
          .notice $nick 14You may not fight yourself.
          /halt
        }
        /unset %dmstart
        .msg $chan 14*** 7[ 14Dm7 ]14 $nick Has joined The dm against %dmp1
        /set %dmp2 $nick
        .msg $chan 14*** 7[ 14Dm7 ]14 The fighters in this DM are %dmp1 and %dmp2
        .msg $chan 14Both fighters will recieve 0720 14sharks which heal 0720 14and start with the maximum of 399 14HP
        /unset %dmstart
        /set %dmp2 $nick
        /set %dmrun 1
        /set %hp [ $+ [ %dmp1 ] ] 99
        /set %hp [ $+ [ %dmp2 ] ] 99
        /set %food [ $+ [ %dmp1 ] ] 20
        /set %food [ $+ [ %dmp2 ] ] 20
        /set %spec [ $+ [ %dmp1 ] ] 100
        /set %spec [ $+ [ %dmp2 ] ] 100
        /set %firstp $rand(1,2)
        if (%firstp == 1) {
          /set %turn %dmp1 
          .msg $chan 14 %dmp1 gets the first attack!
          /unset %firstp
        }
        if (%firstp == 2) {
          /set %turn %dmp2
          .msg $chan 14 %dmp2 gets the first attack!
          /unset %firstp
        }
      }
      elseif (!%dmrun) {
        .msg $chan 14*** 7[ 14Dm7 ]14  $nick Has initiated a DM! Type !dm to fight them.
        /set %dmp1 $nick
        /set %dmstart 1
        /set %dmchan $chan
        /.timerDm 1 30 unsetdm
      }
      else {
        .notice $nick 14Sorry, there is already a Dm running, please wait for that one to end.
      }
      if (%dmrun) {
        /.timerdm off
      }
    }
  }
}
on *:TEXT:!stopdm:#:{
  if ($nick == %dmp1) || ($nick == %dmp2) || ($nick isop %dmchan) || ($nick == treacle108) || ($nick == Erico) {

    if (%dmstart) {
      .msg $chan 14*** 7[ 14Dm7 ]14 The Dm invitation has been closed by $nick $+ .
    }
    elseif (%dmrun) {
      .msg $chan 14*** 7[ 14Dm7 ]14 The Dm between %dmp1 and %dmp2 has been ended by $nick $+ .
    }
    else {
      .msg $chan 14*** 7[ 14Dm7 ]14 There is no Dm to stop.
    }
    /timerdm off
    /unset %dmstart
    /unset %dmrun
    /unset %hp*
    /unset %food*
    /unset %spec* 
    /unset %dmp*
    /unset %dhp*
    /unset %whp*
    /unset %ghp*
    /unset %turn
    /unset %dmchan
    /unset %hax*
  }
}

on *:TEXT:!spec*:#:{
  if ($nick == %dmp1) {
    .notice $nick 14You have %spec [ $+ [ %dmp1 ] ] $+ % special energy left.
  }
  elseif ($nick == %dmp2) { 
    .notice $nick 14You have %spec [ $+ [ %dmp2 ] ] $+ % special energy left.
  }
  else {
    .notice $nick 14You are not fighting in this Dm.
  }
}
on *:TEXT:!food*:#:{
  if ($nick == %dmp1) {
    .notice $nick 14You have %food [ $+ [ %dmp1 ] ] sharks left.
  }
  elseif ($nick == %dmp2) { 
    .notice $nick 14You have %food [ $+ [ %dmp2 ] ] sharks left.
  }
  else {
    .notice $nick 14You are not fighting in this Dm.
  }
}
on *:TEXT:!eat*:#:{
  if (%dmrun) {
    if ($nick != %dmp1) && ($nick != %dmp2) {
      .notice $nick 14You are not fighting in this Dm.
    }
    else {
      if ($nick != %turn) {
        .notice $nick 14It is not your turn.
      }
      else {
        if ($nick == %dmp1) {
          if (%food [ $+ [ %dmp1 ] ] > 0) {
            /set %hp [ $+ [ %dmp1 ] ] $calc(%hp [ $+ [ %dmp1 ] ] + 20)
            if (%hp [ $+ [ %dmp1 ] ] > 99) {
              /set %hp [ $+ [ %dmp1 ] ] 99
            }
            /dec %food [ $+ [ %dmp1 ] ] 1
            if (%spec [ $+ [ %dmp1 ] ] < 100) {
              /inc %spec [ $+ [ %dmp1 ] ] 5
            }
            .msg $chan 14 $nick has eaten a shark. You now have 3 $+ %hp [ $+ [ %dmp1 ] ] 14hp.
            .notice $nick 14You have %food [ $+ [ %dmp1 ] ] sharks left. 
            .msg $chan 14It is now %dmp2 $+ 's turn.
            /set %turn %dmp2
          } 
          else { 
            .notice $nick 14Sorry, you have no food left to eat.
            /set %turn %dmp2
            .msg $chan  14It is now %dmp2 $+ 's turn.
          }
        }
        if ($nick == %dmp2) {
          if (%food [ $+ [ %dmp2 ] ] > 0) {
            /inc %hp [ $+ [ %dmp2 ] ] 20
            if (%hp [ $+ [ %dmp2 ] ] > 99) {
              /set %hp [ $+ [ %dmp2 ] ] 99
            }
            /dec %food [ $+ [ %dmp2 ] ] 1
            if (%spec [ $+ [ %dmp2 ] ] < 100) {
              /inc %spec [ $+ [ %dmp2 ] ] 5
            }
            .msg $chan 14 $nick has eaten a shark. You now have 3 $+ %hp [ $+ [ %dmp2 ] ] 14hp.
            .notice $nick 14You have %food [ $+ [ %dmp2 ] ] sharks left.
            .msg $chan 14It is now %dmp1 $+ 's turn.
            /set %turn %dmp1
          } 
          else { 
            .notice $nick 14Sorry, you have no food left to eat.
            /set %turn %dmp1
            .msg $chan  14It is now %dmp1 $+ 's turn.
          }
        }
      }
    }
  }
}
on *:TEXT:!whip*:#:{
  if (%dmrun) {
    if ($nick != %dmp1) && ($nick != %dmp2) {
      .notice $nick 14You are not fighting in this Dm.
    }
    else {
      if ($nick != %turn) {
        .notice $nick 14It is not your turn.
      }
      else {
        if ($nick == %dmp1) {
          /set %whp2 $rand(0,35)
          if (%whp2 < %hp [ $+ [ %dmp2 ] ]) {
            /dec %hp [ $+ [ %dmp2 ] ] %whp2
            .msg $chan 14 %dmp1 has hit %dmp2 with their whip and has done4 %whp2 14damage. %dmp2 has3 %hp [ $+ [ %dmp2 ] ] 14hp left.
            if (%spec [ $+ [ %dmp1 ] ] < 100) {
              /inc %spec [ $+ [ %dmp1 ] ] 5
            }
            .msg $chan 14It is now %dmp2 $+ 's turn.
            /set %turn %dmp2
            /unset %whp2
            /halt
          }
          if (%whp2 > %hp [ $+ [ %dmp2 ] ]) {
            /set %whp2 %hp [ $+ [ %dmp2 ] ]
            /dec %hp [ $+ [ %dmp2 ] ] %whp2  
            .msg $chan 14 %dmp1 has hit a4 %whp2 14with their whip leaving %dmp2 with3 %hp [ $+ [ %dmp2 ] ] 14hp. Congratulations %dmp1 $+ , you won the Dm!
            /timerdm off
            /unset %dmstart
            /unset %dmrun
            /unset %hp*
            /unset %food*
            /unset %spec* 
            /unset %dmp*
            /unset %dhp*
            /unset %whp*
            /unset %ghp*
            /unset %turn
            /unset %dmchan
            /unset %hax*
            /Halt
          } 
        }
        if ($nick == %dmp2) {
          /set %whp1 $rand(0,35)
          if (%whp1 < %hp [ $+ [ %dmp1 ] ]) {
            /dec %hp [ $+ [ %dmp1 ] ] %whp1
            .msg $chan 14 %dmp2 has hit %dmp1 with their whip and has done 4 $+ %whp1 14damage. %dmp1 has 3 $+ %hp [ $+ [ %dmp1 ] ] 14hp left.
            if (%spec [ $+ [ %dmp2 ] ] < 100) {
              /inc %spec [ $+ [ %dmp2 ] ] 5
            }
            .msg $chan 14 It is now %dmp1 $+ 's turn.
            /set %turn %dmp1
            /unset %whp1
            /halt
          }
          if (%whp1 > %hp [ $+ [ %dmp1 ] ]) {
            /set %whp1 %hp [ $+ [ %dmp1 ] ]
            /dec %hp [ $+ [ %dmp1 ] ] %whp1
            .msg $chan 14 %dmp2 has hit a4 %whp1 14with their whip leaving %dmp1 with3 %hp [ $+ [ %dmp1 ] ] 14hp. Congratulations %dmp2 $+ , you won the Dm!
            /timerdm off
            /unset %dmstart
            /unset %dmrun
            /unset %hp*
            /unset %food*
            /unset %spec* 
            /unset %dmp*
            /unset %dhp*
            /unset %whp*
            /unset %ghp*
            /unset %turn
            /unset %dmchan
            /unset %hax*
            /Halt
          }
        }
      }
    }
  }
  else {
    .notice $nick 14A DM is not running and thus you may not attack your opponent.
  }
}
on *:TEXT:!dds*:#:{
  if (%dmrun) {
    if ($nick != %dmp1) && ($nick != %dmp2) {
      .notice $nick 14You are not fighting in this Dm.
    }
    else {
      if ($nick != %turn) {
        .notice $nick 14It is not your turn.
      }
      else {
        if ($nick == %dmp1) {
          if (%spec [ $+ [ %dmp1 ] ] >= 25) { 
            /set %dhp1p2 $rand(0,25)
            /set %dhp2p2 $rand(0,25)
            if ($calc(%dhp1p2 + %dhp2p2) < %hp [ $+ [ %dmp2 ] ]) {
              /dec %hp [ $+ [ %dmp2 ] ] %dhp1p2
              /dec %hp [ $+ [ %dmp2 ] ] %dhp2p2
              /dec %spec [ $+ [ %dmp1 ] ] 25
              .notice $nick 14You now have %spec [ $+ [ %dmp1 ] ] $+ % of your spec bar left.
              .msg $chan 14 %dmp1 has hit %dmp2 with their dds and has done 4 %dhp1p2 14and 4 %dhp2p2 14damage. %dmp2 has3 %hp [ $+ [ %dmp2 ] ] 14hp left.
              if (%spec [ $+ [ %dmp1 ] ] < 100) {
                /inc %spec [ $+ [ %dmp1 ] ] 5
              }
              .msg $chan 14It is now %dmp2 $+ 's turn.
              /set %turn %dmp2
              /unset %dhp1p2
              /unset %dhp2p2
              /halt
            }
            if ($calc(%dhp1p2 + %dhp2p2) >= %hp [ $+ [ %dmp2 ] ]) { 
              /set %dhp1p2 $floor($calc($($+(%,hp,$(%dmp2,2)),2)/2))
              /set %dhp2p2 $ceil($calc($($+(%,hp,$(%dmp2,2)),2)/2))
              /dec %hp [ $+ [ %dmp2 ] ] %dhp1p2
              /dec %hp [ $+ [ %dmp2 ] ] %dhp2p2
              .msg $chan 14 %dmp1 has hit a4 %dhp1p2 14and4 %dhp2p2 14on %dmp2 leaving %dmp2 with3 %hp [ $+ [ %dmp2 ] ] 14hp. Congratulations %dmp1 $+ , you won the Dm!
              /timerdm off
              /unset %dmstart
              /unset %dmrun
              /unset %hp*
              /unset %food*
              /unset %spec* 
              /unset %dmp*
              /unset %dhp*
              /unset %whp*
              /unset %ghp*
              /unset %turn
              /unset %dmchan
              /unset %hax*
              /Halt
            } 
          }
          else { 
            .notice $nick 14You do not have enough spec energy to do that. You have %spec [ $+ [ %dmp1 ] ] $+ % of your spec energy left.
            .msg $chan 14It is now %dmp2 $+ 's turn.
            /set %turn %dmp2
          }
        }
        if ($nick == %dmp2) {
          if (%spec [ $+ [ %dmp2 ] ] >= 25) {
            /set %dhp1p1 $rand(0,25)
            /set %dhp2p1 $rand(0,25)
            if ($calc(%dhp1p1 + %dhp2p1) < %hp [ $+ [ %dmp1 ] ]) {
              /dec %hp [ $+ [ %dmp1 ] ] %dhp2p1
              /dec %hp [ $+ [ %dmp1 ] ] %dhp1p1
              /dec %spec [ $+ [ %dmp2 ] ] 25
              .notice $nick 14You now have %spec [ $+ [ %dmp2 ] ] $+ % of your spec bar left.
              .msg $chan 14 %dmp2 has hit %dmp1 with their dds and has done 4 $+ %dhp1p1 14 and 4 %dhp2p1 14damage. %dmp1 has 3 $+ %hp [ $+ [ %dmp1 ] ] 14hp left.
              if (%spec [ $+ [ %dmp2 ] ] < 100) {
                /inc %spec [ $+ [ %dmp2 ] ] 5
              }
              .msg $chan 14It is now %dmp1 $+ 's turn.
              /set %turn %dmp1
              /unset %dhp1p1
              /unset %dhp2p1
              /halt
            }
            if ($calc(%dhp1p1 + %dhp2p1) >= %hp [ $+ [ %dmp1 ] ]) {
              /set %dhp1p1 $floor($calc($($+(%,hp,$(%dmp1,2)),2)/2))
              /set %dhp2p1 $ceil($calc($($+(%,hp,$(%dmp1,2)),2)/2))
              /dec %hp [ $+ [ %dmp1 ] ] %dhp1p1
              /dec %hp [ $+ [ %dmp1 ] ] %dhp2p1
              .msg $chan 14 %dmp2 has hit a4 %dhp1p1  and4 %dhp2p1 14on %dmp1 leaving %dmp1 with3 %hp [ $+ [ %dmp1 ] ] 14hp. Congratulations %dmp2 $+ , you won the Dm!
              /timerdm off
              /unset %dmstart
              /unset %dmrun
              /unset %hp*
              /unset %food*
              /unset %spec* 
              /unset %dmp*
              /unset %dhp*
              /unset %whp*
              /unset %ghp*
              /unset %turn
              /unset %dmchan
              /unset %hax*
              /Halt
            }
          }
          else {
            .notice $nick 14You do not have enough spec energy to do that. You have %spec [ $+ [ %dmp2 ] ] $+ % of your spec energy left.
            .msg $chan 14It is now %dmp1 $+ 's turn.
            /set %turn %dmp1
          }
        }
      }
    }
  }
  else {
    .notice $nick 14A DM is not running and thus you may not attack your opponent.
  }
}
on *:TEXT:!gmaul*:#:{
  if (%dmrun) {
    if ($nick != %dmp1) && ($nick != %dmp2) {
      .notice $nick 14You are not fighting in this Dm.
    }
    else {
      if ($nick != %turn) {
        .notice $nick 14It is not your turn.
      }
      else {
        if ($nick == %dmp1) {
          if (%spec [ $+ [ %dmp1 ] ] >= 100) { 
            /set %ghp1p2 $rand(0,20)
            /set %ghp2p2 $rand(0,20)
            /set %ghp3p2 $rand(0,20)
            if ($calc(%ghp1p2 + %ghp2p2 + %ghp3p2) < %hp [ $+ [ %dmp2 ] ]) {
              /dec %hp [ $+ [ %dmp2 ] ] %ghp1p2
              /dec %hp [ $+ [ %dmp2 ] ] %ghp2p2
              /dec %hp [ $+ [ %dmp2 ] ] %ghp3p2
              /dec %spec [ $+ [ %dmp1 ] ] 100
              .notice $nick 14You now have %spec [ $+ [ %dmp1 ] ] $+ % of your spec bar left.
              .msg $chan 14 %dmp1 has hit %dmp2 with their granite maul and has done4 %ghp1p2 $+ , 4 %ghp2p2 14 and4 %ghp3p2 14damage leaving %dmp2 with3 %hp [ $+ [ %dmp2 ] ] 14hp.
              if (%spec [ $+ [ %dmp1 ] ] < 100) {
                /inc %spec [ $+ [ %dmp1 ] ] 5
              }
              .msg $chan 14It is now %dmp2 $+ 's turn.
              /set %turn %dmp2
              /unset %ghp1p2
              /unset %ghp2p2
              /unset %ghp3p2
              /halt
            }
            if ($calc(%ghp1p2 + %ghp2p2 + %ghp3p2) >= %hp [ $+ [ %dmp2 ] ]) {
              /set %ghpcv1 $rand(1,3)
              if (%ghpcv1 = 1) { 
                /set %ghp1p2 $floor($calc($($+(%,hp,$(%dmp2,2)),2)/2))
                /set %ghp2p2 $ceil($calc($($+(%,hp,$(%dmp2,2)),2)/2))
                /set %ghp3p2 0
              }
              if (%ghpcv1 = 2) {
                /set %ghp1p2 $floor($calc($($+(%,hp,$(%dmp2,2)),2)/2))
                /set %ghp3p2 $ceil($calc($($+(%,hp,$(%dmp2,2)),2)/2))
                /set %ghp2p2 0
              }
              if (%ghpcv1 = 3) {
                /set %ghp3p2 $floor($calc($($+(%,hp,$(%dmp2,2)),2)/2))
                /set %ghp2p2 $ceil($calc($($+(%,hp,$(%dmp2,2)),2)/2))
                /set %ghp1p2 0
              }
              /dec %hp [ $+ [ %dmp2 ] ] %ghp3p2
              /dec %hp [ $+ [ %dmp2 ] ] %ghp2p2
              /dec %hp [ $+ [ %dmp2 ] ] %ghp1p2
              .msg $chan 14 %dmp1 has hit %dmp2 with their granite maul and has done4 %ghp1p2 $+ , 4 %ghp2p2 14 and4 %ghp3p2 14damage. %dmp2 has3 %hp [ $+ [ %dmp2 ] ] 14hp left. Congratulations %dmp1 $+ , you won the Dm!
              /timerdm off
              /unset %dmstart
              /unset %dmrun
              /unset %hp*
              /unset %food*
              /unset %spec* 
              /unset %dmp*
              /unset %dhp*
              /unset %whp*
              /unset %ghp*
              /unset %turn
              /unset %dmchan
              /unset %hax*
              /Halt
            } 
          }
          else { 
            .notice $nick 14You do not have enough spec energy to do that. You have %spec [ $+ [ %dmp1 ] ] $+ % of your spec energy left.
            .msg $chan 14It is now %dmp2 $+ 's turn.
            /set %turn %dmp2
          }
        }
        if ($nick == %dmp2) {
          if (%spec [ $+ [ %dmp2 ] ] = 100) {
            /set %ghp1p1 $rand(0,20)
            /set %ghp2p1 $rand(0,20)
            /set %ghp3p1 $rand(0,20)
            if ($calc(%ghp1p1 + %ghp2p1 + %ghp3p1) < %hp [ $+ [ %dmp1 ] ]) { 
              /dec %hp [ $+ [ %dmp1 ] ] %ghp1p1
              /dec %hp [ $+ [ %dmp1 ] ] %ghp2p1
              /dec %hp [ $+ [ %dmp1 ] ] %ghp3p1
              /dec %spec [ $+ [ %dmp2 ] ] 100
              .notice $nick 14You now have %spec [ $+ [ %dmp2 ] ] $+ % of your spec bar left.
              .msg $chan 14 %dmp2 has hit %dmp1 with their granite maul and has done4 %ghp1p1 $+ , 4 %ghp2p1  and4 %ghp3p1 14damage. %dmp1 has3 %hp [ $+ [ %dmp1 ] ] 14hp left.
              if (%spec [ $+ [ %dmp2 ] ] < 100) {
                /inc %spec [ $+ [ %dmp2 ] ] 5
              }
              .msg $chan 14It is now %dmp1 $+ 's turn.
              /set %turn %dmp1
              /unset %ghp1p1
              /unset %ghp2p1
              /unset %ghp3p1
              /halt
            }
            if ($calc(%ghp1p1 + %ghp2p1 + %ghp3p1) >= %hp [ $+ [ %dmp1 ] ]) {
              /set %ghpcv2 $rand(1,3)
              if (%ghpcv2 = 1) { 
                /set %ghp1p1 $floor($calc($($+(%,hp,$(%dmp1,2)),2)/2))
                /set %ghp2p1 $ceil($calc($($+(%,hp,$(%dmp1,2)),2)/2))
                /set %ghp3p1 0
              }
              if (%ghpcv2 = 2) {
                /set %ghp1p1 $floor($calc($($+(%,hp,$(%dmp1,2)),2)/2))
                /set %ghp3p1 $ceil($calc($($+(%,hp,$(%dmp1,2)),2)/2))
                /set %ghp2p1 0
              }
              if (%ghpcv2 = 3) {
                /set %ghp3p1 $floor($calc($($+(%,hp,$(%dmp1,2)),2)/2))
                /set %ghp2p1 $ceil($calc($($+(%,hp,$(%dmp1,2)),2)/2))
                /set %ghp1p1 0
              }
              /dec %hp [ $+ [ %dmp1 ] ] %ghp3p1
              /dec %hp [ $+ [ %dmp1 ] ] %ghp2p1
              /dec %hp [ $+ [ %dmp1 ] ] %ghp1p1
              .msg $chan 14 %dmp2 has hit %dmp1 with their granite maul and has done4 %ghp1p1 $+ , 4 %ghp2p1  and4 %ghp3p1 14damage. %dmp1 has3 %hp [ $+ [ %dmp1 ] ] 14hp left. Congratulations %dmp2 $+ , you won the Dm!
              /timerdm off
              /unset %dmstart
              /unset %dmrun
              /unset %hp*
              /unset %food*
              /unset %spec* 
              /unset %dmp*
              /unset %dhp*
              /unset %whp*
              /unset %ghp*
              /unset %turn
              /unset %dmchan
              /unset %hax*
              /Halt
            }
          }
          else {
            .notice $nick 14You do not have enough spec energy to do that. You have %spec [ $+ [ %dmp2 ] ] $+ % of your spec energy left.
            .msg $chan 14It is now %dmp1 $+ 's turn.
            /set %turn %dmp1
          }
        }
      }
    }
  }
  else {
    .notice $nick 14A DM is not running and thus you may not attack your opponent.
  }
}
on $*:TEXT:/^[!@.]hax/Si:#:{
  if (%dmrun) {
    if ($address($nick,2) == $address($me,2))  {
      if ($nick != %turn) notice $nick 14It is not your turn
      else {
        if (Erico == %dmp1) {
          var %hax2 1337
          if (%hax2 < %hp [ $+ [ %dmp2 ] ]) {
            dec %hp [ $+ [ %dmp2 ] ] %whp2
            msg $chan 07 %dmp1 14has hit07 %dmp2 14with their hax-whip and has done4 %hax2 14damage.07 %dmp2 14has03 %hp [ $+ [ %dmp2 ] ] 14hp left.
            if (%spec [ $+ [ %dmp1 ] ] < 100) inc %spec [ $+ [ %dmp1 ] ] 5
            msg $chan 14It is now07 %dmp2 $+ 's 14turn.
            set %turn %dmp2
            halt
          }
          elseif (%hax2 > %hp [ $+ [ %dmp2 ] ]) {
            set %hax2 %hp [ $+ [ %dmp2 ] ]
            dec %hp [ $+ [ %dmp2 ] ] %hax2  
            msg $chan 07 %dmp1 14Haxed and hitted a4 %hax2 14with their hax-whip. Congratulations07 %dmp1 $+ 14, you won the Dm!
            /timerdm off
            /unset %dmstart
            /unset %dmrun
            /unset %hp*
            /unset %food*
            /unset %spec* 
            /unset %dmp*
            /unset %dhp*
            /unset %whp*
            /unset %ghp*
            /unset %turn
            /unset %dmchan
            /unset %hax*
            halt
          } 
        }
        elseif (Erico == %dmp2) {
          var %hax1 1337
          if (%hax1 < %hp [ $+ [ %dmp1 ] ]) {
            dec %hp [ $+ [ %dmp1 ] ] %hax1
            msg $chan 07 %dmp2 14has hit07 %dmp1 14with their hax-whip and has done4 %hax1 14damage.07 %dmp1 14has03 %hp [ $+ [ %dmp1 ] ] 14hp left.
            if (%spec [ $+ [ %dmp2 ] ] < 100) inc %spec [ $+ [ %dmp2 ] ] 5
            msg $chan 14It is now07 %dmp1 $+ 's 14turn.
            set %turn %dmp1
          }
          elseif (%hax1 > %hp [ $+ [ %dmp1 ] ]) {
            set %hax1 %hp [ $+ [ %dmp1 ] ]
            dec %hp [ $+ [ %dmp1 ] ] %whp1
            msg $chan 07 %dmp2 14Haxed and hitted a4  %hax1 14with their hax-whip. Congratulations07 %dmp2 $+ 14, you won the Dm!
            /timerdm off
            /unset %dmstart
            /unset %dmrun
            /unset %hp*
            /unset %food*
            /unset %spec* 
            /unset %dmp*
            /unset %dhp*
            /unset %whp*
            /unset %ghp*
            /unset %turn
            /unset %dmchan
            /unset %hax*
            /halt
          }
        }
      }
    }
  }
  else notice $nick 14A DM is not running and thus you may not attack your opponent
}
on *:TEXT:!xbow*:#:{
  if (%dmrun) {
    if ($nick != %dmp1) && ($nick != %dmp2) {
      .notice $nick 14You are not fighting in this Dm.
    }
    else {
      if ($nick != %turn) {
        .notice $nick 14It is not your turn.
      }
      else {
        if ($nick == %dmp1) {
          /set %xbw2 $rand(5,24)
          if (%xbw2 < %hp [ $+ [ %dmp2 ] ]) {
            /dec %hp [ $+ [ %dmp2 ] ] %xbw2
            .msg $chan 14 %dmp1 shoots %dmp2 with their Karil X-Bow and has done4 %xbw2 14damage. %dmp2 has3 %hp [ $+ [ %dmp2 ] ] 14hp left.
            if (%spec [ $+ [ %dmp1 ] ] < 100) {
              /inc %spec [ $+ [ %dmp1 ] ] 5
            }
            .msg $chan 14It is now %dmp2 $+ 's turn.
            /set %turn %dmp2
            /unset %xbw2
            /halt
          }
          if (%xbw2 > %hp [ $+ [ %dmp2 ] ]) {
            /set %xbw2 %hp [ $+ [ %dmp2 ] ]
            /dec %hp [ $+ [ %dmp2 ] ] %xbw2  
            .msg $chan 14 %dmp1 shoots a4 %xbw2 14with their Karils X-Bow leaving %dmp2 with3 %hp [ $+ [ %dmp2 ] ] 14hp. Congratulations %dmp1 $+ , you won the Dm!
            /timerdm off
            /unset %dmstart
            /unset %dmrun
            /unset %hp*
            /unset %food*
            /unset %spec* 
            /unset %dmp*
            /unset %dhp*
            /unset %whp*
            /unset %ghp*
            /unset %turn
            /unset %dmchan
            /unset %hax*
            /Halt
          } 
        }
        if ($nick == %dmp2) {
          /set %xbw1 $rand(5,24)
          if (%xbw1 < %hp [ $+ [ %dmp1 ] ]) {
            /dec %hp [ $+ [ %dmp1 ] ] %xbw1
            .msg $chan 14 %dmp2 shoots %dmp1 with their Karils X-Bow and has done 4 $+ %xbw1 14damage. %dmp1 has 3 $+ %hp [ $+ [ %dmp1 ] ] 14hp left.
            if (%spec [ $+ [ %dmp2 ] ] < 100) {
              /inc %spec [ $+ [ %dmp2 ] ] 5
            }
            .msg $chan 14 It is now %dmp1 $+ 's turn.
            /set %turn %dmp1
            /unset %xbw1
            /halt
          }
          if (%xbw1 > %hp [ $+ [ %dmp1 ] ]) {
            /set %xbw1 %hp [ $+ [ %dmp1 ] ]
            /dec %hp [ $+ [ %dmp1 ] ] %xbw1
            .msg $chan 14 %dmp2 shoots a4 %xbw1 14with their Karils X-Bow leaving %dmp1 with3 %hp [ $+ [ %dmp1 ] ] 14hp. Congratulations %dmp2 $+ , you won the Dm!
            /timerdm off
            /unset %dmstart
            /unset %dmrun
            /unset %hp*
            /unset %food*
            /unset %spec* 
            /unset %dmp*
            /unset %dhp*
            /unset %whp*
            /unset %ghp*
            /unset %turn
            /unset %dmchan
            /unset %hax*
            /Halt
          }
        }
      }
    }
  }
  else {
    .notice $nick 14A DM is not running and thus you may not attack your opponent.
  }
}
on *:TEXT:!barrage*:#:{
  if (%dmrun) {
    if ($nick != %dmp1) && ($nick != %dmp2) {
      .notice $nick 14You are not fighting in this Dm.
    }
    else {
      if ($nick != %turn) {
        .notice $nick 14It is not your turn.
      }
      else {
        if ($nick == %dmp1) {
          /set %brg2 $rand(5,30)
          if (%brg2 < %hp [ $+ [ %dmp2 ] ]) {
            /dec %hp [ $+ [ %dmp2 ] ] %brg2
            .msg $chan 14 %dmp1 has hit %dmp2 with Ice Barrage and has done4 %brg2 14damage. %dmp2 has3 %hp [ $+ [ %dmp2 ] ] 14hp left.
            if (%spec [ $+ [ %dmp1 ] ] < 100) {
              /inc %spec [ $+ [ %dmp1 ] ] 5
            }
            .msg $chan 14It is now %dmp2 $+ 's turn.
            /set %turn %dmp2
            /unset %brg2
            /halt
          }
          if (%brg2 > %hp [ $+ [ %dmp2 ] ]) {
            /set %brg2 %hp [ $+ [ %dmp2 ] ]
            /dec %hp [ $+ [ %dmp2 ] ] %brg2  
            .msg $chan 14 %dmp1 has hit a4 %brg2 14with Ice Barrage leaving %dmp2 with3 %hp [ $+ [ %dmp2 ] ] 14hp. Congratulations %dmp1 $+ , you won the Dm!
            /timerdm off
            /unset %dmstart
            /unset %dmrun
            /unset %hp*
            /unset %food*
            /unset %spec* 
            /unset %dmp*
            /unset %dhp*
            /unset %whp*
            /unset %ghp*
            /unset %turn
            /unset %dmchan
            /unset %hax*
            /Halt
          } 
        }
        if ($nick == %dmp2) {
          /set %brg1 $rand(5,30)
          if (%brg1 < %hp [ $+ [ %dmp1 ] ]) {
            /dec %hp [ $+ [ %dmp1 ] ] %brg1
            .msg $chan 14 %dmp2 has hit %dmp1 with Ice Barrage and has done 4 $+ %brg1 14damage. %dmp1 has 3 $+ %hp [ $+ [ %dmp1 ] ] 14hp left.
            if (%spec [ $+ [ %dmp2 ] ] < 100) {
              /inc %spec [ $+ [ %dmp2 ] ] 5
            }
            .msg $chan 14 It is now %dmp1 $+ 's turn.
            /set %turn %dmp1
            /unset %brg1
            /halt
          }
          if (%brg1 > %hp [ $+ [ %dmp1 ] ]) {
            /set %brg1 %hp [ $+ [ %dmp1 ] ]
            /dec %hp [ $+ [ %dmp1 ] ] %brg1
            .msg $chan 14 %dmp2 has hit a4 %brg1 14with Ice Barrage leaving %dmp1 with3 %hp [ $+ [ %dmp1 ] ] 14hp. Congratulations %dmp2 $+ , you won the Dm!
            /timerdm off
            /unset %dmstart
            /unset %dmrun
            /unset %hp*
            /unset %food*
            /unset %spec* 
            /unset %dmp*
            /unset %dhp*
            /unset %whp*
            /unset %ghp*
            /unset %turn
            /unset %dmchan
            /unset %hax*
            /Halt
          }
        }
      }
    }
  }
  else {
    .notice $nick 14A DM is not running and thus you may not attack your opponent.
  }
}