Autor Tema: sobre anti privados  (Leído 1259 veces)

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado _M3xiC4n0_

  • Novato
  • *
  • Mensajes: 12
  • Karma: +0/-0
sobre anti privados
« en: Mayo 15, 2017, 03:46:22 am »
buenas tardes disculpen mi ignorancia tengo dos dudas con un anti privado.
1- encontre este comando o remoto no se como se llame lo pegue en un addon si funciona solo que ria saber si se le puede agregar
un activador ejemplo menu. ejemplo


menu channel {
  -
  [¤ Antiprivado ¤]
  .Activar:    .enable  #Antiprivados  | .echo -ts   9,1 $timestamp 10 antiPrivados2 Activado! 
  .Desactivar: .disable #Antiprivados  | .echo -ts   9,1 $timestamp 10 antiPrivados2 Desactivado! 
}
#Antiprivados off

#Antiprivados end

ALGO A SI,  ABAJO DEJO TODO EL COMANDO O EL ALIAS NO SÉ SOMO SE LLAMA LES AGRADECERÍA SU AYUDA.

dialog qc {
  title "Query Control By SeiferAlmasy"
  size -1 -1 140 51
  option dbu
  edit "", 3, 4 10 132 10, read
  text "From:", 5, 4 24 14 8
  edit "", 7, 20 22 116 10, read
  button "Accept", 1, 5 34 37 12, flat
  button "Decline", 2, 44 34 37 12, flat
  box "Query Control", 4, 1 1 138 49
}
on *:dialog:qc:sclick:1:{
  /window -w %qnick
  /msg %qnick   10Privado 2Aceptado Por 12 $me
  /dialog -x qc
  /window -a %qnick
  /unset %qnick
}
on *:dialog:qc:sclick:2:{
  close -m %qnick
  /msg %qnick  10 Privado 2Rechazado Por 12 $me 10 Sus Mensajes 2Privados Serán 10Ignorados Desde 2Este Momento12.
  /ignore -pu2000 %qnick $2 2
  /dialog -x qc
  unset %qnick
}
on *:OPEN:?: {
  if ($nick == Nick) { halt }
  elseif ($nick == Radio_Patio) { halt }

  if ($dialog(qc)) {
    .msg $nick 12 $nick 10 En Este 2Momento 10Estoy 2Ocupado.
    close -m $nick
  }
  else {
    /set %qnick $nick
    /window -h %qnick
    /msg %qnick  10Por Favor 2Espere 2Autorización De 12 $me
    /dialog -m qc qc
    did -a qc 7 %qnick
    did -a qc 3 $1-
  }
}

LA SEGUNDA PREGUNTA es si todo el comando esta completo le falta o le sobra

bueno espero de su ayuda y agradecerles aun tengo otra duda pero les agradecria ayudarme con esta gracias

Desconectado lamasfeita

  • Miembro Junior
  • **
  • Mensajes: 90
  • Karma: +1/-11
Re:sobre anti privados
« Respuesta #1 en: Mayo 16, 2017, 04:29:07 am »
Código: [Seleccionar]
menu channel {
  -
  [¤ Antiprivado ¤]
  .Activar:    .enable  #Antiprivados  | .echo -ts   9,1 $timestamp 10 antiPrivados2 Activado! 
  .Desactivar: .disable #Antiprivados  | .echo -ts   9,1 $timestamp 10 antiPrivados2 Desactivado! 
}

dialog qc {
  title "Query Control By SeiferAlmasy"
  size -1 -1 140 51
  option dbu
  edit "", 3, 4 10 132 10, read
  text "From:", 5, 4 24 14 8
  edit "", 7, 20 22 116 10, read
  button "Aceptar", 1, 5 34 37 12, flat
  button "Rechazar", 2, 44 34 37 12, flat
  box "Control de Privados", 4, 1 1 138 49
}
on *:dialog:qc:sclick:1:{
  /window -w %qnick
  /msg %qnick $ewrap  10Privado 2Aceptado Por 12 $me
  /dialog -x qc
  /window -a %qnick
  /unset %qnick
}
on *:dialog:qc:sclick:2:{
  close -m %qnick
  /msg %qnick $ewrap 10 Privado 2Rechazado Por 12 $me 10 Sus Mensajes 2Privados Serán 10Ignorados Desde 2Este Momento12.
  /ignore -pu2000 %qnick $2 2
  /dialog -x qc
  unset %qnick
}
#Antiprivados off
on *:OPEN:?: {
elseif ($nick == lalala ) { halt }
elseif ($nick == blabla ) { halt }

  if ($dialog(qc)) {
    .msg $nick 12 $nick 10 En Este 2Momento 10Estoy 2Ocupado.
    close -m $nick
  }
  else {
    /set %qnick $nick
    /window -h %qnick
    /msg %qnick  10Por Favor 2Espere 2Autorización De 12 $me
    /dialog -m qc qc
    did -a qc 7 %qnick
    did -a qc 3 $1-
  }
}
#Antiprivados end
alias ewrap {
  var %msg
  var %tok = 1
  var %word
  while ($gettok($1-,%tok,32) != $null) {
    %word = $gettok($1-,%tok,32)
    %msg = %msg 15 $+ $upper($left(%word,1)) $+ 15 $+ $right(%word,-1)
    inc %tok
  }
  return
}

