All pastes #441819 Raw Edit

Something

public text v1 · immutable
·published 2007-04-15 21:37 UTC
rendered paste body
ON *:TEXT:!dm:#SwiftDM:{
  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) {
    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.
    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
    writeini anti.ini $chan Player1 8
    msg $chan 10 $+ $readini(pdm.ini,$chan,Player1)  has initiated the DM Command. Type !dm to fight $readini(pdm.ini,$chan,Player1) $+ .
    notice $readini(pdm.ini,$chan,Player1) 10You have4 99 10Hit Points and4 20 10Shark that heal4 20 10Health each.
    halt
  }
}




##################
#  Second Part   #
# With the Timer #
#                #
##################





ON *:TEXT:!dm:#SwiftDM:{
  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) {
    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.
    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
    writeini anti.ini $chan Player1 8
    msg $chan 10 $+ $readini(pdm.ini,$chan,Player1)  has initiated the DM Command. Type !dm to fight $readini(pdm.ini,$chan,Player1) $+ .
    notice $readini(pdm.ini,$chan,Player1) 10You have4 99 10Hit Points and4 20 10Shark that heal4 20 10Health each.
    timer 1 30 msg $chan DM was halted due to noone Accepting DM.
 writeini dm.ini $chan STatus off
    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
    remini dh.ini $chan Player1
    remini dh.ini $chan Player2
    remini range.ini $chan Total
    remini poison.ini $chan Player1
    remini poison.ini $chan Player2
    remini anti.ini $chan Player1
    remini anti.ini $chan Player2
    remini froze.ini $chan Player2
    remini froze.ini $chan Player1
    remini ice.ini $chan Player1
    remini ice.ini $chan Player2
    remini block.ini $chan Player1
    remini block.ini $chan Player2
    remini spell.ini $chan Player1
    remini spell.ini $chan Player2
    remini mage.ini $chan Player1
    remini mage.ini $chan Player2
    remini pray.ini $chan Player1
    remini pray.ini $chan Player2
    remini pstatus.ini $chan Player1
    remini pstatus.ini $chan Player2
    remini ppoints.ini $chan Player1
    remini ppoints.ini $chan Player2
halt
  }
}