All pastes #592176 Raw Edit

Anonymous

public text v1 · immutable
#592176 ·published 2007-06-27 16:41 UTC
rendered paste body
ON *:TEXT:!DM:#:{
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  if ($readini(dm.ini,$chan,Status) == ON2) {
    notice $nick 10*** 02[10 DM 02]10 Sorry there is already a game for02 $chan 10 please wait for it to finish or expire.
    halt 
  }
  if ($readini(dm.ini,$chan,Status) == ON && $nick == $readini(dm.ini,$chan,Player1)) { 
    .notice $nick 10*** 02[10 DM 02]10 You cant fight yourself.
    halt
  } 
  if ($readini(dm.ini,$chan,Status) == ON) {
    writeini dm.ini $chan HP2 99
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan Player2 $nick
    writeini dm.ini $chan Shark2 10
    writeini dm.ini $chan Status ON2
    writeini dm.ini $chan Spec2 100
    writeini dm.ini $chan b2 5
    writeini dm.ini $chan a2 1
    msg $chan 10*** 02[10 DM 02]10 The battle -02 $readini(dm.ini,$chan,Player1) 10Vs.02 $readini(dm.ini,$chan,Player2) 
    .notice $nick 10You have02 1010 shark. Use 02!Eat10 to eat the sharks. Your hitpoint level will be noticed to you momentarily.
    .notice $readini(dm.ini,$chan,Player1) 10You have02 1010 shark. Use 02!Eat10 to eat the sharks. Your hitpoint level will be noticed to you momentarily.
    set %dm.turn. $+ $chan $rand(1,2)
    if (%dm.turn. [ $+ [ $chan ] ] == 2) {
      writeini dm.ini $chan Turn P2
      msg $chan 10*** 02[10 DM 02]10 $nick it is your turn to go. Use02 !DmCommands10 to see all the weapons you can use.
      halt
    }
    if (%dm.turn. [ $+ [ $chan ] ] == 1) {
      writeini dm.ini $chan Turn P1
      msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) it is your turn to go. Use02 !DmCommands10 to see all the weapons you can use.
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == $null) {
    writeini dm.ini $chan HP1 99
    writeini dm.ini $chan Status ON
    writeini dm.ini $chan Player1 $nick
    writeini dm.ini $chan Shark1 10
    writeini dm.ini $chan Spec1 100
    writeini dm.ini $chan b1 5
    writeini dm.ini $chan a1 1
    msg $chan 10*** 02[10 DM 02]10 You have02 6010 seconds to death match $nick $+ . Type02 !DM 10if you have the balls!
    .timer $+ $chan $+ 1 1 60 msg $chan 10*** 02[10 DM 02]10 The time for this02 DM10 has been halted. - .ini file deleted.
    .timer $+ $chan $+ 2 1 60 remini dm.ini $chan
    halt
  }
}
ON *:TEXT:!Whip:#:{
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2)
    writeini dm.ini $chan Hit $rand(0,25)
    if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))
      msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
      writeini dm.ini $chan Turn P2
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1)
    writeini dm.ini $chan Hit $rand(0,25)
    if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit))
      msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1))
      writeini dm.ini $chan Turn P1
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
      halt
    }
  }
  else {
    .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game.
  }
}
ON *:TEXT:!Flick:#:{
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2)
    writeini dm.ini $chan Hit $rand(0,15)
    if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))
      msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
      writeini dm.ini $chan Turn P2
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1)
    writeini dm.ini $chan Hit $rand(0,15)
    if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit))
      msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1))
      writeini dm.ini $chan Turn P1
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
      halt
    }
  }
  else {
    .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game.
  }
}
ON *:TEXT:!dds:#:{
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick && $readini(dm.ini,$chan,Spec2) <= 0) { 
    .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick && $readini(dm.ini,$chan,Spec1) <= 0) { 
    .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) {  
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2)
    writeini dm.ini $chan Hit $rand(0,20) 
    writeini dm.ini $chan Hit2 $rand(0,20)
    if ($calc($readini(dm.ini,$chan,HP2) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit2))) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) & 0 $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit2)))
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) & $readini(dm.ini,$chan,Hit2) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
      writeini dm.ini $chan Turn P2
      writeini dm.ini $chan Spec1 $calc($readini(dm.ini,$chan,Spec1) - 25)
      .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec1) $+ 10% of special left.
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1)
    writeini dm.ini $chan Hit $rand(0,20)
    writeini dm.ini $chan Hit2 $rand(0,20)
    if ($calc($readini(dm.ini,$chan,HP1) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit2))) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) & 0 $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit2)))
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) & $readini(dm.ini,$chan,Hit2) $+ 10]  $HPLevel($readini(dm.ini,$chan,HP1))
      writeini dm.ini $chan Turn P1
      writeini dm.ini $chan Spec2 $calc($readini(dm.ini,$chan,Spec2) - 25)
      .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec2) $+ 10% of special left.
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
      halt
    }
  }
  else {
    .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game.
  }
}
ON *:TEXT:!GMaul:#:{
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick && $readini(dm.ini,$chan,Spec2) <= 0) { 
    .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick && $readini(dm.ini,$chan,Spec1) <= 0) { 
    .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) {  
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2)
    writeini dm.ini $chan Hit $rand(0,30) 
    writeini dm.ini $chan Hit2 $rand(0,20)
    writeini dm.ini $chan Hit3 $rand(0,15)
    if ($calc($readini(dm.ini,$chan,HP2) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit2) + $readini(dm.ini,$chan,Hit3))) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) & 0 & 0 $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit2) + $readini(dm.ini,$chan,Hit3)))
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) & $readini(dm.ini,$chan,Hit2) & $readini(dm.ini,$chan,Hit3) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
      writeini dm.ini $chan Turn P2
      writeini dm.ini $chan Spec1 $calc($readini(dm.ini,$chan,Spec1) - 50)
      .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec1) $+ 10% of special left.
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1)
    writeini dm.ini $chan Hit $rand(0,30)
    writeini dm.ini $chan Hit2 $rand(0,20)
    writeini dm.ini $chan Hit3 $rand(0,15)
    if ($calc($readini(dm.ini,$chan,HP1) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit))) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) & 0 & 0 $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit2)))
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) & $readini(dm.ini,$chan,Hit2) & $readini(dm.ini,$chan,Hit3) $+ 10]  $HPLevel($readini(dm.ini,$chan,HP1))
      writeini dm.ini $chan Turn P1
      writeini dm.ini $chan Spec2 $calc($readini(dm.ini,$chan,Spec2) - 50)
      .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec2) $+ 10% of special left.
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
      halt
    }
  }
  else {
    .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game.
  }
}

