Someone

ON *:TEXT:!dm*:#shift:{
  if ($readini(pdm.ini,$chan,Player1) == $nick || $readini(pdm.ini,$chan,Player2) == $nick) {
    notice $nick 10Your already in the game.
    halt
  } 
  if ($readini(dm.ini,$chan,Status) == ON2) {
    notice $nick 10There is already a DM.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {

    hadd -m $address($nick,2) status accepter

    writeini pdm.ini $chan Player2 $nick
    writeini dm.ini $chan Status ON2
    writeini hp.ini $chan Player2 99
    writeini turn.ini $chan Turn $rand(1,2)
    writeini shark.ini $chan Player2 20
    writeini anti.ini $chan Player2 8
    writeini spec.ini $chan Player2 100
    writeini spec.ini $chan Player1 100
    writeini dh.ini $chan Player2 2
    writeini dh.ini $chan Player1 2
    writeini poison.ini $chan Player2 1
    writeini poison.ini $chan Player1 1
    writeini froze.ini $chan Player2 1
    writeini froze.ini $chan Player1 1
    writeini ice.ini $chan Player1 100
    writeini ice.ini $chan Player2 100
    writeini mage.ini $chan Player1 1
    writeini mage.ini $chan Player2 1
    writeini ppoints.ini $chan Player1 25
    writeini ppoints.ini $chan Player2 25
    writeini pstatus.ini $chan Player1 off
    writeini pstatus.ini $chan Player2 off

    msg $chan 10The Fight is $readini(pdm.ini,$chan,Player1)  Vs. $readini(pdm.ini,$chan,Player2) .
    msg $chan 10!dmcommands For DM 4 Commands.

    if ($readini(turn.ini,$chan,turn) == 1 ) {

      msg $chan 10 + $readini(pdm.ini,$chan,player1) Starts the Deathmatch.
    }
    if ($readini(turn.ini,$chan,turn) == 2 ) {

      msg $chan 10 $+ $readini(pdm.ini,$chan,player2) Starts the Deathmatch.
    }

    notice $readini(pdm.ini,$chan,Player2) 10You have 4 99 10Hit Points and4 20 10Shark that heal4 20 10Health each.
    mode # +m
    msg # !voice $readini(pdm.ini,$chan,Player1)
    msg # !voice $readini(pdm.ini,$chan,Player2)
    halt
  }
  if ($readini(dm.ini,$chan,Status) == $null) {

    if ($2 isalnum) && ($hget($address($nick,2),cash) < 0) {

      notice $nick you currently have no cash!
      halt
    }
    elseif ($hget($address($nick,2),cash)) && ($2 isalnum) {

      if ($2 > $hget($address($nick,2),cash)) {

        notice $nick you cant stake more cash than you got! (you got $hget($address($nick,2),cash) cash)
        halt
      }

      hadd -m $address($nick,2) cash $calc($hget($address($nick,2),cash) - $2)
      hadd -m $address($nick,2) stake $2

      hadd -m $address($nick,2) status challenger
    }

    writeini pdm.ini $chan Player1 $nick
    writeini dm.ini $chan Status ON
    writeini hp.ini $chan Player1 99
    writeini shark.ini $chan Player1 20
    writeini anti.ini $chan Player1 8
    msg $chan 10 $+ $readini(pdm.ini,$chan,Player1) has initiated the DM Command. Type !dm $iif($2,$2) to fight $readini(pdm.ini,$chan,Player1) $+ . $iif($2,to enter this dm you need to enter a fee of $2)
    notice $readini(pdm.ini,$chan,Player1) 10You have4 99 10Hit Points and4 20 10Shark that heal4 20 10Health each.
    halt
  }
}
ON *:TEXT:!cash:#shift:{

  notice $nick you currently have $hget($address($nick,2),cash) $+ gp cash
}