c0d3r nub's script

alias catch {
  var %rate = $rand(1,4)
  /describe $chan throws a Pokeball on $1
  if (%rate != 1) { /describe $chan caught a(n) $1 $+ ! Congratulations! }
  if (%rate == 1) { /describe $chan tries to capture $1 $+ , but the PokeBall bursts open! Oh no! The $1 escaped! }
}

on *:ACTION:*throws a rock at*:#: {
  if (( %catch != 1 ) && ( $$5 ison $chan )) {
    /catch $$5
    /set %catch 1
  /timer8 1 12 .unset %catch  }
}
on *:ACTION:*throws rocks at*:#: {
  if (( %catch != 1 ) && ( $$4 ison $chan )) {
    /catch $$4
    /set %catch 1
    /timer8 1 12 .unset %catch
  }
}