on $*:TEXT:/^[!@.](d)(m|uel)$/Si:#:{
  if ($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) && $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) { msg $chan $c1(Sorry) $c2($nick) $c1(There is already a) $c2(dm) $c1(in progress)   | halt }
  if (!$readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) {
    writeini dm [ $+ [ $chan ] ] $+ .ini players player1 $nick
    msg $chan   $c2($nick) $c1(has started a) $c2(dm) $c2($nick) $c1(Has) $c2(Wins) $+ $c3(:) $+ $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $nick ] ])) $c2(Loses) $+ $c3(:) $+ $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $nick ] ]))    
  }
  else { 
    if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) { msg $chan   $c1(You cant) $c2(dm) $c1(yourself)   | halt }
    writeini dm [ $+ [ $chan ] ] $+ .ini players player2 $nick
    msg $chan   $c2($nick) $c1(has joined the) $c2(dm) $c2($nick) $c1(has) $c2(Wins) $+ $c3(:) $+ $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $nick ] ])) $c2(Loses) $+ $c3(:) $+ $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $nick ] ]))   
    msg $chan   $c2(The dm is starting between) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c2(and) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2))   
    startdm
    var %turn = $rand(1,2)
    $iif(%turn == 1,writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1),writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2))
    msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) $c1(Goes first)   
  }
}

on $*:TEXT:/^[!@.]((Dm|duel) off)$/Si:#:{
  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) || $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) || $nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
    msg $chan   $c1(The dm has ended between) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(and) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2))  
    dmoff
  }
  else {
    msg $chan   $c1(You need) $c2([(Half)Op]) $c1(or be in the) $c2(dm)
  }
}

on $*:TEXT:/^[!@.](Whip|flick|lash|slash|dscim(my)?)$/Si:#:{

  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) == 3) { Msg $chan $nick You are frozen use a ranged attack or eat | halt }
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage Whip [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(0,35)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Whip [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] 0 }
    msg $chan   $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c2(Hits) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c2(With a) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Whip [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $c2(Leaving) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c2(With) $chr(03) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $chr(03) $c2(Health)  
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)
    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      dmoff
    }
  }
  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) == 3) { Msg $chan $nick You are frozen use a ranged attack or eat | halt }
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage Whip [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(20,35)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Whip [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] 0 }
    msg $chan   $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c2(Hits) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c2(With a) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Whip [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $c2(Leaving) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c2(With) $chr(03) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $chr(03) $c2(Health)  
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)
    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      dmoff
    }
  }

}
on $*:TEXT:/^[!@.](d(ragon)?d(agger)?s)$/Si:#:{

  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) == 3) { Msg $chan $nick You are frozen use a ranged attack or eat | halt }
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 24) { notice $nick   $c1(You need) $c2(25%) $c1(special)   | halt }
    writeini dm [ $+ [ $chan ] ] $+ .ini dm spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - 25)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage Dds1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(0,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage Dds2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(0,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Dds1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Dds2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] 0 }
    msg $chan   $C2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(Hits) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(with a) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Dds1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $c1(and) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Dds2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $c1(Leaving) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(with) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $chr(03) $c2(Health)  
    notice $nick   $c1(You now have) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) $+ %) $c1(Special left)      
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)
    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      dmoff
    }
  }
  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) == 3) { Msg $chan $nick You are frozen use a ranged attack or eat | halt }
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 24) { notice $nick   $c1(You need) $c2(25%) $c1(special)   | halt }
    writeini dm [ $+ [ $chan ] ] $+ .ini dm spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - 25)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage Dds1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(20,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage Dds2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(20,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Dds1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Dds2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] 0 }
    msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(Hits) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(with a) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Dds1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $c1(and) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Dds2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $c1(Leaving) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(with) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $chr(03) $c2(Health)  
    notice $nick   $c1(You now have) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) $+ %) $c1(Special left)      
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)
    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      dmoff
    }
  }
}
on $*:TEXT:/^[!@.](G(ranite)?maul)/Si:#:{

  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) == 3) { Msg $chan $nick You are frozen use a ranged attack or eat | halt }
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 99) { notice $nick   $C1(You need) $c2(100%) $c1(Special to do this)   | halt }
    writeini dm [ $+ [ $chan ] ] $+ .ini dm spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] 0
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage Gmaul1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(0,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage Gmaul2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(0,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage Gmaul3 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(0,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Gmaul1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Gmaul2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Gmaul3 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] 0 }
    msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(Hits) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(With a) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Gmaul1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $c1(And) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Gmaul2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $c1(and) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Gmaul3 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $c1(Leaving) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(with) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $chr(03) $c2(Health)  
    notice $nick   $c1(You now have) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) $+ %) $c1(Special left)      
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)
    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      dmoff
    }
  }
  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) == 3) { Msg $chan $nick You are frozen use a ranged attack or eat | halt }
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) != 100) { notice $nick   $C1(You need) $c2(100%) $c1(Special to do this)   | halt }
    writeini dm [ $+ [ $chan ] ] $+ .ini dm spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] 0
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage Gmaul1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(20,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage Gmaul2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(20,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage Gmaul3 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(20,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Gmaul1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Gmaul2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Gmaul3 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] 0 }
    msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(Hits) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(With a) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Gmaul1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $c1(And) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Gmaul2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $c1(and) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Gmaul3 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $c1(Leaving) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(with) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $chr(03) $c2(Health)  
    notice $nick   $c1(You now have) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) $+ %) $c1(Special left)      
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)
    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      dmoff
    }
  }
} 

