API tools faq
paste
LinksYs666

Pv2boxconfig.mrc

LinksYs666
Mar 25th, 2018
133
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 8.14 KB | None | 0 0
raw download clone embed print report
  1. on *:dialog:pv2config:*:*:{
  2.   if ($devent = sclick) {
  3.     if ($did = 47) { dialog -c $dname }
  4.     if ($did = 4) { $iif($did(4).state = 1,$cfw(ct,c,1),$cfw(ct,c,0)) }
  5.     if ($did = 5) { $iif($did(5).state = 1,$cfw(r,r,1),$cfw(r,r,0)) }
  6.     if ($did = 6) { $iif($did(6).state = 1,$cfw(z,z,1),$cfw(z,z,0)) }
  7.     if ($did = 50) { $iif($did(50).state = 1,$cfw(i,i,1),$cfw(i,i,0)) }
  8.     if ($did = 53) { $iif($did(53).state = 1,$cfw(f,s,1),$cfw(f,s,0)) }
  9.     if ($did = 54) { $iif($did(54).state = 1,$cfw(f,w,1),$cfw(f,w,0)) }
  10.     if ($did = 55) { $iif($did(55).state = 1,$cfw(f,i,1),$cfw(f,i,0)) }
  11.     if ($did = 56) { $iif($did(56).state = 1,$cfw(f,z,1),$cfw(f,z,0)) }
  12.     if ($did = 57) { $iif($did(57).state = 1,$cfw(f,c,1),$cfw(f,c,0)) }
  13.  
  14.     ;---combos
  15.     ;nick parpadeo
  16.     if ($did = 46) { echo -s $did(46).sel }
  17.     ;lineaas
  18.     if ($did = 2) { echo -s $did(2).sel }
  19.     ;tiempo en pantalla cartel
  20.     if ($did = 33) { echo -s $did(33).sel }
  21.     ;color cartel
  22.     if ($did = 37) { echo -s $did(37).sel }
  23.     ;duracion ignore
  24.     if ($did = 49) { echo -s $did(49).sel }
  25.  
  26.     ;---Barra de colores
  27.     if ($did = 17) { echo -s color blanco }
  28.     if ($did = 16) { echo -s color negro }
  29.     if ($did = 22) { echo -s color azul }
  30.     if ($did = 23) { echo -s color verde }
  31.     if ($did = 18) { echo -s color rojo }
  32.     if ($did = 19) { echo -s color carmeci }
  33.     if ($did = 21) { echo -s color morado }
  34.     if ($did = 24) { echo -s color naranjo }
  35.     if ($did = 61) { echo -s color amarillo }
  36.     if ($did = 60) { echo -s color verde }
  37.     if ($did = 30) { echo -s color verdeoscuro }
  38.     if ($did = 29) { echo -s color celeste }
  39.     if ($did = 28) { echo -s color azulino }
  40.     if ($did = 27) { echo -s color fuxia }
  41.     if ($did = 26) { echo -s color gris }
  42.     if ($did = 25) { echo -s color plomo }
  43.   }
  44.   if ($devent = edit) {
  45.     if ($did = 51) { $cfw(i,m,$did(51).text) }
  46.     if ($did = 58) { $cfw(f,sm,$did(58).text) }
  47.   }
  48.   if ($devent == init) {
  49.     ;-----------------------------------------------Chek
  50.     $iif($cfr(ct,c) = 0,did -u $dname 4,did -c $dname 4)
  51.     $iif($cfr(r,r) = 0,did -u $dname 5,did -c $dname 5)
  52.     $iif($cfr(z,z) = 0,did -u $dname 6,did -c $dname 6)
  53.     $iif($cfr(i,i) = 0,did -u $dname 50,did -c $dname 50)
  54.     ;53 saludar / 54 whois/ 55 ignore /56 zumbido /57 cerrar
  55.     $iif($cfr(f,s) = 0,did -u $dname 53,did -c $dname 53)
  56.     $iif($cfr(f,w) = 0,did -u $dname 54,did -c $dname 54)
  57.     $iif($cfr(f,i) = 0,did -u $dname 55,did -c $dname 55)
  58.     $iif($cfr(f,z) = 0,did -u $dname 56,did -c $dname 56)
  59.     $iif($cfr(f,c) = 0,did -u $dname 57,did -c $dname 57)
  60.     /*
  61.     $iif($cfr() = 0,did -u $dname ,did -c $dname )
  62.     $iif($cfr() = 0,did -u $dname ,did -c $dname )
  63.     */
  64.     ;---------------------------------------------EDIT
  65.     did -a $dname 58 $cfr(f,sm)
  66.     did -a $dname 51 $cfr(i,m)
  67.     ;--------------------------------------------------------Combos!!!!
  68.     ;---Maximo de lineas
  69.     did -a $dname 2 20 Lineas
  70.     did -a $dname 2 50 Lineas
  71.     did -a $dname 2 100 Lineas
  72.     ;---Tiempo de parpadeo
  73.     did -a $dname 46 cada 0.5 segundos
  74.     did -a $dname 46 cada 1 segundos
  75.     did -a $dname 46 cada 1.5 segundos
  76.     did -a $dname 46 cada 2 segundos
  77.     did -a $dname 46 cada 2.5 segundos
  78.     did -a $dname 46 cada 3 segundos
  79.     ;---Tiempo del cartel
  80.     did -a $dname 33 1 Segundos
  81.     did -a $dname 33 2 Segundos
  82.     did -a $dname 33 4 Segundos
  83.     did -a $dname 33 6 Segundos
  84.     did -a $dname 33 8 Segundos
  85.     ;---Color del cartel
  86.     did -a $dname 37 Amarillo
  87.     did -a $dname 37 Verde
  88.     did -a $dname 37 Celeste
  89.     did -a $dname 37 Rosa
  90.     did -a $dname 37 Blanco
  91.     ;---Duracion del Ignore
  92.     did -a $dname 49 5 Minutos
  93.     did -a $dname 49 10 Minutos  
  94.     did -a $dname 49 30 Minutos
  95.     did -a $dname 49 1 Hora
  96.     did -a $dname 49 2 Horas
  97.     did -a $dname 49 6 Horas
  98.     did -a $dname 49 Permanente.
  99.  
  100.     ;-----------------------------------------------Load combos
  101.     var %par = $cfr(nl,p)
  102.     if (%par = 500) { did -u $dname 46 1 }
  103.     if (%par = 1000) { did -u $dname 46 2 }
  104.     if (%par = 1500) { did -u $dname 46 3 }
  105.     if (%par = 2000) { did -u $dname 46 4 }
  106.     if (%par = 2500) { did -u $dname 46 5 }
  107.     if (%par = 3000) { did -u $dname 46 6 }
  108.     var %lin = $cfr(c,lg)
  109.     if (%lin = 20) { did -u $dname 2 1 }
  110.     if (%lin = 50) { did -u $dname 2 2 }
  111.     if (%lin = 100) { did -u $dname 2 3 }
  112.     var %car = $cfr(ct,t)
  113.     if (%car = 1000) { did -u $dname 33 1 }
  114.     if (%car = 2000) { did -u $dname 33 2 }
  115.     if (%car = 4000) { did -u $dname 33 3 }
  116.     if (%car = 6000) { did -u $dname 33 4 }
  117.     if (%car = 8000) { did -u $dname 33 5 }
  118.     var %carc = $cfr(ct,cl)
  119.     if (%carc = amarillo) { did -u $dname 37 1 }
  120.     if (%carc = verde) { did -u $dname 37 2 }
  121.     if (%carc = celeste) { did -u $dname 37 3 }
  122.     if (%carc = rosa) { did -u $dname 37 4 }
  123.     if (%carc = blanco) { did -u $dname 37 5 }
  124.     var %igrt = $cfr(i,t)
  125.     if (%igrt = 300) { did -u $dname 49 1 }
  126.     if (%igrt = 600) { did -u $dname 49 2 }
  127.     if (%igrt = 1800) { did -u $dname 49 3 }
  128.     if (%igrt = 3600) { did -u $dname 49 4 }
  129.     if (%igrt = 7200) { did -u $dname 49 5 }
  130.     if (%igrt = 21600) { did -u $dname 49 6 }
  131.     if (%igrt = 0) { did -u $dname 49 7 }
  132.   }
  133. }
  134.  
  135. alias dn { did -a pv2conf $1 $2- }
  136. dialog pv2config {
  137.   title "Configuraciones Pv2Box"
  138.   size -1 -1 186 171
  139.   option dbu
  140.   box "Lineas maximas de buffe", 1, 4 2 77 29
  141.   combo 2, 6 12 60 100, size drop
  142.   box "Notificaciones.", 3, 4 32 77 41
  143.   check "Cartel", 4, 12 40 50 10
  144.   check "Ring", 5, 12 50 50 10
  145.   check "Zumbidos", 6, 12 60 50 10
  146.   button "?", 7, 65 50 10 8
  147.   button "?", 8, 65 40 10 8
  148.   button "?", 9, 65 60 10 8
  149.   tab "Notify", 10, 84 2 99 167
  150.   list 12, 86 27 95 125, tab 10 size
  151.   button "Agregar", 38, 87 152 46 12, tab 10
  152.   button "Borrar", 39, 135 152 46 12, tab 10
  153.   edit "Lista de Notificables", 44, 86 18 95 10, tab 10 read center
  154.   tab "Ignore", 11
  155.   list 40, 86 27 95 125, tab 11 size
  156.   button "Agregar", 41, 87 152 46 12, tab 11
  157.   button "Borrar", 42, 135 152 46 12, tab 11
  158.   edit "Lista de Ignorados", 43, 86 18 95 10, tab 11 read center
  159.   tab "Notificaciones", 13
  160.   box "Cargar tono de: Ring", 20, 88 18 92 26, tab 13
  161.   edit "", 31, 90 27 68 10, tab 13
  162.   button "...", 32, 159 27 19 9, tab 13
  163.   combo 33, 93 64 80 100, tab 13 size drop
  164.   box "Configuración de Cartel", 34, 88 45 89 56, tab 13
  165.   edit "Tiempo en pantalla", 35, 93 54 80 10, tab 13 read center
  166.   edit "Color del cartel", 36, 93 75 80 10, tab 13 read center
  167.   combo 37, 93 85 80 100, tab 13 size drop
  168.   tab "Funciones", 14
  169.   box "Funciones rapidas", 52, 86 18 95 149, tab 14
  170.   check "Saludar", 53, 90 27 86 10, tab 14 left
  171.   check "Whois", 54, 90 137 86 10, tab 14 left
  172.   edit "", 58, 87 37 92 31, tab 14 center
  173.   check "Ignorar", 55, 90 69 86 10, tab 14 left
  174.   edit "Duracción del Ignore", 48, 87 79 92 10, tab 14 read center
  175.   combo 49, 88 89 90 100, tab 14 size drop
  176.   check "Mensaje al ignorar?", 50, 90 100 86 10, tab 14 left
  177.   edit "", 51, 87 109 92 28, tab 14 center
  178.   check "Cerrar", 57, 90 155 86 10, tab 14 left
  179.   check "Zumbido", 56, 90 146 86 10, tab 14 left
  180.   box "Color Nick", 15, 4 74 77 29
  181.   icon 17, 7 83 7 7, C:\mIRC\Pv2Box\ico\0.png, 0
  182.   box "Tiempo de parpadeo", 45, 4 102 77 26
  183.   combo 46, 6 112 60 100, size drop
  184.   button "Listo", 47, 3 157 78 12
  185.  
  186.   icon 16, 16 83 7 7, C:\mIRC\Pv2Box\ico\1.png, 0
  187.   icon 18, 43 83 7 7, C:\mIRC\Pv2Box\ico\4.png, 0
  188.   icon 19, 52 83 7 7, C:\mIRC\Pv2Box\ico\5.png, 0
  189.   icon 21, 61 83 7 7, C:\mIRC\Pv2Box\ico\6.png, 0
  190.   icon 22, 25 83 7 7, C:\mIRC\Pv2Box\ico\2.png, 0
  191.   icon 23, 34 83 7 7, C:\mIRC\Pv2Box\ico\3.png, 0
  192.   icon 24, 70 83 7 7, C:\mIRC\Pv2Box\ico\7.png, 0
  193.   icon 25, 70 92 7 7, C:\mIRC\Pv2Box\ico\15.png, 0
  194.   icon 26, 61 92 7 7, C:\mIRC\Pv2Box\ico\14.png, 0
  195.   icon 27, 52 92 7 7, C:\mIRC\Pv2Box\ico\13.png, 0
  196.   icon 28, 43 92 7 7, C:\mIRC\Pv2Box\ico\12.png, 0
  197.   icon 29, 34 92 7 7, C:\mIRC\Pv2Box\ico\11.png, 0
  198.   icon 30, 25 92 7 7, C:\mIRC\Pv2Box\ico\10.png, 0
  199.   icon 60, 16 92 7 7, C:\mIRC\Pv2Box\ico\9.png, 0
  200.   icon 61, 7 92 7 7, C:\mIRC\Pv2Box\ico\8.png, 0
  201.   box "Nick de muestra", 62, 4 129 77 26
  202.   button "?", 63, 68 113 10 8
  203.   button "?", 64, 67 13 10 8
  204. }
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!