All pastes #609978 Raw Edit

Unnamed

public text v1 · immutable
·published 2007-07-09 05:22 UTC
rendered paste body
ON *:TEXT:!dm:#:{
  if ($readini(pdm.ini,$chan,Player1) == $nick || $readini(pdm.ini,$chan,Player2) == $nick) {
    notice $nick 7,1Your already in the game.
    halt
  } 
  if ($readini(dm.ini,$chan,Status) == ON2) {
    notice $nick 7,1There 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 1
    writeini shark.ini $chan Player2 20
    writeini spec.ini $chan Player2 100
    writeini spec.ini $chan Player1 100
    msg $chan 7,1The Fight is.4,1 $readini(pdm.ini,$chan,Player1) 7,1Vs.4,1 $readini(pdm.ini,$chan,Player2)
    msg $chan 7,1`dmcommands For DM4,1 Commands7,1.
    notice $readini(pdm.ini,$chan,Player2) 7,1You have4,1 99 7,1Hit Points and4,1 20 7,1Shark that heal4,1 20 7,1Health each.
    mode $chan +v+v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
    mode $chan +m
    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
    msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) has initiated the DM Command. Type 4,1!dm7,1 to fight $readini(pdm.ini,$chan,Player1) $+ .
    notice $readini(pdm.ini,$chan,Player1) 7,1You have4,1 99 7,1Hit Points and4,1 20 7,1Shark that heal4,1 20 7,1Health each.
    halt
  }
}
ON *:TEXT:!whip:#:{
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick 7,1There is no DM on. Type4,1 !DM 7,1To start one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick 7,1You need someone to attack....
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    writeini hit.ini $chan Hit $rand(0,42)
    writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player2) <= 0 ) {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) swings at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 0 7,1Hitpoints.
      timer 1 3 msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) has won!
      mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
      mode $chan -m
      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
      halt
    }
    else {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) swings at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 $readini(hp.ini,$chan,Player2) 7,1Hitpoints.
      writeini turn.ini $chan Turn 2
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    writeini hit.ini $chan Hit $rand(0,42)
    writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player1) <= 0 ) {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) swings at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 0 7,1Hitpoints.
      timer 1 3 msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) has won!
      mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
      mode $chan -m
      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     
      halt
    }
    else {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) swings at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 $readini(hp.ini,$chan,Player1) 7,1Hitpoints.
      writeini turn.ini $chan Turn 1
      halt
    }
  }
  else {
    notice $nick 7,1Its not your turn or your not in this round.
  }
}
ON *:TEXT:!gmaul:#:{
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick 7,1There is no DM on. Type4,1 !DM 7,1To start one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick 7,1You need someone to attack....
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    writeini hit.ini $chan Hit $rand(0,30)
    writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player2) <= 0 ) {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) wacks at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 0 7,1Hitpoints.
      timer 1 3 msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) has won!
      mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
      mode $chan -m
      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
      halt
    }
    else {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) wacks at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 $readini(hp.ini,$chan,Player2) 7,1Hitpoints.
      writeini turn.ini $chan Turn 2
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    writeini hit.ini $chan Hit $rand(0,30)
    writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player1) <= 0 ) {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) wacks at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 0 7,1Hitpoints.
      timer 1 3 msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) has won!
      mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
      mode $chan -m
      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     
      halt
    }
    else {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) wacks at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 $readini(hp.ini,$chan,Player1) 7,1Hitpoints.
      writeini turn.ini $chan Turn 1
      halt
    }
  }
  else {
    notice $nick 7,1Its not your turn or your not in this round.
  }
}
ON *:TEXT:!range:#:{
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick 7,1There is no DM on. Type4,1 !DM 7,1To start one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick 7,1You need someone to attack....
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    writeini hit.ini $chan Hit $rand(0,20)
    writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player2) <= 0 ) {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) shoots at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 0 7,1Hitpoints.
      timer 1 3 msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) has won!
      mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
      mode $chan -m
      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
      halt
    }
    else {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) shoots at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 $readini(hp.ini,$chan,Player2) 7,1Hitpoints.
      writeini turn.ini $chan Turn 2
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    writeini hit.ini $chan Hit $rand(0,20)
    writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player1) <= 0 ) {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) shoots at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 0 7,1Hitpoints.
      timer 1 3 msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) has won!
      mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
      mode $chan -m
      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     
      halt
    }
    else {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) shoots at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 $readini(hp.ini,$chan,Player1) 7,1Hitpoints.
      writeini turn.ini $chan Turn 1
      halt
    }
  }
  else {
    notice $nick 7,1Its not your turn or your not in this round.
  }
}
ON *:TEXT:!dh:#:{
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick && $readini(hp.ini,$chan,Player2) <= 30 ) {
    notice $nick 7,1You cant use the4,1 !dh7,1 attack when your Opponent has less than 30 Hit Points.
    halt 
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick && $readini(hp.ini,$chan,Player1) <= 30 ) {
    notice $nick 7,1You cant use the4,1 !dh7,1 attack when your Opponent has less than 30 Hit Points.
    halt 
  }
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick 7,1There is no DM on. Type4,1 !DM 7,1To start one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick 7,1You need someone to attack....
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    writeini hit.ini $chan Hit $rand(0,85)
    writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player2) <= 0 ) {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) hacks at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 0 7,1Hitpoints.
      timer 1 3 msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) has won!
      mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
      mode $chan -m
      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 dds.ini $chan Total     
      remini pdm.ini $chan Player2
      halt
    }
    else {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) hacks at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 $readini(hp.ini,$chan,Player2) 7,1Hitpoints.
      writeini turn.ini $chan Turn 2
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    writeini hit.ini $chan Hit $rand(0,05)
    writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player1) <= 0 ) {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) hacks at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 0 7,1Hitpoints.
      timer 1 3 msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) has won!
      mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
      mode $chan -m
      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
      halt
    }
    else {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) hacks at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 $readini(hp.ini,$chan,Player1) 7,1Hitpoints.
      writeini turn.ini $chan Turn 1
      halt
    }
  }
  else {
    notice $nick 7,1Its not your turn or your not in this round.
  }
}

ON *:TEXT:!mage:#:{
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick 7,1There is no DM on. Type4,1 !DM 7,1To start one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick 7,1You need someone to attack....
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    writeini hit.ini $chan Hit $rand(0,40)
    writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player2) <= 0 ) {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) swings at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 0 7,1Hitpoints.
      timer 1 3 msg $chan 12 $+ $readini(pdm.ini,$chan,Player1) has won!
      mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
      mode $chan -m
      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
      halt
    }
    else {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) mages at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 $readini(hp.ini,$chan,Player2) 7,1Hitpoints.
      writeini turn.ini $chan Turn 2
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    writeini hit.ini $chan Hit $rand(0,40)
    writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(hit.ini,$chan,hit) )
    if ($readini(hp.ini,$chan,Player1) <= 0 ) {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) mages at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 0 7,1Hitpoints.
      timer 1 3 msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) has won!
      mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
      mode $chan -m
      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     
      halt
    }
    else {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) swings at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,Hit) $+ . Leaving him with4,1 $readini(hp.ini,$chan,Player1) 7,1Hitpoints.
      writeini turn.ini $chan Turn 1
      halt
    }
  }
  else {
    notice $nick 7,1Its not your turn or your not in this round.
  }
}
ON *:TEXT:!eat:#:{
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick && $readini(shark.ini,$chan,Player2) <= 0 ) {
    Notice $nick 7,1You dont have any shark left....
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick && $readini(shark.ini,$chan,Player1) <= 0 ) {
    Notice $nick 7,1You dont have any shark left....
    halt
  }
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick 7,1There is no DM on. Type4,1 !DM 7,1To start one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick 7,1You can't eat yet.....
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) + 20 )
    writeini shark.ini $chan Player1 $calc( $readini(shark.ini,$chan,Player1) - 1)
    notice $readini(pdm.ini,$chan,Player1) 12You now have4 $readini(shark.ini,$chan,Player1) 12Shark left.
    msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) eats a shark giving him4,1 $readini(hp.ini,$chan,Player1) 7,1Hit Points.
    writeini turn.ini $chan Turn 2
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) + 20 )
    writeini shark.ini $chan Player2 $calc( $readini(shark.ini,$chan,Player2) - 1)
    notice $readini(pdm.ini,$chan,Player2) 7,1You now have4,1 $readini(shark.ini,$chan,Player2) 7,1Shark left.
    msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) eats a shark giving him4,1 $readini(hp.ini,$chan,Player2) 7,1Hit Points.
    writeini turn.ini $chan Turn 1
    halt
  }  
  else {
    notice $nick 7,1Its not your turn or your not in this round.
  }
}
ON *:TEXT:!dds:#:{
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick && $readini(spec.ini,$chan,Player1) <= 0 ) {
    notice $nick 7,1You dont have any special Left.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick && $readini(spec.ini,$chan,Player2) <= 0 ) {
    notice $nick 7,1You dont have any special Left.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick 7,1There is no DM on. Type4,1 !DM 7,1To start one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick 7,1You need someone to attack....
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    writeini hit.ini $chan Hit $rand(0,30)
    writeini hit.ini $chan Hit2 $rand(0,30)
    writeini dds.ini $chan Total $calc( $readini(hit.ini,$chan,hit) + $readini(hit.ini,$chan,hit2) )
    writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(dds.ini,$chan,total) )
    writeini spec.ini $chan Player1 $calc( $readini(spec.ini,$chan,Player1) - 25 )
    if ($readini(hp.ini,$chan,Player2) <= 0 ) {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) Specials at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2) $+ . Leaving him with4,1 0 7,1Hitpoints.
      timer 1 3 msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) has won!
      mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
      mode $chan -m
      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
      halt
    }
    else {
      notice $nick 7,1You have4,1 $readini(spec.ini,$chan,Player1) $+ 7,1% of your Special Bar left.  
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) specials at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2)$+ . Leaving him with4,1 $readini(hp.ini,$chan,Player2) 7,1Hitpoints.
      writeini turn.ini $chan Turn 2
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    writeini hit.ini $chan Hit $rand(0,30)
    writeini hit.ini $chan Hit2 $rand(0,30)
    writeini dds.ini $chan Total $calc( $readini(hit.ini,$chan,hit) + $readini(hit.ini,$chan,hit2) )
    writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(dds.ini,$chan,total) )
    writeini spec.ini $chan Player2 $calc( $readini(spec.ini,$chan,Player2) - 25 )
    if ($readini(hp.ini,$chan,Player1) <= 0 ) {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) Specials at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2) $+ . Leaving him with4,1 0 7,1Hitpoints.
      timer 1 3 msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) has won!
      mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
      mode $chan -m
      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
      halt
    }
    else {
      notice $nick 7,1You have4,1 $readini(spec.ini,$chan,Player2) $+ 7,1% of your Special Bar left.  

      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) specials at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2)$+ . Leaving him with4,1 $readini(hp.ini,$chan,Player1) 7,1Hitpoints.
      writeini turn.ini $chan Turn 1
      halt
    }
  }
  else {
    notice $nick 7,1Its not your turn or your not in this round.
  }
}



ON *:TEXT:!rangespec:#:{
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick && $readini(spec.ini,$chan,Player1) <= 0 ) {
    notice $nick 7,1You dont have any special Left.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick && $readini(spec.ini,$chan,Player2) <= 0 ) {
    notice $nick 7,1You dont have any special Left.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick 7,1There is no DM on. Type4,1 !DM 7,1To start one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick 7,1You need someone to attack....
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    writeini hit.ini $chan Hit $rand(0,20)
    writeini hit.ini $chan Hit2 $rand(0,20)
    writeini dds.ini $chan Total $calc( $readini(hit.ini,$chan,hit) + $readini(hit.ini,$chan,hit2) )
    writeini hp.ini $chan Player2 $calc( $readini(hp.ini,$chan,Player2) - $readini(dds.ini,$chan,total) )
    writeini spec.ini $chan Player1 $calc( $readini(spec.ini,$chan,Player1) - 50 )
    if ($readini(hp.ini,$chan,Player2) <= 0 ) {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) Specials at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2) $+ . Leaving him with4,1 0 7,1Hitpoints.
      timer 1 3 msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) has won!
      mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
      mode $chan -m
      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
      halt
    }
    else {
      notice $nick 7,1You have4,1 $readini(spec.ini,$chan,Player1) $+ 7,1% of your Special Bar left.  
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) specials at $readini(pdm.ini,$chan,Player2) hitting a $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2)$+ . Leaving him with4,1 $readini(hp.ini,$chan,Player2) 7,1Hitpoints.
      writeini turn.ini $chan Turn 2
      halt
    }
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    writeini hit.ini $chan Hit $rand(0,20)
    writeini hit.ini $chan Hit2 $rand(0,20)
    writeini dds.ini $chan Total $calc( $readini(hit.ini,$chan,hit) + $readini(hit.ini,$chan,hit2) )
    writeini hp.ini $chan Player1 $calc( $readini(hp.ini,$chan,Player1) - $readini(dds.ini,$chan,total) )
    writeini spec.ini $chan Player2 $calc( $readini(spec.ini,$chan,Player2) - 50 )
    if ($readini(hp.ini,$chan,Player1) <= 0 ) {
      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) Specials at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2) $+ . Leaving him with4,1 0 7,1Hitpoints.
      timer 1 3 msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) has won!
      mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
      mode $chan -m
      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
      halt
    }
    else {
      notice $nick 7,1You have4,1 $readini(spec.ini,$chan,Player2) $+ 7,1% of your Special Bar left.  

      msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) specials at $readini(pdm.ini,$chan,Player1) hitting a $readini(hit.ini,$chan,hit) and $readini(hit.ini,$chan,hit2)$+ . Leaving him with4,1 $readini(hp.ini,$chan,Player1) 7,1Hitpoints.
      writeini turn.ini $chan Turn 1
      halt
    }
  }
  else {
    notice $nick 7,1Its not your turn or your not in this round.
  }
}



ON *:TEXT:!rehash:#:{ 
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick 0,3There is no DM for this channel
    halt
  }
  if ($nick isop $chan) || ($nick ishop $chan) || ($nick == $readini(pdm.ini,$chan,Player2)) || ($nick == $readini(pdm.ini,$chan,Player1)) {
    msg $chan 7,1DM rehashed by $nick $+ .
    mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
    mode $chan -m
    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
  }
  else { 
    notice $nick 7,1You need halfop+
  }
}
ON *:TEXT:`dmcommands:#:{
  msg $nick 7,1!rehash - Ends Game
  msg $nick 7,1!DM - Starts Game
  msg $nick 7,1!Whip - Whip
  msg $nick 7,1!DDS - Dragon Dagger Special (double Hit) (25% spec)
  msg $nick 7,1!DH - Dharoks
  msg $nick 7,1!Eat - Heals 20 HP
  msg $nick 7,1!tele - Tele away other person wins
  msg $nick 7,1!gmaul - Granite Maul
  msg $nick 7,1!range - Mage Short
  msg $nick 7,1!rangespec - Mage Short Spec (50% Spec)
  msg $nick 7,1!mage - Mage
}
ON *:TEXT:!tele:#:{
  if ($readini(dm.ini,$chan,Status) == $null) {
    notice $nick 7,1There is no DM on. Type4,1 !DM 7,1To start one.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON) {
    notice $nick 7,1You cant Tele yet rofl.
    halt
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 1 && $readini(pdm.ini,$chan,Player1) == $nick) {
    msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player1) has just teled.
    msg $chan 4,1 $+ $readini(pdm.ini,$chan,Player2) 7,1wins!
    mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
    mode $chan -m
    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 
  }
  if ($readini(dm.ini,$chan,Status) == ON2 && $readini(turn.ini,$chan,turn) == 2 && $readini(pdm.ini,$chan,Player2) == $nick) {
    msg $chan 7,1 $+ $readini(pdm.ini,$chan,Player2) has just teled.
    msg $chan 4,1 $+ $readini(pdm.ini,$chan,Player1) 7,1wins!
    mode $chan -v-v $readini(pdm.ini,$chan,Player2) $readini(pdm.ini,$chan,Player1)  
    mode $chan -m
    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   
  }
}