on $*:text:/^[!@.](DM|Duel)/Si:#: {
  if $regex($chan,/#(bots|dmscript)/Si) { halt }
  if ($readini(dm.ini,$chan,Player1) == $nick) || ($readini(dm.ini,$chan,Player2) == $nick) {
    notice $nick $br(DM) $+ 14: 14You are already in a Dm.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == on2) {
    notice $nick $br(DM) $+ 14: 14There is already a $br(deathmatch) 14going on.
    halt
  }
  if !$readini(dm.ini,$chan,Status) {
    writeini dm.ini $chan Status on
    writeini dm.ini $chan Player1 $nick
    msg $chan $br(DM) $+ 14: $br($nick) 14has initiated the $br(deathmatch) 14sequence! 14Timeout to accept: $br(30 seconds)
    timer $+ $chan $+ 1 1 30 msg $chan $br(DM) $+ 14: $br($readini(dm.ini,$chan,Player1)) 14does not seem to have a $br(challenger) $+ 14. Deathmatch sequence terminated. 
    timer $+ $chan $+ 2 1 30 remini dm.ini $chan
    halt 
  }
  if ($readini(dm.ini,$chan,Status) == on) {
    writeini dm.ini $chan Status on2
    writeini dm.ini $chan Player2 $nick
    writeini dm.ini $chan Shark1 10
    writeini dm.ini $chan Shark2 10
    writeini dm.ini $chan Hp1 99 
    writeini dm.ini $chan Hp2 99
    writeini dm.ini $chan Turn 1
    writeini dm.ini $chan Ddsspec1 4
    writeini dm.ini $chan Ddsspec2 4
    $($+(timer,$chan,1,$chr(32),off),2)
    $($+(timer,$chan,2,$chr(32),off),2)
    msg $chan $br(DM) $+ 14: 14The deathmatch sequence has BEGUN! Get ready to fight $br(Player 1) 14and $br(Player 2) $+ 14.
    msg $chan $br(DM) $+ 14: 14It's currently $br($readini(dm.ini,$chan,Player1)) $+ 's turn.
    notice $readini(dm.ini,$chan,Player1) $br(DM) $+ 14: 14You have $br(99) 14hitpoints and $br(10) 14sharks. 14To view my $br(deathmatch) 14commands please type: $br(!dmcommands)
    notice $readini(dm.ini,$chan,Player2) $br(DM) $+ 14: 14You have $br(99) 14hitpoints and $br(10) 14sharks. 14To view my $br(deathmatch) 14commands please type: $br(!dmcommands)
    halt
  }
}




Zzzzzzzzzzz didnt do nothin much,and prob wont work <_<