All pastes #540279 Raw Edit

Anonymous

public text v1 · immutable
·published 2007-06-05 15:23 UTC
rendered paste body
on *:text:!dm*:#: { 
  if (%duel2 == active) { 
    msg $chan A Death Match Is Already Active, Please Wait For It To End 
  } 
  if (%duel == active) { 
    set %player2 $nick 
    msg $chan The Match Is Set!4 %player1 1vs4 %player2 
    set %duel2 active 
    set %p1hp 99 
    set %p2hp 99 
    set %spec1 0 
    set %spec2 0 
    set %turn 1 

  } 
  else { 
    set %duel active 
    set %player1 $nick 
    msg $chan4 $nick 1Has Requested A Death Match, Type 4!DM 1To Fight4 $nick
  } 
} 

on *:text:!eat*:#: { 
  if (%turn == 1) { 
    if ($nick == %player1) { 
      set %turn 2 
      inc %p1hp 20 
      msg $chan 4 %player1 1Eats A Shark And Gains4 20HP. 
    } 
  } 
  else if (%turn == 2) { 
    if ($nick == %player2) { 
      set %turn 1 
      inc %p2hp 20 
      msg $chan 4 %player2 1Eats A Shark And Gains4 20HP. 
    } 
  } 
} 

on *:text:!dds*:#: { 
  if (%turn == 1) { 
    if ($nick == %player1) { 
      if (%spec2 < 4) { 
        set %hit1 $rand(0,33) 
        set %hit2 $rand(0,33) 
        inc %spec1 
        msg $chan 4 %player1 1Specs4 %player2 1And Hits4 %hit1 1And4 %hit2 
        dec %p2hp %hit1 
        dec %p2hp %hit2 
        msg $chan 4 %player2 1Has4 %p2hp 1HP Left 
        set %turn 2 
      } 
      if (%p2hp < 0) { 
        msg $chan 4 %player1 1Has Defeated4 %player2 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
    else { 
      notice %player1 1You Are Out Of Specials 
    } 
  } 
  else { 
    if (%turn == 2) { 
      if ($nick == %player2) { 
        if (%spec2 < 4) { 
          set %hit1 $rand(0,33) 
          set %hit2 $rand(0,33) 
          inc %spec2 
          msg $chan 4 %player2 1Specs4 %player1 1And Hits4 %hit1 1And4 %hit2 
          dec %p1hp %hit1 
          dec %p1hp %hit2 
          msg $chan 4 %player1 1Has4 %p1hp 1HP Left 
          set %turn 1 
          if (%p2hp < 0) { 
            msg $chan 4 %player2 1Has Defeated4 %player1 
            unset %duel 
            unset %player1 
            unset %player2 
            unset %duel2 
            unset %p1hp 
            unset %p2hp 
            unset %spec1 
            unset %spec2 
            unset %turn 
            unset %hit1 
            unset %hit2 
          } 
          else { 
          } 
        } 
        else if (%spec2 == 4) { 
          msg $chan 4 %player2 1You Are Out Of Specials
        } 
      } 
    } 
  } 
} 


on *:text:!whip*:#: { 
  if (%turn == 1) { 
    if ($nick == %player1) { 
      set %turn 2 
      set %hit $rand(0,45) 
      msg $chan 4 %player1 1Has Hit A4 %hit 
      dec %p2hp %hit 
      msg $chan 4 %player2 1Has4 %p2hp 1HP Left 
      if (%p2hp < 0) { 
        msg $chan 4 %player1 1Has Defeated4 %player2 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
  } 
  else if (%turn == 2) { 
    if ($nick == %player2) { 
      set %turn 1 
      set %hit $rand(0,45) 
      msg $chan 4 %player2 1Has Hit A4 %hit 
      dec %p1hp %hit 
      msg $chan 4 %player1 1Has4 %p1hp 1HP Left 
      if (%p1hp < 0) { 
        msg $chan 4 %player2 1Has Defeated4 %player1 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
  } 
} 

on *:text:!dh*:#: { 
  if (%turn == 1) { 
    if ($nick == %player1) { 
      set %turn 2 
      set %dh $rand(0,81) 
      msg $chan 4 %player1 1Has Hit A4 %dh 
      dec %p2hp %dh 
      msg $chan 4 %player2 1Has4 %p2hp 1HP Left
      if (%p2hp < 0) { 
        msg $chan 4 %player2 1Has Defeated4 %player1 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
  } 
  if (%turn == 2) { 
    if ($nick == %player2) { 
      set %turn 1 
      set %dh $rand(0,81) 
      msg $chan 4 %player2 1Has Hit A4 %dh 
      dec %p1hp %dh 
      msg $chan 4 %player1 1Has4 %p1hp 1HP Left 
      if (%p1hp < 0) { 
        msg $chan 4 %player2 1Has Defeated4 %player1 
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
  } 
}