creo que asi
LaMasFeita

Desconectado lamasfeita

  • Miembro Junior
  • **
  • Mensajes: 90
  • Karma: +1/-11
Re:sobre anti privados
« Respuesta #2 en: Mayo 16, 2017, 08:16:27 am »
Código: [Seleccionar]
menu channel {
  -
  [¤ Antiprivado ¤]
  .Activar:    .enable  #Antiprivados  | .echo -ts   9,1 $timestamp 10 antiPrivados2 Activado! 
  .Desactivar: .disable #Antiprivados  | .echo -ts   9,1 $timestamp 10 antiPrivados2 Desactivado! 
}

dialog qc {
  title "Query Control By SeiferAlmasy"
  size -1 -1 140 51
  option dbu
  edit "", 3, 4 10 132 10, read
  text "From:", 5, 4 24 14 8
  edit "", 7, 20 22 116 10, read
  button "Aceptar", 1, 5 34 37 12, flat
  button "Rechazar", 2, 44 34 37 12, flat
  box "Control de Privados", 4, 1 1 138 49
}
on *:dialog:qc:sclick:1:{
  /window -w %qnick
  /msg %qnick $ewrap  10Privado 2Aceptado Por 12 $me
  /dialog -x qc
  /window -a %qnick
  /unset %qnick
}
on *:dialog:qc:sclick:2:{
  close -m %qnick
  /msg %qnick $ewrap 10 Privado 2Rechazado Por 12 $me 10 Sus Mensajes 2Privados Serán 10Ignorados Desde 2Este Momento12.
  /ignore -pu2000 %qnick $2 2
  /dialog -x qc
  unset %qnick
}
#Antiprivados off
on *:OPEN:?: {
if ($nick == Nick) { halt }
elseif ($nick == lalala ) { halt }
elseif ($nick == blabla ) { halt }

  if ($dialog(qc)) {
    .msg $nick 12 $nick 10 En Este 2Momento 10Estoy 2Ocupado.
    close -m $nick
  }
  else {
    /set %qnick $nick
    /window -h %qnick
    /msg %qnick  10Por Favor 2Espere 2Autorización De 12 $me
    /dialog -m qc qc
    did -a qc 7 %qnick
    did -a qc 3 $1-
  }
}
#Antiprivados end
alias ewrap {
  var %msg
  var %tok = 1
  var %word
  while ($gettok($1-,%tok,32) != $null) {
    %word = $gettok($1-,%tok,32)
    %msg = %msg 15 $+ $upper($left(%word,1)) $+ 15 $+ $right(%word,-1)
    inc %tok
  }
  return
}

creo que asi
LaMasFeita

Desconectado _M3xiC4n0_

  • Novato
  • *
  • Mensajes: 12
  • Karma: +0/-0
Re:sobre anti privados
« Respuesta #3 en: Mayo 17, 2017, 11:14:36 am »
muchas gracias funciona  perfectamente cuanto le debo jejeje

Desconectado _M3xiC4n0_

  • Novato
  • *
  • Mensajes: 12
  • Karma: +0/-0
Re:sobre anti privados
« Respuesta #4 en: Mayo 20, 2017, 10:26:31 am »
hola la masfeita me funciono perfecta mente solo una pregunta
SE LE PUEDE AGREGAR  ESTO


menu channel {
  -
  [¤ Antiprivado ¤]
  .Activar:    .enable  #Antiprivados  | .echo -ts   9,1 $timestamp 10 antiPrivados2 Activado! 
  .Desactivar: .disable #Antiprivados  | .echo -ts   9,1 $timestamp 10 antiPrivados2 Desactivado! 
  .Sonido
  ..Colocar Sonido: set %ruta.pv $sdir( Selecciona la Carpeta del Addon ) | set %pv $sfile(%ruta.pv,Seleciona El Archivo "PV",oK) | .enable #PLAY on
}
 
que comandos o llaves tenia que agregarle

Desconectado lamasfeita

  • Miembro Junior
  • **
  • Mensajes: 90
  • Karma: +1/-11
Re:sobre anti privados
« Respuesta #5 en: Mayo 22, 2017, 03:23:22 am »
hola la masfeita me funciono perfecta mente solo una pregunta
SE LE PUEDE AGREGAR  ESTO


menu channel {
  -
  [¤ Antiprivado ¤]
  .Activar:    .enable  #Antiprivados  | .echo -ts   9,1 $timestamp 10 antiPrivados2 Activado!
  .Desactivar: .disable #Antiprivados  | .echo -ts   9,1 $timestamp 10 antiPrivados2 Desactivado!
  .Sonido
  ..Colocar Sonido: set %ruta.pv $sdir( Selecciona la Carpeta del Addon ) | set %pv $sfile(%ruta.pv,Seleciona El Archivo "PV",oK) | .enable #PLAY on
}
 
que comandos o llaves tenia que agregarle


disculpa _M3xiC4n0_ pero no entiendo tu pregunta ya que el IRcap tiene sonidos incorporados para lo que deseas.-

saludos
LaMasFeita