[script]
n0=;xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
n1=; 1.- Nombre: OrioN
n2=; 2.- Versión: v5.9
n3=; 3.- Autor: Javier Fernández Rivera
n4=; 4.- Web: http://www.ircorion.net
n5=; 5.- Mail: script@ircorion.net
n11=;xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
n12=
n13=;picture windows ==============================================
n14=
n15=;wins principales............................
n16=menu @barscript {
n17=  sclick {    
n18=    ;superposicion de wins (barras) principales
n19=    if ($mouse.x > 2) && ($mouse.x < 49) && ($mouse.y > 37) && ($mouse.y < 49) { @barscript  }
n20=    if ($mouse.x > 54) && ($mouse.x < 100) && ($mouse.y > 37) && ($mouse.y < 49) { @barexes  }
n21=    if ($mouse.x > 105) && ($mouse.x < 151) && ($mouse.y > 37) && ($mouse.y < 49) { @barwar  }
n22=    if ($mouse.x > 22) && ($mouse.x < 45) && ($mouse.y > 10) && ($mouse.y < 32) { dialog -m fserver fserver } 
n23=    if ($mouse.x > 57) && ($mouse.x < 79) && ($mouse.y > 10) && ($mouse.y < 32) { dialog -m away away }
n24=    if ($mouse.x > 105) && ($mouse.x < 133) && ($mouse.y > 10) && ($mouse.y < 32) { dialog -m setup setup }    
n25=    if ($mouse.x > 142) && ($mouse.x < 165) && ($mouse.y > 11) && ($mouse.y < 32) { runer net http://www.ircorion.net/secc/ayuda/ayuda.htm } 
n26=    if ($mouse.x > 193) && ($mouse.x < 214) && ($mouse.y > 11) && ($mouse.y < 32) { dialog -m letras letras }
n27=    if ($mouse.x > 223) && ($mouse.x < 251) && ($mouse.y > 11) && ($mouse.y < 32) {  @alarma }   
n28=    if ($mouse.x > 263) && ($mouse.x < 289) && ($mouse.y > 11) && ($mouse.y < 32) {
n29=      if ( $window( @calc ).status )  window -a @calc  
n30=      else calc.load 
n31=    } 
n32=    if ($mouse.x > 301) && ($mouse.x < 325) && ($mouse.y > 11) && ($mouse.y < 32) { dialog -md musica musica }
n33=    if ($mouse.x > 332) && ($mouse.x < 357) && ($mouse.y > 11) && ($mouse.y < 32) { run $mircdirsistema\sendmail\EnvioMail.exe }   
n34=    if ($mouse.x > 250) && ($mouse.x < 275) && ($mouse.y > 39) && ($mouse.y < 32) { nick $$?="Escribe tu nuevo nick" }  
n35=    if ($mouse.x > 283) && ($mouse.x < 328) && ($mouse.y > 39) && ($mouse.y < 32) { dialog -m canales canales }  
n36=    if ($mouse.x > 336) && ($mouse.x < 368) && ($mouse.y > 39) && ($mouse.y < 32) { comanbar query  }    
n37=  }
n38=  mouse {
n39=    if ($mouse.x > 22) && ($mouse.x < 45) && ($mouse.y > 10) && ($mouse.y < 32) {  drawline @barscript 1 4 1 3 400 3 | drawpic -c @barscript 30 0 $orionskin(x.jpg)  | infotxt@  9Servidor de ficheros (F-Server)  } 
n40=    if ($mouse.x > 57) && ($mouse.x < 79) && ($mouse.y > 10) && ($mouse.y < 32) {  drawline @barscript 1 4 1 3 400 3 |  drawpic -c @barscript 65 0 $orionskin(x.jpg)  | infotxt@  9Gestor de ausencía (AwaY)  }
n41=    if ($mouse.x > 111) && ($mouse.x < 128) && ($mouse.y > 10) && ($mouse.y < 32) {  drawline @barscript 1 4 1 3 400 3 | drawpic -c @barscript 115 0 $orionskin(x.jpg) | infotxt@  9Configurador general del script (SETUP)  }    
n42=    if ($mouse.x > 142) && ($mouse.x < 165) && ($mouse.y > 11) && ($mouse.y < 32) {  drawline @barscript 1 4 1 3 400 3 | drawpic -c @barscript 150 0 $orionskin(x.jpg)  | infotxt@  9Archivo de ayuda al script (hlp) } 
n43=    if ($mouse.x > 193) && ($mouse.x < 214) && ($mouse.y > 11) && ($mouse.y < 32) {  drawline @barscript 1 4 1 3 400 3 | drawpic -c @barscript 200 0 $orionskin(x.jpg)  | infotxt@  9Configurador de letras  }
n44=    if ($mouse.x > 223) && ($mouse.x < 251) && ($mouse.y > 11) && ($mouse.y < 32) { drawline @barscript 1 4 1 3 400 3 |  drawpic -c @barscript 234 0 $orionskin(x.jpg)  | infotxt@  9Consola de alarma y avisos } 
n45=    if ($mouse.x > 263) && ($mouse.x < 289) && ($mouse.y > 11) && ($mouse.y < 32) {  drawline @barscript 1 4 1 3 400 3 | drawpic -c @barscript 272 0 $orionskin(x.jpg)  | infotxt@  9Calculadora, pantalla LCD  }
n46=    if ($mouse.x > 301) && ($mouse.x < 325) && ($mouse.y > 11) && ($mouse.y < 32) {  drawline @barscript 1 4 1 3 400 3 |  drawpic -c @barscript 307 0 $orionskin(x.jpg)  | infotxt@  9Reproductor de musica del script mp3 wav midi  }
n47=    if ($mouse.x > 332) && ($mouse.x < 357) && ($mouse.y > 11) && ($mouse.y < 32) {   drawline @barscript 1 4 1 3 400 3 |    drawpic -c @barscript 340 0 $orionskin(x.jpg)  | infotxt@  9Gestor de correo  (e-mail) }    
n48=  }
n49=  f-server:/dialog -m fserver fserver
n50=  away
n51=  .gestor de away:/ dialog -m away away
n52=  .grabadora de msgs:/@winreadmsgaway
n53=  SETUP:/dialog -m setup setup
n54=  ayuda:/
n55=  letra:/dialog -m letras letras
n56=  alarma:/
n57=  calculadora:{
n58=    if ( $window( @calc ).status )  window -a @calc  
n59=    else calc.load 
n60=  }
n61=  R-musica ScripT:/dialog -m musica musica
n62=  gestor de correo:/dialog m email email
n63=  visor de logs:/@log
n64=  gestor de canales:/dialog -m canales canales
n65=}
n66=
n67=MENU @barexes {
n68=  sclick {    
n69=    ;superposicion de wins (barras) principales
n70=    if ($mouse.x > 2) && ($mouse.x < 49) && ($mouse.y > 37) && ($mouse.y < 49) { @barscript  }
n71=    if ($mouse.x > 54) && ($mouse.x < 100) && ($mouse.y > 37) && ($mouse.y < 49) { @barexes  }
n72=    if ($mouse.x > 105) && ($mouse.x < 151) && ($mouse.y > 37) && ($mouse.y < 49) { @barwar  }
n73=
n74=    if ($mouse.x > 349) && ($mouse.x < 372) && ($mouse.y > 37) && ($mouse.y < 49) { ftp }
n75=    if ($mouse.x > 8) && ($mouse.x < 28) && ($mouse.y > 11) && ($mouse.y < 29) { 
n76=      if (%rutaexplorador == $null) {  dialog -m progext progext | did -c progext 7 2 | autolocalizador | sacobusca Localizando ruta del programa ...  | .timerrun 1 8 run  %rutaexplorador | dialog -x progext progext }
n77=      else {  run  %rutaexplorador }
n78=    }        
n79=    if ($mouse.x > 38) && ($mouse.x < 59) && ($mouse.y > 12) && ($mouse.y < 30) { 
n80=      if (%rutanotepad == $null) {  dialog -m progext progext | did -c progext 7 3 | autolocalizador  | sacobusca Localizando ruta del programa ... | .timerrun 1 8 run %rutanotepad | dialog -x progext progext }
n81=      else {  run  %rutanotepad }
n82=    }       
n83=    if ($mouse.x > 68) && ($mouse.x < 89) && ($mouse.y > 12) && ($mouse.y < 30) { 
n84=      if (%rutamusiwin == $null) { set %rutamusiwin $findfile(c:\,Cdplayer.exe,1) | run %rutamusiwin }
n85=      else { run %rutamusiwin }
n86=    }
n87=    if ($mouse.x > 112) && ($mouse.x < 134) && ($mouse.y > 13) && ($mouse.y < 32) { 
n88=      if (%rutanet == $null) {  dialog -m progext progext | did -c progext 7 1 | manuallocalizador | dialog -x progext progext }
n89=      else {  run  %rutanet }
n90=    }        
n91=    if ($mouse.x > 175) && ($mouse.x < 197) && ($mouse.y > 10) && ($mouse.y < 34) { 
n92=      if (%rutaemail == $null) {  dialog -m progext progext | did -c progext 7 5 | manuallocalizador | dialog -x progext progext }
n93=      else {  run  %rutaemail }   
n94=    }        
n95=    if ($mouse.x > 142) && ($mouse.x < 167) && ($mouse.y > 13) && ($mouse.y < 30) { 
n96=      if (%rutaftp == $null) {  dialog -m progext progext | did -c progext 7 6 | manuallocalizador  | dialog -x progext progext }
n97=      else {  run  %rutaftp  }    
n98=    }        
n99=    if ($mouse.x > 223) && ($mouse.x < 245) && ($mouse.y > 11) && ($mouse.y < 32) { 
n100=      if (%rutamp3 == $null) {  dialog -m progext progext | did -c progext 7 4  | manuallocalizador  | dialog -x progext progext  }
n101=      else {  run  %rutamp3   }    
n102=    }         
n103=    if ($mouse.x > 255) && ($mouse.x < 276) && ($mouse.y > 14) && ($mouse.y < 32) { 
n104=      if (%rutavisor == $null) {  dialog -m progext progext | did -c progext 7 7  | manuallocalizador  | dialog -x progext progext  }
n105=      else {  run  %rutavisor }    
n106=    }        
n107=    if ($mouse.x > 286) && ($mouse.x < 305) && ($mouse.y > 13) && ($mouse.y < 34) { 
n108=      if (%rutacompr == $null) {  dialog -m progext progext | did -c progext 7 10  | manuallocalizador | dialog -x progext progext  }
n109=      else {  run  %rutacompr }    
n110=    }            
n111=    if ($mouse.x > 316) && ($mouse.x < 335) && ($mouse.y > 12) && ($mouse.y < 37) {   
n112=      if (%rutafire == $null) {  dialog -m progext progext | did -c progext 7 11  | manuallocalizador | dialog -x progext progext  }
n113=      else {  run  %rutafire  }    
n114=    }        
n115=    if ($mouse.x > 346) && ($mouse.x < 356) && ($mouse.y > 17) && ($mouse.y < 32) {   
n116=      if (%rutaprogra1 == $null) {  dialog -m progext progext | did -c progext 7 8 | manuallocalizador | dialog -x progext progext }
n117=      else {  run  %rutaprogra1    }    
n118=    }        
n119=    if ($mouse.x > 364) && ($mouse.x < 375) && ($mouse.y > 17) && ($mouse.y < 32) { 
n120=      if (%rutaprogra2 == $null) {  dialog -m progext progext | did -c progext 7 9 | manuallocalizador | dialog -x progext progext }
n121=      else {  run  %rutaprogra2  }    
n122=    }          
n123=  }
n124=  mouse {
n125=    if ($mouse.x > 8) && ($mouse.x < 28) && ($mouse.y > 11) && ($mouse.y < 29) {  drawline @barexes 1 4 1 3 400 3 |  drawpic -c @barexes 13 0 $orionskin(x.jpg) | infotxt@  11Explorador de windows   }
n126=    if ($mouse.x > 38) && ($mouse.x < 59) && ($mouse.y > 12) && ($mouse.y < 30) {  drawline @barexes 1 4 1 3 400 3 | drawpic -c @barexes 45 0 $orionskin(x.jpg)  | infotxt@  11Libreta de notas (notepad)   }
n127=    if ($mouse.x > 68) && ($mouse.x < 89) && ($mouse.y > 12) && ($mouse.y < 30) {  drawline @barexes 1 4 1 3 400 3 | drawpic -c @barexes 72 0 $orionskin(x.jpg) | infotxt@  11Reproductor CDs de windows   }
n128=    if ($mouse.x > 112) && ($mouse.x < 134) && ($mouse.y > 13) && ($mouse.y < 32) {  drawline @barexes 1 4 1 3 400 3 |  drawpic -c @barexes 118 0 $orionskin(x.jpg) | infotxt@  11Navegador de internet  }
n129=    if ($mouse.x > 142) && ($mouse.x < 167) && ($mouse.y > 13) && ($mouse.y < 30) { drawline @barexes 1 4 1 3 400 3 |  drawpic -c @barexes 150 0 $orionskin(x.jpg) | infotxt@  11Operador de FTP 8(traferencia de files al serv)  }
n130=    if ($mouse.x > 175) && ($mouse.x < 197) && ($mouse.y > 13) && ($mouse.y < 30) {  drawline @barexes 1 4 1 3 400 3 | drawpic -c @barexes 183 0 $orionskin(x.jpg)  | infotxt@  11Gestor de correo (e-mail)  }     
n131=    if ($mouse.x > 223) && ($mouse.x < 245) && ($mouse.y > 11) && ($mouse.y < 32) {  drawline @barexes 1 4 1 3 400 3 | drawpic -c @barexes 232 0 $orionskin(x.jpg)  | infotxt@  11Reproductor de archivos mp3   }
n132=    if ($mouse.x > 255) && ($mouse.x < 276) && ($mouse.y > 14) && ($mouse.y < 32) { drawline @barexes 1 4 1 3 400 3 | drawpic -c @barexes 262 0 $orionskin(x.jpg)  | infotxt@ 11Visor de imagenes   }
n133=    if ($mouse.x > 286) && ($mouse.x < 305) && ($mouse.y > 13) && ($mouse.y < 34) {  drawline @barexes 1 4 1 3 400 3 | drawpic -c @barexes 292 0 $orionskin(x.jpg)  | infotxt@  11Compresor de archivos  }    
n134=    if ($mouse.x > 316) && ($mouse.x < 335) && ($mouse.y > 12) && ($mouse.y < 37) {  drawline @barexes 1 4 1 3 400 3 | drawpic -c @barexes 320 0 $orionskin(x.jpg)  | infotxt@  11Cortafuegos  }  
n135=    if ($mouse.x > 346) && ($mouse.x < 356) && ($mouse.y > 17) && ($mouse.y < 32) { drawline @barexes 1 4 1 3 400 3 | drawpic -c @barexes 347 0 $orionskin(x.jpg)  | infotxt@  11Programa predefinido 1   }        
n136=    if ($mouse.x > 364) && ($mouse.x < 375) && ($mouse.y > 17) && ($mouse.y < 32) {  drawline @barexes 1 4 1 3 400 3 |  drawpic -c @barexes 365 0 $orionskin(x.jpg)  | infotxt@  11Programa predefinido 2   }
n137=  }  
n138=  barras graficas
n139=  .script: @barscript
n140=  .programas externos: @barexes
n141=  .guerra: @barWAR
n142=  config ejecutables: dialog -m progext progext
n143=}
n144=
n145=
n146=MENU @barWAR {
n147=  sclick {    
n148=    ;superposicion de wins (barras) principales
n149=    if ($mouse.x > 2) && ($mouse.x < 49) && ($mouse.y > 37) && ($mouse.y < 49) { @barscript  }
n150=    if ($mouse.x > 54) && ($mouse.x < 100) && ($mouse.y > 37) && ($mouse.y < 49) { @barexes  }
n151=    if ($mouse.x > 105) && ($mouse.x < 151) && ($mouse.y > 37) && ($mouse.y < 49) { @barwar  }
n152=    if ($mouse.x > 12) && ($mouse.x < 36) && ($mouse.y > 11) && ($mouse.y < 33) {   
n153=      if (%barsnick != $null) {  set %ataker on | set %progataker click | who %barsnick | sorion ban }
n154=      else { informo Para utilizar este progama de atake es necesario que estes conectado y que marques sobre un nick (victima) de la lista de nicks de un canal cualquiera :-P $oriontheme(sSeparadorLine) }
n155=    }
n156=    if ($mouse.x > 49) && ($mouse.x < 71) && ($mouse.y > 11) && ($mouse.y < 33) {  %ataker.port = 6667 | %ataker = on | %progataker = winnuke  | who %BARSNICK | sorion part }
n157=    if ($mouse.x > 87) && ($mouse.x < 104) && ($mouse.y > 11) && ($mouse.y < 31) {  
n158=      if (%barsnick != $null) {  set %ataker on | set %progataker VTJNuker | who %barsnick | .splay $mircdirmusica\wav\metra.wav }
n159=      else { informo Para utilizar este progama de atake es necesario que estes conectado y que marques sobre un nick (victima) de la lista de nicks de un canal cualquiera :-P $oriontheme(sSeparadorLine) }
n160=    }
n161=    if ($mouse.x > 121) && ($mouse.x < 141) && ($mouse.y > 12) && ($mouse.y < 32) { 
n162=      if (%exewar1 == $null) { %exewar1 =  $dir="Seleccione su programa de war predefinido." C:\  }
n163=      else { run %exewar1 }   
n164=    }
n165=    if ($mouse.x > 161) && ($mouse.x < 182) && ($mouse.y > 10) && ($mouse.y < 33) {  run $mircdirWAR\jav\VTJBomber.exe }
n166=    if ($mouse.x > 260) && ($mouse.x < 284) && ($mouse.y > 13) && ($mouse.y < 32) {  run $mircdirWAR\divint\Divint3.exe }
n167=    if ($mouse.x > 193) && ($mouse.x < 235) && ($mouse.y > 11) && ($mouse.y < 26) { 
n168=      if (%barsnick != $null) {  set %ataker on | set %progataker Wsping32 |  who %barsnick }
n169=      else { informo Para utilizar este progama de atake es necesario que estes conectado y que marques sobre un nick (victima) de la lista de nicks de un canal cualquiera :-P $oriontheme(sSeparadorLine) }
n170=    }
n171=    if ($mouse.x > 313) && ($mouse.x < 337) && ($mouse.y > 11) && ($mouse.y < 34) {  run $mircdirWAR\jav\JAV.exe  | sorion ban }
n172=    if ($mouse.x > 350) && ($mouse.x < 371) && ($mouse.y > 11) && ($mouse.y < 33) {  run $mircdirWAR\nukenabber\nukenabber.exe }
n173=  }
n174=  mouse {
n175=    if ($mouse.x > 12) && ($mouse.x < 36) && ($mouse.y > 11) && ($mouse.y < 33) { drawline @barwar 1 4 0 3 400 3 |  drawpic -c @barwar 20 1 $orionskin(x.jpg)  | infotxt@  11Atakar con nuke-click al usuario4 %barsnick    }
n176=    if ($mouse.x > 49) && ($mouse.x < 71) && ($mouse.y > 11) && ($mouse.y < 33) { drawline @barwar 1 4 0 3 400 3 |  drawpic -c @barwar 55 1 $orionskin(x.jpg)  | infotxt@  11Ejecutar Win-Nuke 4    }
n177=    if ($mouse.x > 87) && ($mouse.x < 104) && ($mouse.y > 11) && ($mouse.y < 31) { drawline @barwar 1 4 0 3 400 3 |  drawpic -c @barwar 93 1 $orionskin(x.jpg)  | infotxt@  11Lanzar Vai-Te-Ja nuker contra el usuario4 %barsnick    }
n178=    if ($mouse.x > 121) && ($mouse.x < 141) && ($mouse.y > 12) && ($mouse.y < 32) { drawline @barwar 1 4 0 3 400 3 |  drawpic -c @barwar 129 1 $orionskin(x.jpg)  | infotxt@  11Programa de war predefinido por usuario.   }
n179=    if ($mouse.x > 161) && ($mouse.x < 182) && ($mouse.y > 10) && ($mouse.y < 33) { drawline @barwar 1 4 0 3 400 3 |  drawpic -c @barwar 167 1 $orionskin(x.jpg)  | infotxt@  11Ejecutar el 4ICMP-Bomber4   }
n180=    if ($mouse.x > 193) && ($mouse.x < 235) && ($mouse.y > 11) && ($mouse.y < 26) {  drawline @barwar 1 4 0 3 400 3 |  drawpic -c @barwar 210 1 $orionskin(x.jpg)  | infotxt@ 11Atakar con flood mediante pings a4 %barsnick  }  
n181=    if ($mouse.x > 260) && ($mouse.x < 284) && ($mouse.y > 13) && ($mouse.y < 32) { drawline @barwar 1 4 0 3 400 3 |  drawpic -c @barwar 268 1 $orionskin(x.jpg)  | infotxt@  11Ejecutar programa-consola de war 4DivinT    }
n182=    if ($mouse.x > 313) && ($mouse.x < 337) && ($mouse.y > 11) && ($mouse.y < 34) { drawline @barwar 1 4 0 3 400 3 |  drawpic -c @barwar 320 1 $orionskin(x.jpg)  | infotxt@  11Sacar el detector de 4nukes 11(atakes)     }
n183=    if ($mouse.x > 350) && ($mouse.x < 371) && ($mouse.y > 11) && ($mouse.y < 33) { drawline @barwar 1 4 0 3 400 3 |  drawpic -c @barwar 355 1 $orionskin(x.jpg)  | infotxt@  11Ejecutar la salida del 4nukennaber 11(proteccion anti-nukes)    }
n184=  }
n185=}
n186=
n187=menu @barstatus {
n188=  sclick {
n189=    if ($mouse.x > 309) && ($mouse.x < 402) && ($mouse.y > 36) && ($mouse.y < 49) {  msg %winactive 1[2 $me $+ 14:7 LaG1 (4 %lag 1) ] }
n190=    if ($mouse.x > 281) && ($mouse.x < 306) && ($mouse.y > 36) && ($mouse.y < 49) { dialog -m lageo lageo  }
n191=    if ($mouse.x > 43) && ($mouse.x < 119) && ($mouse.y > 0) && ($mouse.y < 10) {  msg %winactive  2Fecha:4 $date }
n192=    if ($mouse.x > 161) && ($mouse.x < 234) && ($mouse.y > 0) && ($mouse.y < 10) { msg %winactive  2Llevo conectado al IRC:4 %th $+ 14hora/s 2y4 %tm $+ 14min/s }
n193=    if ($mouse.x > 280) && ($mouse.x < 343) && ($mouse.y > 0) && ($mouse.y < 10) { msg %winactive  2Hora:4 $time }
n194=    if ($mouse.x > 0) && ($mouse.x < 20) && ($mouse.y > 36) && ($mouse.y < 47) { comanbar whois }
n195=    if ($mouse.x > 29) && ($mouse.x < 56) && ($mouse.y > 36) && ($mouse.y < 49) { nick $$?="Nuevo nick?"  }  
n196=    if ($mouse.x > 62) && ($mouse.x < 84) && ($mouse.y > 36) && ($mouse.y < 49) { dialog -m canales canales }  
n197=    if ($mouse.x > 91) && ($mouse.x < 115) && ($mouse.y > 36) && ($mouse.y < 49) { comanbar query }  
n198=    if ($mouse.x > 126) && ($mouse.x < 141) && ($mouse.y > 39) && ($mouse.y < 49) { comanbar +op }
n199=    if ($mouse.x > 147) && ($mouse.x < 177) && ($mouse.y > 38) && ($mouse.y < 48) { comanbar -op }
n200=    if ($mouse.x > 184) && ($mouse.x < 209) && ($mouse.y > 36) && ($mouse.y < 47) { comanbar kick  }  
n201=    if ($mouse.x > 216) && ($mouse.x < 240) && ($mouse.y > 36) && ($mouse.y < 47) {  comanbar k+m }
n202=    if ($mouse.x > 249) && ($mouse.x < 270) && ($mouse.y > 36) && ($mouse.y < 47) { comanbar b+k }
n203=    if ($mouse.x > 387) && ($mouse.x < 418) && ($mouse.y > 0) && ($mouse.y < 27) { dialog -m servers servers }
n204=  }
n205=  mouse {
n206=    if ($mouse.x > 29) && ($mouse.x < 56) && ($mouse.y > 36) && ($mouse.y < 49) { infotxt@  Cambio de nick [ $me ]  }  
n207=    if ($mouse.x > 62) && ($mouse.x < 84) && ($mouse.y > 36) && ($mouse.y < 49) { infotxt@  Ejecutar gestor de canales.  }  
n208=    if ($mouse.x > 91) && ($mouse.x < 115) && ($mouse.y > 36) && ($mouse.y < 49) { infotxt@  Hacer privado [ %barsnick ]  }  
n209=    if ($mouse.x > 281) && ($mouse.x < 404) && ($mouse.y > 36) && ($mouse.y < 49) {  infotxt@  Tu retardo con el server es de: %lag seg  }  
n210=    if ($mouse.x > 43) && ($mouse.x < 119) && ($mouse.y > 0) && ($mouse.y < 10) {   infotxt@  La fecha de hoy es: $date  }
n211=    if ($mouse.x > 161) && ($mouse.x < 234) && ($mouse.y > 0) && ($mouse.y < 10) {   infotxt@  Llevas conectado al IRC: %tm $+ min y %th $+ horas   }
n212=    if ($mouse.x > 280) && ($mouse.x < 343) && ($mouse.y > 0) && ($mouse.y < 10) {   infotxt@  Ahora son las: $time   }
n213=    if ($mouse.x > 0) && ($mouse.x < 20) && ($mouse.y > 39) && ($mouse.y < 49) {  infotxt@  Sacar la información (whois) del usuario [ %barsnick ]  }
n214=    if ($mouse.x > 126) && ($mouse.x < 141) && ($mouse.y > 39) && ($mouse.y < 49) {  infotxt@  Dar @ estatus de operador al usuario [ %barsnick ] }
n215=    if ($mouse.x > 147) && ($mouse.x < 177) && ($mouse.y > 38) && ($mouse.y < 48) {  infotxt@  Quitar @ (estatus de usuarios) al usuario [ %barsnick ]  }
n216=    if ($mouse.x > 184) && ($mouse.x < 209) && ($mouse.y > 36) && ($mouse.y < 47) {  infotxt@  kikear (echar del canal) al usuario [ %barsnick ]  }  
n217=    if ($mouse.x > 216) && ($mouse.x < 240) && ($mouse.y > 36) && ($mouse.y < 47) {  infotxt@  kikear con mensaje a [ %barsnick ] |  }
n218=    if ($mouse.x > 249) && ($mouse.x < 270) && ($mouse.y > 36) && ($mouse.y < 47) {  infotxt@  Hacer ban mas kick a [ %barsnick ] | }
n219=    if ($mouse.x > 387) && ($mouse.x < 418) && ($mouse.y > 0) && ($mouse.y < 27) {  infotxt@  [ Conexion: $iif($server != $null,ON-line,4OFF-line) ] $server  }
n220=  }
n221=}
n222=
n223=;ventana de f-server==================================
n224=;FSERVER========================================
n225=MENU @fserver {
n226=  config: dialog -m fserver fserver
n227=  -
n228=  $sline(@fserver,1)
n229=  .whois: quien-es $sline(@fserver,1) d
n230=  .-
n231=  .expulsar: { aline @fserver 9< $+ 0 $+ $sline(@fserver,1)  $+ 9 $+ > 4 expulsado del fserver  | close -f $sline(@fserver,1) | dline -l @fserver $line(@fserver,0,1) }
n232=  .banear: {
n233=    set %baneofserv $mask($address($sline(@fserver,1),5),5)
n234=    aline @fserver 9< $+ 0 $+ $sline(@fserver,1)  $+ 9 $+ > 4 expulsado del fserver  | close -f $sline(@fserver,1) | dline -l @fserver $line(@fserver,0,1)
n235=    echo -s Activado un ban para F-server sobre: %baneofserv 
n236=    if (%baneofserv1 == $null) { %baneofserv1 = %baneofserv | unset %baneofserv | halt }
n237=    if (%baneofserv2 == $null) { %baneofserv2 = %baneofserv | unset %baneofserv | halt }
n238=    if (%baneofserv3 == $null) { %baneofserv3 = %baneofserv | unset %baneofserv | halt }
n239=
n240=  }
n241=  - 
n242=  quitar ban
n243=  .ban1- %baneofserv1: echo -s  Has retirado el ban de f-server: %baneofserv1 | unset %baneofserv1
n244=  .ban2- %baneofserv2: echo -s  Has retirado el ban de f-server: %baneofserv2 |  unset %baneofserv2 
n245=  .ban3- %baneofserv3: echo -s  Has retirado el ban de f-server: %baneofserv3 |  unset %baneofserv3 
n246=  -
n247=  cerrar fserver: { 
n248=    close -f $sline(@fserver,1)
n249=    close -f $sline(@fserver,2)
n250=    close -f $sline(@fserver,3)
n251=    close -f $sline(@fserver,4)
n252=    close -f $sline(@fserver,5)  
n253=    window -c @fserver
n254=    sorion check | set %anufserver off | set %fserver off 
n255=    .disable #fserver | desfserver | .timeranufserver off 
n256=    .timeranufserver off
n257=    echo -s $oriontheme(sSeparadorLine)   
n258=    echo -s $oriontheme(sFserverOff)
n259=  }
n260=}
n261=
n262=MENU @Navegador {
n263=  dclick {  
n264=    set %dirfserverlist $sline(@Navegador,1)
n265=    if ($isupper(%dirfserverlist ) == $true) { 
n266=      clear $active 
n267=      aline @Navegador $oriontheme(sSeparadorLine)
n268=      aline @Navegador F-§êRvËr de:8 %fserverchatxx
n269=      aline @Navegador $oriontheme(sSeparadorLine)
n270=    .msg = $+ $chat(%fserverchatxx) cd %dirfserverlist | .msg = $+ $chat(%fserverchatxx) dir } 
n271=    else { 
n272=      aline @Navegador $oriontheme(sSeparadorLine)
n273=      aline @Navegador F-§êRvËr de:8 %fserverchatx
n274=      aline @Navegador $oriontheme(sSeparadorLine)
n275=    .msg = $+ $chat(%fserverchatxx) get $gettok(%dirfserverlist,1,32) }
n276=  }
n277=  información: informo Para navegador por los directorios solo tienes que hacer boble-click sobre el directorio, al igual que para bajarte algun archivo. :-D 
n278=  -
n279=  $sline(@navegador,1): {
n280=    sorion click    
n281=    if ($isupper($sline(@navegador,1) ) == $true) { .msg = $+ $chat(1) cd $sline(@navegador,1) |  clear $active | .msg  = $+ $chat(%fserverchatxx) dir } 
n282=    else { .msg =  = $+ $chat(%fserverchatxx) get $gettok($sline(@navegador,1),1,32)  }
n283=  }
n284=  -
n285=  salir del fserver: { close -c %fserverchatxx | window -c @navegador | unset %fserverchatxx }
n286=}
n287=;entrada de texto userme a dccchat fserver en @fserver=======
n288=on 1:input:@fserver: { 
n289=  aline @fserver 8< $+ $me $+ 8>15 $1-
n290=  %x = 0
n291=  :ini
n292=  inc %x
n293=  if ($line(@fserver,0,1) == %x) { 
n294=    .msg $line(@fserver,%x,1) $1-
n295=    unset %x | aline @fserver 0 "msg enviado a todos los users"
n296=  }
n297=  else {
n298=    .msg $line(@fserver,%x,1) $1-
n299=    goto ini
n300=  }
n301=}
n302=;ventana de texto varios para pijadas================================
n303=MENU @wintxtvarios {
n304=  [?]Ayuda: informo Seleccione el tema.txt que desee (doble click), se cargaran los textos, seleccione la linea que desee y muestrela con otro dobleclick. $crlf $+ Si deseas añadir nuevos temas, puedes meter los ficheros en el directorio "OrioN\sistema\txtvarios\", a poder ser con extensión txt y sin lineas en blanco. Puedes bajar temas de: www.ircorion.net. Para mas información consulta el fichero "OrioN\sistema\txtvarios\PersonalizaHelp.txt" 
n305=}
n306=MENU @wintxtvarios {
n307=  dclick {  
n308=    if (.txt isin  $sline(@wintxtvarios,1)) { listtxtvarios $strip($sline(@wintxtvarios,1)) }  
n309=    else {  msg %winactive %txtscript / $sline(@wintxtvarios,1) }
n310=  }
n311=}