Someone

on $*:text:/^[!@]pkworld */Si:#9:{
  set %pkworld $rand(1,60)
  if (%pkworld == 1) {  $iif($left($1-,1) == @,.msg $chan,.notice $nick) 2 ~ © xjlpx }
  if (%pkworld == 2) {  $iif($left($1-,1) == @,.msg $chan,.notice $nick) 6 ~ © xjlpx }
  if (%pkworld == 3) {  $iif($left($1-,1) == @,.msg $chan,.notice $nick) 9 ~ © xjlpx }
  if (%pkworld == 4) {  $iif($left($1-,1) == @,.msg $chan,.notice $nick) 18 ~ © xjlpx }
  if (%pkworld == 5) {  $iif($left($1-,1) == @,.msg $chan,.notice $nick) 22 ~ © xjlpx }
  if (%pkworld == 6) {  $iif($left($1-,1) == @,.msg $chan,.notice $nick) 23 ~ © xjlpx }
  if (%pkworld == 7) {  $iif($left($1-,1) == @,.msg $chan,.notice $nick) 24 ~ © xjlpx }
  if (%pkworld == 8) {  $iif($left($1-,1) == @,.msg $chan,.notice $nick) 26 ~ © xjlpx }
  if (%pkworld == 9) {  $iif($left($1-,1) == @,.msg $chan,.notice $nick) 27 ~ © xjlpx }
  if (%pkworld == 10) {  $iif($left($1-,1) == @,.msg $chan,.notice $nick) 28 ~ © xjlpx }
  if (%pkworld == 11) {  $iif($left($1-,1) == @,.msg $chan,.notice $nick) 31 ~ © xjlpx }
  if (%pkworld == 12) {  $iif($left($1-,1) == @,.msg $chan,.notice $nick) 36 ~ © xjlpx }
  if (%pkworld == 13) {  $iif($left($1-,1) == @,.msg $chan,.notice $nick) 41 ~ © xjlpx }
  if (%pkworld == 14) {  $iif($left($1-,1) == @,.msg $chan,.notice $nick) 42 ~ © xjlpx }
  if (%pkworld == 15) {  $iif($left($1-,1) == @,.msg $chan,.notice $nick) 44 ~ © xjlpx }
  if (%pkworld  == 16) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 46 ~ © xjlpx }
  if (%pkworld ==  17) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 48 ~ © xjlpx }
  if (%pkworld ==  18) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 53 ~ © xjlpx }
  if (%pkworld ==  19) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 54 ~ © xjlpx }
  if (%pkworld ==  20) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 56 ~ © xjlpx }
  if (%pkworld ==  21) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 58 ~ © xjlpx }
  if (%pkworld ==  22) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 59 ~ © xjlpx }
  if (%pkworld ==  23) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 60 ~ © xjlpx }
  if (%pkworld ==  24) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 64 ~ © xjlpx }
  if (%pkworld ==  25) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 65 ~ © xjlpx }
  if (%pkworld == 26) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 66 ~ © xjlpx }
  if (%pkworld == 27) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 69 ~ © xjlpx }
  if (%pkworld == 28) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 70 ~ © xjlpx }
  if (%pkworld == 29) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 71 ~ © xjlpx }
  if (%pkworld == 30) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 76 ~ © xjlpx }
  if (%pkworld == 31) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 77 ~ © xjlpx }
  if (%pkworld == 32) { $iif($left($1-,1) == @,.msg $chan,.notice $nick)  78 ~ © xjlpx }
  if (%pkworld == 33) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 79  ~ © xjlpx }
  if (%pkworld == 34) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 82 ~  © xjlpx }
  if (%pkworld == 35) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 83 ~ ©  xjlpx }
  if (%pkworld == 36) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 84 ~ ©  xjlpx }
  if (%pkworld == 37) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 88  ~ © xjlpx }
  if (%pkworld == 38) { $iif($left($1-,1) == @,.msg $chan,.notice $nick)  89 ~ © xjlpx }
  if (%pkworld == 39) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 91  ~ © xjlpx }
  if (%pkworld == 40) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 92 ~  © xjlpx }
  if (%pkworld == 41) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 97 ~ ©  xjlpx }
  if (%pkworld == 42) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 98 ~ ©  xjlpx }
  if (%pkworld == 43) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 99 ~ ©  xjlpx }
  if (%pkworld == 44) { $iif($left($1-,1) == @,.msg $chan,.notice  $nick) 100 ~ © xjlpx }
  if (%pkworld == 45) { $iif($left($1-,1) == @,.msg $chan,.notice  $nick) 103 ~ © xjlpx }
  if (%pkworld == 46) { $iif($left($1-,1) == @,.msg $chan,.notice  $nick) 104 ~ © xjlpx }
  if (%pkworld == 47) { $iif($left($1-,1) == @,.msg  $chan,.notice $nick) 110 ~ © xjlpx }
  if (%pkworld == 48) { $iif($left($1-,1) == @,.msg  $chan,.notice $nick) 111 ~ © xjlpx }
  if (%pkworld == 49) { $iif($left($1-,1) == @,.msg  $chan,.notice $nick) 112 ~ © xjlpx }
  if (%pkworld == 50) { $iif($left($1-,1) == @,.msg  $chan,.notice $nick) 114 ~ © xjlpx }
  if (%pkworld == 51) { $iif($left($1-,1) == @,.msg  $chan,.notice $nick) 115 ~ © xjlpx }
  if (%pkworld == 52) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 116 ~ © xjlpx }
  if (%pkworld == 53) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 120 ~ © xjlpx }
  if (%pkworld == 54) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 121 ~ © xjlpx }
  if (%pkworld == 55) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 123 ~ © xjlpx }
  if (%pkworld == 56) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 124 ~ © xjlpx }
  if (%pkworld == 57) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 129 ~ © xjlpx }
  if (%pkworld == 58) { $iif($left($1-,1) == @,.msg $chan,.notice $nick) 130 ~ ©  xjlpx }
  if (%pkworld == 59) { $iif($left($1-,1) == @,.msg $chan,.notice $nick)  131 ~ © xjlpx }
  if (%pkworld == 60) { $iif($left($1-,1) == @,.msg  $chan,.notice $nick) 132 | halt ~ © xjlpx }
  unset %pkworld
}