All pastes #443088 Raw Edit

dm

public text v1 · immutable
·published 2007-04-16 17:02 UTC
rendered paste body
on *:text:!duel*:#: { 
if (%duel2 == active) { 
  msg $chan a duel is already active please wait for it to end. 
} 
if (%duel == active) { 
  set %player2 $nick 
  msg $chan the match is set! %player1 vs %player2 
  notice %player1 Commands Are : 5!eat, !dds, !dh and !flick
  notice %player2 Commands Are : 5!eat, !dds, !dh and !flick
  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 $chan $nick has initiated a duel type !duel to fight them 
} 
} 


on *:text:!eat*:#: { 
  if (%turn == 1) { 
    if ($nick == %player1) { 
      set %turn 2 
      inc %p1hp 40 
      msg $chan %player1 eats a shark and gains 40 hp 
    } 
  } 
  else if (%turn == 2) { 
    if ($nick == %player2) { 
      set %turn 1 
      inc %p2hp 40 
      msg $chan %player2 eats a shark and gains 40 hp 
    } 
  } 
} 

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 %player1 has hit %hit1 and %hit2 
        dec %p2hp %hit1 
        dec %p2hp %hit2 
        msg $chan %player2 has %p2hp hp left 
        set %turn 2 
      } 
      if (%p2hp < 0) { 
        msg $chan %player1 has defeated %player2 
        msg $chan 4Script Edited By bamby©
        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 (%spec1 == 4) { 
      notice %player1 you are out of specials 
    } 
  } 
  else { 
    if (%turn == 2) { 
      if ($nick == %player2) { 
        if (%spec2 < 4) { 
          set %hit1 $rand(0,20) 
          set %hit2 $rand(0,20) 
          inc %spec2 
          msg $chan %player2 has hit %hit1 and %hit2 
          dec %p1hp %hit1 
          dec %p1hp %hit2 
          msg $chan %player1 has %p1hp hp left 
          set %turn 1 
          if (%p2hp < 0) { 
            msg $chan %player1 has defeated %player2
            msg $chan 4Script Edited By bamby©
            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) { 
          notice %player2 you are out of specials. 
        } 
      } 
    } 
  } 
} 


on *:text:!flick*:#: { 
  if (%turn == 1) { 
    if ($nick == %player1) { 
      set %turn 2 
      set %hit $rand(0,45) 
      msg $chan %player1 has hit a %hit 
      dec %p2hp %hit 
      msg $chan %player2 has %p2hp hp left 
      if (%p2hp < 0) { 
        msg $chan %player1 has defeated %player2 
        msg $chan 4Script Edited By bamby©
        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 %player2 has hit a %hit 
      dec %p1hp %hit 
      msg $chan %player1 has %p1hp hp left 
      if (%p1hp < 0) { 
        msg $chan %player2 has defeated %player1 
        msg $chan 4Script Edited By bamby©
        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(20,100) 
      msg $chan %player1 has hit a %dh 
      dec %p2hp %dh 
      msg $chan %player2 has %p2hp hp left 
      if (%p2hp < 0) { 
        msg $chan %player1 has defeated %player2 
        msg $chan 4Script Edited By bamby©
        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(20,100) 
      msg $chan %player2 has hit a %dh 
      dec %p1hp %dh 
      msg $chan %player1 has %p1hp hp left 
      if (%p1hp < 0) { 
        msg $chan %player2 has defeated %player1
        msg $chan 4Script Edited By bamby©
        unset %duel 
        unset %player1 
        unset %player2 
        unset %duel2 
        unset %p1hp 
        unset %p2hp 
        unset %spec1 
        unset %spec2 
        unset %turn 
        unset %hit1 
        unset %hit2 
      } 
      else { 
      } 
    } 
  } 
}