on $*:TEXT:/^[!@.](dh(arocks)?|(g)?ax(e)?)$/Si:#:{

  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) == 3) { Msg $chan $nick You are frozen use a ranged attack or eat | halt }
    if  ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) { notice $nick Your Dharocks is broken | halt }
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc( $readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - 1) 

    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,Dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) > 50) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Damage Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(0,35)
    } 
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,Dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) < 50) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Damage Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(5,45)
    }
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,Dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) < 30) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Damage Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(10,55)
    }
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,Dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) < 10) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Damage Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(15,65)
    }
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] 0 }
    msg $chan   $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c2(Hits) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c2(With a) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,DH [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $c2(Leaving) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c2(With) $chr(03) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $chr(03) $c2(Health)  
    notice $nick You only have $readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) Left
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)
    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      dmoff
    }
  }
  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) == 3) { Msg $chan $nick You are frozen use a ranged attack or eat | halt }
    if  ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) { notice $nick Your Dharocks is broken | halt }
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc( $readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - 1) 

    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,Dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) > 50) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Damage Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(33,33)
    } 
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,Dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) < 50) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Damage Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(45,45)
    }
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,Dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) < 30) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Damage Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(55,55)
    }
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,Dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) < 10) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Damage Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(65,65)
    }
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] 0 }
    msg $chan   $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c2(Hits) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c2(With a) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,DH [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $c2(Leaving) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c2(With) $chr(03) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $chr(03) $c2(Health)  
    notice $nick You only have $readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) Left
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)
    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      dmoff
    }
  }
}

