Codigos Snippets

WormZ -> Snippets > mIRC Scripting > Anti-números de telefono

Anti-números de telefono

Enviado Por: NiGhT
Descripcion:
Detector de números de telefono usando $regex
Ojo que es posible que de falsos positivos.
Codigo:
  1. ;--------------------------------------------------------------;
  2. ; ;
  3. ; ;
  4. ; Coder: NiGhT ;
  5. ; ;
  6. ; Web: http://escripting.wormzweb.com ;
  7. ; ;
  8. ; Copyleft: Eres libre de usar este codigo tanto como de ;
  9. ; modificarlo siempre y cuando te acuerdes de donde ;
  10. ; salió --> http://escripting.wormzweb.com :D ;
  11. ; ;
  12. ; ;
  13. ;--------------------------------------------------------------;
  14.  
  15. on *:Text:*:#Canalcete:{
  16. ;Configuramos
  17. var %avisar = Si
  18. var %msg = ¡¡Ehh DESPIERTA!! ¡¡12 $nick está Publicando su telefono en el canal!!
  19. var %tiempo = 1800
  20. var %tipo.baneo = 2
  21. var %msg = Lo siento no está permitido publicar datos personales en este canal.
  22. var %autoexpulsion = No
  23. ;Fin de configuración
  24.  
  25. ;Creamos la expresión regular para comprobar los posibles números de telefono
  26. var %regex = /(?:\+?1[-. ]?)?\(?([0-9]{3})\)?[-. ]?([0-9]{3})[-. ]?([0-9]{3})/gx
  27. ;Si es $true procedemos y comprobamos si eres @p del canal o no
  28. ;En caso de serlo se activara la opción de baneo, sino se enviara un @notice
  29. if ($regex($1-,%regex)) {
  30. if ($me !isop $chan) {
  31. if (%avisa == Si) { notice $+(@,$chan) %msg }
  32. }
  33. else {
  34. ; Si hemos seteado la autoexpulsión hará un kickban rápido
  35. if (%autoespulsion == Si) { ban $+(-ku,%tiempo) %canal %nick %tipo.baneo %msg }
  36. ; En caso contrario activaremos los hotlinks para clickar un comando
  37. else {
  38. ; Recogemos el número de telefono para el mensaje de debugueo
  39. var %regml 1
  40. while ($regml(%regml)) {
  41. var %tlf %tlf $v1
  42. inc %regml
  43. }
  44. ; Enviamos un echo al canal y a la ventana activa, para efectuar el comando oportuno en caso de necesidad
  45. echo -sa $+(12,$nick,) ha publicado un posible número de telefono (04 %tlf ) en $+(12,$chan,.)
  46. echo -sa Mensaje completo: $1-
  47. echo -sa $nick $chan -KICK- -BAN- -KICKBAN-
  48. }
  49. }
  50. }
  51. }
  52. on ^*:hotlink:-*-:*: return
  53. on *:hotlink:-*-:*: {
  54. var %nick = $gettok($hotline,1,32)
  55. var %canal = $gettok($hotline,2,32)
  56. ; Configuramos tiempo del baneo y mensaje
  57. var %tiempo = 1800
  58. var %tipo.baneo = 2
  59. var %msg = Lo siento no está permitido publicar datos personales en este canal.
  60. ; Fin de configuración
  61. if ($1 == -KICK-) { kick %canal %nick %msg }
  62. elseif ($1 == -BAN-) { ban $+(-u,%tiempo) %canal %nick %tipo.baneo }
  63. elseif ($1 == -KICKBAN-) { ban $+(-ku,%tiempo) %canal %nick %tipo.baneo %msg }
  64. }

©

Table 'wormz_escripting.wormzbot_simpladd' doesn't exist =

Reset

Commentarios


0

0
Promedio de Puntuacion: (1)  5.00
There are no comments for this snippet
EScripting.NET #eScripting, ChatHispano utiliza cookies. Las cookies nos permiten ofrecer nuestros servicios. Más información. Por favor, haga clic en el botón Aceptar para ocultar esta barra y aceptar nuestras cookies. Si usted continúa utilizando Nuestro sitio sin realizar ninguna acción, vamos a suponer que usted consiente nuestras cookies de todos modos.
Cookiebar Panel fromVenue

Iniciar Sesión

Nombre de Usuario

Contraseña



¿No eres miembro?
Regístrate aquí.

¿Contraseña olvidada?
Recupera tu contraseña.

Usuarios Conectados

Invitados: 1
Miembros: 0
Total Miembros: 352
Último Miembro: DaNnY

Últimas Visitas:

FsDk 11:33:42
AfraN 2 días
SykO 1 Semana
Zetup 8 Semanas
NiGhT 16 Semanas
aM3 19 Semanas
slim 26 Semanas
kn1ght 33 Semanas
El_tio_la... 41 Semanas
MaCLeoD 47 Semanas

  Ver más usuarios 

Mini Charla

Tienes que logearte para enviar un mensaje.

11-01-2018 09:31
0_o

04-07-2017 22:29
Angry Sad Angry

13-05-2017 00:03
omg saludos a todos!!

21-01-2017 21:03
Shock Grin Shock

07-01-2017 01:25
Angry Sad Angry Cool

Archivo de mensajes