hack juegos Win-Stats

ON *:TEXT:*:#: {
  tokenize 32 $strip($1-)
  if ($nick == Win-Stats) {
    if ($1 == $me) && ($13-16 == LA MALDICIÓN DE WIN-BOTIJ0!!!) {
      msg $active !maldicion $me borrar
    }
  }
}
alias pj {
  var %y = $chr(46)
  var %x = $chr(33)
  if (%count > 10) && ($right(%count,1) == $rand(2,7)) {
    return %y
  }
  else {
    return %x
  }
}
alias wstimer {
  if ($1 == $null) { echo -asec info * error! Timer no activado. use /wstimers <juego>. Para más información ejecuta /wstimers | halt }
  inc %count
  if (%count > 10) && ($right(%count,1) == $rand(3,7)) {
    var %timer = $rand(8,13)
    timerws.game. [ $+ [ $1 ] ] 1 %timer /msg $active $+($pj,%game. [ $+ [ $1 ] ] ) %game.param. [ $+ [ $1 ] ]
    halt
  }
  else {
    var %timer = $rand(5,10)
    timerws.game. [ $+ [ $1 ] ] 1 %timer /msg $active $+($pj,%game. [ $+ [ $1 ] ]) %game.param. [ $+ [ $1 ] ]
  }
}
alias wsgame {
  if ($left($active,1) != $chr(35)) { echo -ces Error! No puede ejecutar este comando en $iif($active == Status Window,Status,el privado de $active) $+ . Utilice este comando en un canal | halt }
  if ($1 == $null) {
    echo -as Juegos disponibles:
    echo -as 
    echo -as dados 2-10000
    echo -as traga.perras 2-10000
    echo -as ruleta.suerte
    echo -as 
    echo -as - Fin -
    halt
  }
  set %game. [ $+ [ $1 ] ] $1
  set %game.param. [ $+ [ $1 ] ] $2
  if (%game. [ $+ [ $1 ] ] == ruleta.suerte) {
    inc %count. [ $+ [ $1 ] ]
    if (%count. [ $+ [ $1 ] ] // 5) {
      var %timer = $rand(10,15)
      timerwscount.random 1 %timer /msg $active $+($pj,amuleto) REDUCCION
      halt
    }
    if (%count. [ $+ [ $1 ] ] // 13) {
      timerwscount.random 1 %timer /msg $active $+($pj,amuleto.vip) x20
    }
  }
  if (%game. [ $+ [ $1 ] ] == dados) {
    if (%game.param.dados == $null) { echo -a Se jugará con parametro por defecto 1 | halt }
    if (%game.param.dados !isnum) || (%game.param > 10000) || (%game.param.dados < 2) { echo -a Error! El parámetro válido para el juego %game.dados es 2-10.000 | halt }
  }
  if (%game. [ $+ [ $1 ] ] == traga.perras) {
    if (%game.param.traga.perras == $null) { echo -a Se jugará con parametro por defecto 1 | halt }
    if (%game.param.traga.perras !isnum) || (%game.param.traga.perras  > 10000) || (%game.param.traga.perras  < 2) { echo -a Error! El parámetro válido para el juego %game.traga.perras es 2-10.000 | halt }
  }
}
alias wstimers {
  if ($1 == $null) {
    echo -cea info * ::Juegos y comandos disponibles::
    echo -ca info * Ejecute /wstimers $upper(dados) $+(2,-,10000,$chr(32),$chr(124),$chr(32),$chr(91),OFF,$chr(93))
    echo -ca info * Ejecute /wstimers $upper(traga.perras) $+(2,-,10000,$chr(32),$chr(124),$chr(32),$chr(91),OFF,$chr(93))
    echo -ca info * Ejecute /wstimers $upper(ruleta.suerte) $+($chr(124),$chr(32),$chr(91),OFF,$chr(93))
    halt
  }
  if ($1 == stop) {
    timerws.* off
    echo -ca info * Juegos parados
  }
  if ($1 == dados) {
    if (!%game.dados) || (!%game.param.dados) { echo -a Ejecute /wsgame dados 2-10000 | halt }
    if ($2 == off) { timerws.dados off | timerws.game.dados off | unset %game.dados %game.param.dados %inc %count.dados }
  }
  if ($1 == traga.perras) {
    if (!%game.traga.perras) || (!%game.param.traga.perras) { echo -a Ejecute /wsgame traga.perras 2-10000 | halt }
    if ($2 == off) { timerws.traga.perras off | timerws.game.traga.perras off | unset %game.traga.perras %game.param.traga.perras }
  }
  if ($1 == ruleta.suerte) {
    if (!%game.ruleta.suerte) { echo -a Ejecute /wsgame ruleta.suerte | halt }
    if ($2 == off) { timerws.ruleta.suerte off | timerws.game.ruleta.suerte off | unset %game.ruleta.suerte %game.param.ruleta.suerte }
  }
  var %timer = $rand(7,15)
  timerws. [ $+ [ $1 ] ] 0 %timer /wstimer $1

}