on $*:TEXT:/^[!@.](d(ark)?bow)$/Si:#:{

  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    remini dm [ $+ [ $chan ] ] $+ .ini Dm Frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 74) { notice $nick   $c1(You need) $c2(75%) $c1(special)   | halt }
    writeini dm [ $+ [ $chan ] ] $+ .ini dm spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - 75)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage dbow1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(0,33)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage dbow2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(0,33)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,dbow1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,dbow2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] 0 }
    msg $chan   $C2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(Hits) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(with a) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Dbow1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $c1(and) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,dbow2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $c1(Leaving) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(with) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $chr(03) $c2(Health)  
    notice $nick   $c1(You now have) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) $+ %) $c1(Special left)      
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)

    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      dmoff
    }
  }
  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    remini dm [ $+ [ $chan ] ] $+ .ini Dm Frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 74) { notice $nick   $c1(You need) $c2(25%) $c1(special)   | halt }
    writeini dm [ $+ [ $chan ] ] $+ .ini dm spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - 75)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage dbow1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(20,33)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage Dbow2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(20,33)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Dbow1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Dbow2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] 0 }
    msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(Hits) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(with a) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Dbow1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $c1(and) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,Dbow2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $c1(Leaving) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(with) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $chr(03) $c2(Health)  
    notice $nick   $c1(You now have) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) $+ %) $c1(Special left)      
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)

    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      dmoff
    }
  }
}
on $*:TEXT:/^[!@.](xbow)$/Si:#:{

  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    remini dm [ $+ [ $chan ] ] $+ .ini Dm Frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage xbow [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(0,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,xbow [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] 0 }
    msg $chan   $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c2(Hits) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c2(With a) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,xbow [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $c2(Leaving) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c2(With) $chr(03) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $chr(03) $c2(Health)  
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)

    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini DM Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini DM Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      dmoff
    }
  }
  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    remini dm [ $+ [ $chan ] ] $+ .ini Dm Frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage xbow [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(0,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,xbow [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] 0 }
    msg $chan   $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c2(Hits) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c2(With a) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,xbow [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $c2(Leaving) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c2(With) $chr(03) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $chr(03) $c2(Health)  
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)
    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      dmoff
    }
  }
}
on $*:TEXT:/^[!@.](m(agic)?s(hort)?b(ow)?)$/Si:#:{

  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 49) { notice $nick   $c1(You need) $c2(50%) $c1(special)   | halt }
    writeini dm [ $+ [ $chan ] ] $+ .ini dm spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - 50)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage msb1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(0,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage msb2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(0,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,msb1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,msb2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] 0 }
    msg $chan   $C2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(Hits) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(with a) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,msb1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $c1(and) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,msb2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $c1(Leaving) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(with) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $chr(03) $c2(Health)  
    notice $nick   $c1(You now have) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) $+ %) $c1(Special left)      
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)
    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      dmoff
    }
  }
  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 24) { notice $nick   $c1(You need) $c2(25%) $c1(special)   | halt }
    writeini dm [ $+ [ $chan ] ] $+ .ini dm spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - 25)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage msb1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(0,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage msb2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(0,25)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,msb1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,msb2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] 0 }
    msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(Hits) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(with a) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,msb1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $c1(and) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,msb2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $c1(Leaving) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(with) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $chr(03) $c2(Health)  
    notice $nick   $c1(You now have) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) $+ %) $c1(Special left)      
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)
    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      dmoff
    }
  }
}
on $*:TEXT:/^[!@.]((ice )?Barrage)$/Si:#:{

  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    remini dm [ $+ [ $chan ] ] $+ .ini Dm Frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage barrage [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $r(0,30)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,barrage [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
    writeini dm [ $+ [ $chan ] ] $+ .ini dm frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $rand(2,4)
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] 0 }
    msg $chan   $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c2(Hits) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c2(With a) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,barrage [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $c2(Leaving) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c2(With) $chr(03) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $chr(03) $c2(Health)  
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) == 3) { msg $chan $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) is frozen }
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) != 3) { msg $chan $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) was not frozen }
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)

    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      dmoff
    }
  }
  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    remini dm [ $+ [ $chan ] ] $+ .ini Dm Frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
    writeini dm [ $+ [ $chan ] ] $+ .ini Damage barrage [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $r(0,30)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - $readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,barrage [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
    writeini dm [ $+ [ $chan ] ] $+ .ini dm frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $rand(2,4)

    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) { writeini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] 0 }
    msg $chan   $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c2(Hits) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c2(With a) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,Damage,barrage [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $c2(Leaving) $c1($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c2(With) $chr(03) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $chr(03) $c2(Health)  
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) == 3) { msg $chan $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) is frozen }
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) != 3) { msg $chan $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) was not frozen }
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)

    $iif($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0,msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(Has won the dm)  ,msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  )
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) {
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
      writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
      dmoff
    }
  }
}