ON *:TEXT:!cBow:#:{
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2)
    writeini dm.ini $chan Hit $rand(0,25)
    if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick aims at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))
      msg $chan 10*** 02[10 DM 02]10 $nick aims at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
      writeini dm.ini $chan Turn P2
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1)
    writeini dm.ini $chan Hit $rand(0,25)
    if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick aims at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit))
      msg $chan 10*** 02[10 DM 02]10 $nick aims at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1))
      writeini dm.ini $chan Turn P1
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
      halt
    }
  }
  else {
    .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game.
  }
}
ON *:TEXT:!DScimmy:#:{
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2)
    writeini dm.ini $chan Hit $rand(0,30)
    if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick slashes at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))
      msg $chan 10*** 02[10 DM 02]10 $nick slashes at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
      writeini dm.ini $chan Turn P2
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1)
    writeini dm.ini $chan Hit $rand(0,30)
    if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick slashes at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit))
      msg $chan 10*** 02[10 DM 02]10 $nick slashes at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1))
      writeini dm.ini $chan Turn P1
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
      halt
    }
  }
  else {
    .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game.
  }
}
ON *:TEXT:!DLong:#:{
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick && $readini(dm.ini,$chan,Spec2) <= 0) { 
    .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick && $readini(dm.ini,$chan,Spec1) <= 0) { 
    .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) {  
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2)
    writeini dm.ini $chan Hit $rand(0,45) 
    if ($calc($readini(dm.ini,$chan,HP2) - $calc($readini(dm.ini,$chan,Hit) + 0 )) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)))
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
      writeini dm.ini $chan Turn P2
      writeini dm.ini $chan Spec1 $calc($readini(dm.ini,$chan,Spec1) - 25)
      .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec1) $+ 10% of special left.
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1)
    writeini dm.ini $chan Hit $rand(0,45)
    if ($calc($readini(dm.ini,$chan,HP1) - $calc($readini(dm.ini,$chan,Hit) + 0 )) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)))
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10]  $HPLevel($readini(dm.ini,$chan,HP1))
      writeini dm.ini $chan Turn P1
      writeini dm.ini $chan Spec2 $calc($readini(dm.ini,$chan,Spec2) - 25)
      .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec2) $+ 10% of special left.
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
      halt
    }
  }
  else {
    .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game.
  }
}
ON *:TEXT:!DMace:#:{
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick && $readini(dm.ini,$chan,Spec2) <= 0) { 
    .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!. You cant Special!
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick && $readini(dm.ini,$chan,Spec1) <= 0) { 
    .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!. You cant Special!
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) {  
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2)
    writeini dm.ini $chan Hit $rand(0,50) 
    if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)))
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
      writeini dm.ini $chan Turn P2
      writeini dm.ini $chan Spec1 $calc($readini(dm.ini,$chan,Spec1) - 25)
      .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec1) $+ 10% of special left.
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1)
    writeini dm.ini $chan Hit $rand(0,50)
    if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)))
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10]  $HPLevel($readini(dm.ini,$chan,HP1))
      writeini dm.ini $chan Turn P1
      writeini dm.ini $chan Spec2 $calc($readini(dm.ini,$chan,Spec2) - 25)
      .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec2) $+ 10% of special left.
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
      halt
    }
  }
  else {
    .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game.
  }
}
ON *:TEXT:!DAxe:#:{
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick && $readini(dm.ini,$chan,Spec2) <= 0) { 
    .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick && $readini(dm.ini,$chan,Spec1) <= 0) { 
    .notice $nick 10*** 02[10 DM 02]10 You have 02010% special left!.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) {  
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2)
    writeini dm.ini $chan Hit $rand(0,15) 
    if ($calc($readini(dm.ini,$chan,HP2) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit))) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)))
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
      writeini dm.ini $chan Turn P2
      writeini dm.ini $chan Spec1 $calc($readini(dm.ini,$chan,Spec1) - 25)
      .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec1) $+ 10% of special left.
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1)
    writeini dm.ini $chan Hit $rand(0,15)
    if ($calc($readini(dm.ini,$chan,HP1) - $calc($readini(dm.ini,$chan,Hit) + $readini(dm.ini,$chan,Hit))) <= 0) {
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0)
      msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
      remini dm.ini $chan
      halt
    }
    else {
      writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)))
      msg $chan 10*** 02[10 DM 02]10 $nick specials at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10]  $HPLevel($readini(dm.ini,$chan,HP1))
      writeini dm.ini $chan Turn P1
      writeini dm.ini $chan Spec2 $calc($readini(dm.ini,$chan,Spec2) - 25)
      .notice $nick 10*** 02[10 DM 02]10 You now have02 $readini(dm.ini,$chan,Spec2) $+ 10% of special left.
      .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
      .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
      halt
    }
  }
  else {
    .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game.
  }
}
ON *:TEXT:!Eat:#:{
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick && $readini(dm.ini,$chan,Shark1) <= 0) {
    .notice $nick 10*** 02[10 DM 02]10 You have no shark left!
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick && $readini(dm.ini,$chan,Shark2) <= 0) {
    .notice $nick 10*** 02[10 DM 02]10 You have no shark left!
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick && $readini(dm.ini,$chan,Shark1) >= 0) {
    writeini dm.ini $chan Shark1 $calc($readini(dm.ini,$chan,Shark1) - 1 )
    writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) + 18)
    msg $chan 10*** 02[10 DM 02]10 $nick eats a shark $HPLevel($readini(dm.ini,$chan,HP1))
    .notice $nick 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Shark1) shark left.
    writeini dm.ini $chan Turn P2
    .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
    .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick && $readini(dm.ini,$chan,Shark2) >= 0) {
    writeini dm.ini $chan Shark2 $calc($readini(dm.ini,$chan,Shark2) - 1 )
    writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) + 18)
    msg $chan 10*** 02[10 DM 02]10 $nick eats a shark $HPLevel($readini(dm.ini,$chan,HP2))
    .notice $nick 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Shark2) shark left.
    writeini dm.ini $chan Turn P1
    .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
    .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
    halt
  }
  else {
    .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game.
  }
}
on *:TEXT:!admin:#:{
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  if ($nick ishop #ZetaAdmins) || ($nick isop #ZetaAdmins) {
    if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) {
      if ($readini(dm.ini,$chan,a1) >= 1) {
        .timer $+ $chan $+ 1 off
        .timer $+ $chan $+ 2 off
        writeini dm.ini $chan a1 0
        writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2)
        writeini dm.ini $chan Hit $rand(60,70)
        if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) {
          msg $chan 10*** 02[10 DM 02]10 $nick Uses Admin Privliges at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0)
          notice $nick 10*** 02[10 DM 02]10 You cant use !admin anymore
          msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
          remini dm.ini $chan
          halt
        }
        else {
          writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))
          msg $chan 10*** 02[10 DM 02]10 $nick Uses Admin Privliges at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
          notice $nick 10*** 02[10 DM 02]10 You cant use !admin anymore
          writeini dm.ini $chan Turn P2
          .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.     
          .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
          halt
        }
      }
      else {
        notice $nick 10*** 02[10 DM 02]10 You have already used admin!
        halt
      }
    }
    if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) {
      if ($readini(dm.ini,$chan,a2) >= 1) {
        .timer $+ $chan $+ 1 off
        .timer $+ $chan $+ 2 off
        writeini dm.ini $chan a2 0
        writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1)
        writeini dm.ini $chan Hit $rand(60,70)
        if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) {
          msg $chan 10*** 02[10 DM 02]10 $nick Uses Admin Privliges at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0)
          notice $nick 10*** 02[10 DM 02]10 You cant use !admin anymore
          msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
          remini dm.ini $chan
          halt
        }
        else {
          writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit))
          msg $chan 10*** 02[10 DM 02]10 $nick Uses Admin Privliges at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1))
          notice $nick 10*** 02[10 DM 02]10 You cant use !admin anymore
          writeini dm.ini $chan Turn P1
          .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
          .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
          halt
        }
      }
      else {
        notice $nick 10*** 02[10 DM 02]10 You have already used admin!
        halt
      }
    }
    else {
      .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game.
    }
  }
}
ON *:TEXT:!GAxe:#:{
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P1 && $readini(dm.ini,$chan,Player1) == $nick) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP2 $readini(dm.ini,$chan,HP2)
    if ($readini(dm.ini,$chan,HP1) <= 10) {
      writeini dm.ini $chan Hit $rand(0,100)
      if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) {
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0)
        msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
        remini dm.ini $chan
        halt
      }
      else {
        writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
        writeini dm.ini $chan Turn P2
        .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
        .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
        halt
      }
    }
    if ($readini(dm.ini,$chan,HP1) <= 20) {
      writeini dm.ini $chan Hit $rand(0,60)
      if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) {
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0)
        msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
        remini dm.ini $chan
        halt
      }
      else {
        writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
        writeini dm.ini $chan Turn P2
        .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
        .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
        halt
      }
    }
    if ($readini(dm.ini,$chan,HP1) <= 50) {
      writeini dm.ini $chan Hit $rand(0,45)
      if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) {
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0)
        msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
        remini dm.ini $chan
        halt
      }
      else {
        writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
        writeini dm.ini $chan Turn P2
        .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
        .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
        halt
      }
    }
    if ($readini(dm.ini,$chan,HP1) <= 70) {
      writeini dm.ini $chan Hit $rand(0,25)
      if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) {
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0)
        msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
        remini dm.ini $chan
        halt
      }
      else {
        writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
        writeini dm.ini $chan Turn P2
        .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
        .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
        halt
      }
    }
    if ($readini(dm.ini,$chan,HP1) <= 70) {
      writeini dm.ini $chan Hit $rand(0,25)
      if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) {
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0)
        msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
        remini dm.ini $chan
        halt
      }
      else {
        writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
        writeini dm.ini $chan Turn P2
        .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
        .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
        halt
      }
    }
    if ($readini(dm.ini,$chan,HP1) <= 99) {
      writeini dm.ini $chan Hit $rand(0,25)
      if ($calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit)) <= 0) {
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP2) $+ 10] $HPLevel(0)
        msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
        remini dm.ini $chan
        halt
      }
      else {
        writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player2) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP2))
        writeini dm.ini $chan Turn P2
        .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player2) has missed his turn.
        .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P1
        halt
      }
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(dm.ini,$chan,Turn) == P2 && $readini(dm.ini,$chan,Player2) == $nick) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    writeini dm.ini $chan OLDHP1 $readini(dm.ini,$chan,HP1)
    if ($readini(dm.ini,$chan,HP2) <= 10) {
      writeini dm.ini $chan Hit $rand(0,100)
      if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) {
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0)
        msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
        remini dm.ini $chan
        halt
      }
      else {
        writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit))
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1))
        writeini dm.ini $chan Turn P1
        .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
        .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
        halt
      }
    }
    if ($readini(dm.ini,$chan,HP2) <= 20) {
      writeini dm.ini $chan Hit $rand(0,60)
      if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) {
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0)
        msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
        remini dm.ini $chan
        halt
      }
      else {
        writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit))
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1))
        writeini dm.ini $chan Turn P1
        .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
        .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
        halt
      }
    }
    if ($readini(dm.ini,$chan,HP2) <= 50) {
      writeini dm.ini $chan Hit $rand(0,45)
      if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) {
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0)
        msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
        remini dm.ini $chan
        halt
      }
      else {
        writeini dm.ini $chan HP1 $calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit))
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1))
        writeini dm.ini $chan Turn P1
        .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
        .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
        halt
      }
    }
    if ($readini(dm.ini,$chan,HP2) <= 70) {
      writeini dm.ini $chan Hit $rand(0,25)
      if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) {
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0)
        msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
        remini dm.ini $chan
        halt
      }
      else {
        writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1))
        writeini dm.ini $chan Turn P1
        .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
        .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
        halt
      }
    }
    if ($readini(dm.ini,$chan,HP2) <= 99) {
      writeini dm.ini $chan Hit $rand(0,25)
      if ($calc($readini(dm.ini,$chan,HP1) - $readini(dm.ini,$chan,Hit)) <= 0) {
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,OLDHP1) $+ 10] $HPLevel(0)
        msg $chan 10*** 02[10 DM 02]10 $nick is the winner!
        remini dm.ini $chan
        halt
      }
      else {
        writeini dm.ini $chan HP2 $calc($readini(dm.ini,$chan,HP2) - $readini(dm.ini,$chan,Hit))
        msg $chan 10*** 02[10 DM 02]10 $nick swings at02 $readini(dm.ini,$chan,Player1) 10hitting a [02 $+ $readini(dm.ini,$chan,Hit) $+ 10] $HPLevel($readini(dm.ini,$chan,HP1))
        writeini dm.ini $chan Turn P1
        .timer $+ $chan $+ 1 1 20 msg $chan 10*** 02[10 DM 02]10 $readini(dm.ini,$chan,Player1) has missed his turn.
        .timer $+ $chan $+ 2 1 20 writeini dm.ini $chan Turn P2
        halt
      }
    }
  }
  else {
    .notice $nick 10*** 02[10 DM 02]10 Its not your turn 02or10 your not in this game.
  }
}
ON *:TEXT:!DMCommands:#:{
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  msg $nick 10!GAxe 02-10 !Whip 02-10 !DAxe 02-10 !DDS 02-10 !DLong 02-10 !DMace 02-10 !Flick 02-10 !CBow 02-10 !DScimmy 02-10 !GMaul 
}
ON *:TEXT:!StopDM:#:{
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  if ($nick isop $chan || $nick ishop $chan) {
    .timer $+ $chan $+ 1 off
    .timer $+ $chan $+ 2 off
    remini dm.ini $chan
    .notice $nick 10*** 02[10 DM 02]10 Game Over
    msg $chan 10*** 02[10 DM 02]10 I'll be back ~ Arnold.
  }
}
ON *:START:{
  remove dm.ini
  remove BA.ini
  remove CW.ini
  remove PC.ini
}