All pastes #418119 Raw Edit

Untitled

public text v1 · immutable
#418119 ·published 2007-03-31 12:33 UTC
rendered paste body
on $*:TEXT:/^[!.](Dm|Death?m?atch)?/Si:#:{
  if ($readini(dm.ini,$chan,Player1) == $nick)
  notice $nick *** [ 12DM ]: You cannot accept your own challenge.
  halt
}
if ($readini(dm.ini,$chan,Status) == on) {
  writeini -n dm.ini $chan Status on2
  writeini -n dm.ini $chan Player2 $nick
  writeini -n dm.ini $chan Shark1 28
  writeini -n dm.ini $chan Shark2 28
  writeini -n dm.ini $chan Hp1 99 
  writeini -n dm.ini $chan Hp2 99
  writeini -n dm.ini $chan Turn 1
  timer $+ $chan $+ 1 off
  timer $+ $chan $+ 2 off
  msg $chan *** [ 12DM ]: The deathmatch sequence has BEGUN! Get ready to fight Player 1 and 2.
  msg $chan *** [ 12DM ]: It's $readini(dm.ini,$chan,Player1) $+ 's turn.
  notice $readini(dm.ini,$chan,Player1) *** [ 12DM ]: You have 499 hitpoints and 428 sharks. To view my deathmatch commands please type: !dmcommands
  notice $readini(dm.ini,$chan,Player2) *** [ 12DM ]: You have 499 hitpoints and 428 sharks. To view my deathmatch commands please type: !dmcommands
  halt
}
if ($readini(dm.ini,$chan,Status) == $null) {
  writeini -n dm.ini $chan Status on
  writeini -n dm.ini $chan Player1 $nick
  msg $chan *** [ 12DM ]: $nick has initiated the deathmatch sequence! Timeout to accept: 30 seconds
  timer $+ $chan $+ 1 1 30 msg $chan *** [ 12DM ]: $readini(dm.ini,$chan,Player1) does not seem to have a challenger. Deathmatch sequence terminated.
  timer $+ $chan $+ 2 1 30 remini dm.ini $chan
  halt 
}
if ($readini(dm.ini,$chan,Status) == on2) {
  notice $nick *** [ 12DM ]: There is already a deathmatch going on.
  halt
}