on $*:TEXT:/^[!@.](Eat|shark|food)/Si:#:{

  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    remini dm [ $+ [ $chan ] ] $+ .ini Dm Frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) <= 0) { notice $nick   $c1(You need something to eat)   | halt }
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) + 20)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) - 1)
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) >= 99) { writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] 99 }
    msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(Eats a shark and now has) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $chr(03) $c2(Health)  
    notice $nick   $c1(You now have) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ])) $c1(Food left)  
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)
    msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  


  }
  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    remini dm [ $+ [ $chan ] ] $+ .ini Dm Frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) <= 0) { notice $nick   $c1(You need something to eat)   | halt }
    writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) + 20)
    writeini dm [ $+ [ $chan ] ] $+ .ini DM food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) - 1)
    if ($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) >= 99) { writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] 99 }
    msg $chan   $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(Eats a shark and now has) $hpbar($readini(dm [ $+ [ $chan ] ] $+ .ini,DM,Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $chr(03) $c2(Health)  
    notice $nick   $c1(You now have) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,dm,food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ])) $c1(Food left)  
    writeini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)
    msg $chan   $c1(It is now) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,WHOSTURN,Turn)) $c1(Turn)  

  }
}
on $*:TEXT:/^[!@.]Tele(port)?/Si:#:{

  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    msg $chan   $C2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(Teleports) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(Wins the) $c2(DM)  
    writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
    writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
    dmoff
  }
  if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) && $nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,whosturn,turn)) {
    msg $chan   $C2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) $c1(Teleports) $c2($readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) $c1(Wins the) $c2(DM)  
    writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Wins [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]))
    writeini dm [ $+ [ $chan ] ] $+ .ini Win\Loss Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] $calc(1 + $readini(dm [ $+ [ $chan ] ] $+ .ini,Win\Loss,Loses [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]))
    dmoff
  }
}
on $*:TEXT:/^[!@.]Status/Si:#:{
  if ($nick != $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) || $nick != $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) { notice $nick $c1(You arent in a) $c2(Dm))
    if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) {
      notice $nick $c1(Food) $+ $c3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM Food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) $c3($chr(124)) $c1(Health) $+ $c3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) $c3($chr(124)) $c1(Special) $+ $C3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM Spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) $c3($chr(124)) $c1(Barrage's) $+ $c3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM Barrage [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) $c3($chr(124)) $c1(Dharocks) $+ $c3(:) $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM DH [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) 
    }
    if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) {
      notice $nick $c1(Food) $+ $c3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM Food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) $c3($chr(124)) $c1(Health) $+ $c3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) $c3($chr(124)) $c1(Special) $+ $C3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM Spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) $c3($chr(124)) $c1(Barrage's) $+ $c3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM Barrage [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) $c3($chr(124)) $c1(Dharocks) $+ $c3(:) $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM DH [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) 
    }
  }
}
on $*:TEXT:/^[!@.]TheirStatus/Si:#:{
  if ($nick != $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) || $nick != $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) { notice $nick $c1(You arent in a) $c2(Dm))
    if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2)) {
      notice $nick $c1(Food) $+ $c3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM Food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) $c3($chr(124)) $c1(Health) $+ $c3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) $c3($chr(124)) $c1(Special) $+ $C3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM Spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) $c3($chr(124)) $c1(Barrage's) $+ $c3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM Barrage [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) $c3($chr(124)) $c1(Dharocks) $+ $c3(:) $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM DH [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]) 
    }
    if ($nick == $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1)) {
      notice $nick $c1(Food) $+ $c3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM Food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) $c3($chr(124)) $c1(Health) $+ $c3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) $c3($chr(124)) $c1(Special) $+ $C3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM Spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) $c3($chr(124)) $c1(Barrage's) $+ $c3(:) $+ $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM Barrage [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) $c3($chr(124)) $c1(Dharocks) $+ $c3(:) $c2($readini dm [ $+ [ $chan ] ] $+ .ini DM DH [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]) 
    }
  }
}
on $*:TEXT:/^[!@.]Dm( )?commands/Si:#:{
  msg $nick $c1(!whip) $c2((0,43)) 
  msg $nick $c1(!dds) $c2((0,25)) 
  msg $nick $c1(!gmaul) $c2((0,25) (0,25) (0,25)) $c1(Takes) $c2(100%) $c1(special) 
  msg $nick $c1(!dds) $c2((0,25) (0,25)) $c1(Takes) $c2(25%) $c1(special) 
  msg $nick $c1(!dh) $c2((0,65)) $c1(Depends on hp (only get 2)) 
  msg $nick $c1(!dbow) $c2((0,38)) $c1(Takes) $c2(75%) $c1(special)
  msg $nick $c1(!barrage) $c2((0,30)) $c1(Might freeze)
}
alias HPBar { var %51percent | var %50percent | var %49percent | var %OutPut = $+( $str( $+( $chr(3) , 9 , $chr(44) , 9 ,$chr(46)) , $round( $calc( ( $1 / 99 ) * 20 ) , 0 ) ),$str( $+( $chr(3) , 4 , $chr(44) , 4 ,$chr(46)) , $round( $calc( ( $calc( 99 - $1 ) / 99 ) * 20 ) , 0 ) ) ) | %50percent = $+($chr(3),1,$chr(44),09,5,$chr(3),1,$chr(44),04,0) | %49percent = $+($chr(3),1,$chr(44),04,$1) | %51percent = $+($chr(3),1,$chr(44),09,$1) | if ($1 == 50) var %percent = %50percent | if ($1 < 50) var %percent = %49percent | if ($1 > 50) var %percent = %51percent | if ($1 < 10) var %percent = $+(%49percent,$chr(3),4,$chr(44),04,.) | return $left( %OutPut , 45 ) $+ %percent $+ $right( %OutPut , 45 ) }

