Mine

on *:text:!dm*:#:  {
  if (%dm.2 == active) {
    notice $nick a dm is already active, please wait for it to end.
  }
  if (%dm == active) {
    set %dm.play2 $nick
    msg $chan The Match Is Set! %dm.play1 vs %dm.play2 $+ .
    set %dm.2 active
    set %dmhp1 99
    set %dmhp2 99
    set %dmspec1 0
    set %dmspec2 0
    set %dmturn 1
  }
  Else { 
    set %dm active
    set %dm.play1 $nick
    msg $chan $nick Has Initiated A DM! type !dm To Fight Him.
  }
}

on *:text:!dds*:#: {
  if (%dmturn == 1) {
    if ($nick == %dm.play1) {
      if (%dmspec2 < 4) {
        set %dmhit1 $rand(0,33)
        set %dmhit2 $rand(0,33)
        inc %dmspec1
        msg $chan %dm.play1 Has Hit %dmhit1 and %dmhit2
        dec %dmhp2 %dmhit1
        dec %dmhp2 %dmhit2
        msg $chan %dm.play2 has %dmhp2 Hp Left.
        set %dmturn 2
      }
      if (%dmhp2 < 0) {
        msg $chan %dm.play1 has defeated %dm.play2 $+ .
        unset %dm
        unset %dmhit1
        unset %dmhit2
        unset %dmhit
        unset %dmspec1
        unset %dmspec2
        unset %dm.play1
        unset %dm.play2
        unset %dm.2
      }
      else {
      }
    }
    else if (%dmspec1 == 4) {
      notice %dm.play1 You are Out Of Specials.
    }
  }
  else {
    if (%dmturn == 2) {
      if ($nick == %dm.play2) {
        if (%dmspec2 < 4) {
          set %dmhit1 $rand(0,33)
          set %dmhit2 $rand(0,33)
          inc %dmspec2
          msg $chan %dm.play2 Has hit %dmhit1 and %dmhit2 $+ .
          dec %dmhp1 %dmhit1
          dec %dmhp1 %dmhit2
          msg $chan %dm.play1 Has %dmhp1 Left.
          set %dmturn 1
          if (%dmhp1 < 0) {
            msg $chan %dm.play2 Has Defeated %dm.play1 $+ !
            unset %dm
            unset %dmhit1
            unset %dmhit2
            unset %dmhit
            unset %dmspec1
            unset %dmspec2
            unset %dm.play1
            unset %dm.play2
            unset %dm.2
          }
          else {
          }
        }
        else if (%dmspec2 == 4) {
          notice %dm.play2 You Are Out Of Specials.
        }
      }
    }
  }
}

on *:text:!whip*:#: {
  if (%dmturn == 1) {
    if ($nick == %dm.play1) {
      set %dmturn 2
      set %dmhit $rand(0,45)
      msg $chan %dm.play1 Had Hit a %dmhit $+ !
      dec %dmhp2 %dmhit
      msg $chan %dm.play2 has %dmhp2 Left.
      if (%dmhp2 < 0) {
        msg $chan %dm.play1 Has Defeated %dm.play2 $+ !!!
        unset %dm
        unset %dmhit1
        unset %dmhit2
        unset %dmhit
        unset %dmspec1
        unset %dmspec2
        unset %dm.play1
        unset %dm.play2
        unset %dm.2
      }
      else {
      }
    }
  }
  else if (%dmturn == 2) {
    if ($nick == %dm.play2) {
      set %dmturn 1
      set %hit $rand(0,45)
      msg $chan %dm.play2 Has Hit %hit $+ !!
      dec %dmhp1 %hit
      msg $chan %dm.play2 Has Defeated %dm.play1 $+ !!
      unset %dm
      unset %dmhit1
      unset %dmhit2
      unset %dmhit
      unset %dmspec1
      unset %dmspec2
      unset %dm.play1
      unset %dm.play2
      unset %dm.2
    }
    else {
    }
  }
}
on *:text:!end*:#: {
  if ($nick isop $chan) {
    if (%dm == active) {
      msg $chan $nick Has Turned off The Current DM.
      unset %dm
      unset %dmhit1
      unset %dmhit2
      unset %dmhit
      unset %dmspec1
      unset %dmspec2
      unset %dm.play1
      unset %dm.play2
      unset %dm.2
    }
    else {
      notice $nick Only ops can do that, If There is a Active Game. 
    }
    else {
    }
  }
}
}