ON *:TEXT:!dm*:#:{ 
  if ($readini(pdm.ini,$chan,Player1) == $nick || $readini(pdm.ini,$chan,Player2) == $nick) { 
    notice $nick Your already in the DM. 
    halt 
  } 
  if ($readini(dm.ini,$chan,Status) == ON2) { 
    notice $nick There is already a DM Going on. 
    halt 
  } 
  if ($readini(dm.ini,$chan,Status) == ON) { 
    writeini pdm.ini $chan Player2 $nick 
    writeini dm.ini $chan Status ON2 
    writeini hp.ini $chan Player2 99 
    writeini turn.ini $chan Turn 1 
    writeini shark.ini $chan Player2 20 
    writeini spec.ini $chan Player2 100 
    writeini spec.ini $chan Player1 100 
    msg $chan The Fight is. $readini(pdm.ini,$chan,Player1) Vs. $readini(pdm.ini,$chan,Player2) 
    msg $chan ~dmcommands For DM Commands. 
    notice $readini(pdm.ini,$chan,Player2) You will have 99 HP and 20 Sharks that heal 20 HP each when the DM starts. 
    halt 
  }  
  if ($readini(dm.ini,$chan,Status) == $null) { 
    writeini pdm.ini $chan Player1 $nick 
    writeini dm.ini $chan Status ON 
    writeini hp.ini $chan Player1 99 
    writeini shark.ini $chan Player1 20 
    msg $chan $+ $readini(pdm.ini,$chan,Player1) has decided to DM. Type !dm to fight $readini(pdm.ini,$chan,Player1) $+ . 
    notice $readini(pdm.ini,$chan,Player1) You will have 99 HP and 20 Sharks that heal 20 HP each when the DM starts. 
    halt 
  } 
} 
on *:TEXT:!whip*:#:{
  in ($readini(dm.ini,$chan,Statsu) == $null) {
    notice $nick There is not a DM Going right now. Type !dm to have a Dm
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick You Need to find someone to attack.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == On2 && $readini
  (turn.ini,$chan,turn) == ! && $readini(pdm.ini,$chan,Player1) == $nick) {
    writeini hit.ini $chan Hit $rand(0,40)
    writeini hp.ini $chan Player2 $calc( $readini
    (hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player2) <= 0 ) {
      msg $chan $+ $readini(pdm.ini,$chan,Player1) Attacks at $readini(pdm.ini,$chan,Player2) hitting a $readini
      (hit.ini,$chan,Hit) $+ . Leaving them with 0 HP
      timer 1 3 msg $chan $+ $readini(pdm.ini,$chan,Player1) Has Won the DM!
      remini dm.ini $chan Status
      remini shark.ini $chan Player1
      remini shark.ini $chan Player2
      remini Hit.ini $chan Hit
      remini Hit.ini $chan Hit2
      remini hp.ini $chan Player1
      remini hp.ini $chan Player2
      remini pdm.ini $chan Player1
      remini pdm.ini $chan Player2
      remini dds.ini $chan Total
      halt
    }
    else {
      msg $chan $+ $readini(pdm.ini,$chan,Player1) Attacks at
      $readini(pdm.ini,$chan,Player2) hitting a $readini
      (hit.ini,$chan,Hit) $+ . Leaving them with $readini
      (hp.ini,$chan,Player2) HP
      writeini turn.ini $chan Turn 2
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini
  (turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2)
  == $nick) {
    writeini hit.ini $chan Hit $rand(0,40)
    writeini hp.ini $chan Player1 $calc( $readini
    (hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player1) <= 0 ) {
      msg $chan $+ $readini(pdm.ini,$chan,Player2) Attacks at
      $readini(pdm.ini, $chan,Player1) Hitting a $readini
      (hit.ini,$chan,Hit) $+ . Leaving them with 0 HP
      time 1 3 msg $chan $+ $readini(pdm.ini,$chan,Player2)
      Has won the DM!
      remini dm.ini $chan Status 
      remini shark.ini $chan Player1 
      remini shark.ini $chan Player2 
      remini Hit.ini $chan Hit 
      remini Hit.ini $chan Hit2 
      remini hp.ini $chan Player1 
      remini hp.ini $chan Player2 
      remini pdm.ini $chan Player1 
      remini pdm.ini $chan Player2 
      remini dds.ini $chan Total      
      halt 
    } 
    else {
      msg $chan $+ $readini(pdm.ini,$chan,Player2) attacks at
      $readini(pdm.ini,$chan,Player1) hitting a $readini
      (hit.ini,$chan,Hit) $+ . Leaving him with $readini(hp.ini,$chan,Player1) HP. 
      writeini turn.ini $chan Turn 1 
      halt 
    } 
  } 
  else { 
    notice $nick Its not your turn or your not in this DM. 
  } 
} 
ON *:TEXT:!eat*:#:{ 
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick && $readini(shark.ini,$chan,Player2) <= 0 ) { 
    Notice $nick You dont have any sharks left. 
    halt 
  } 
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick && $readini(shark.ini,$chan,Player1) <= 0 ) { 
    Notice $nick You dont have any sharks left.
    halt 
  } 
  if ($readini(dm.ini,$chan,Status) == $null) { 
    notice $nick There is no DM on. Type !DM To start one. 
    halt 
  } 
  if ($readini(dm.ini,$chan,Status) == ON) { 
    notice $nick You cannot eat yet.
    halt 
  } 
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) { 
    writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) + 20 ) 
    writeini shark.ini $chan Player1 $calc( $readini(shark.ini,$chan,Player1) - 1) 
    notice $readini(pdm.ini,$chan,Player1) You now have $readini(shark.ini,$chan,Player1) Shark left. 
    msg $chan $+ $readini(pdm.ini,$chan,Player2) eats a shark giving him $readini(hp.ini,$chan,Player2) HP. 
    writeini turn.ini $chan Turn 2 
    halt 
  } 
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) { 
    writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) + 20 ) 
    writeini shark.ini $chan Player2 $calc( $readini(shark.ini,$chan,Player2) - 1) 
    notice $readini(pdm.ini,$chan,Player2) You now have $readini(shark.ini,$chan,Player2) Shark left. 
    msg $chan $+ $readini(pdm.ini,$chan,Player2) eats a shark giving him $readini(hp.ini,$chan,Player2) HP. 
    writeini turn.ini $chan Turn 1 
    halt 
  }  
  else { 
    notice $nick Its not your turn or your not in this DM. 
  } 
}