alias dmoff {
  remini dm [ $+ [ $chan ] ] $+ .ini DM food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini DM food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini DM hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini DM spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini DM spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini DM barrage [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini DM barrage [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini DM dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini DM dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini ONOROFF onoroff
  remini dm [ $+ [ $chan ] ] $+ .ini WHOSTURN Turn
  remini dm [ $+ [ $chan ] ] $+ .ini Damage Whip [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini Damage Whip [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini Damage Dds1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini Damage Dds1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini Damage Dds2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini Damage Dds2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini Damage Gmaul1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini Damage Gmaul2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini Damage Gmaul3 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini Damage Gmaul1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini Damage Gmaul2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini Damage Gmaul3 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ . ini Damage dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ . ini Damage barrage [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ . ini Damage dbow1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ . ini Damage dbow2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ . ini Damage dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ . ini Damage barrage [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ . ini Damage dbow1 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ . ini Damage dbow2 [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ . ini Dm frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ . ini Dm frozen [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ . ini Damage xbow [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ]
  remini dm [ $+ [ $chan ] ] $+ . ini Damage xbow [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ]
  remini dm [ $+ [ $chan ] ] $+ .ini players player1
  remini dm [ $+ [ $chan ] ] $+ .ini players player2
}
alias startdm {
  writeini dm [ $+ [ $chan ] ] $+ .ini DM Food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] 20
  writeini dm [ $+ [ $chan ] ] $+ .ini DM Food [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] 20
  writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] 99
  writeini dm [ $+ [ $chan ] ] $+ .ini DM Hp [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] 99
  writeini dm [ $+ [ $chan ] ] $+ .ini DM Spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] 100
  writeini dm [ $+ [ $chan ] ] $+ .ini DM Spec [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] 100
  writeini dm [ $+ [ $chan ] ] $+ .ini DM Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player1) ] ] 2
  writeini dm [ $+ [ $chan ] ] $+ .ini DM Dh [ $+ [ $readini(dm [ $+ [ $chan ] ] $+ .ini,players,player2) ] ] 2
}