Codigos Snippets

WormZ -> Snippets > mIRC Scripting > Creador de Inputs

Creador de Inputs

Enviado Por: SykO
Descripcion:
Hace unos dias recivi un correo de alguien mostrandome una modificacion de un viejo codigo que hice hace mucho tiempo y el autor de la modificacion dise haber arreglado un error pero en si el codigo esta incompleto y es por eso que tenia el error pero eh aqui el codigo completo. Nota que es un muy viejo codigo. utiliza /pIAyuda para ayuda sobre este codigo.
Codigo:
  1. ;Info: Ayuda de Comandos
  2. alias pIAyuda { var %e = echo $color(info2) -a »
  3. %e $+(,$str(–,55),)
  4. %e  Ayuda Sobre Creador de Inputs 
  5. %e  Nota: Todos Los Comandos Solo Pueden Ser Utilisados en los Canales
  6. %e
  7. %e Para Añadir Un Comando Escribe:
  8. %e .+Com [Input] [Comando]
  9. %e
  10. %e Ejemplo: .+com !msn say Mi msn es: syko-c5@live.com
  11. %e !msn es el [Input] y say Mi msn es: syco-c5@live.com  es el [comando]
  12. %e
  13. %e Cuando Escribas el [Input] en un canal, se activara el [Comando]
  14. %e
  15. %e Para Borrar Un Comando Escribe:
  16. %e .-com [Input]
  17. %e
  18. %e Para Ver La Lista De Comandos Escribe:
  19. %e .clist
  20. %e $+(,$str(–,55),)
  21. }
  22.  
  23. ;Info: Inputs (comandos)
  24. On *:Input:#: { var %dir Comandos.ini
  25. if ($1 == .+com) {
  26. if (!$2) || (!$3) { echo -a Sintasis Incorrecto Intenta: .+com [Input] [Comando] }
  27. else {
  28. writeini %dir Com $2 $tmfck($3-)
  29. echo -a Comando Añadido Input: $2 Comando: $3-
  30. }
  31. }
  32. if ($1 == .-com) {
  33. if (!$2) { echo -a Sintasis Incorrecto Intenta: .-com [Input] }
  34. else {
  35. if (!$readini(%dir,Com,$2)) { echo -a El Comando No Existe. }
  36. else {
  37. remini %dir Com $2
  38. echo -a Comando Borrado Input: $2
  39. }
  40. }
  41. }
  42. if ($1 == .clist) {
  43. if (!$ini(%dir,Com,0)) { echo -a No Tienes Comandos... }
  44. else {
  45. echo -a Lista de Comandos:
  46. var %i 1
  47. while (%i <= $ini(%dir,Com,0)) {
  48. var %inp = $ini(%dir,Com,%i),%com = $readini(%dir,Com,%inp))
  49. echo -a Input: %inp Comando: $tmfdk(%com)
  50. inc %i
  51. }
  52. echo -a Fin de Comandos.
  53. }
  54. }
  55. if ($readini(%dir,Com,$1)) { $tmfdk($v1) }
  56. }
  57.  
  58. ;Info: Alias
  59. alias tmfck return $replace($1-,$chr(3),<k>,$chr(2),<b>,$chr(31),<u>,$chr(22),<r>,$chr(15),<o>)
  60. alias tmfdk return $replace($1-,<k>,$chr(3),<b>,$chr(2),<u>,$chr(31),<r>,$chr(22),<o>,$chr(15))

©

Table 'wormz_escripting.wormzbot_simpladd' doesn't exist =

Reset

Commentarios


0

0
Promedio de Puntuacion: (0)  0
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: 2
Miembros: 0
Total Miembros: 352
Último Miembro: DaNnY

Últimas Visitas:

FsDk 11:42:01
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